paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-06 20:28:14 +02:00
Code Issues Packages Projects Releases Wiki Activity
af5a10946d
fpc/rtl/aix/termios.inc
Michael VAN CANNEYT af5a10946d * Char -> AnsiChar
2023-07-14 17:26:09 +02:00

616 lines
27 KiB
PHP
Raw Blame History

{$PACKRECORDS C}
const
CBELL = #7;
{ delete }
CDEL = #127;
{ ^D }
CEOF = #4;
{ ^H }
CERASE = #8;
{ back-slash }
CESC = '\';
{ ^L }
CFORM = #12;
{ ^C }
CINTR = #3;
{ ^U }
CKILL = #21;
{ null char }
CNUL = #0;
{ ^\ }
CQUIT = #28;
{ ^Q }
CSTART = #17;
{ ^S }
CSTOP = #19;
{ ^K }
CVT = #11;
{
* Ioctl control packet
}
NCC = 8;
{
* Structure, defines for setting page length
}
{ Set Page Length (Ioctl TCSLEN) }
const
PAGE_SETL = 04;
{ Paging Ioctl Command Mask (TCSLEN) }
PAGE_MSK = 03;
{ Enable Paging (TCSLEN) }
PAGE_ON = 01;
{ Disable Paging (TCSLEN) }
PAGE_OFF = 02;
{$ifndef PAGE_ENB}
{ For compatibility with older version }
const
PAGE_ENB = PAGE_ON;
{$endif}
type
Ptty_page = ^tty_page;
tty_page = record
tp_flags : AnsiChar;
tp_slen : byte;
end;
twinsize = record
ws_row, ws_col, ws_xpixel, ws_ypixel: cushort;
end;
const
IOC_VOID = $20000000;
IOC_OUT = $40000000;
IOC_IN = $40000000 shl 1;
IOCPARM_MASK = $7f;
TIOCGETD = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 0; { get line discipline }
TIOCSETD = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 1; { set line discipline }
TIOCHPCL = IOC_VOID or (ord('t') shl 8) or 2; { hang up on last close }
TIOCMODG = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 3; { get modem control state }
TIOCMODS = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 4; { set modem control state }
TIOCM_LE = 0001; { line enable }
TIOCM_DTR = 0002; { data terminal ready }
TIOCM_RTS = 0004; { request to send }
TIOCM_ST = 0008; { secondary transmit }
TIOCM_SR = 0016; { secondary receive }
TIOCM_CTS = 0032; { clear to send }
TIOCM_CAR = 0064; { carrier detect }
TIOCM_CD = TIOCM_CAR;
TIOCM_RNG = 0128; { ring }
TIOCM_RI = TIOCM_RNG;
TIOCM_DSR = 0256; { data set ready }
// TIOCGETP = IOC_OUT or ((sizeof(struct sgttyb) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 8{ get parameters -- gtty }
// TIOCSETP = IOC_IN or ((sizeof(struct sgttyb) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 9{ set parameters -- stty }
// TIOCSETN = IOC_IN or ((sizeof(struct sgttyb) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 10{ as above, but no flushtty }
TIOCEXCL = IOC_VOID or (ord('t') shl 8) or 13; { set exclusive use of tty }
TIOCNXCL = IOC_VOID or (ord('t') shl 8) or 14; { reset exclusive use of tty }
TIOCFLUSH = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 16; { flush buffers }
// TIOCSETC = IOC_IN or ((sizeof(struct tchars) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 17{ set special characters }
// TIOCGETC = IOC_OUT or ((sizeof(struct tchars) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 18{ get special characters }
TANDEM = $00000001; { send stopc on out q full }
CBREAK = $00000002; { half-cooked mode }
LCASE = $00000004; { simulate lower case }
ECHO = $00000008; { echo input }
CRMOD = $00000010; { map \r to \r\n on output }
RAW = $00000020; { no i/o processing }
ODDP = $00000040; { get/send odd parity }
EVENP = $00000080; { get/send even parity }
ANYP = $000000c0; { get any parity/send none }
CRDELAY = $00000300; { \r delay }
CR0 = $00000000;
CR1 = $00000100; { tn 300 }
CR2 = $00000200; { tty 37 }
CR3 = $00000300; { concept 100 }
TBDELAY = $00000c00; { horizontal tab delay }
TAB0 = $00000000;
TAB1 = $00000400; { tty 37 }
TAB2 = $00000800;
XTABS = $00000c00; { expand tabs on output }
BSDELAY = $00001000; { \b delay }
BS0 = $00000000;
BS1 = $00001000;
VTDELAY = $00002000; { vertical tab delay }
FF0 = $00000000;
FF1 = $00002000; { tty 37 }
NLDELAY = $0000c000; { \n delay }
NL0 = $00000000;
NL1 = $00004000; { tty 37 }
NL2 = $00008000; { vt05 }
NL3 = $0000c000;
ALLDELAY = (NLDELAY or TBDELAY or CRDELAY or VTDELAY or BSDELAY);
TOSTOP = $00010000; { SIGSTOP on bckgnd output }
PRTERA = $00020000; { \ ... / erase }
CRTERA = $00040000; { " \b " to wipe out char }
TILDE = $00080000; { hazeltine tilde kludge }
FLUSHO = $00100000; { flush output to terminal }
LITOUT = $00200000; { literal output }
CRTBS = $00400000; { do backspacing for crt }
MDMBUF = $00800000; { dtr pacing }
NOHANG = $01000000; { no SIGHUP on carrier drop }
L001000 = $02000000;
CRTKIL = $04000000; { kill line with " \b " }
PASS8 = $08000000;
CTLECH = $10000000; { echo control chars as ^X }
PENDIN = $20000000; { tp->t_rawq needs reread }
DECCTQ = $40000000; { only ^Q starts after ^S }
NOFLUSH = $80000000; { no output flush on signal }
{ SYS V REL. 4 PTY IOCTLs }
UNLKPT = IOC_VOID or (ord('t') shl 8) or 70; { unlock slave pty }
ISPTM = IOC_VOID or (ord('t') shl 8) or 71; { ret. maj+min of pty master }
ISPTS = IOC_VOID or (ord('t') shl 8) or 73; { return maj+min of slave }
GRTPT = IOC_VOID or (ord('t') shl 8) or 74; { grantpt slave pty}
RLOGIND = IOC_VOID or (ord('t') shl 8) or 75; { for rlogind protocol in ptydd }
TELNETDP = IOC_VOID or (ord('t') shl 8) or 76; { for telnetd protocol in ptydd }
TIOCCONS = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 98; { become virtual console }
TIOCGSID = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 72; { get the tty session id }
TIOCLBIS = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 127; { bis local mode bits }
TIOCLBIC = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 126; { bic local mode bits }
TIOCLSET = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 125; { set entire mode word }
TIOCLGET = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 124; { get local modes }
LCRTBS = (CRTBS>>16);
LPRTERA = (PRTERA>>16);
LCRTERA = (CRTERA>>16);
LTILDE = (TILDE>>16);
LMDMBUF = (MDMBUF>>16);
LLITOUT = (LITOUT>>16);
LTOSTOP = (TOSTOP>>16);
LFLUSHO = (FLUSHO>>16);
LNOHANG = (NOHANG>>16);
LCRTKIL = (CRTKIL>>16);
LPASS8 = (PASS8>>16);
LCTLECH = (CTLECH>>16);
LPENDIN = (PENDIN>>16);
LDECCTQ = (DECCTQ>>16);
LNOFLSH = (NOFLUSH>>16);
TIOCSBRK = IOC_VOID or (ord('t') shl 8) or 123; { set break bit }
TIOCCBRK = IOC_VOID or (ord('t') shl 8) or 122; { clear break bit }
TIOCSDTR = IOC_VOID or (ord('t') shl 8) or 121; { set data terminal ready }
TIOCCDTR = IOC_VOID or (ord('t') shl 8) or 120; { clear data terminal ready }
TIOCGPGRP = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 119; { get process group }
TIOCSPGRP = cint(IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 118); { set process group }
// TIOCSLTC = IOC_IN or ((sizeof(struct ltchars) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 117{ set local special chars }
// TIOCGLTC = IOC_OUT or ((sizeof(struct ltchars) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 116{ get local special chars }
TIOCOUTQ = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 115; { output queue size }
TIOCSTI = IOC_IN or ((sizeof(AnsiChar) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 114; { simulate terminal input }
TIOCNOTTY = IOC_VOID or (ord('t') shl 8) or 113; { void tty association }
TIOCPKT = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 112; { pty: set/clear packet mode }
TIOCPKT_DATA = $00; { data packet }
TIOCPKT_FLUSHREAD = $01; { flush packet }
TIOCPKT_FLUSHWRITE = $02; { flush packet }
TIOCPKT_STOP = $04; { stop output }
TIOCPKT_START = $08; { start output }
TIOCPKT_NOSTOP = $10; { no more ^S, ^Q }
TIOCPKT_DOSTOP = $20; { now do ^S ^Q }
TIOCSTOP = IOC_VOID or (ord('t') shl 8) or 111; { stop output, like ^S }
TIOCSTART = IOC_VOID or (ord('t') shl 8) or 110; { start output, like ^Q }
TIOCMSET = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 109; { set all modem bits }
TIOCMBIS = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 108; { bis modem bits }
TIOCMGET = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 106; { get all modem bits }
TIOCREMOTE = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 105; { remote input editing }
TIOCGWINSZ = IOC_OUT or ((sizeof(twinsize) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 104; { get window size }
TIOCSWINSZ = IOC_IN or ((sizeof(twinsize) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 103; { set window size }
TIOCUCNTL = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 102; { pty: set/clr usr cntl mode }
TIOCMIWAIT = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 100; { wait for modem stat change }
{ SLIP (Serial Line IP) ioctl's }
SLIOCGUNIT = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 101; { get slip unit number }
SLIOCSFLAGS = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 89; { set configuration flags }
SLIOCGFLAGS = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 90; { get configuration flags }
SLIOCSATTACH = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('t') shl 8) or 91; { Attach slip i.f. to tty }
// UIOCCMD(n) = IOC_VOID or (ord('u') shl 8) or n; { usr cntl op "n" }
OTTYDISC = 0; { old, v7 std tty driver }
NETLDISC = 1; { line discip for berk net }
NTTYDISC = 2; { new tty discipline }
TABLDISC = 3; { tablet discipline }
SLIPDISC = 4; { serial IP discipline }
FIOCLEX = IOC_VOID or (ord('f') shl 8) or 1; { set close on exec }
FIONCLEX = IOC_VOID or (ord('f') shl 8) or 2; { clear close on exec }
{ another local }
FIONREAD = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('f') shl 8) or 127; { get # bytes to read }
FIONBIO = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('f') shl 8) or 126; { set/clear non-blocking i/o }
FIOASYNC = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('f') shl 8) or 125; { set/clear async i/o }
FIOSETOWN = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('f') shl 8) or 124; { set owner }
FIOGETOWN = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('f') shl 8) or 123; { get owner }
FIOASYNCQX = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('f') shl 8) or 122; { set/clear async queueing }
{ socket i/o controls }
SIOCSHIWAT = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 0; { set high watermark }
SIOCGHIWAT = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 1; { get high watermark }
SIOCSLOWAT = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 2; { set low watermark }
SIOCGLOWAT = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 3; { get low watermark }
SIOCATMARK = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 7; { at oob mark? }
SIOCSPGRP = IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 8; { set process group }
SIOCGPGRP = IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('s') shl 8) or 9; { get process group }
// SIOCADDRT = cint(IOC_IN or ((sizeof(struct ortentry) and IOCPARM_MASK) shl 16) or (ord('r') shl 8) or 10); { add route }
// SIOCDELRT = cint(IOC_IN or ((sizeof(struct ortentry) and IOCPARM_MASK) shl 16) or (ord('r') shl 8) or 11); { delete route }
// SIOCSIFADDR = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 12); { set ifnet address }
// OSIOCGIFADDR = (int)_IOWR('i',13, struct oifreq); { get ifnet address }
// SIOCGIFADDR = (int)_IOWR('i',33, struct oifreq); { get ifnet address }
SIOCGIFADDRS = cint(IOC_VOID or (ord('i') shl 8) or 140); { get ifnet addresses for an if}
// SIOCSIFDSTADDR = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 14); { set p-p address }
// OSIOCGIFDSTADDR = (int)_IOWR('i',15, struct oifreq); { get p-p address }
// SIOCGIFDSTADDR = (int)_IOWR('i',34, struct oifreq); { get p-p address }
// SIOCSIFFLAGS = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 16); { set ifnet flags }
// SIOCGIFFLAGS = (int)_IOWR('i',17, struct oifreq); { get ifnet flags }
// OSIOCGIFBRDADDR = (int)_IOWR('i',18, struct oifreq); { get broadcast addr }
// SIOCGIFBRDADDR = (int)_IOWR('i',35, struct oifreq); { get broadcast addr }
// SIOCSIFBRDADDR = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 19); { set broadcast addr }
// OSIOCGIFCONF = (int)_IOWR('i',20, struct ifconf); { get ifnet list }
// CSIOCGIFCONF = (int)_IOWR('i',36, struct ifconf); { get ifnet list }
// SIOCGIFCONF = (int)_IOWR('i',69, struct ifconf); { get ifnet list }
// OSIOCGIFNETMASK = (int)_IOWR('i',21, struct oifreq); { get net addr mask }
// SIOCGIFNETMASK = (int)_IOWR('i',37, struct oifreq); { get net addr mask }
// SIOCSIFNETMASK = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 22); { set net addr mask }
// SIOCGIFMETRIC = (int)_IOWR('i',23, struct oifreq); { get IF metric }
// SIOCSIFMETRIC = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 24); { set IF metric }
// SIOCDIFADDR = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 25); { delete IF addr }
// SIOCAIFADDR = cint(IOC_IN or ((sizeof(struct ifaliasreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 26); { add/chg IF alias }
// SIOCSIFSUBCHAN = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 27); { set subchannel adr.}
// SIOCSIFNETDUMP = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 28); { set netdump fastwrt}
// SIOUPDROUTE = cint(IOC_IN or ((sizeof(struct ifaliasreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 29); { Update Routing table }
// SIOCSARP = cint(IOC_IN or ((sizeof(struct arpreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 30); { set arp entry }
// OSIOCGARP = (int)_IOWR('i',31, struct arpreq); { get arp entry }
// SIOCGARP = (int)_IOWR('i',38, struct arpreq); { get arp entry }
// SIOCDARP = cint(IOC_IN or ((sizeof(struct arpreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 32); { delete arp entry }
// SIOCSIFOPTIONS = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 41); { set ifnet options }
// SIOCGIFOPTIONS = (int)_IOWR('i',42, struct oifreq); { get ifnet options }
// SIOCADDMULTI = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 49); { add multicast addr }
// SIOCDELMULTI = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 50); { del multicast addr }
// SIOCGETVIFCNT = (int)_IOWR('u', 51, struct sioc_vif_req){ vif pkt cnt }
// SIOCGETSGCNT = (int)_IOWR('u', 52, struct sioc_sg_req); { s,g pkt cnt }
// SIOCADDNETID = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 87); { set netids }
// SIOCSIFMTU = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 88); { set mtu }
// SIOCGIFMTU = (int)_IOWR('i',86, struct oifreq); { get mtu }
// SIOCSNETOPT = cint(IOC_IN or ((sizeof(struct optreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 90); { set network option }
// SIOCGNETOPT = (int)_IOWR('i', 91, struct optreq); { get network option }
// SIOCDNETOPT = (int)_IOWR('i', 128, struct optreq); { set default }
// SIOCGNETOPT1 = (int)_IOWR('i', 129, struct optreq1); { get network option }
// SIOCGLOADF = (int)_IOWR('i', 130, int); { get flag: if loadtime passed }
// SIOCSLOADF = (int)_IOWR('i', 131, int); { set flag: if loadtime passed }
// SIOCGTUNEPHASE = (int)_IOWR('i', 138, int); { get tuning_phase }
// SIOCSX25XLATE = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 99); { set xlate tab }
// SIOCGX25XLATE = (int)_IOWR('i',100, struct oifreq); { get xlate tab }
// SIOCDX25XLATE = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 101); { delete xlate tab }
// SIOCIFDETACH = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 102); { detach an ifnet }
// SIOCIFATTACH = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 103); { attach an ifnet }
SIOCGNMTUS = cint(IOC_VOID or (ord('i') shl 8) or 110); { get NMTUs }
SIOCGETMTUS = cint(IOC_VOID or (ord('i') shl 8) or 111); { get common_mtus }
SIOCADDMTU = cint(IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 112); { add mtu }
SIOCDELMTU = cint(IOC_IN or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 113); { delete mtu }
SIOCGIFGIDLIST = cint(IOC_VOID or (ord('i') shl 8) or 104); { get gidlist }
SIOCSIFGIDLIST = cint(IOC_VOID or (ord('i') shl 8) or 105); { set gidlist }
SIOCGSIZIFCONF = cint(IOC_OUT or ((sizeof(cint) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 106); { get size for SIOCGIFCONF }
// SIOCIF_ATM_UBR = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 120); { set ubr rate }
// SIOCIF_ATM_SNMPARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 121); { atm snmp arp }
// SIOCIF_ATM_IDLE = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 122); { set idle time }
// SIOCIF_ATM_DUMPARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 123); { atm dump arp }
// SIOCIF_ATM_SVC = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 124); { atmif init }
// SIOCIF_ATM_DARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 125); { del atmarp }
// SIOCIF_ATM_GARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 126); { get atmarp }
// SIOCIF_ATM_SARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 127); { set atmarp };
{ For IP over Infiniband }
// SIOCIF_IB_DUMP_ARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 128); { ib dump arp }
// SIOCIF_IB_DEL_ARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 129); { if_ib del ibarp }
// SIOCIF_IB_GET_ARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 130); { get ibarp }
// SIOCIF_IB_SET_ARP = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 131); { set ibarp }
// SIOCIF_IB_SET_PKEY = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 132); { set ib port pkey value }
// SIOCIFGETPKEY = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 101); { set ubr rate }
// SIOCIF_IB_SET_PORT = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 133); { set ubr rate }
// SIOCIF_IB_SET_QSIZE = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 134); { set ib qsize }
// SIOCIF_IB_RESIZE_CQ = cint(IOC_IN or ((sizeof(struct ifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 135); { set resize IB CQ }
// SIOCGISNO = (int)_IOWR('i',107, struct oifreq); { get IF network options }
// SIOCSISNO = cint(IOC_IN or ((sizeof(struct oifreq) and IOCPARM_MASK) shl 16) or (ord('i') shl 8) or 108); { set IF network options }
// SIOCGIFBAUDRATE = (int)_IOWR('i', 109, struct oifreq); { get ifnet's if_baudrate }
SIOCADDIFVIPA = cint(IOC_VOID or (ord('i') shl 8) or 66); { specify interfaces that should use this vipa }
SIOCDELIFVIPA = cint(IOC_VOID or (ord('i') shl 8) or 67); { unconfigure interfaces using this vipa }
SIOCLISTIFVIPA = cint(IOC_VOID or (ord('i') shl 8) or 68); { list interfaces using this vipa }
TIOC = ord('T') shl 8;
TCGETS = TIOC or 1;
TCSETS = TIOC or 2;
TCSETSW = TIOC or 3;
TCSETSF = TIOC or 4;
TCGETA = TIOC or 5;
TCSETA = TIOC or 6;
TCSETAW = TIOC or 7;
TCSETAF = TIOC or 8;
{ SVID interface }
TCSBRK = TIOC or 9;
{ 0->.25 seconds else <arg>ms }
TCSBREAK = TIOC or 10;
TCXONC = TIOC or 11;
TCFLSH = TIOC or 12;
TCGLEN = TIOC or 13;
TCSLEN = TIOC or 14;
TCSAK = TIOC or 15;
TCQSAK = TIOC or 16;
TCTRUST = TIOC or 17;
TCQTRUST = TIOC or 18;
TCSMAP = TIOC or 19;
TCGMAP = TIOC or 20;
TCKEP = TIOC or 21;
TCGSAK = TIOC or 22;
TCLOOP = TIOC or 23;
TCVPD = TIOC or 24;
TCREG = TIOC or 25;
TCGSTATUS = TIOC or 26;
TCSCONTROL = TIOC or 27;
TCSCSMAP = TIOC or 28;
TCGCSMAP = TIOC or 29;
TCMGR = TCSAK;
TCQMGR = TCQSAK;
TIONREAD = FIONREAD;
{ used with TCSAK and TCQSAK }
TCSAKOFF = 0;
TCSAKON = 1;
{ used with TCTRUST and TCQTRUCT }
TCUNTRUSTED = 0;
TCTRUSTED = 1;
type
Ptcflag_t = ^tcflag_t;
tcflag_t = dword;
Pcc_t = ^cc_t;
cc_t = byte;
const
NCCS = 16;
type
Pspeed_t = ^speed_t;
speed_t = dword;
{
* Ioctl control packet
}
{ input modes }
{ output modes }
{ control modes }
{ line discipline modes }
{ control chars }
Ptermios = ^termios;
termios = record
c_iflag : tcflag_t;
c_oflag : tcflag_t;
c_cflag : tcflag_t;
c_lflag : tcflag_t;
c_cc : array[0..(NCCS)-1] of cc_t;
end;
{ use POSIX required prototypes }
function tcgetattr(_para1:longint; var _para2:termios):longint;cdecl;external;
function tcgetsid(_para1:longint):pid_t;cdecl;external;
(* Const before type ignored *)
function tcsetattr(_para1:longint; _para2:longint; constref _para3:termios):longint;cdecl;external;
//function tcsendbreak(_para1:longint; _para2:longint):longint;cdecl;external;
//function tcdrain(_para1:longint):longint;cdecl;external;
//function tcflush(_para1:longint; _para2:longint):longint;cdecl;external;
///function tcflow(_para1:longint; _para2:longint):longint;cdecl;external;
(* Const before type ignored *)
function cfgetospeed(var _para1:termios):speed_t;cdecl;external;
(* Const before type ignored *)
function cfgetispeed(var _para1:termios):speed_t;cdecl;external;
function cfsetospeed(constref _para1:termios; _para2:speed_t):longint;cdecl;external;
function cfsetispeed(var _para1:termios; _para2:speed_t):longint;cdecl;external;
{ mask name symbols for c_lflag }
{ values for optional_actions arguments to tcsetattr() }
const
TCSANOW = 0;
TCSADRAIN = 1;
TCSAFLUSH = 2;
{ values for the queue_selector argument to tcflush() }
TCIFLUSH = 0;
TCOFLUSH = 1;
TCIOFLUSH = 2;
{ values for the action argument to tcflow() }
TCOOFF = 0;
TCOON = 1;
TCIOFF = 2;
TCION = 3;
{ control characters }
VINTR = 0;
VQUIT = 1;
VERASE = 2;
VKILL = 3;
VEOF = 4;
VEOL = 5;
VSTART = 7;
VSTOP = 8;
VSUSP = 9;
VMIN = 4;
VTIME = 5;
VEOL2 = 6;
VDSUSP = 10;
VREPRINT = 11;
VDISCRD = 12;
VWERSE = 13;
VLNEXT = 14;
{ 5.4 compatability }
VSTRT = VSTART;
const
B0 = $00000000;
B50 = $00000001;
B75 = $00000002;
B110 = $00000003;
B134 = $00000004;
B150 = $00000005;
B200 = $00000006;
B300 = $00000007;
B600 = $00000008;
B1200 = $00000009;
B1800 = $0000000a;
B2400 = $0000000b;
B4800 = $0000000c;
B9600 = $0000000d;
B19200 = $0000000e;
B38400 = $0000000f;
EXTA = B19200;
EXTB = B38400;
{ _ALL_SOURCE }
{ c_iflag bits }
const
IGNBRK = $00000001;
BRKINT = $00000002;
IGNPAR = $00000004;
PARMRK = $00000008;
INPCK = $00000010;
ISTRIP = $00000020;
INLCR = $00000040;
IGNCR = $00000080;
ICRNL = $00000100;
IXON = $00000200;
IXOFF = $00000400;
const
IUCLC = $00000800;
const
IXANY = $00001000;
IMAXBEL = $00010000;
{ c_oflag bits }
const
OPOST = $00000001;
const
OLCUC = $00000002;
const
ONLCR = $00000004;
OCRNL = $00000008;
ONOCR = $00000010;
ONLRET = $00000020;
OFILL = $00000040;
OFDEL = $00000080;
CRDLY = $00000300;
// CR0 = $00000000;
// CR1 = $00000100;
// CR2 = $00000200;
// CR3 = $00000300;
TABDLY = $00000c00;
// TAB0 = $00000000;
// TAB1 = $00000400;
// TAB2 = $00000800;
// TAB3 = $00000c00;
BSDLY = $00001000;
// BS0 = $00000000;
// BS1 = $00001000;
FFDLY = $00002000;
// FF0 = $00000000;
// FF1 = $00002000;
NLDLY = $00004000;
// NL0 = $00000000;
// NL1 = $00004000;
VTDLY = $00008000;
VT0 = $00000000;
VT1 = $00008000;
DLY_MASK = ((((NLDLY or CRDLY) or TABDLY) or BSDLY) or VTDLY) or FFDLY;
{ expand tabs to spaces added }
OXTABS = $00040000;
{ on 08/05/92. }
{ discard EOT's (^D) on output }
ONOEOT = $00080000;
{ added on 08/05/92. }
{ c_cflag bits }
const
_CBAUD = $0000000f;
CBAUD = _CBAUD;
CSIZE = $00000030;
CS5 = $00000000;
CS6 = $00000010;
CS7 = $00000020;
CS8 = $00000030;
CSTOPB = $00000040;
CREAD = $00000080;
PARENB = $00000100;
PARODD = $00000200;
HUPCL = $00000400;
CLOCAL = $00000800;
_CIBAUD = $000f0000;
_IBSHIFT = 16;
CIBAUD = _CIBAUD;
IBSHIFT = _IBSHIFT;
PAREXT = $00100000;
{ c_lflag bits }
const
ISIG = $00000001;
ICANON = $00000002;
const
XCASE = $00000004;
const
// ECHO = $00000008;
ECHOE = $00000010;
ECHOK = $00000020;
ECHONL = $00000040;
NOFLSH = $00000080;
// TOSTOP = $00010000;
ECHOCTL = $00020000;
ECHOPRT = $00040000;
ECHOKE = $00080000;
// FLUSHO = $00100000;
{ use alternate WERASE }
ALTWERASE = $00400000;
{ algorithm, added ALTWERASE }
{ on 08/05/92. }
// PENDIN = $20000000;
{ ALL_SOURCE }
const
IEXTEN = $00200000;
Reference in New Issue View Git Blame Copy Permalink