home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / b / vmscom.req < prev    next >
Text File  |  2020-01-01  |  6KB  |  209 lines
  1. !++
  2. ! FACILITY:
  3. !   KERMIT-32/36
  4. !
  5. ! ABSTRACT:
  6. !    This file contains the common definitions for KERMIT-32 and KERMIT-36.
  7. !
  8. ! ENVIRONMENT:
  9. !   User mode
  10. !
  11. ! AUTHOR: Robert C. McQueen, CREATION DATE: 24-January-1983
  12. !
  13. ! MODIFIED BY:
  14. !
  15. !    13-June-83            Nick Bush
  16. !    Change maximum record length for RMS records to be 4096 instead
  17. !    of 256.
  18. !
  19. !    3-Jan-1984            Nick Bush
  20. !    Add FNM_xxx symbols for type of file specification to send.
  21. !
  22. !    6-July-1984            Nick Bush
  23. !    Increase MAX_MSG so that it includes space for the start-of-packet
  24. !    and end-of-line characters, plus a little slop, just in case.
  25. !
  26. ! 3.2.074    By: Robert McQueen            On: 11-March-1986
  27. !        Put MAX_MSG back the way it was.
  28. !
  29. ! 3.3.108    By: Burt Johnson            On: 1-Feb-1990
  30. !        Added Dan Norstedt's TOP10 Extended Length packet support.
  31. !        Adjust MAX_MSG for Extended Length packets
  32. !--
  33.  
  34. %SBTTL 'Table of Contents'
  35. %SBTTL 'Symbol definitions -- Routine calls'
  36.  
  37. !
  38. ! EQUATED SYMBOLS:
  39. !
  40. !
  41. ! Function types passed to FILE_OPEN routine.
  42. !
  43.  
  44. LITERAL
  45.     FNC_READ = 0,                ! Open for reading
  46.     FNC_WRITE = 1;                ! Open for writing
  47.  
  48. !
  49. ! File types used
  50. !
  51.  
  52. LITERAL
  53.     FILE_ASC = 1,                ! ASCII files (SEVEN-BIT)
  54.     FILE_BIN = 2,                ! Binary (.COM) files. (EIGHT-BIT)
  55.     FILE_BLK = 3,                ! Block transfer of files
  56.     FILE_FIX = 4;                ! Fixed 512 byte records under Files-11
  57.                         !  (used for PRO/KERMIT .TSK files)
  58. !
  59. ! File naming forms
  60. !
  61. !    Note:  Only FNM_NORMAL should be a true value (have LSB on).  Other
  62. !           values must be false, or the name will be normalized.
  63. !
  64. GLOBAL LITERAL
  65.     FNM_NORMAL = 1,                ! Normal form file names
  66.     FNM_FULL = 2,                ! Complete file names
  67.     FNM_UNTRAN = 4;                ! Untranslated (but not full) names
  68.  
  69. !
  70. ! Parity types
  71. !
  72.  
  73. GLOBAL LITERAL
  74.     PR_MIN = 0,                    ! Min offset
  75.     PR_NONE = 0,                ! No parity
  76.     PR_MARK = 1,                ! Mark parity
  77.     PR_EVEN = 2,                ! Even parity
  78.     PR_ODD = 3,                    ! Odd parity
  79.     PR_SPACE = 4,                ! Space
  80.     PR_MAX = 4;                    ! Max offset
  81. !
  82. ! DO_GENERIC commands
  83. !
  84. ! Generic commands that we can send
  85. !
  86. GLOBAL LITERAL
  87.     GC_MIN    = 1,        ! Min command
  88.     GC_EXIT    = 1,        ! EXIT command
  89.     GC_DIRECTORY = 2,        ! List DIRECTORY command
  90.     GC_DISK_USAGE = 3,        ! Display disk usage summary
  91.     GC_DELETE    = 4,        ! DELETE file command
  92.     GC_TYPE    = 5,        ! TYPE file command
  93.     GC_HELP    = 6,        ! Display HELP information
  94.     GC_LOGOUT    = 7,        ! LOGOUT command
  95.     GC_LGN    = 8,        ! LOGIN command
  96.     GC_CONNECT    = 9,        ! CONNECT (CWD) command
  97.     GC_RENAME    =10,        ! RENAME file command
  98.     GC_COPY    =11,        ! COPY file command
  99.     GC_WHO    =12,        ! WHO is logged in (Finger)
  100.     GC_SEND_MSG    =13,        ! Send a message
  101.     GC_STATUS    =14,        ! Get status of server
  102.     GC_COMMAND    =15,        ! Perform host command
  103.     GC_KERMIT    =16,        ! Perform Kermit command
  104.     GC_JOURNAL    =17,        ! Perform journal functions
  105.     GC_VARIABLE    =18,        ! Set/get variable value
  106.     GC_PROGRAM    =19,        ! Run program and pass command
  107.     GC_MAX    =19;        ! Max command
  108.  
  109. !++
  110. !The following denotes the type of communications line that is being used.
  111. !--
  112.  
  113. GLOBAL LITERAL
  114.     DP_FULL = 0,        ! Full duplex line
  115.     DP_HALF = 1;        ! Half duplex line
  116.  
  117. !++
  118. ! The following are the various checksum types that are allowed.
  119. !--
  120.  
  121. GLOBAL LITERAL
  122.     CHK_1CHAR = %C'1',                ! One character checksums
  123.     CHK_2CHAR = %C'2',                ! Two character checksums
  124.     CHK_CRC = %C'3';                ! Three character CRC.
  125.  
  126.     %SBTTL    'Character definitions'
  127.  
  128. !
  129. ! Character definitions
  130. !
  131.  
  132. LITERAL
  133.     CHR_NUL = %O'000',            ! Null (tape feed character, fill character)
  134.     CHR_SOH = %O'001',            ! Start of header
  135.     CHR_STX = %O'002',            ! Start of text
  136.     CHR_ETX = %O'003',            ! End of text
  137.     CHR_EOT = %O'004',            ! End of transmission
  138.     CHR_ENQ = %O'005',            ! Enquiry (WRU "Who are you?")
  139.     CHR_ACK = %O'006',            ! Acknowledge
  140.     CHR_BEL = %O'007',            ! Bell
  141.     CHR_BS = %O'010',            ! Backspace
  142.     CHR_TAB = %O'011',            ! Horizontal tab
  143.     CHR_LFD = %O'012',            ! Line feed
  144.     CHR_VTB = %O'013',            ! Vertical tab
  145.     CHR_FFD = %O'014',            ! Form feed
  146.     CHR_CRT = %O'015',            ! Carriage return
  147.     CHR_SO = %O'016',            ! Shift out
  148.     CHR_SI = %O'017',            ! Shift in
  149.     CHR_DLE = %O'020',            ! Data link escape
  150.     CHR_DC1 = %O'021',            ! Device control 1 (also XON)
  151.     CHR_DC2 = %O'022',            ! Device control 2 (also TAPE or AUX ON)
  152.     CHR_DC3 = %O'023',            ! Device control 3 (also XOFF)
  153.     CHR_DC4 = %O'024',            ! Device control 4 (also AUX OFF)
  154.     CHR_NAK = %O'025',            ! Negative acknowledge
  155.     CHR_SYN = %O'026',            ! Synchronous idle (SYNC)
  156.     CHR_ETB = %O'027',            ! End of transmission block
  157.     CHR_CAN = %O'030',            ! Cancel
  158.     CHR_EM = %O'031',            ! End of medium
  159.     CHR_SUB = %O'032',            ! Substitute
  160.     CHR_ESC = %O'033',            ! Escape
  161.     CHR_FS = %O'034',            ! File separator
  162.     CHR_GS = %O'035',            ! Group separator
  163.     CHR_RS = %O'036',            ! Record separator
  164.     CHR_US = %O'037',            ! Unit separator
  165.  
  166.     CHR_CTL_A = %O'001',            ! Control-A
  167.     CHR_CTL_B = %O'002',            ! Control-B
  168.     CHR_CTL_C = %O'003',            ! Control-C
  169.     CHR_CTL_D = %O'004',            ! Control-D
  170.     CHR_CTL_E = %O'005',            ! Control-E
  171.     CHR_CTL_F = %O'006',            ! Control-F
  172.     CHR_CTL_G = %O'007',            ! Control-G
  173.     CHR_CTL_H = %O'010',            ! Control-H
  174.     CHR_CTL_I = %O'011',            ! Control-I
  175.     CHR_CTL_J = %O'012',            ! Control-J
  176.     CHR_CTL_K = %O'013',            ! Control-K
  177.     CHR_CTL_L = %O'014',            ! Control-L
  178.     CHR_CTL_M = %O'015',            ! Control-M
  179.     CHR_CTL_N = %O'016',            ! Control-N
  180.     CHR_CTL_O = %O'017',            ! Control-O
  181.     CHR_CTL_P = %O'020',            ! Control-P
  182.     CHR_CTL_Q = %O'021',            ! Control-Q
  183.     CHR_CTL_R = %O'022',            ! Control-R
  184.     CHR_CTL_S = %O'023',            ! Control-S
  185.     CHR_CTL_T = %O'024',            ! Control-T
  186.     CHR_CTL_U = %O'025',            ! Control-U
  187.     CHR_CTL_V = %O'026',            ! Control-V
  188.     CHR_CTL_W = %O'027',            ! Control-W
  189.     CHR_CTL_X = %O'030',            ! Control-X
  190.     CHR_CTL_Y = %O'031',            ! Control-Y
  191.     CHR_CTL_Z = %O'032',            ! Control-Z
  192.     CHR_SP = %C' ',                ! Space
  193.     CHR_DEL = %O'177',                ! Delete
  194.     CHR_ESCAPE = %O'035',            ! Connect escape character
  195.     CHR_SIZE = 8;                ! Size of the characters we process
  196. !
  197. ! Constants
  198. !
  199.  
  200. LITERAL
  201.     TRUE = (0 EQL 0),                ! Value of true
  202.     FALSE = (0 NEQ 0),                ! Value of FALSE.
  203.     MAX_FILE_NAME = 132,            ! Maximum length of a file specification
  204.     MAX_REC_LENGTH = 4096,            ! Maximum record length we handle
  205.     INIT_DELAY = 5;                ! Initial delay time
  206.  
  207. GLOBAL LITERAL
  208.     MAX_MSG = 1002;     ! 96;            ! Maximum message length
  209.