#
 # COMPONENT_NAME: servproc
 #
 # ORIGINS: 27
 #
 #  (C) COPYRIGHT International Business Machines Corp. 1996,1997
 # All Rights Reserved
 # Licensed Materials - Property of IBM
 # US Government Users Restricted Rights - Use, duplication or
 # disclosure restricted by GSA ADP Schedule Contract with IBM Corp.
 #
 # FUNCTIONS: Modem configuration file specifically for IBM 7852-4000
 #  modem with Auto-Reliable feature.  This feature must be turned off
 #  for Catcher calls.  This example uses the AT&F reset command to
 #  choose the factory defaults.
 #
 # The modem has configuration switches.  They should be set to the
 # factory default settings, except switches 11 and 12.  These must be
 # to UP ("AT" responses) and DOWN (Asynchronous operation), respectively.
 
 ICDelay 1
 DefaultTO 10
 CallDelay 120
 #
 #  %N  Call-Out phone number    %R   Return phone number
 #
 #
 # PROGRAMMING NOTE: No blanks between double quote marks (").
 
 condout:    send "AT&F&E2E0T\r"                 # Reset to factory defaults
                                                 # Reliable mode
                                                 # Echo off
             ignore "0\r" or "OK\r\n" timeout 2  # Ignore modem response.
             send "AT&E12&E14\r"                 # Disable pacing
                                                 # Disable data compression
             expect "0\r" or "OK\r\n" timeout 2  # Confirm commands successful.
             send "AT&SF1&S0S9=1\r"              # DSR independent of CD
                                                 # Force DSR on.
                                                 # CD respond time=100ms
             expect "0\r" or "OK\r\n" timeout 2  # Confirm commands successful.
             send "ATV0S0=0\r"                   # Numeric response code
                                                 # Auto-Answer off
             expect "0\r" or "OK\r\n" timeout 2  # Confirm commands successful.
             done
 
 connect:    send "ATDT%N\r"                     # Tone dialing command.
                                                 # %N from Call Home setup.
                                                 # Expect a connection response.
             expect "33\r" or "31\r" or "28\r" or "26\r" or "24\r" or "21\r" or "19\r" or "13\r" or "12\r" or "1\r" busy "7\r"
             timeout 60
             done
 
 retry:      send "A/"                           # Repeat the previous command.
                                                 # Expect a connection response.
             expect "33\r" or "31\r" or "28\r" or "26\r" or "24\r" or "21\r" or "19\r" or "13\r" or "12\r" or "1\r" busy "7\r"
             timeout 60
             done
 
 disconnect:
             delay 2                             # Separate from previous data.
             send "+++"                          # Assure command mode.
             delay 2                             # Allow mode switching delay.
             send "ATH0T\r"                      # Set modem switch-hook down
                                                 #  (i.e., hang up).
             ignore "0\r" or "OK\r" timeout 2    # Ignore modem response.
             send "ATE0Q1\r"                     # Initialize modem: Echo OFF,
                                                 #  Disable responses.
             ignore "0\r" timeout 1
             done
 
 condin:     send "AT&F&E2E0T\r"                 # Reset to factory defaults.
                                                 # Reliable mode
                                                 # Echo off
             ignore "0\r" or "OK\r\n" timeout 2  # Ignore modem response.
             send "AT&E12&E14\r"                 # Disable pacing
                                                 # Disable data compression
             expect "0\r" or "OK\r\n" timeout 2  # Confirm commands successful
             send "AT&SF1&S0S9=1\r"              # DSR independent of CD.
                                                 # Force DSR on.
                                                 # CD respond time=100ms
             expect "0\r" or "OK\r\n" timeout 2  # Confirm commands successful.
             send "ATV0S0=2\r"                   # Numberic response code
                                                 # Answer on 2nd ring
             expect "0\r" timeout 2              # Confirm commands successful.
             done
 
 waitcall:   ignore "2\r" timeout 1              # Ignore first ring.
             expect "2\r" timeout 10             # Pickup 2nd ring or timeout
                                                 # Expect a connection response.
             expect "33\r" or "31\r" or "28\r" or "26\r" or "24\r" or "21\r" or "19\r" or "13\r" or "12\r" or "1\r" busy "7\r"
             timeout 60
             done
 
 page:       send "ATDT%N,,,,%R;\r"              # %N = pager call center number
                                                 # Add enough commas to wait for
                                                 #  time to enter paging number.
                                                 # %R = paging number
             expect "0\r" timeout 60             # Confirm successful command.
             delay 2                             # Wait before hanging up.
             send "ATH0\r"                       # Hang up.
             expect "0\r" timeout 2              # Confirm successful command.
             done
 
 ripo:       send "AT&F&E2E0T\r"                 # Reset to factory defaults.
                                                 # Reliable mode
                                                 # Echo off
             ignore "0\r" or "OK\r\n" timeout 2  # Ignore modem response.
             send "AT&E12&E14\r"                 # Disable pacing
                                                 # Disable data compression
             expect "0\r" or "OK\r\n" timeout 2  # Confirm successful command.
             send "AT&SF1&S0S9=1\r"              # DSR independent of CD.
                                                 # Force DSR on.
                                                 # CD respond time=100ms
             expect "0\r" or "OK\r\n" timeout 2  # Confirm commands successful.
             send "ATV0S0=0\r"                   # Numeric response code
                                                 # Answer on 2nd ring
             expect "0\r" timeout 2              # Confirm commands successful.
             done                                #
 
 error:                                          # Handle unexpected modem
                                                 # responses.
             expect "8\r" or "7\r" or "6\r" or "4\r" or "3\r"
             delay 2
             done