updated Unix.Mod for OpenBSD -- antranigv

Former-commit-id: c3a5559aab
This commit is contained in:
Antranig Vartanian 2015-12-06 21:27:13 +04:00
parent 7d3258c2f2
commit 4bebc891a4

View file

@ -171,9 +171,7 @@ TYPE
*) *)
JmpBuf* = RECORD JmpBuf* = RECORD
jmpbuf: ARRAY 8 OF LONGINT; (* 8 * 8 = 64 *) jmpbuf: ARRAY 11 OF LONGINT; (* 8 * 8 = 64 *)
maskWasSaved*: INTEGER;
savedMask*: ARRAY 16 OF LONGINT; (* 16 * 8 = 128 *)
END ; END ;
Status* = RECORD (* struct stat *) Status* = RECORD (* struct stat *)
@ -206,7 +204,7 @@ struct timeval
*) *)
(* from sys/time.h on OpenBSD *)
Timeval* = RECORD Timeval* = RECORD
sec*, usec*: LONGINT sec*, usec*: LONGINT
END ; END ;
@ -239,12 +237,16 @@ from man gettimeofday
SignalHandler* = PROCEDURE (sig, code: LONGINT; scp: SigCtxPtr); SignalHandler* = PROCEDURE (sig, code: LONGINT; scp: SigCtxPtr);
(* From sys/dirent.h on OpenBSD 5.6 *)
Dirent* = RECORD Dirent* = RECORD
ino, off: LONGINT; ino, off: LONGINT;
reclen: INTEGER; reclen: ARRAY 2 OF CHAR;
type, namlen : CHAR;
padding : ARRAY 4 OF CHAR;
name : ARRAY 256 OF CHAR; name : ARRAY 256 OF CHAR;
END ; END ;
(* from sys/resource.h on OpenBSD *)
Rusage* = RECORD Rusage* = RECORD
utime*, stime*: Timeval; utime*, stime*: Timeval;
maxrss*, ixrss*, idrss*, isrss*, maxrss*, ixrss*, idrss*, isrss*,
@ -253,26 +255,34 @@ from man gettimeofday
nvcsw*, nivcsw*: LONGINT nvcsw*, nivcsw*: LONGINT
END ; END ;
(* from sys/uio.h on OpenBSD 5.6 -- antranigv*)
Iovec* = RECORD Iovec* = RECORD
base*, len*: LONGINT base*, len*: LONGINT
END ; END ;
(* TOBEDONE *)
SocketPair* = ARRAY 2 OF LONGINT; SocketPair* = ARRAY 2 OF LONGINT;
(* from sys/poll.h on OpenBSD 5.6 -- antranigv *)
Pollfd* = RECORD Pollfd* = RECORD
fd*: LONGINT; fd*: INTEGER;
events*, revents*: INTEGER events*, revents*: ARRAY 2 OF CHAR;
END ; END ;
(* different from linux, written new for OpenBSD from sys/socket.h -- antranigv *)
Sockaddr* = RECORD Sockaddr* = RECORD
family0*, family1*: SHORTINT; (*family0*, family1*: SHORTINT;
pad0, pad1: SHORTINT; pad0, pad1: SHORTINT;
pad2 : INTEGER; pad2 : INTEGER;
(*port*: INTEGER; (*port*: INTEGER;
internetAddr*: LONGINT;*) internetAddr*: LONGINT;*)
pad*: ARRAY 14 OF CHAR; pad*: ARRAY 14 OF CHAR;*)
len* : CHAR;
family* : CHAR;
data* : ARRAY 14 OF CHAR;
END ; END ;
(* identical to linux. OpenBSD 5.6 -- antranigv *)
HostEntry* = POINTER [1] TO Hostent; HostEntry* = POINTER [1] TO Hostent;
Hostent* = RECORD Hostent* = RECORD
name*, aliases*: LONGINT; name*, aliases*: LONGINT;