Microsoft Programmer's Library 1.3/Microsoft-Programers-Library-v1.3.iso/sampcode/msj/msjv4_6/unix/unixbsc.arc/TERMIO.H

Text File | 1989-05-04 | 8.2 KB | 353 lines

'
' == [ CONSTANTS        ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            FAIL                = -1
CONST            PASS                = 0


'
' == [ MSDOS IOCTL      ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            GetDeviceInformation        = &H0000
CONST            SetDeviceInformation        = &H0001
CONST            ReadCXBytes            = &H0002
CONST            WriteCXBytes            = &H0003
CONST            ReadCXBytesDnBl            = &H0004
CONST            WriteCXBytesDnBl        = &H0005
CONST            GetInputStatus            = &H0006
CONST            GetOutputStatus            = &H0007
CONST            BlockDeviceChangeable        = &H0008
CONST            LogicalLocalOrRemote        = &H0009
CONST            HandleLocalOrRemote        = &H000A
CONST            ChnageSharingRetry        = &H000B

'
' == [ C_cc ARRAY       ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            NCC                = 8

'
' == [ ASCII CHARACTERS ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            AsciiNUL            = &o000000
CONST            AsciiSOH            = &o000001
CONST            AsciiSTX            = &o000002
CONST            AsciiETX            = &o000003
CONST            AsciiEOT            = &o000004
CONST            AsciiEN                = &o000005
CONST            AsciiACK            = &o000006
CONST            AsciiBEL            = &o000007

CONST            AsciiBS                = &o000010
CONST            AsciiHT                = &o000011
CONST            AsciiLF                = &o000012
CONST            AsciiVT                = &o000013
CONST            AsciiFF                = &o000014
CONST            AsciiCR                = &o000015
CONST            AsciiSO                = &o000016
CONST            AsciiSI                = &o000017

CONST            AsciiDLE            = &o000020
CONST            AsciiDC1            = &o000021
CONST            AsciiDC2            = &o000022
CONST            AsciiDC3            = &o000023
CONST            AsciiDC4            = &o000024
CONST            AsciiNAK            = &o000025
CONST            AsciiSYN            = &o000026
CONST            AsciiETB            = &o000027

CONST            AsciiCAN            = &o000030
CONST            AsciiEOM            = &o000031
CONST            AsciiSUB            = &o000032
CONST            AsciiESC            = &o000033
CONST            AsciiFS                = &o000034
CONST            AsciiGS                = &o000035
CONST            AsciiRS                = &o000036
CONST            AsciiUS                = &o000037

CONST            AsciiSP                = &o000040
CONST            AsciiDEL            = &o000177

CONST            AsciiNL                = AsciiLF

CONST            XON                = AsciiDC1
CONST            XOFF                = AsciiDC3


'
' == [ Ciflag           ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            IGNBRK                = &o000001
CONST            BRKINT                = &o000002
CONST            IGNPAR                = &o000004
CONST            PARMRK                = &o000010
CONST            INPCK                = &o000020
CONST            ISTRIP                = &o000040
CONST            INLCR                = &o000100
CONST            IGNCR                = &o000200
CONST            ICRNL                = &o000400
CONST            IUCLC                = &o001000
CONST            IXON                = &o002000
CONST            IXANY                = &o004000
CONST            IXOFF                = &o010000


'
' == [ Coflag           ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            OPOST                = &o000001
CONST            OLCUC                = &o000002
CONST            ONLCR                = &o000004
CONST            OCRNL                = &o000010
CONST            ONOCR                = &o000020
CONST            ONLRET                = &o000040
CONST            OFILL                = &o000010
CONST            OFDEL                = &o000200

CONST            NLDLY                = &o000400
CONST            NL0                = 0
CONST            NL1                = &o000400

CONST            CRDLY                = &o003000
CONST            CR0                = 0
CONST            CR1                = &o001000
CONST            CR2                = &o002000
CONST            CR3                = &o003000

CONST            TABDLY                = &o014000
CONST            TAB0                = 0
CONST            TAB1                = &o004000
CONST            TAB2                = &o010000
CONST            TAB3                = &o014000

CONST            BSDLY                = &o020000
CONST            BS0                = 0
CONST            BS1                = &o020000

CONST            VTDLY                = &o040000
CONST            VT0                = 0
CONST            VT1                = &o040000

CONST            FFDLY                = &o010000
CONST            FF0                = 0
CONST            FF1                = &o010000


'
' == [ Ccflag           ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            CBAUD                = &o000017
CONST            B0                = 0
CONST            B50                = &o000001
CONST            B75                = &o000002
CONST            B110                = &o000003
CONST            B134                = &o000004
CONST            B150                = &o000005
CONST            B200                = &o000006
CONST            B300                = &o000007
CONST            B600                = &o000010
CONST            B1200                = &o000011
CONST            B1800                = &o000012
CONST            B2400                = &o000013
CONST            B4800                = &o000014
CONST            B9600                = &o000015
CONST            EXTA                = &o000016
CONST            EXTB                = &o000017
CONST            CSIZE                = &o000060
CONST            CS5                = 0
CONST            CS6                = &o000020
CONST            CS7                = &o000040
CONST            CS8                = &o000060
CONST            CSTOPB                = &o000100
CONST            CREAD                = &o000200
CONST            PARENB                = &o000400
CONST            PARODD                = &o001000
CONST            HUPCL                = &o002000
CONST            CLOCAL                = &o004000


'
' == [ Clflag           ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            ISIG                = &o000001
CONST            ICANON                = &o000002
CONST            XCASE                = &o000004
CONST            ECHO                = &o000010
CONST            ECHOE                = &o000020
CONST            ECHOK                = &o000040
CONST            ECHONL                = &o000100
CONST            NOFLSH                = &o000200


'
' == [ Ccc              ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            VINTR                = 1
CONST            VQUIT                = 2
CONST            VERASE                = 3
CONST            VKILL                = 4
CONST            VEOF                = 5
CONST            VEOL                = 6
CONST            RESERVED            = 7
CONST            SWTCH                = 8


'
' == [ MsdosIoctl       ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

CONST            TCGETS                = 0
CONST            TCSETS                = 1
CONST            TCSETAW                = 2
CONST            TCSETAF                = 3
CONST            TCSBRK                = 4
CONST            TCXONC                = 5
CONST            TCFLSH                = 6

CONST            TCGETA                = TCGETS
CONST            TCSETA                = TCSETS




'
' == [ USER TYPES       ] ===============================================
'                                    =
'                                    =
'                                    =
'                                    =
' =======================================================================
'

    '
    '    The termio struct (C)  that the BASIC programmer uses to
    '    interface with the function DeviceIoctl.
    '

    TYPE    Termio

        Ciflag        AS        INTEGER
        Coflag        AS        INTEGER
        Ccflag        AS        INTEGER
        Clflag        AS        INTEGER

        Cline        AS        STRING    * 1
        Cpad        AS        STRING    * 1

        Ccc        AS        STRING    * NCC

    END    TYPE


    '
    '    Create the struct that the MS-DOS AsyncTermio Device Driver
    '    expects via the real MS-DOS ioctl function call
    '

    TYPE    MsdosTermio

        TtyParams    AS        Termio

        FileHandle    AS        INTEGER
        Command        AS        INTEGER
        Arguement    AS        INTEGER

    END    TYPE

    '
    '    Record for a register struct that is used for BASIC's
    '    CALL INETRRUPT statement.
    '

    TYPE    RegType

        AX    AS    INTEGER
        BX    AS    INTEGER
        CX    AS    INTEGER
        DX    AS    INTEGER
        BP    AS    INTEGER
        SI    AS    INTEGER
        DI    AS    INTEGER
        FLAGS    AS    INTEGER
        DS    AS    INTEGER
        ES    AS    INTEGER

    END    TYPE

'
' == [ FUNCTION DECLS  ] ================================================
'                                                                       =
'                                                                       =
' =======================================================================
'
    DEFINT    A-Z
    DEFINT    a-z

    DECLARE FUNCTION    TtyDeviceIoctl( FileHandle AS INTEGER, Command AS INTEGER, TtyParams AS ANY )
    DECLARE    FUNCTION    SetBinaryMode( FileHandle AS INTEGER )
    DECLARE    FUNCTION    KbHit()

    DECLARE    SUB        DoSomeThingElse()
    DECLARE    SUB        Tty2Con2Tty( FileNumber AS INTEGER )
    DECLARE    SUB        PrintTermioRecord( TtyParams AS Termio )