paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-10 18:06:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* ppc ioctl nr fixed

Browse Source
This commit is contained in:
marco 2004-02-21 15:14:55 +00:00
parent b3f0b0984a
commit c6860f131d
3 changed files with 79 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/linux/ossysc.inc
View File

@ -449,7 +449,11 @@ CONST
MAP_ANONYMOUS =$20; MAP_ANONYMOUS =$20;
{Constansts Termios/Ioctl (used in Do_IsDevice) } {Constansts Termios/Ioctl (used in Do_IsDevice) }
{$ifdef PowerPc}
IOCtl_TCGETS=$403c7413;
{$else}
IOCtl_TCGETS=$5401; // TCGETS is also in termios.inc, but the sysunix needs only this IOCtl_TCGETS=$5401; // TCGETS is also in termios.inc, but the sysunix needs only this
{$endif}
Function sbrk(size : longint) : pointer; Function sbrk(size : longint) : pointer;
@ -479,7 +483,10 @@ end;
{ {
$Log$ $Log$
Revision 1.16 2004-02-06 15:58:21 florian Revision 1.17 2004-02-21 15:14:55 marco
* ppc ioctl nr fixed
Revision 1.16 2004/02/06 15:58:21 florian
* fixed x86-64 assembler problems * fixed x86-64 assembler problems
Revision 1.15 2004/02/05 01:16:12 florian Revision 1.15 2004/02/05 01:16:12 florian

9
rtl/linux/sysconst.inc
View File

@ -97,10 +97,17 @@ Const
MAP_ANONYMOUS =$20; MAP_ANONYMOUS =$20;
{Constansts Termios/Ioctl (used in Do_IsDevice) } {Constansts Termios/Ioctl (used in Do_IsDevice) }
{$ifdef PowerPC}
IOCtl_TCGETS=$403c7413;
{$else}
IOCtl_TCGETS=$5401; // TCGETS is also in termios.inc, but the sysunix needs only this IOCtl_TCGETS=$5401; // TCGETS is also in termios.inc, but the sysunix needs only this
{$endif}
{ {
$Log$ $Log$
Revision 1.8 2003-11-19 10:56:15 marco Revision 1.9 2004-02-21 15:14:56 marco
* ppc ioctl nr fixed
Revision 1.8 2003/11/19 10:56:15 marco
* some constants moved from System * some constants moved from System
Revision 1.7 2003/11/17 11:28:08 marco Revision 1.7 2003/11/17 11:28:08 marco

65
rtl/linux/termios.inc
View File

@ -7,7 +7,69 @@ Const
NCCS = 32; NCCS = 32;
NCC = 8; NCC = 8;
{$Ifndef BSD} {$ifdef powerpc}
TCGETS = $403c7413;
TCSETS = $803c7414;
TCSETSW = $803c7415;
TCSETSF = $803c7416;
TCGETA = $40147417;
TCSETA = $80147418;
TCSETAW = $80147419;
TCSETAF = $8014741c;
TCSBRK = $2000741d;
TCXONC = $2000741e;
TCFLSH = $2000741f;
TIOCEXCL = $540c;
TIOCNXCL = $540d;
TIOCSCTTY = $540e;
TIOCGPGRP = $40047477;
TIOCSPGRP = $80047476;
TIOCOUTQ = $40047473;
TIOCSTI = $5412;
TIOCGWINSZ = $40087468;
TIOCSWINSZ = $80087467;
TIOCMGET = $5415;
TIOCMBIS = $5416;
TIOCMBIC = $5417;
TIOCMSET = $5418;
TIOCGSOFTCAR = $5419;
TIOCSSOFTCAR = $541a;
FIONREAD = $4004667f;
TIOCINQ = $4004667f;
TIOCLINUX = $541c;
TIOCCONS = $541d;
TIOCGSERIAL = $541e;
TIOCSSERIAL = $541f;
TIOCPKT = $5420;
FIONBIO = $8004667e;
TIOCNOTTY = $5422;
TIOCSETD = $5423;
TIOCGETD = $5424;
TCSBRKP = $5425;
TIOCTTYGSTRUCT = $5426;
FIONCLEX = $20006602;
FIOCLEX = $20006601;
FIOASYNC = $8004667d;
TIOCSERCONFIG = $5453;
TIOCSERGWILD = $5454;
TIOCSERSWILD = $5455;
TIOCGLCKTRMIOS = $5456;
TIOCSLCKTRMIOS = $5457;
TIOCSERGSTRUCT = $5458;
TIOCSERGETLSR = $5459;
TIOCSERGETMULTI = $545a;
TIOCSERSETMULTI = $545b;
TIOCMIWAIT = $545c;
TIOCGICOUNT = $545d;
TIOCPKT_DATA = $0;
TIOCPKT_FLUSHREAD = $1;
TIOCPKT_FLUSHWRITE= $2;
TIOCPKT_STOP = $4;
TIOCPKT_START = $8;
TIOCPKT_NOSTOP = $10;
TIOCPKT_DOSTOP = $20;
{$else}
{ For Terminal handling } { For Terminal handling }
TCGETS = $5401; TCGETS = $5401;
TCSETS = $5402; TCSETS = $5402;
@ -70,7 +132,6 @@ Const
TIOCPKT_START = 8; TIOCPKT_START = 8;
TIOCPKT_NOSTOP = 16; TIOCPKT_NOSTOP = 16;
TIOCPKT_DOSTOP = 32; TIOCPKT_DOSTOP = 32;
{$else}
{$endif} {$endif}
Type Type