add a couple constants for unix file access
							parent
							
								
									d4bdeab1c7
								
							
						
					
					
						commit
						bbb3597ac2
					
				| 
						 | 
				
			
			@ -7,13 +7,15 @@ IN: unix
 | 
			
		|||
 | 
			
		||||
: MAXPATHLEN 1024 ; inline
 | 
			
		||||
 | 
			
		||||
: O_RDONLY  HEX: 0000 ; inline
 | 
			
		||||
: O_WRONLY  HEX: 0001 ; inline
 | 
			
		||||
: O_RDWR    HEX: 0002 ; inline
 | 
			
		||||
: O_APPEND  HEX: 0008 ; inline
 | 
			
		||||
: O_CREAT   HEX: 0200 ; inline
 | 
			
		||||
: O_TRUNC   HEX: 0400 ; inline
 | 
			
		||||
: O_EXCL    HEX: 0800 ; inline
 | 
			
		||||
: O_RDONLY   HEX: 0000 ; inline
 | 
			
		||||
: O_WRONLY   HEX: 0001 ; inline
 | 
			
		||||
: O_RDWR     HEX: 0002 ; inline
 | 
			
		||||
: O_NONBLOCK HEX: 0004 ; inline
 | 
			
		||||
: O_APPEND   HEX: 0008 ; inline
 | 
			
		||||
: O_CREAT    HEX: 0200 ; inline
 | 
			
		||||
: O_TRUNC    HEX: 0400 ; inline
 | 
			
		||||
: O_EXCL     HEX: 0800 ; inline
 | 
			
		||||
: O_NOCTTY   HEX: 20000 ; inline
 | 
			
		||||
 | 
			
		||||
: SOL_SOCKET HEX: ffff ; inline
 | 
			
		||||
: SO_REUSEADDR HEX: 4 ; inline
 | 
			
		||||
| 
						 | 
				
			
			@ -24,7 +26,6 @@ IN: unix
 | 
			
		|||
: F_SETFD 2 ; inline
 | 
			
		||||
: F_SETFL 4 ; inline
 | 
			
		||||
: FD_CLOEXEC 1 ; inline
 | 
			
		||||
: O_NONBLOCK 4 ; inline
 | 
			
		||||
 | 
			
		||||
C-STRUCT: sockaddr-in
 | 
			
		||||
    { "uchar" "len" }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -7,13 +7,15 @@ USING: alien.syntax ;
 | 
			
		|||
 | 
			
		||||
: MAXPATHLEN 1024 ; inline
 | 
			
		||||
 | 
			
		||||
: O_RDONLY  HEX: 0000 ; inline
 | 
			
		||||
: O_WRONLY  HEX: 0001 ; inline
 | 
			
		||||
: O_RDWR    HEX: 0002 ; inline
 | 
			
		||||
: O_CREAT   HEX: 0040 ; inline
 | 
			
		||||
: O_EXCL    HEX: 0080 ; inline
 | 
			
		||||
: O_TRUNC   HEX: 0200 ; inline
 | 
			
		||||
: O_APPEND  HEX: 0400 ; inline
 | 
			
		||||
: O_RDONLY   HEX: 0000 ; inline
 | 
			
		||||
: O_WRONLY   HEX: 0001 ; inline
 | 
			
		||||
: O_RDWR     HEX: 0002 ; inline
 | 
			
		||||
: O_CREAT    HEX: 0040 ; inline
 | 
			
		||||
: O_EXCL     HEX: 0080 ; inline
 | 
			
		||||
: O_NOCTTY   HEX: 0100 ; inline
 | 
			
		||||
: O_TRUNC    HEX: 0200 ; inline
 | 
			
		||||
: O_APPEND   HEX: 0400 ; inline
 | 
			
		||||
: O_NONBLOCK HEX: 0800 ; inline
 | 
			
		||||
 | 
			
		||||
: SOL_SOCKET 1 ; inline
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			@ -28,7 +30,6 @@ USING: alien.syntax ;
 | 
			
		|||
: FD_CLOEXEC 1 ; inline
 | 
			
		||||
 | 
			
		||||
: F_SETFL 4 ; inline
 | 
			
		||||
: O_NONBLOCK HEX: 800 ; inline
 | 
			
		||||
 | 
			
		||||
C-STRUCT: addrinfo
 | 
			
		||||
    { "int" "flags" }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -25,6 +25,8 @@ TYPEDEF: uint socklen_t
 | 
			
		|||
 | 
			
		||||
: NGROUPS_MAX 16 ; inline
 | 
			
		||||
 | 
			
		||||
: O_NDELAY O_NONBLOCK ; inline
 | 
			
		||||
 | 
			
		||||
C-STRUCT: group
 | 
			
		||||
    { "char*" "gr_name" }
 | 
			
		||||
    { "char*" "gr_passwd" }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue