trying to get HEAD building again. If you want the code
[gd/samba-autobuild/.git] / source3 / lib / system.c
index 822aeb900444823bb6fe6082f5582c88df99b6be..a7024c852dfaa5cdfdc5e8d6b39b8d8839a3bbda 100644 (file)
@@ -1,8 +1,8 @@
 /* 
-   Unix SMB/Netbios implementation.
-   Version 1.9.
+   Unix SMB/CIFS implementation.
    Samba system utilities
    Copyright (C) Andrew Tridgell 1992-1998
+   Copyright (C) Jeremy Allison 1998-2002
    
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -21,8 +21,6 @@
 
 #include "includes.h"
 
-extern int DEBUGLEVEL;
-
 /*
    The idea is that this file will eventually have wrappers around all
    important system calls in samba. The aims are:
@@ -47,33 +45,131 @@ extern int DEBUGLEVEL;
 int sys_usleep(long usecs)
 {
 #ifndef HAVE_USLEEP
-  struct timeval tval;
+       struct timeval tval;
 #endif
 
-  /*
-   * We need this braindamage as the glibc usleep
-   * is not SPEC1170 complient... grumble... JRA.
-   */
+       /*
+        * We need this braindamage as the glibc usleep
+        * is not SPEC1170 complient... grumble... JRA.
+        */
 
-  if(usecs < 0 || usecs > 1000000) {
-    errno = EINVAL;
-    return -1;
-  }
+       if(usecs < 0 || usecs > 1000000) {
+               errno = EINVAL;
+               return -1;
+       }
 
 #if HAVE_USLEEP
-  usleep(usecs);
-  return 0;
+       usleep(usecs);
+       return 0;
 #else /* HAVE_USLEEP */
-  /*
-   * Fake it with select...
-   */
-  tval.tv_sec = 0;
-  tval.tv_usec = usecs/1000;
-  select(0,NULL,NULL,NULL,&tval);
-  return 0;
+       /*
+        * Fake it with select...
+        */
+       tval.tv_sec = 0;
+       tval.tv_usec = usecs/1000;
+       select(0,NULL,NULL,NULL,&tval);
+       return 0;
 #endif /* HAVE_USLEEP */
 }
 
+/*******************************************************************
+A read wrapper that will deal with EINTR.
+********************************************************************/
+
+ssize_t sys_read(int fd, void *buf, size_t count)
+{
+       ssize_t ret;
+
+       do {
+               ret = read(fd, buf, count);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
+/*******************************************************************
+A write wrapper that will deal with EINTR.
+********************************************************************/
+
+ssize_t sys_write(int fd, const void *buf, size_t count)
+{
+       ssize_t ret;
+
+       do {
+               ret = write(fd, buf, count);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
+/*******************************************************************
+A send wrapper that will deal with EINTR.
+********************************************************************/
+
+ssize_t sys_send(int s, const void *msg, size_t len, int flags)
+{
+       ssize_t ret;
+
+       do {
+               ret = send(s, msg, len, flags);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
+/*******************************************************************
+A sendto wrapper that will deal with EINTR.
+********************************************************************/
+
+ssize_t sys_sendto(int s,  const void *msg, size_t len, int flags, const struct sockaddr *to, socklen_t tolen)
+{
+       ssize_t ret;
+
+       do {
+               ret = sendto(s, msg, len, flags, to, tolen);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
+/*******************************************************************
+A recvfrom wrapper that will deal with EINTR.
+********************************************************************/
+
+ssize_t sys_recvfrom(int s, void *buf, size_t len, int flags, struct sockaddr *from, socklen_t *fromlen)
+{
+       ssize_t ret;
+
+       do {
+               ret = recvfrom(s, buf, len, flags, from, fromlen);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
+/*******************************************************************
+A fcntl wrapper that will deal with EINTR.
+********************************************************************/
+
+int sys_fcntl_ptr(int fd, int cmd, void *arg)
+{
+       int ret;
+
+       do {
+               ret = fcntl(fd, cmd, arg);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
+/*******************************************************************
+A fcntl wrapper that will deal with EINTR.
+********************************************************************/
+
+int sys_fcntl_long(int fd, int cmd, long arg)
+{
+       int ret;
+
+       do {
+               ret = fcntl(fd, cmd, arg);
+       } while (ret == -1 && errno == EINTR);
+       return ret;
+}
+
 /*******************************************************************
 A stat() wrapper that will deal with 64 bit filesizes.
 ********************************************************************/
@@ -132,9 +228,9 @@ int sys_lstat(const char *fname,SMB_STRUCT_STAT *sbuf)
 int sys_ftruncate(int fd, SMB_OFF_T offset)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_FTRUNCATE64)
-  return ftruncate64(fd, offset);
+       return ftruncate64(fd, offset);
 #else
-  return ftruncate(fd, offset);
+       return ftruncate(fd, offset);
 #endif
 }
 
@@ -145,9 +241,9 @@ int sys_ftruncate(int fd, SMB_OFF_T offset)
 SMB_OFF_T sys_lseek(int fd, SMB_OFF_T offset, int whence)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_LSEEK64)
-  return lseek64(fd, offset, whence);
+       return lseek64(fd, offset, whence);
 #else
-  return lseek(fd, offset, whence);
+       return lseek(fd, offset, whence);
 #endif
 }
 
@@ -158,11 +254,11 @@ SMB_OFF_T sys_lseek(int fd, SMB_OFF_T offset, int whence)
 int sys_fseek(FILE *fp, SMB_OFF_T offset, int whence)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FSEEK64)
-  return fseek64(fp, offset, whence);
+       return fseek64(fp, offset, whence);
 #elif defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FSEEKO64)
-  return fseeko64(fp, offset, whence);
+       return fseeko64(fp, offset, whence);
 #else
-  return fseek(fp, offset, whence);
+       return fseek(fp, offset, whence);
 #endif
 }
 
@@ -173,11 +269,11 @@ int sys_fseek(FILE *fp, SMB_OFF_T offset, int whence)
 SMB_OFF_T sys_ftell(FILE *fp)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FTELL64)
-  return (SMB_OFF_T)ftell64(fp);
+       return (SMB_OFF_T)ftell64(fp);
 #elif defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FTELLO64)
-  return (SMB_OFF_T)ftello64(fp);
+       return (SMB_OFF_T)ftello64(fp);
 #else
-  return (SMB_OFF_T)ftell(fp);
+       return (SMB_OFF_T)ftell(fp);
 #endif
 }
 
@@ -188,13 +284,13 @@ SMB_OFF_T sys_ftell(FILE *fp)
 int sys_creat(const char *path, mode_t mode)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_CREAT64)
-  return creat64(path, mode);
+       return creat64(path, mode);
 #else
-  /*
-   * If creat64 isn't defined then ensure we call a potential open64.
-   * JRA.
-   */
-  return sys_open(path, O_WRONLY | O_CREAT | O_TRUNC, mode);
+       /*
+        * If creat64 isn't defined then ensure we call a potential open64.
+        * JRA.
+        */
+       return sys_open(path, O_WRONLY | O_CREAT | O_TRUNC, mode);
 #endif
 }
 
@@ -205,9 +301,9 @@ int sys_creat(const char *path, mode_t mode)
 int sys_open(const char *path, int oflag, mode_t mode)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OPEN64)
-  return open64(path, oflag, mode);
+       return open64(path, oflag, mode);
 #else
-  return open(path, oflag, mode);
+       return open(path, oflag, mode);
 #endif
 }
 
@@ -218,9 +314,9 @@ int sys_open(const char *path, int oflag, mode_t mode)
 FILE *sys_fopen(const char *path, const char *type)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_FOPEN64)
-  return fopen64(path, type);
+       return fopen64(path, type);
 #else
-  return fopen(path, type);
+       return fopen(path, type);
 #endif
 }
 
@@ -231,9 +327,43 @@ FILE *sys_fopen(const char *path, const char *type)
 SMB_STRUCT_DIRENT *sys_readdir(DIR *dirp)
 {
 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_READDIR64)
-  return readdir64(dirp);
+       return readdir64(dirp);
 #else
-  return readdir(dirp);
+       return readdir(dirp);
+#endif
+}
+
+/*******************************************************************
+ An mknod() wrapper that will deal with 64 bit filesizes.
+********************************************************************/
+
+int sys_mknod(const char *path, mode_t mode, SMB_DEV_T dev)
+{
+#if defined(HAVE_MKNOD) || defined(HAVE_MKNOD64)
+#if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_MKNOD64) && defined(HAVE_DEV64_T)
+       return mknod64(path, mode, dev);
+#else
+       return mknod(path, mode, dev);
+#endif
+#else
+       /* No mknod system call. */
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+/*******************************************************************
+ Wrapper for realpath.
+********************************************************************/
+
+char *sys_realpath(const char *path, char *resolved_path)
+{
+#if defined(HAVE_REALPATH)
+       return realpath(path, resolved_path);
+#else
+       /* As realpath is not a system call we can't return ENOSYS. */
+       errno = EINVAL;
+       return NULL;
 #endif
 }
 
@@ -244,24 +374,25 @@ The wait() calls vary between systems
 int sys_waitpid(pid_t pid,int *status,int options)
 {
 #ifdef HAVE_WAITPID
-  return waitpid(pid,status,options);
+       return waitpid(pid,status,options);
 #else /* HAVE_WAITPID */
-  return wait4(pid, status, options, NULL);
+       return wait4(pid, status, options, NULL);
 #endif /* HAVE_WAITPID */
 }
 
 /*******************************************************************
-system wrapper for getwd
+ System wrapper for getwd
 ********************************************************************/
+
 char *sys_getwd(char *s)
 {
-    char *wd;
+       char *wd;
 #ifdef HAVE_GETCWD
-    wd = (char *)getcwd(s, sizeof (pstring));
+       wd = (char *)getcwd(s, sizeof (pstring));
 #else
-    wd = (char *)getwd(s);
+       wd = (char *)getwd(s);
 #endif
-    return wd;
+       return wd;
 }
 
 /*******************************************************************
@@ -292,6 +423,20 @@ int sys_readlink(const char *path, char *buf, size_t bufsiz)
 #endif
 }
 
+/*******************************************************************
+system wrapper for link
+********************************************************************/
+
+int sys_link(const char *oldpath, const char *newpath)
+{
+#ifndef HAVE_LINK
+       errno = ENOSYS;
+       return -1;
+#else
+       return link(oldpath, newpath);
+#endif
+}
+
 /*******************************************************************
 chown isn't used much but OS/2 doesn't have it
 ********************************************************************/
@@ -332,39 +477,40 @@ A wrapper for gethostbyname() that tries avoids looking up hostnames
 in the root domain, which can cause dial-on-demand links to come up for no
 apparent reason.
 ****************************************************************************/
+
 struct hostent *sys_gethostbyname(const char *name)
 {
 #ifdef REDUCE_ROOT_DNS_LOOKUPS
-  char query[256], hostname[256];
-  char *domain;
+       char query[256], hostname[256];
+       char *domain;
 
-  /* Does this name have any dots in it? If so, make no change */
+       /* Does this name have any dots in it? If so, make no change */
 
-  if (strchr_m(name, '.'))
-    return(gethostbyname(name));
+       if (strchr_m(name, '.'))
+               return(gethostbyname(name));
 
-  /* Get my hostname, which should have domain name 
-     attached. If not, just do the gethostname on the
-     original string. 
-  */
+       /* Get my hostname, which should have domain name 
+               attached. If not, just do the gethostname on the
+               original string. 
+       */
 
-  gethostname(hostname, sizeof(hostname) - 1);
-  hostname[sizeof(hostname) - 1] = 0;
-  if ((domain = strchr_m(hostname, '.')) == NULL)
-    return(gethostbyname(name));
+       gethostname(hostname, sizeof(hostname) - 1);
+       hostname[sizeof(hostname) - 1] = 0;
+       if ((domain = strchr_m(hostname, '.')) == NULL)
+               return(gethostbyname(name));
 
-  /* Attach domain name to query and do modified query.
-     If names too large, just do gethostname on the
-     original string.
-  */
+       /* Attach domain name to query and do modified query.
+               If names too large, just do gethostname on the
+               original string.
+       */
 
-  if((strlen(name) + strlen(domain)) >= sizeof(query))
-    return(gethostbyname(name));
+       if((strlen(name) + strlen(domain)) >= sizeof(query))
+               return(gethostbyname(name));
 
-  slprintf(query, sizeof(query)-1, "%s%s", name, domain);
-  return(gethostbyname(query));
+       slprintf(query, sizeof(query)-1, "%s%s", name, domain);
+       return(gethostbyname(query));
 #else /* REDUCE_ROOT_DNS_LOOKUPS */
-  return(gethostbyname(name));
+       return(gethostbyname(name));
 #endif /* REDUCE_ROOT_DNS_LOOKUPS */
 }
 
@@ -375,33 +521,32 @@ struct hostent *sys_gethostbyname(const char *name)
 ****************************************************************************/
 static BOOL set_process_capability( uint32 cap_flag, BOOL enable )
 {
-  if(cap_flag == KERNEL_OPLOCK_CAPABILITY)
-  {
-    cap_t cap = cap_get_proc();
+       if(cap_flag == KERNEL_OPLOCK_CAPABILITY) {
+               cap_t cap = cap_get_proc();
 
-    if (cap == NULL) {
-      DEBUG(0,("set_process_capability: cap_get_proc failed. Error was %s\n",
-            strerror(errno)));
-      return False;
-    }
+               if (cap == NULL) {
+                       DEBUG(0,("set_process_capability: cap_get_proc failed. Error was %s\n",
+                               strerror(errno)));
+                       return False;
+               }
 
-    if(enable)
-      cap->cap_effective |= CAP_NETWORK_MGT;
-    else
-      cap->cap_effective &= ~CAP_NETWORK_MGT;
+               if(enable)
+                       cap->cap_effective |= CAP_NETWORK_MGT;
+               else
+                       cap->cap_effective &= ~CAP_NETWORK_MGT;
 
-    if (cap_set_proc(cap) == -1) {
-      DEBUG(0,("set_process_capability: cap_set_proc failed. Error was %s\n",
-            strerror(errno)));
-      cap_free(cap);
-      return False;
-    }
+               if (cap_set_proc(cap) == -1) {
+                       DEBUG(0,("set_process_capability: cap_set_proc failed. Error was %s\n",
+                               strerror(errno)));
+                       cap_free(cap);
+                       return False;
+               }
 
-    cap_free(cap);
+               cap_free(cap);
 
-    DEBUG(10,("set_process_capability: Set KERNEL_OPLOCK_CAPABILITY.\n"));
-  }
-  return True;
+               DEBUG(10,("set_process_capability: Set KERNEL_OPLOCK_CAPABILITY.\n"));
+       }
+       return True;
 }
 
 /**************************************************************************
@@ -410,39 +555,39 @@ static BOOL set_process_capability( uint32 cap_flag, BOOL enable )
 
 static BOOL set_inherited_process_capability( uint32 cap_flag, BOOL enable )
 {
-  if(cap_flag == KERNEL_OPLOCK_CAPABILITY)
-  {
-    cap_t cap = cap_get_proc();
+       if(cap_flag == KERNEL_OPLOCK_CAPABILITY) {
+               cap_t cap = cap_get_proc();
 
-    if (cap == NULL) {
-      DEBUG(0,("set_inherited_process_capability: cap_get_proc failed. Error was %s\n",
-            strerror(errno)));
-      return False;
-    }
+               if (cap == NULL) {
+                       DEBUG(0,("set_inherited_process_capability: cap_get_proc failed. Error was %s\n",
+                               strerror(errno)));
+                       return False;
+               }
 
-    if(enable)
-      cap->cap_inheritable |= CAP_NETWORK_MGT;
-    else
-      cap->cap_inheritable &= ~CAP_NETWORK_MGT;
+               if(enable)
+                       cap->cap_inheritable |= CAP_NETWORK_MGT;
+               else
+                       cap->cap_inheritable &= ~CAP_NETWORK_MGT;
 
-    if (cap_set_proc(cap) == -1) {
-      DEBUG(0,("set_inherited_process_capability: cap_set_proc failed. Error was %s\n", 
-            strerror(errno)));
-      cap_free(cap);
-      return False;
-    }
+               if (cap_set_proc(cap) == -1) {
+                       DEBUG(0,("set_inherited_process_capability: cap_set_proc failed. Error was %s\n", 
+                               strerror(errno)));
+                       cap_free(cap);
+                       return False;
+               }
 
-    cap_free(cap);
+               cap_free(cap);
 
-    DEBUG(10,("set_inherited_process_capability: Set KERNEL_OPLOCK_CAPABILITY.\n"));
-  }
-  return True;
+               DEBUG(10,("set_inherited_process_capability: Set KERNEL_OPLOCK_CAPABILITY.\n"));
+       }
+       return True;
 }
 #endif
 
 /****************************************************************************
-gain the oplock capability from the kernel if possible
+ Gain the oplock capability from the kernel if possible.
 ****************************************************************************/
+
 void oplock_set_capability(BOOL this_process, BOOL inherit)
 {
 #if HAVE_KERNEL_OPLOCKS_IRIX
@@ -458,12 +603,12 @@ void oplock_set_capability(BOOL this_process, BOOL inherit)
 long sys_random(void)
 {
 #if defined(HAVE_RANDOM)
-  return (long)random();
+       return (long)random();
 #elif defined(HAVE_RAND)
-  return (long)rand();
+       return (long)rand();
 #else
-  DEBUG(0,("Error - no random function available !\n"));
-  exit(1);
+       DEBUG(0,("Error - no random function available !\n"));
+       exit(1);
 #endif
 }
 
@@ -474,12 +619,12 @@ long sys_random(void)
 void sys_srandom(unsigned int seed)
 {
 #if defined(HAVE_SRANDOM)
-  srandom(seed);
+       srandom(seed);
 #elif defined(HAVE_SRAND)
-  srand(seed);
+       srand(seed);
 #else
-  DEBUG(0,("Error - no srandom function available !\n"));
-  exit(1);
+       DEBUG(0,("Error - no srandom function available !\n"));
+       exit(1);
 #endif
 }
 
@@ -490,10 +635,10 @@ void sys_srandom(unsigned int seed)
 int groups_max(void)
 {
 #if defined(SYSCONF_SC_NGROUPS_MAX)
-  int ret = sysconf(_SC_NGROUPS_MAX);
-  return (ret == -1) ? NGROUPS_MAX : ret;
+       int ret = sysconf(_SC_NGROUPS_MAX);
+       return (ret == -1) ? NGROUPS_MAX : ret;
 #else
-  return NGROUPS_MAX;
+       return NGROUPS_MAX;
 #endif
 }
 
@@ -504,47 +649,47 @@ int groups_max(void)
 int sys_getgroups(int setlen, gid_t *gidset)
 {
 #if !defined(HAVE_BROKEN_GETGROUPS)
-  return getgroups(setlen, gidset);
+       return getgroups(setlen, gidset);
 #else
 
-  GID_T gid;
-  GID_T *group_list;
-  int i, ngroups;
+       GID_T gid;
+       GID_T *group_list;
+       int i, ngroups;
 
-  if(setlen == 0) {
-    return getgroups(setlen, &gid);
-  }
+       if(setlen == 0) {
+               return getgroups(setlen, &gid);
+       }
 
-  /*
-   * Broken case. We need to allocate a
-   * GID_T array of size setlen.
-   */
+       /*
+        * Broken case. We need to allocate a
+        * GID_T array of size setlen.
+        */
 
-  if(setlen < 0) {
-    errno = EINVAL; 
-    return -1;
-  } 
+       if(setlen < 0) {
+               errno = EINVAL; 
+               return -1;
+       
 
-  if (setlen == 0)
-    setlen = groups_max();
+       if (setlen == 0)
+               setlen = groups_max();
 
-  if((group_list = (GID_T *)malloc(setlen * sizeof(GID_T))) == NULL) {
-    DEBUG(0,("sys_getgroups: Malloc fail.\n"));
-    return -1;
-  }
+       if((group_list = (GID_T *)malloc(setlen * sizeof(GID_T))) == NULL) {
+               DEBUG(0,("sys_getgroups: Malloc fail.\n"));
+               return -1;
+       }
 
-  if((ngroups = getgroups(setlen, group_list)) < 0) {
-    int saved_errno = errno;
-    SAFE_FREE(group_list);
-    errno = saved_errno;
-    return -1;
-  }
+       if((ngroups = getgroups(setlen, group_list)) < 0) {
+               int saved_errno = errno;
+               SAFE_FREE(group_list);
+               errno = saved_errno;
+               return -1;
+       }
 
-  for(i = 0; i < ngroups; i++)
-    gidset[i] = (gid_t)group_list[i];
+       for(i = 0; i < ngroups; i++)
+               gidset[i] = (gid_t)group_list[i];
 
-  SAFE_FREE(group_list);
-  return ngroups;
+       SAFE_FREE(group_list);
+       return ngroups;
 #endif /* HAVE_BROKEN_GETGROUPS */
 }
 
@@ -558,173 +703,261 @@ int sys_getgroups(int setlen, gid_t *gidset)
 int sys_setgroups(int setlen, gid_t *gidset)
 {
 #if !defined(HAVE_BROKEN_GETGROUPS)
-  return setgroups(setlen, gidset);
+       return setgroups(setlen, gidset);
 #else
 
-  GID_T *group_list;
-  int i ; 
+       GID_T *group_list;
+       int i ; 
 
-  if (setlen == 0)
-    return 0 ;
+       if (setlen == 0)
+               return 0 ;
 
-  if (setlen < 0 || setlen > groups_max()) {
-    errno = EINVAL; 
-    return -1;   
-  }
+       if (setlen < 0 || setlen > groups_max()) {
+               errno = EINVAL; 
+               return -1;   
+       }
 
-  /*
-   * Broken case. We need to allocate a
-   * GID_T array of size setlen.
-   */
+       /*
+        * Broken case. We need to allocate a
+        * GID_T array of size setlen.
+        */
 
-  if((group_list = (GID_T *)malloc(setlen * sizeof(GID_T))) == NULL) {
-    DEBUG(0,("sys_setgroups: Malloc fail.\n"));
-    return -1;    
-  }
+       if((group_list = (GID_T *)malloc(setlen * sizeof(GID_T))) == NULL) {
+               DEBUG(0,("sys_setgroups: Malloc fail.\n"));
+               return -1;    
+       }
  
-  for(i = 0; i < setlen; i++) 
-    group_list[i] = (GID_T) gidset[i]; 
-
-  if(setgroups(setlen, group_list) != 0) {
-    int saved_errno = errno;
-    SAFE_FREE(group_list);
-    errno = saved_errno;
-    return -1;
-  }
+       for(i = 0; i < setlen; i++) 
+               group_list[i] = (GID_T) gidset[i]; 
+
+       if(setgroups(setlen, group_list) != 0) {
+               int saved_errno = errno;
+               SAFE_FREE(group_list);
+               errno = saved_errno;
+               return -1;
+       }
  
-  SAFE_FREE(group_list);
-  return 0 ;
+       SAFE_FREE(group_list);
+       return 0 ;
 #endif /* HAVE_BROKEN_GETGROUPS */
 }
 
 #endif /* HAVE_SETGROUPS */
 
-/*
- * We only wrap pw_name and pw_passwd for now as these
- * are the only potentially modified fields.
- */
+/**************************************************************************
+ Wrappers for setpwent(), getpwent() and endpwent()
+****************************************************************************/
+
+void sys_setpwent(void)
+{
+       setpwent();
+}
+
+struct passwd *sys_getpwent(void)
+{
+       return getpwent();
+}
+
+void sys_endpwent(void)
+{
+       endpwent();
+}
 
 /**************************************************************************
- Helper function for getpwnam/getpwuid wrappers.
+ Wrappers for getpwnam(), getpwuid(), getgrnam(), getgrgid()
 ****************************************************************************/
 
-struct saved_pw {
-       fstring         pw_name;
-       fstring         pw_passwd;
-       fstring         pw_gecos;
-       pstring         pw_dir;
-       pstring         pw_shell;
-       struct passwd pass;
-};
+struct passwd *sys_getpwnam(const char *name)
+{
+       return getpwnam(name);
+}
 
-static struct saved_pw pw_mod; /* This is the structure returned - can be modified. */
-static struct saved_pw pw_cache; /* This is the structure saved - used to check cache. */
+struct passwd *sys_getpwuid(uid_t uid)
+{
+       return getpwuid(uid);
+}
 
-static int num_lookups; /* Counter so we don't always use cache. */
-#ifndef PW_RET_CACHE_MAX_LOOKUPS
-#define PW_RET_CACHE_MAX_LOOKUPS 100
-#endif
+struct group *sys_getgrnam(const char *name)
+{
+       return getgrnam(name);
+}
 
-static void copy_pwent(struct saved_pw *dst, struct passwd *pass)
+struct group *sys_getgrgid(gid_t gid)
 {
-       memcpy((char *)&dst->pass, pass, sizeof(struct passwd));
+       return getgrgid(gid);
+}
 
-       fstrcpy(dst->pw_name, pass->pw_name);
-       dst->pass.pw_name = dst->pw_name;
+#if 0 /* NOT CURRENTLY USED - JRA */
+/**************************************************************************
+ The following are the UNICODE versions of *all* system interface functions
+ called within Samba. Ok, ok, the exceptions are the gethostbyXX calls,
+ which currently are left as ascii as they are not used other than in name
+ resolution.
+****************************************************************************/
 
-       fstrcpy(dst->pw_passwd, pass->pw_passwd);
-       dst->pass.pw_passwd = dst->pw_passwd;
+/**************************************************************************
+ Wide stat. Just narrow and call sys_xxx.
+****************************************************************************/
 
-       fstrcpy(dst->pw_gecos, pass->pw_gecos);
-       dst->pass.pw_gecos = dst->pw_gecos;
+int wsys_stat(const smb_ucs2_t *wfname,SMB_STRUCT_STAT *sbuf)
+{
+       pstring fname;
+       return sys_stat(unicode_to_unix(fname,wfname,sizeof(fname)), sbuf);
+}
 
-       pstrcpy(dst->pw_dir, pass->pw_dir);
-       dst->pass.pw_dir = dst->pw_dir;
+/**************************************************************************
+ Wide lstat. Just narrow and call sys_xxx.
+****************************************************************************/
 
-       pstrcpy(dst->pw_shell, pass->pw_shell);
-       dst->pass.pw_shell = dst->pw_shell;
+int wsys_lstat(const smb_ucs2_t *wfname,SMB_STRUCT_STAT *sbuf)
+{
+       pstring fname;
+       return sys_lstat(unicode_to_unix(fname,wfname,sizeof(fname)), sbuf);
 }
 
-static struct passwd *setup_pwret(struct passwd *pass)
+/**************************************************************************
+ Wide creat. Just narrow and call sys_xxx.
+****************************************************************************/
+
+int wsys_creat(const smb_ucs2_t *wfname, mode_t mode)
 {
-       if (pass == NULL) {
-               /* Clear the caches. */
-               memset(&pw_cache, '\0', sizeof(struct saved_pw));
-               memset(&pw_mod, '\0', sizeof(struct saved_pw));
-               num_lookups = 0;
-               return NULL;
-       }
+       pstring fname;
+       return sys_creat(unicode_to_unix(fname,wfname,sizeof(fname)), mode);
+}
 
-       copy_pwent( &pw_mod, pass);
+/**************************************************************************
+ Wide open. Just narrow and call sys_xxx.
+****************************************************************************/
 
-       if (pass != &pw_cache.pass) {
+int wsys_open(const smb_ucs2_t *wfname, int oflag, mode_t mode)
+{
+       pstring fname;
+       return sys_open(unicode_to_unix(fname,wfname,sizeof(fname)), oflag, mode);
+}
 
-               /* If it's a cache miss we must also refill the cache. */
+/**************************************************************************
+ Wide fopen. Just narrow and call sys_xxx.
+****************************************************************************/
 
-               copy_pwent( &pw_cache, pass);
-               num_lookups = 1;
+FILE *wsys_fopen(const smb_ucs2_t *wfname, const char *type)
+{
+       pstring fname;
+       return sys_fopen(unicode_to_unix(fname,wfname,sizeof(fname)), type);
+}
 
-       } else {
+/**************************************************************************
+ Wide opendir. Just narrow and call sys_xxx.
+****************************************************************************/
 
-               /* Cache hit. */
+DIR *wsys_opendir(const smb_ucs2_t *wfname)
+{
+       pstring fname;
+       return opendir(unicode_to_unix(fname,wfname,sizeof(fname)));
+}
 
-               num_lookups++;
-               num_lookups = (num_lookups % PW_RET_CACHE_MAX_LOOKUPS);
-       }
+/**************************************************************************
+ Wide readdir. Return a structure pointer containing a wide filename.
+****************************************************************************/
+
+SMB_STRUCT_WDIRENT *wsys_readdir(DIR *dirp)
+{
+       static SMB_STRUCT_WDIRENT retval;
+       SMB_STRUCT_DIRENT *dirval = sys_readdir(dirp);
+
+       if(!dirval)
+               return NULL;
+
+       /*
+        * The only POSIX defined member of this struct is d_name.
+        */
+
+       unix_to_unicode(retval.d_name,dirval->d_name,sizeof(retval.d_name));
 
-       return &pw_mod.pass;
+       return &retval;
 }
 
 /**************************************************************************
- Wrappers for setpwent(), getpwent() and endpwent()
+ Wide getwd. Call sys_xxx and widen. Assumes s points to a wpstring.
 ****************************************************************************/
 
-void sys_setpwent(void)
+smb_ucs2_t *wsys_getwd(smb_ucs2_t *s)
 {
-       setup_pwret(NULL); /* Clear cache. */
-       setpwent();
+       pstring fname;
+       char *p = sys_getwd(fname);
+
+       if(!p)
+               return NULL;
+
+       return unix_to_unicode(s, p, sizeof(wpstring));
 }
 
-struct passwd *sys_getpwent(void)
+/**************************************************************************
+ Wide chown. Just narrow and call sys_xxx.
+****************************************************************************/
+
+int wsys_chown(const smb_ucs2_t *wfname, uid_t uid, gid_t gid)
 {
-       return setup_pwret(getpwent());
+       pstring fname;
+       return chown(unicode_to_unix(fname,wfname,sizeof(fname)), uid, gid);
 }
 
-void sys_endpwent(void)
+/**************************************************************************
+ Wide chroot. Just narrow and call sys_xxx.
+****************************************************************************/
+
+int wsys_chroot(const smb_ucs2_t *wfname)
 {
-       setup_pwret(NULL); /* Clear cache. */
-       endpwent();
+       pstring fname;
+       return chroot(unicode_to_unix(fname,wfname,sizeof(fname)));
 }
 
 /**************************************************************************
- Wrapper for getpwnam(). Always returns a static that can be modified.
+ Wide getpwnam. Return a structure pointer containing wide names.
 ****************************************************************************/
 
-struct passwd *sys_getpwnam(const char *name)
+SMB_STRUCT_WPASSWD *wsys_getpwnam(const smb_ucs2_t *wname)
 {
-       if (!name || !name[0])
+       static SMB_STRUCT_WPASSWD retval;
+       fstring name;
+       struct passwd *pwret = sys_getpwnam(unicode_to_unix(name,wname,sizeof(name)));
+
+       if(!pwret)
                return NULL;
 
-       /* check for a cache hit first */
-       if (num_lookups && pw_cache.pass.pw_name && !strcmp(name, pw_cache.pass.pw_name)) {
-               return setup_pwret(&pw_cache.pass);
-       }
+       unix_to_unicode(retval.pw_name, pwret->pw_name, sizeof(retval.pw_name));
+       retval.pw_passwd = pwret->pw_passwd;
+       retval.pw_uid = pwret->pw_uid;
+       retval.pw_gid = pwret->pw_gid;
+       unix_to_unicode(retval.pw_gecos, pwret->pw_gecos, sizeof(retval.pw_gecos));
+       unix_to_unicode(retval.pw_dir, pwret->pw_dir, sizeof(retval.pw_dir));
+       unix_to_unicode(retval.pw_shell, pwret->pw_shell, sizeof(retval.pw_shell));
 
-       return setup_pwret(getpwnam(name));
+       return &retval;
 }
 
 /**************************************************************************
- Wrapper for getpwuid(). Always returns a static that can be modified.
+ Wide getpwuid. Return a structure pointer containing wide names.
 ****************************************************************************/
 
-struct passwd *sys_getpwuid(uid_t uid)
+SMB_STRUCT_WPASSWD *wsys_getpwuid(uid_t uid)
 {
-       if (num_lookups && pw_cache.pass.pw_name && (uid == pw_cache.pass.pw_uid)) {
-               return setup_pwret(&pw_cache.pass);
-       }
-       
-       return setup_pwret(getpwuid(uid));
+       static SMB_STRUCT_WPASSWD retval;
+       struct passwd *pwret = sys_getpwuid(uid);
+
+       if(!pwret)
+               return NULL;
+
+       unix_to_unicode(retval.pw_name, pwret->pw_name, sizeof(retval.pw_name));
+       retval.pw_passwd = pwret->pw_passwd;
+       retval.pw_uid = pwret->pw_uid;
+       retval.pw_gid = pwret->pw_gid;
+       unix_to_unicode(retval.pw_gecos, pwret->pw_gecos, sizeof(retval.pw_gecos));
+       unix_to_unicode(retval.pw_dir, pwret->pw_dir, sizeof(retval.pw_dir));
+       unix_to_unicode(retval.pw_shell, pwret->pw_shell, sizeof(retval.pw_shell));
+
+       return &retval;
 }
+#endif /* NOT CURRENTLY USED - JRA */
 
 /**************************************************************************
  Extract a command into an arg list. Uses a static pstring for storage.
@@ -907,6 +1140,7 @@ err_exit:
 /**************************************************************************
  Wrapper for pclose. Modified from the glibc sources.
 ****************************************************************************/
+
 int sys_pclose(int fd)
 {
        int wstatus;
@@ -951,16 +1185,16 @@ int sys_pclose(int fd)
 
 void *sys_dlopen(const char *name, int flags)
 {
-#ifdef HAVE_LIBDL
+#if defined(HAVE_DLOPEN)
        return dlopen(name, flags);
 #else
        return NULL;
 #endif
 }
 
-void *sys_dlsym(void *handle, char *symbol)
+void *sys_dlsym(void *handle, const char *symbol)
 {
-#ifdef HAVE_LIBDL
+#if defined(HAVE_DLSYM)
     return dlsym(handle, symbol);
 #else
     return NULL;
@@ -969,7 +1203,7 @@ void *sys_dlsym(void *handle, char *symbol)
 
 int sys_dlclose (void *handle)
 {
-#ifdef HAVE_LIBDL
+#if defined(HAVE_DLCLOSE)
        return dlclose(handle);
 #else
        return 0;
@@ -978,9 +1212,169 @@ int sys_dlclose (void *handle)
 
 const char *sys_dlerror(void)
 {
-#ifdef HAVE_LIBDL
+#if defined(HAVE_DLERROR)
        return dlerror();
 #else
        return NULL;
 #endif
 }
+
+int sys_dup2(int oldfd, int newfd) 
+{
+#if defined(HAVE_DUP2)
+       return dup2(oldfd, newfd);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+/**************************************************************************
+ Wrapper for Admin Logs.
+****************************************************************************/
+
+ void sys_adminlog(int priority, const char *format_str, ...) 
+{
+       va_list ap;
+       int ret;
+       char *msgbuf = NULL;
+
+       va_start( ap, format_str );
+       ret = vasprintf( &msgbuf, format_str, ap );
+       va_end( ap );
+
+       if (ret == -1)
+               return;
+
+#if defined(HAVE_SYSLOG)
+       syslog( priority, "%s", msgbuf );
+#else
+       DEBUG(0,("%s", msgbuf ));
+#endif
+       SAFE_FREE(msgbuf);
+}
+
+/**************************************************************************
+ Wrappers for extented attribute calls. Based on the Linux package with
+ support for IRIX also. Expand as other systems have them.
+****************************************************************************/
+
+ssize_t sys_getxattr (const char *path, const char *name, void *value, size_t size)
+{
+#if defined(HAVE_GETXATTR)
+       return getxattr(path, name, value, size);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+ssize_t sys_lgetxattr (const char *path, const char *name, void *value, size_t size)
+{
+#if defined(HAVE_LGETXATTR)
+       return lgetxattr(path, name, value, size);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+ssize_t sys_fgetxattr (int filedes, const char *name, void *value, size_t size)
+{
+#if defined(HAVE_FGETXATTR)
+       return fgetxattr(filedes, name, value, size);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+ssize_t sys_listxattr (const char *path, char *list, size_t size)
+{
+#if defined(HAVE_LISTXATTR)
+       return listxattr(path, list, size);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+ssize_t sys_llistxattr (const char *path, char *list, size_t size)
+{
+#if defined(HAVE_GETXATTR)
+       return llistxattr(path, list, size);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+ssize_t sys_flistxattr (int filedes, char *list, size_t size)
+{
+#if defined(HAVE_FLISTXATTR)
+       return flistxattr(filedes, list, size);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+int sys_removexattr (const char *path, const char *name)
+{
+#if defined(HAVE_REMOVEXATTR)
+       return removexattr(path, name);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+int sys_lremovexattr (const char *path, const char *name)
+{
+#if defined(HAVE_LREMOVEXATTR)
+       return lremovexattr(path, name);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+int sys_fremovexattr (int filedes, const char *name)
+{
+#if defined(HAVE_FREMOVEXATTR)
+       return fremovexattr(filedes, name);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+int sys_setxattr (const char *path, const char *name, const void *value, size_t size, int flags)
+{
+#if defined(HAVE_SETXATTR)
+       return setxattr(path, name, value, size, flags);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+int sys_lsetxattr (const char *path, const char *name, const void *value, size_t size, int flags)
+{
+#if defined(HAVE_LSETXATTR)
+       return lsetxattr(path, name, value, size, flags);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}
+
+int sys_fsetxattr (int filedes, const char *name, const void *value, size_t size, int flags)
+{
+#if defined(HAVE_FSETXATTR)
+       return fsetxattr(filedes, name, value, size, flags);
+#else
+       errno = ENOSYS;
+       return -1;
+#endif
+}