"

 COPYRIGHT (c) 1988 by Claus Gittinger

	      All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice.   This software may not

 be provided or otherwise made available to, or used by, any

 other person.  No title to or ownership of the software is

 hereby transferred.

"

"{ Package: 'stx:libbasic' }"

"{ NameSpace: Smalltalk }"

AbstractOperatingSystem subclass:#UnixOperatingSystem

	instanceVariableNames:''

	classVariableNames:'Initialized HostName DomainName SlowFork ForkFailed

		CurrentDirectory LastTimeInfo LastTimeInfoSeconds

		LastTimeInfoMilliseconds LastTimeInfoIsLocal CachedMountPoints

		CacheMountPointsTimeStamp Codeset CodesetEncoder'

	poolDictionaries:''

	category:'OS-Unix'

!

SharedPool subclass:#ELFConstants

	instanceVariableNames:''

	classVariableNames:'EI_MAG0 ELFMAG0 EI_MAG1 ELFMAG1 EI_MAG2 ELFMAG2 EI_MAG3 ELFMAG3

		EI_CLASS ELFCLASSNONE ELFCLASS32 ELFCLASS64 ELFCLASSNUM EI_DATA

		ELFDATANONE ELFDATA2LSB ELFDATA2MSB ELFDATANUM EI_VERSION

		EI_OSABI ELFOSABI_NONE ELFOSABI_SYSV ELFOSABI_HPUX

		ELFOSABI_NETBSD ELFOSABI_GNU ELFOSABI_LINUX ELFOSABI_SOLARIS

		ELFOSABI_AIX ELFOSABI_IRIX ELFOSABI_FREEBSD ELFOSABI_TRU64

		ELFOSABI_MODESTO ELFOSABI_OPENBSD ELFOSABI_ARM_AEABI ELFOSABI_ARM

		ELFOSABI_STANDALONE EI_ABIVERSION EI_PAD ET_NONE ET_REL ET_EXEC

		ET_DYN ET_CORE ET_LOOS ET_HIOS ET_LOPROC ET_HIPROC EM_NONE EM_M32

		EM_SPARC EM_386 EM_68K EM_88K EM_860 EM_MIPS EM_S370

		EM_MIPS_RS3_LE EM_PARISC EM_VPP500 EM_SPARC32PLUS EM_960 EM_PPC

		EM_PPC64 EM_S390 EM_V800 EM_FR20 EM_RH32 EM_RCE EM_ARM

		EM_FAKE_ALPHA EM_SH EM_SPARCV9 EM_TRICORE EM_ARC EM_H8_300

		EM_H8_300H EM_H8S EM_H8_500 EM_IA_64 EM_MIPS_X EM_COLDFIRE

		EM_68HC12 EM_MMA EM_PCP EM_NCPU EM_NDR1 EM_STARCORE EM_ME16

		EM_ST100 EM_TINYJ EM_X86_64 EM_PDSP EM_FX66 EM_ST9PLUS EM_ST7

		EM_68HC16 EM_68HC11 EM_68HC08 EM_68HC05 EM_SVX EM_ST19 EM_VAX

		EM_CRIS EM_JAVELIN EM_FIREPATH EM_ZSP EM_MMIX EM_HUANY EM_PRISM

		EM_AVR EM_FR30 EM_D10V EM_D30V EM_V850 EM_M32R EM_MN10300

		EM_MN10200 EM_PJ EM_OPENRISC EM_ARC_A5 EM_XTENSA EM_AARCH64

		EM_TILEPRO EM_MICROBLAZE EM_TILEGX EM_ALPHA EV_NONE EV_CURRENT'

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

Object subclass:#ELFFileHeader

	instanceVariableNames:'file data msb'

	classVariableNames:''

	poolDictionaries:'UnixOperatingSystem::ELFConstants'

	privateIn:UnixOperatingSystem

!

Object subclass:#FileDescriptorHandle

	instanceVariableNames:'fd'

	classVariableNames:'OpenFiles'

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

OSFileHandle subclass:#FilePointerHandle

	instanceVariableNames:''

	classVariableNames:''

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

Object subclass:#FileStatusInfo

	instanceVariableNames:'type mode uid gid size id accessed modified statusChanged

		sourcePath targetPath numLinks'

	classVariableNames:''

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

Object subclass:#MountInfo

	instanceVariableNames:'mountPointPath deviceOrRemotePath fsType attributeString'

	classVariableNames:''

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

Object subclass:#OSProcessStatus

	instanceVariableNames:'pid status code core'

	classVariableNames:''

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

UnixOperatingSystem::FilePointerHandle subclass:#SocketHandle

	instanceVariableNames:''

	classVariableNames:'ProtocolCache'

	poolDictionaries:''

	privateIn:UnixOperatingSystem

!

!UnixOperatingSystem primitiveDefinitions!

%{

#include "stxOSDefs.h"

#if defined(_AIX)

# ifndef WANT_REALPATH

#  define WANT_REALPATH

# endif

# ifndef WANT_SYSTEM

#  define WANT_SYSTEM

# endif

#endif

#ifdef LINUX

# define __xxUSE_GNU      /* new */

# undef HAS_UTS_DOMAINNAME

# define NET_IF_SUPPORT

# ifndef _STDIO_H_INCLUDED_

#  include <stdio.h>

#  define _STDIO_H_INCLUDED_

# endif

# ifndef _SYS_TYPES_H_INCLUDED_

#  include <sys/types.h>

#  define _SYS_TYPES_H_INCLUDED_

# endif

  /* use inline string macros */

# define __STRINGDEFS__

# include "linuxIntern.h"

# ifndef WANT_SYSTEM

#  define WANT_SYSTEM

# endif

# define WANT_SHM

# define HAS_SETENV

# define HAS_UNSETENV

# include <time.h>

#endif

#if defined(IRIX5) || defined(ultrix) || defined(hpux) || defined(solaris)

# define WANT_SYSTEM

#endif

#if defined(SYSV4) && defined(__i386__) /* e.g. unixware */

# define WANT_SYSTEM

#endif

#if defined (__osx__)

# define NET_IF_SUPPORT

#endif

/*

 * notice: although many systems' include files

 * already block against multiple inclusion, some

 * do not. Therefore, this is done here again.

 * (it does not hurt)

 */

#ifdef WANT_REALPATH

# ifndef NO_SYS_PARAM_H

#  include <sys/param.h>

#  define _SYS_PARAM_H_INCLUDED_

# endif

# include <errno.h>

# define _ERRNO_H_INCLUDED_

# include <sys/stat.h>

# define _SYS_STAT_H_INCLUDED_

#endif /* WANT_REALPATH */

# ifdef HAS_OPENDIR

#  include <sys/types.h>

#  ifdef NEXT

#   include <sys/dir.h>

#   define DIRENT_STRUCT        struct direct

#  else

#   include <dirent.h>

#   define DIRENT_STRUCT        struct dirent

#  endif

# endif

#ifdef WANT_SHM

# ifndef _SYS_TYPES_H_INCLUDED_

#  include <sys/types.h>

#  define _SYS_TYPES_H_INCLUDED_

# endif

# include <sys/ipc.h>

# define _SYS_IPC_H_INCLUDED_

# include <sys/shm.h>

# define _SYS_SHM_H_INCLUDED_

#endif /* WANT_SHM */

#ifdef IRIX5

# include <sys/syssgi.h>

#endif

#ifdef transputer

# define unlink(f)      ((remove(f) == 0) ? 0 : -1)

#else /* not transputer */

# ifdef __arm__

#  ifndef _SYS_TYPES_H_INCLUDED_

#   include <sys/types.h>

#   define _SYS_TYPES_H_INCLUDED_

#  endif

# endif

# ifndef _SIGNAL_H_INCLUDED_

#  include <signal.h>

#  define _SIGNAL_H_INCLUDED_

# endif

# ifdef SYSV

#  ifndef _SYS_TYPES_H_INCLUDED_

#   include <sys/types.h>

#   define _SYS_TYPES_H_INCLUDED_

#  endif

#  ifndef _SYS_PARAM_H_INCLUDED_

#   ifndef NO_SYS_PARAM_H

#    include <sys/param.h>

#    define _SYS_PARAM_H_INCLUDED_

#   endif

#  endif

#  ifndef _SYS_TIMES_H_INCLUDED_

#   include <sys/times.h>

#   define _SYS_TIMES_H_INCLUDED_

#  endif

#  ifndef _SYS_FILE_H_INCLUDED_

#   include <sys/file.h>

#   define _SYS_FILE_H_INCLUDED_

#  endif

#  ifndef _UNISTD_H_INCLUDED_

#   include <unistd.h>

#   define _UNISTD_H_INCLUDED_

#  endif

#  ifndef _TIME_H_INCLUDED_

#   include <time.h>

#   define _TIME_H_INCLUDED_

#  endif

# else /* not SYSV */

#  ifndef _SYS_TIME_H_INCLUDED_

#   include <sys/time.h>

#   define _SYS_TIME_H_INCLUDED_

#  endif

#  ifndef _SYS_TYPES_H_INCLUDED_

#   include <sys/types.h>

#   define _SYS_TYPES_H_INCLUDED_

#  endif

# endif /* not SYSV */

# ifdef aix

#  ifndef _TIME_H_INCLUDED_

#   include <time.h>

#   define _TIME_H_INCLUDED_

#  endif

#  ifndef _SYS_SELECT_H_INCLUDED_

#   include <sys/select.h>

#   define _SYS_SELECT_H_INCLUDED_

#  endif

# endif /* aix */

# ifdef __osx__

#  include <string.h>

#  include <stdlib.h>

#  include <time.h>

#  ifndef _TIME_H_

/* hack if the osx has been configured with case-ignoring filenames,

 * my own time.h was included above

 */

#   include "/usr/include/time.h"

#  endif

#  include <sys/time.h>

#  define HAS_TIMEGM

#  ifdef NO_LONGER_NEEDED

#   ifndef _TIME_H_

// old hack

struct tm {

	int     tm_sec;         /* seconds after the minute [0-60] */

	int     tm_min;         /* minutes after the hour [0-59] */

	int     tm_hour;        /* hours since midnight [0-23] */

	int     tm_mday;        /* day of the month [1-31] */

	int     tm_mon;         /* months since January [0-11] */

	int     tm_year;        /* years since 1900 */

	int     tm_wday;        /* days since Sunday [0-6] */

	int     tm_yday;        /* days since January 1 [0-365] */

	int     tm_isdst;       /* Daylight Savings Time flag */

	long    tm_gmtoff;      /* offset from CUT in seconds */

	char    *tm_zone;       /* timezone abbreviation */

};

#   endif

#  endif /* NO_LONGER */

#  include <crt_externs.h>

#  include <net/if_dl.h>

# endif /* __osx__ */

# ifndef _STDIO_H_INCLUDED_

#  include <stdio.h>

#  define _STDIO_H_INCLUDED_

# endif

# ifndef _PWD_H_INCLUDED_

#  include <pwd.h>

#  define _PWD_H_INCLUDED_

# endif

# ifndef NO_GRP_H

#  ifndef _GRP_H_INCLUDED_

#   include <grp.h>

#   define _GRP_H_INCLUDED_

#  endif

# endif

# ifndef _SYS_STAT_H_INCLUDED_

#  include <sys/stat.h>

#  define _SYS_STAT_H_INCLUDED_

# endif

# ifndef _SYS_FILE_H_INCLUDED_

#  include <sys/file.h>

#  define _SYS_FILE_H_INCLUDED_

# endif

# ifndef _ERRNO_H_INCLUDED_

#  include <errno.h>

#  define _ERRNO_H_INCLUDED_

# endif

# ifndef _FCNTL_H_INCLUDED_

#  include <fcntl.h>

#  define _FCNTL_H_INCLUDED_

# endif

# ifndef _SYS_IOCTL_H_INCLUDED_

#  include <sys/ioctl.h>

#  define _SYS_IOCTL_H_INCLUDED_

# endif

# if defined(LINUX)

#  define HAS_LOCALECONV

# endif

# if defined (HAS_LOCALECONV)

#  ifndef _LOCALE_H_INCLUDED_

#   include <locale.h>

#   define _LOCALE_H_INCLUDED_

#  endif

# endif

# if defined (HAS_FTIME)

#  include <sys/timeb.h>

# endif

// #include <signal.h>

/*

 * posix systems should define these ...

 * but on some (older) systems, they are not.

 */

# ifndef S_IXUSR

#  ifdef S_IEXEC

#   define S_IXUSR S_IEXEC

#   define S_IXGRP (S_IEXEC>>3)

#   define S_IXOTH (S_IEXEC>>6)

#  endif

# endif

# ifndef S_IXUSR

#  define S_IXUSR 0100

#  define S_IXGRP 0010

#  define S_IXOTH 0001

# endif

# ifndef S_IRUSR

#  define S_IRUSR 0400

#  define S_IRGRP 0040

#  define S_IROTH 0004

# endif

# ifndef S_IWUSR

#  define S_IWUSR 0200

#  define S_IWGRP 0020

#  define S_IWOTH 0002

# endif

# ifndef MAXPATHLEN

#  ifndef NO_SYS_PARAM_H

#   include <sys/param.h>

#  endif

#  ifndef MAXPATHLEN

#   ifdef PATH_MAX

#    define MAXPATHLEN PATH_MAX

#   else

#    define MAXPATHLEN 1024

#   endif

#  endif

# endif

# if defined(HAS_UNAME)

#  include <sys/utsname.h>

# endif

# if defined(SYSV4)

#  include <stropts.h>

# endif

# ifndef aix

#  include <sys/termios.h>

# endif

/*

 * NeXT has no pid_t

 * and no sigemptyset

 */

# ifdef NEXT

#  define NO_WAITPID

# endif

# ifdef NEXT3

   typedef int pid_t;

#  define sigemptyset(set)      ((*(set) = 0L), 0)

#  define HAS_GETDOMAINNAME

#  define NO_WAITPID

# endif

# ifdef sunos

#  undef NO_WAITPID

#  undef HAS_WAITPID

#  define HAS_WAIT3

#  define HAS_SIGACTION

# endif

//# ifdef sunos

//#  define NO_WAITPID

//# endif

# ifdef __osx__

#  undef NO_WAITPID

#  undef xxHAS_WAITPID

#  define HAS_WAITPID

#  define HAS_WAIT3

#  define HAS_SIGACTION

#  include <unistd.h>

# endif

# ifdef HAS_WAIT3

#  ifdef __osx__

#   define WAIT_STATUS int

#  else

#   define WAIT_STATUS union wait

#  endif

# endif

/*

 * some (BSD ?) have no timezone global,

 * but provide the info in struct timezone.

 */

# if defined(ultrix) || defined(sunos) || defined(NEXT)

#  define HAS_NO_TIMEZONE

# endif

# if defined(__osx__)

#  define HAS_NO_TIMEZONE