2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Jeremy Allison 1998-2005
6 Copyright (C) Timur Bakeyev 2005
7 Copyright (C) Bjoern Jacke 2006-2007
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>.
25 #ifdef HAVE_SYS_PRCTL_H
26 #include <sys/prctl.h>
30 The idea is that this file will eventually have wrappers around all
31 important system calls in samba. The aims are:
33 - to enable easier porting by putting OS dependent stuff in here
35 - to allow for hooks into other "pseudo-filesystems"
37 - to allow easier integration of things like the japanese extensions
39 - to support the philosophy of Samba to expose the features of
40 the OS within the SMB model. In general whatever file/printer/variable
41 expansions/etc make sense to the OS should be acceptable to Samba.
46 /*******************************************************************
47 A wrapper for memalign
48 ********************************************************************/
50 void *sys_memalign( size_t align, size_t size )
52 #if defined(HAVE_POSIX_MEMALIGN)
54 int ret = posix_memalign( &p, align, size );
59 #elif defined(HAVE_MEMALIGN)
60 return memalign( align, size );
62 /* On *BSD systems memaligns doesn't exist, but memory will
63 * be aligned on allocations of > pagesize. */
64 #if defined(SYSCONF_SC_PAGESIZE)
65 size_t pagesize = (size_t)sysconf(_SC_PAGESIZE);
66 #elif defined(HAVE_GETPAGESIZE)
67 size_t pagesize = (size_t)getpagesize();
69 size_t pagesize = (size_t)-1;
71 if (pagesize == (size_t)-1) {
72 DEBUG(0,("memalign functionalaity not available on this platform!\n"));
75 if (size < pagesize) {
78 return SMB_MALLOC(size);
82 /*******************************************************************
83 A wrapper for usleep in case we don't have one.
84 ********************************************************************/
86 int sys_usleep(long usecs)
93 * We need this braindamage as the glibc usleep
94 * is not SPEC1170 complient... grumble... JRA.
97 if(usecs < 0 || usecs > 1000000) {
105 #else /* HAVE_USLEEP */
107 * Fake it with select...
110 tval.tv_usec = usecs/1000;
111 select(0,NULL,NULL,NULL,&tval);
113 #endif /* HAVE_USLEEP */
116 /*******************************************************************
117 A read wrapper that will deal with EINTR.
118 ********************************************************************/
120 ssize_t sys_read(int fd, void *buf, size_t count)
125 ret = read(fd, buf, count);
126 } while (ret == -1 && errno == EINTR);
130 /*******************************************************************
131 A write wrapper that will deal with EINTR.
132 ********************************************************************/
134 ssize_t sys_write(int fd, const void *buf, size_t count)
139 ret = write(fd, buf, count);
140 } while (ret == -1 && errno == EINTR);
144 /*******************************************************************
145 A pread wrapper that will deal with EINTR and 64-bit file offsets.
146 ********************************************************************/
148 #if defined(HAVE_PREAD) || defined(HAVE_PREAD64)
149 ssize_t sys_pread(int fd, void *buf, size_t count, SMB_OFF_T off)
154 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_PREAD64)
155 ret = pread64(fd, buf, count, off);
157 ret = pread(fd, buf, count, off);
159 } while (ret == -1 && errno == EINTR);
164 /*******************************************************************
165 A write wrapper that will deal with EINTR and 64-bit file offsets.
166 ********************************************************************/
168 #if defined(HAVE_PWRITE) || defined(HAVE_PWRITE64)
169 ssize_t sys_pwrite(int fd, const void *buf, size_t count, SMB_OFF_T off)
174 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_PWRITE64)
175 ret = pwrite64(fd, buf, count, off);
177 ret = pwrite(fd, buf, count, off);
179 } while (ret == -1 && errno == EINTR);
184 /*******************************************************************
185 A send wrapper that will deal with EINTR.
186 ********************************************************************/
188 ssize_t sys_send(int s, const void *msg, size_t len, int flags)
193 ret = send(s, msg, len, flags);
194 } while (ret == -1 && errno == EINTR);
198 /*******************************************************************
199 A sendto wrapper that will deal with EINTR.
200 ********************************************************************/
202 ssize_t sys_sendto(int s, const void *msg, size_t len, int flags, const struct sockaddr *to, socklen_t tolen)
207 ret = sendto(s, msg, len, flags, to, tolen);
208 } while (ret == -1 && errno == EINTR);
212 /*******************************************************************
213 A recv wrapper that will deal with EINTR.
214 ********************************************************************/
216 ssize_t sys_recv(int fd, void *buf, size_t count, int flags)
221 ret = recv(fd, buf, count, flags);
222 } while (ret == -1 && errno == EINTR);
226 /*******************************************************************
227 A recvfrom wrapper that will deal with EINTR.
228 ********************************************************************/
230 ssize_t sys_recvfrom(int s, void *buf, size_t len, int flags, struct sockaddr *from, socklen_t *fromlen)
235 ret = recvfrom(s, buf, len, flags, from, fromlen);
236 } while (ret == -1 && errno == EINTR);
240 /*******************************************************************
241 A fcntl wrapper that will deal with EINTR.
242 ********************************************************************/
244 int sys_fcntl_ptr(int fd, int cmd, void *arg)
249 ret = fcntl(fd, cmd, arg);
250 } while (ret == -1 && errno == EINTR);
254 /*******************************************************************
255 A fcntl wrapper that will deal with EINTR.
256 ********************************************************************/
258 int sys_fcntl_long(int fd, int cmd, long arg)
263 ret = fcntl(fd, cmd, arg);
264 } while (ret == -1 && errno == EINTR);
268 /*******************************************************************
269 A stat() wrapper that will deal with 64 bit filesizes.
270 ********************************************************************/
272 int sys_stat(const char *fname,SMB_STRUCT_STAT *sbuf)
275 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_STAT64)
276 ret = stat64(fname, sbuf);
278 ret = stat(fname, sbuf);
280 /* we always want directories to appear zero size */
281 if (ret == 0 && S_ISDIR(sbuf->st_mode)) sbuf->st_size = 0;
285 /*******************************************************************
286 An fstat() wrapper that will deal with 64 bit filesizes.
287 ********************************************************************/
289 int sys_fstat(int fd,SMB_STRUCT_STAT *sbuf)
292 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_FSTAT64)
293 ret = fstat64(fd, sbuf);
295 ret = fstat(fd, sbuf);
297 /* we always want directories to appear zero size */
298 if (ret == 0 && S_ISDIR(sbuf->st_mode)) sbuf->st_size = 0;
302 /*******************************************************************
303 An lstat() wrapper that will deal with 64 bit filesizes.
304 ********************************************************************/
306 int sys_lstat(const char *fname,SMB_STRUCT_STAT *sbuf)
309 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_LSTAT64)
310 ret = lstat64(fname, sbuf);
312 ret = lstat(fname, sbuf);
314 /* we always want directories to appear zero size */
315 if (ret == 0 && S_ISDIR(sbuf->st_mode)) sbuf->st_size = 0;
319 /*******************************************************************
320 An ftruncate() wrapper that will deal with 64 bit filesizes.
321 ********************************************************************/
323 int sys_ftruncate(int fd, SMB_OFF_T offset)
325 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_FTRUNCATE64)
326 return ftruncate64(fd, offset);
328 return ftruncate(fd, offset);
332 /*******************************************************************
333 An lseek() wrapper that will deal with 64 bit filesizes.
334 ********************************************************************/
336 SMB_OFF_T sys_lseek(int fd, SMB_OFF_T offset, int whence)
338 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OFF64_T) && defined(HAVE_LSEEK64)
339 return lseek64(fd, offset, whence);
341 return lseek(fd, offset, whence);
345 /*******************************************************************
346 An fseek() wrapper that will deal with 64 bit filesizes.
347 ********************************************************************/
349 int sys_fseek(FILE *fp, SMB_OFF_T offset, int whence)
351 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FSEEK64)
352 return fseek64(fp, offset, whence);
353 #elif defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FSEEKO64)
354 return fseeko64(fp, offset, whence);
356 return fseek(fp, offset, whence);
360 /*******************************************************************
361 An ftell() wrapper that will deal with 64 bit filesizes.
362 ********************************************************************/
364 SMB_OFF_T sys_ftell(FILE *fp)
366 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FTELL64)
367 return (SMB_OFF_T)ftell64(fp);
368 #elif defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(LARGE_SMB_OFF_T) && defined(HAVE_FTELLO64)
369 return (SMB_OFF_T)ftello64(fp);
371 return (SMB_OFF_T)ftell(fp);
375 /*******************************************************************
376 A creat() wrapper that will deal with 64 bit filesizes.
377 ********************************************************************/
379 int sys_creat(const char *path, mode_t mode)
381 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_CREAT64)
382 return creat64(path, mode);
385 * If creat64 isn't defined then ensure we call a potential open64.
388 return sys_open(path, O_WRONLY | O_CREAT | O_TRUNC, mode);
392 /*******************************************************************
393 An open() wrapper that will deal with 64 bit filesizes.
394 ********************************************************************/
396 int sys_open(const char *path, int oflag, mode_t mode)
398 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OPEN64)
399 return open64(path, oflag, mode);
401 return open(path, oflag, mode);
405 /*******************************************************************
406 An fopen() wrapper that will deal with 64 bit filesizes.
407 ********************************************************************/
409 FILE *sys_fopen(const char *path, const char *type)
411 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_FOPEN64)
412 return fopen64(path, type);
414 return fopen(path, type);
419 /*******************************************************************
420 A flock() wrapper that will perform the kernel flock.
421 ********************************************************************/
423 void kernel_flock(int fd, uint32 share_mode)
425 #if HAVE_KERNEL_SHARE_MODES
427 if (share_mode == FILE_SHARE_WRITE) {
428 kernel_mode = LOCK_MAND|LOCK_WRITE;
429 } else if (share_mode == FILE_SHARE_READ) {
430 kernel_mode = LOCK_MAND|LOCK_READ;
431 } else if (share_mode == FILE_SHARE_NONE) {
432 kernel_mode = LOCK_MAND;
435 flock(fd, kernel_mode);
443 /*******************************************************************
444 An opendir wrapper that will deal with 64 bit filesizes.
445 ********************************************************************/
447 SMB_STRUCT_DIR *sys_opendir(const char *name)
449 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_OPENDIR64)
450 return opendir64(name);
452 return opendir(name);
456 /*******************************************************************
457 A readdir wrapper that will deal with 64 bit filesizes.
458 ********************************************************************/
460 SMB_STRUCT_DIRENT *sys_readdir(SMB_STRUCT_DIR *dirp)
462 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_READDIR64)
463 return readdir64(dirp);
465 return readdir(dirp);
469 /*******************************************************************
470 A seekdir wrapper that will deal with 64 bit filesizes.
471 ********************************************************************/
473 void sys_seekdir(SMB_STRUCT_DIR *dirp, long offset)
475 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_SEEKDIR64)
476 seekdir64(dirp, offset);
478 seekdir(dirp, offset);
482 /*******************************************************************
483 A telldir wrapper that will deal with 64 bit filesizes.
484 ********************************************************************/
486 long sys_telldir(SMB_STRUCT_DIR *dirp)
488 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_TELLDIR64)
489 return (long)telldir64(dirp);
491 return (long)telldir(dirp);
495 /*******************************************************************
496 A rewinddir wrapper that will deal with 64 bit filesizes.
497 ********************************************************************/
499 void sys_rewinddir(SMB_STRUCT_DIR *dirp)
501 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_REWINDDIR64)
508 /*******************************************************************
509 A close wrapper that will deal with 64 bit filesizes.
510 ********************************************************************/
512 int sys_closedir(SMB_STRUCT_DIR *dirp)
514 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_CLOSEDIR64)
515 return closedir64(dirp);
517 return closedir(dirp);
521 /*******************************************************************
522 An mknod() wrapper that will deal with 64 bit filesizes.
523 ********************************************************************/
525 int sys_mknod(const char *path, mode_t mode, SMB_DEV_T dev)
527 #if defined(HAVE_MKNOD) || defined(HAVE_MKNOD64)
528 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_MKNOD64) && defined(HAVE_DEV64_T)
529 return mknod64(path, mode, dev);
531 return mknod(path, mode, dev);
534 /* No mknod system call. */
540 /*******************************************************************
541 Wrapper for realpath.
542 ********************************************************************/
544 char *sys_realpath(const char *path, char *resolved_path)
546 #if defined(HAVE_REALPATH)
547 return realpath(path, resolved_path);
549 /* As realpath is not a system call we can't return ENOSYS. */
555 /*******************************************************************
556 The wait() calls vary between systems
557 ********************************************************************/
559 int sys_waitpid(pid_t pid,int *status,int options)
562 return waitpid(pid,status,options);
563 #else /* HAVE_WAITPID */
564 return wait4(pid, status, options, NULL);
565 #endif /* HAVE_WAITPID */
568 /*******************************************************************
569 System wrapper for getwd
570 ********************************************************************/
572 char *sys_getwd(char *s)
576 wd = (char *)getcwd(s, PATH_MAX);
578 wd = (char *)getwd(s);
583 /*******************************************************************
584 system wrapper for symlink
585 ********************************************************************/
587 int sys_symlink(const char *oldpath, const char *newpath)
593 return symlink(oldpath, newpath);
597 /*******************************************************************
599 ********************************************************************/
601 int sys_lchown(const char *fname,uid_t uid,gid_t gid)
606 DEBUG(1,("WARNING: no lchown!\n"));
612 return(lchown(fname,uid,gid));
616 /*******************************************************************
617 os/2 also doesn't have chroot
618 ********************************************************************/
619 int sys_chroot(const char *dname)
624 DEBUG(1,("WARNING: no chroot!\n"));
630 return(chroot(dname));
634 #if defined(HAVE_POSIX_CAPABILITIES)
636 /**************************************************************************
637 Try and abstract process capabilities (for systems that have them).
638 ****************************************************************************/
640 /* Set the POSIX capabilities needed for the given purpose into the effective
641 * capability set of the current process. Make sure they are always removed
642 * from the inheritable set, because there is no circumstance in which our
643 * children should inherit our elevated privileges.
645 static bool set_process_capability(enum smbd_capability capability,
648 cap_value_t cap_vals[2] = {0};
649 int num_cap_vals = 0;
653 #if defined(HAVE_PRCTL) && defined(PR_GET_KEEPCAPS) && defined(PR_SET_KEEPCAPS)
654 /* On Linux, make sure that any capabilities we grab are sticky
655 * across UID changes. We expect that this would allow us to keep both
656 * the effective and permitted capability sets, but as of circa 2.6.16,
657 * only the permitted set is kept. It is a bug (which we work around)
658 * that the effective set is lost, but we still require the effective
661 if (!prctl(PR_GET_KEEPCAPS)) {
662 prctl(PR_SET_KEEPCAPS, 1);
666 cap = cap_get_proc();
668 DEBUG(0,("set_process_capability: cap_get_proc failed: %s\n",
673 switch (capability) {
674 case KERNEL_OPLOCK_CAPABILITY:
675 #ifdef CAP_NETWORK_MGT
676 /* IRIX has CAP_NETWORK_MGT for oplocks. */
677 cap_vals[num_cap_vals++] = CAP_NETWORK_MGT;
680 case DMAPI_ACCESS_CAPABILITY:
681 #ifdef CAP_DEVICE_MGT
682 /* IRIX has CAP_DEVICE_MGT for DMAPI access. */
683 cap_vals[num_cap_vals++] = CAP_DEVICE_MGT;
685 /* Linux has CAP_MKNOD for DMAPI access. */
686 cap_vals[num_cap_vals++] = CAP_MKNOD;
689 case LEASE_CAPABILITY:
691 cap_vals[num_cap_vals++] = CAP_LEASE;
696 SMB_ASSERT(num_cap_vals <= ARRAY_SIZE(cap_vals));
698 if (num_cap_vals == 0) {
703 cap_set_flag(cap, CAP_EFFECTIVE, num_cap_vals, cap_vals,
704 enable ? CAP_SET : CAP_CLEAR);
706 /* We never want to pass capabilities down to our children, so make
707 * sure they are not inherited.
709 cap_set_flag(cap, CAP_INHERITABLE, num_cap_vals, cap_vals, CAP_CLEAR);
711 if (cap_set_proc(cap) == -1) {
712 DEBUG(0, ("set_process_capability: cap_set_proc failed: %s\n",
722 #endif /* HAVE_POSIX_CAPABILITIES */
724 /****************************************************************************
725 Gain the oplock capability from the kernel if possible.
726 ****************************************************************************/
728 void set_effective_capability(enum smbd_capability capability)
730 #if defined(HAVE_POSIX_CAPABILITIES)
731 set_process_capability(capability, True);
732 #endif /* HAVE_POSIX_CAPABILITIES */
735 void drop_effective_capability(enum smbd_capability capability)
737 #if defined(HAVE_POSIX_CAPABILITIES)
738 set_process_capability(capability, False);
739 #endif /* HAVE_POSIX_CAPABILITIES */
742 /**************************************************************************
743 Wrapper for random().
744 ****************************************************************************/
746 long sys_random(void)
748 #if defined(HAVE_RANDOM)
749 return (long)random();
750 #elif defined(HAVE_RAND)
753 DEBUG(0,("Error - no random function available !\n"));
758 /**************************************************************************
759 Wrapper for srandom().
760 ****************************************************************************/
762 void sys_srandom(unsigned int seed)
764 #if defined(HAVE_SRANDOM)
766 #elif defined(HAVE_SRAND)
769 DEBUG(0,("Error - no srandom function available !\n"));
774 /**************************************************************************
775 Returns equivalent to NGROUPS_MAX - using sysconf if needed.
776 ****************************************************************************/
780 #if defined(SYSCONF_SC_NGROUPS_MAX)
781 int ret = sysconf(_SC_NGROUPS_MAX);
782 return (ret == -1) ? NGROUPS_MAX : ret;
788 /**************************************************************************
789 Wrap setgroups and getgroups for systems that declare getgroups() as
790 returning an array of gid_t, but actuall return an array of int.
791 ****************************************************************************/
793 #if defined(HAVE_BROKEN_GETGROUPS)
794 static int sys_broken_getgroups(int setlen, gid_t *gidset)
801 return getgroups(setlen, &gid);
805 * Broken case. We need to allocate a
806 * GID_T array of size setlen.
815 setlen = groups_max();
817 if((group_list = SMB_MALLOC_ARRAY(GID_T, setlen)) == NULL) {
818 DEBUG(0,("sys_getgroups: Malloc fail.\n"));
822 if((ngroups = getgroups(setlen, group_list)) < 0) {
823 int saved_errno = errno;
824 SAFE_FREE(group_list);
829 for(i = 0; i < ngroups; i++)
830 gidset[i] = (gid_t)group_list[i];
832 SAFE_FREE(group_list);
836 static int sys_broken_setgroups(int setlen, gid_t *gidset)
844 if (setlen < 0 || setlen > groups_max()) {
850 * Broken case. We need to allocate a
851 * GID_T array of size setlen.
854 if((group_list = SMB_MALLOC_ARRAY(GID_T, setlen)) == NULL) {
855 DEBUG(0,("sys_setgroups: Malloc fail.\n"));
859 for(i = 0; i < setlen; i++)
860 group_list[i] = (GID_T) gidset[i];
862 if(setgroups(setlen, group_list) != 0) {
863 int saved_errno = errno;
864 SAFE_FREE(group_list);
869 SAFE_FREE(group_list);
873 #endif /* HAVE_BROKEN_GETGROUPS */
875 /* This is a list of systems that require the first GID passed to setgroups(2)
876 * to be the effective GID. If your system is one of these, add it here.
878 #if defined (FREEBSD) || defined (DARWINOS)
879 #define USE_BSD_SETGROUPS
882 #if defined(USE_BSD_SETGROUPS)
883 /* Depending on the particular BSD implementation, the first GID that is
884 * passed to setgroups(2) will either be ignored or will set the credential's
885 * effective GID. In either case, the right thing to do is to guarantee that
886 * gidset[0] is the effective GID.
888 static int sys_bsd_setgroups(gid_t primary_gid, int setlen, const gid_t *gidset)
890 gid_t *new_gidset = NULL;
894 /* setgroups(2) will fail with EINVAL if we pass too many groups. */
897 /* No group list, just make sure we are setting the efective GID. */
899 return setgroups(1, &primary_gid);
902 /* If the primary gid is not the first array element, grow the array
903 * and insert it at the front.
905 if (gidset[0] != primary_gid) {
906 new_gidset = SMB_MALLOC_ARRAY(gid_t, setlen + 1);
907 if (new_gidset == NULL) {
911 memcpy(new_gidset + 1, gidset, (setlen * sizeof(gid_t)));
912 new_gidset[0] = primary_gid;
917 DEBUG(3, ("forced to truncate group list from %d to %d\n",
922 #if defined(HAVE_BROKEN_GETGROUPS)
923 ret = sys_broken_setgroups(setlen, new_gidset ? new_gidset : gidset);
925 ret = setgroups(setlen, new_gidset ? new_gidset : gidset);
930 SAFE_FREE(new_gidset);
937 #endif /* USE_BSD_SETGROUPS */
939 /**************************************************************************
940 Wrapper for getgroups. Deals with broken (int) case.
941 ****************************************************************************/
943 int sys_getgroups(int setlen, gid_t *gidset)
945 #if defined(HAVE_BROKEN_GETGROUPS)
946 return sys_broken_getgroups(setlen, gidset);
948 return getgroups(setlen, gidset);
952 /**************************************************************************
953 Wrapper for setgroups. Deals with broken (int) case and BSD case.
954 ****************************************************************************/
956 int sys_setgroups(gid_t UNUSED(primary_gid), int setlen, gid_t *gidset)
958 #if !defined(HAVE_SETGROUPS)
961 #endif /* HAVE_SETGROUPS */
963 #if defined(USE_BSD_SETGROUPS)
964 return sys_bsd_setgroups(primary_gid, setlen, gidset);
965 #elif defined(HAVE_BROKEN_GETGROUPS)
966 return sys_broken_setgroups(setlen, gidset);
968 return setgroups(setlen, gidset);
972 /**************************************************************************
973 Wrappers for setpwent(), getpwent() and endpwent()
974 ****************************************************************************/
976 void sys_setpwent(void)
981 struct passwd *sys_getpwent(void)
986 void sys_endpwent(void)
991 /**************************************************************************
992 Wrappers for getpwnam(), getpwuid(), getgrnam(), getgrgid()
993 ****************************************************************************/
996 struct passwd *sys_getpwnam(const char *name)
998 return getpwnam(name);
1001 struct passwd *sys_getpwuid(uid_t uid)
1003 return getpwuid(uid);
1006 struct group *sys_getgrnam(const char *name)
1008 return getgrnam(name);
1011 struct group *sys_getgrgid(gid_t gid)
1013 return getgrgid(gid);
1016 /**************************************************************************
1017 Extract a command into an arg list.
1018 ****************************************************************************/
1020 static char **extract_args(TALLOC_CTX *mem_ctx, const char *command)
1029 if (!(trunc_cmd = talloc_strdup(mem_ctx, command))) {
1030 DEBUG(0, ("talloc failed\n"));
1034 if(!(ptr = strtok_r(trunc_cmd, " \t", &saveptr))) {
1035 TALLOC_FREE(trunc_cmd);
1044 for( argcl = 1; ptr; ptr = strtok_r(NULL, " \t", &saveptr))
1047 TALLOC_FREE(trunc_cmd);
1049 if (!(argl = TALLOC_ARRAY(mem_ctx, char *, argcl + 1))) {
1054 * Now do the extraction.
1057 if (!(trunc_cmd = talloc_strdup(mem_ctx, command))) {
1061 ptr = strtok_r(trunc_cmd, " \t", &saveptr);
1064 if (!(argl[i++] = talloc_strdup(argl, ptr))) {
1068 while((ptr = strtok_r(NULL, " \t", &saveptr)) != NULL) {
1070 if (!(argl[i++] = talloc_strdup(argl, ptr))) {
1079 DEBUG(0, ("talloc failed\n"));
1080 TALLOC_FREE(trunc_cmd);
1086 /**************************************************************************
1087 Wrapper for fork. Ensures that mypid is reset. Used so we can write
1088 a sys_getpid() that only does a system call *once*.
1089 ****************************************************************************/
1091 static pid_t mypid = (pid_t)-1;
1093 pid_t sys_fork(void)
1095 pid_t forkret = fork();
1097 if (forkret == (pid_t)0) /* Child - reset mypid so sys_getpid does a system call. */
1103 /**************************************************************************
1104 Wrapper for getpid. Ensures we only do a system call *once*.
1105 ****************************************************************************/
1107 pid_t sys_getpid(void)
1109 if (mypid == (pid_t)-1)
1115 /**************************************************************************
1116 Wrapper for popen. Safer as it doesn't search a path.
1117 Modified from the glibc sources.
1118 modified by tridge to return a file descriptor. We must kick our FILE* habit
1119 ****************************************************************************/
1121 typedef struct _popen_list
1125 struct _popen_list *next;
1128 static popen_list *popen_chain;
1130 int sys_popen(const char *command)
1132 int parent_end, child_end;
1134 popen_list *entry = NULL;
1137 if (pipe(pipe_fds) < 0)
1140 parent_end = pipe_fds[0];
1141 child_end = pipe_fds[1];
1148 if((entry = SMB_MALLOC_P(popen_list)) == NULL)
1151 ZERO_STRUCTP(entry);
1154 * Extract the command and args into a NULL terminated array.
1157 if(!(argl = extract_args(NULL, command)))
1160 entry->child_pid = sys_fork();
1162 if (entry->child_pid == -1) {
1166 if (entry->child_pid == 0) {
1172 int child_std_end = STDOUT_FILENO;
1176 if (child_end != child_std_end) {
1177 dup2 (child_end, child_std_end);
1182 * POSIX.2: "popen() shall ensure that any streams from previous
1183 * popen() calls that remain open in the parent process are closed
1184 * in the new child process."
1187 for (p = popen_chain; p; p = p->next)
1190 execv(argl[0], argl);
1201 /* Link into popen_chain. */
1202 entry->next = popen_chain;
1203 popen_chain = entry;
1204 entry->fd = parent_end;
1217 /**************************************************************************
1218 Wrapper for pclose. Modified from the glibc sources.
1219 ****************************************************************************/
1221 int sys_pclose(int fd)
1224 popen_list **ptr = &popen_chain;
1225 popen_list *entry = NULL;
1229 /* Unlink from popen_chain. */
1230 for ( ; *ptr != NULL; ptr = &(*ptr)->next) {
1231 if ((*ptr)->fd == fd) {
1233 *ptr = (*ptr)->next;
1239 if (status < 0 || close(entry->fd) < 0)
1243 * As Samba is catching and eating child process
1244 * exits we don't really care about the child exit
1245 * code, a -1 with errno = ECHILD will do fine for us.
1249 wait_pid = sys_waitpid (entry->child_pid, &wstatus, 0);
1250 } while (wait_pid == -1 && errno == EINTR);
1259 /**************************************************************************
1260 Wrappers for dlopen, dlsym, dlclose.
1261 ****************************************************************************/
1263 void *sys_dlopen(const char *name, int flags)
1265 #if defined(HAVE_DLOPEN)
1266 return dlopen(name, flags);
1272 void *sys_dlsym(void *handle, const char *symbol)
1274 #if defined(HAVE_DLSYM)
1275 return dlsym(handle, symbol);
1281 int sys_dlclose (void *handle)
1283 #if defined(HAVE_DLCLOSE)
1284 return dlclose(handle);
1290 const char *sys_dlerror(void)
1292 #if defined(HAVE_DLERROR)
1299 int sys_dup2(int oldfd, int newfd)
1301 #if defined(HAVE_DUP2)
1302 return dup2(oldfd, newfd);
1309 /**************************************************************************
1310 Wrapper for Admin Logs.
1311 ****************************************************************************/
1313 void sys_adminlog(int priority, const char *format_str, ...)
1317 char *msgbuf = NULL;
1319 va_start( ap, format_str );
1320 ret = vasprintf( &msgbuf, format_str, ap );
1326 #if defined(HAVE_SYSLOG)
1327 syslog( priority, "%s", msgbuf );
1329 DEBUG(0,("%s", msgbuf ));
1334 /******** Solaris EA helper function prototypes ********/
1335 #ifdef HAVE_ATTROPEN
1336 #define SOLARIS_ATTRMODE S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP
1337 static int solaris_write_xattr(int attrfd, const char *value, size_t size);
1338 static ssize_t solaris_read_xattr(int attrfd, void *value, size_t size);
1339 static ssize_t solaris_list_xattr(int attrdirfd, char *list, size_t size);
1340 static int solaris_unlinkat(int attrdirfd, const char *name);
1341 static int solaris_attropen(const char *path, const char *attrpath, int oflag, mode_t mode);
1342 static int solaris_openat(int fildes, const char *path, int oflag, mode_t mode);
1345 /**************************************************************************
1346 Wrappers for extented attribute calls. Based on the Linux package with
1347 support for IRIX and (Net|Free)BSD also. Expand as other systems have them.
1348 ****************************************************************************/
1350 ssize_t sys_getxattr (const char *path, const char *name, void *value, size_t size)
1352 #if defined(HAVE_GETXATTR)
1353 #ifndef XATTR_ADD_OPT
1354 return getxattr(path, name, value, size);
1357 return getxattr(path, name, value, size, 0, options);
1359 #elif defined(HAVE_GETEA)
1360 return getea(path, name, value, size);
1361 #elif defined(HAVE_EXTATTR_GET_FILE)
1364 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1365 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1366 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1368 * The BSD implementation has a nasty habit of silently truncating
1369 * the returned value to the size of the buffer, so we have to check
1370 * that the buffer is large enough to fit the returned value.
1372 if((retval=extattr_get_file(path, attrnamespace, attrname, NULL, 0)) >= 0) {
1377 if((retval=extattr_get_file(path, attrnamespace, attrname, value, size)) >= 0)
1381 DEBUG(10,("sys_getxattr: extattr_get_file() failed with: %s\n", strerror(errno)));
1383 #elif defined(HAVE_ATTR_GET)
1384 int retval, flags = 0;
1385 int valuelength = (int)size;
1386 char *attrname = strchr(name,'.') + 1;
1388 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1390 retval = attr_get(path, attrname, (char *)value, &valuelength, flags);
1392 return retval ? retval : valuelength;
1393 #elif defined(HAVE_ATTROPEN)
1395 int attrfd = solaris_attropen(path, name, O_RDONLY, 0);
1397 ret = solaris_read_xattr(attrfd, value, size);
1407 ssize_t sys_lgetxattr (const char *path, const char *name, void *value, size_t size)
1409 #if defined(HAVE_LGETXATTR)
1410 return lgetxattr(path, name, value, size);
1411 #elif defined(HAVE_GETXATTR) && defined(XATTR_ADD_OPT)
1412 int options = XATTR_NOFOLLOW;
1413 return getxattr(path, name, value, size, 0, options);
1414 #elif defined(HAVE_LGETEA)
1415 return lgetea(path, name, value, size);
1416 #elif defined(HAVE_EXTATTR_GET_LINK)
1419 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1420 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1421 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1423 if((retval=extattr_get_link(path, attrnamespace, attrname, NULL, 0)) >= 0) {
1428 if((retval=extattr_get_link(path, attrnamespace, attrname, value, size)) >= 0)
1432 DEBUG(10,("sys_lgetxattr: extattr_get_link() failed with: %s\n", strerror(errno)));
1434 #elif defined(HAVE_ATTR_GET)
1435 int retval, flags = ATTR_DONTFOLLOW;
1436 int valuelength = (int)size;
1437 char *attrname = strchr(name,'.') + 1;
1439 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1441 retval = attr_get(path, attrname, (char *)value, &valuelength, flags);
1443 return retval ? retval : valuelength;
1444 #elif defined(HAVE_ATTROPEN)
1446 int attrfd = solaris_attropen(path, name, O_RDONLY|AT_SYMLINK_NOFOLLOW, 0);
1448 ret = solaris_read_xattr(attrfd, value, size);
1458 ssize_t sys_fgetxattr (int filedes, const char *name, void *value, size_t size)
1460 #if defined(HAVE_FGETXATTR)
1461 #ifndef XATTR_ADD_OPT
1462 return fgetxattr(filedes, name, value, size);
1465 return fgetxattr(filedes, name, value, size, 0, options);
1467 #elif defined(HAVE_FGETEA)
1468 return fgetea(filedes, name, value, size);
1469 #elif defined(HAVE_EXTATTR_GET_FD)
1472 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1473 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1474 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1476 if((retval=extattr_get_fd(filedes, attrnamespace, attrname, NULL, 0)) >= 0) {
1481 if((retval=extattr_get_fd(filedes, attrnamespace, attrname, value, size)) >= 0)
1485 DEBUG(10,("sys_fgetxattr: extattr_get_fd() failed with: %s\n", strerror(errno)));
1487 #elif defined(HAVE_ATTR_GETF)
1488 int retval, flags = 0;
1489 int valuelength = (int)size;
1490 char *attrname = strchr(name,'.') + 1;
1492 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1494 retval = attr_getf(filedes, attrname, (char *)value, &valuelength, flags);
1496 return retval ? retval : valuelength;
1497 #elif defined(HAVE_ATTROPEN)
1499 int attrfd = solaris_openat(filedes, name, O_RDONLY|O_XATTR, 0);
1501 ret = solaris_read_xattr(attrfd, value, size);
1511 #if defined(HAVE_EXTATTR_LIST_FILE)
1513 #define EXTATTR_PREFIX(s) (s), (sizeof((s))-1)
1521 { EXTATTR_NAMESPACE_SYSTEM, EXTATTR_PREFIX("system.") },
1522 { EXTATTR_NAMESPACE_USER, EXTATTR_PREFIX("user.") },
1530 static ssize_t bsd_attr_list (int type, extattr_arg arg, char *list, size_t size)
1532 ssize_t list_size, total_size = 0;
1535 /* Iterate through extattr(2) namespaces */
1536 for(t = 0; t < (sizeof(extattr)/sizeof(extattr[0])); t++) {
1538 #if defined(HAVE_EXTATTR_LIST_FILE)
1540 list_size = extattr_list_file(arg.path, extattr[t].space, list, size);
1543 #if defined(HAVE_EXTATTR_LIST_LINK)
1545 list_size = extattr_list_link(arg.path, extattr[t].space, list, size);
1548 #if defined(HAVE_EXTATTR_LIST_FD)
1550 list_size = extattr_list_fd(arg.filedes, extattr[t].space, list, size);
1557 /* Some error happend. Errno should be set by the previous call */
1563 /* XXX: Call with an empty buffer may be used to calculate
1564 necessary buffer size. Unfortunately, we can't say, how
1565 many attributes were returned, so here is the potential
1566 problem with the emulation.
1569 /* Take the worse case of one char attribute names -
1570 two bytes per name plus one more for sanity.
1572 total_size += list_size + (list_size/2 + 1)*extattr[t].len;
1575 /* Count necessary offset to fit namespace prefixes */
1577 for(i = 0; i < list_size; i += list[i] + 1)
1578 len += extattr[t].len;
1580 total_size += list_size + len;
1581 /* Buffer is too small to fit the results */
1582 if(total_size > size) {
1586 /* Shift results back, so we can prepend prefixes */
1587 buf = memmove(list + len, list, list_size);
1589 for(i = 0; i < list_size; i += len + 1) {
1591 strncpy(list, extattr[t].name, extattr[t].len + 1);
1592 list += extattr[t].len;
1593 strncpy(list, buf + i + 1, len);
1604 #if defined(HAVE_ATTR_LIST) && defined(HAVE_SYS_ATTRIBUTES_H)
1605 static char attr_buffer[ATTR_MAX_VALUELEN];
1607 static ssize_t irix_attr_list(const char *path, int filedes, char *list, size_t size, int flags)
1609 int retval = 0, index;
1610 attrlist_cursor_t *cursor = 0;
1612 attrlist_t * al = (attrlist_t *)attr_buffer;
1614 size_t ent_size, left = size;
1619 retval = attr_listf(filedes, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1621 retval = attr_list(path, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1623 for (index = 0; index < al->al_count; index++) {
1624 ae = ATTR_ENTRY(attr_buffer, index);
1625 ent_size = strlen(ae->a_name) + sizeof("user.");
1626 if (left >= ent_size) {
1627 strncpy(bp, "user.", sizeof("user."));
1628 strncat(bp, ae->a_name, ent_size - sizeof("user."));
1636 total_size += ent_size;
1638 if (al->al_more == 0) break;
1645 retval = attr_listf(filedes, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1647 retval = attr_list(path, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1649 for (index = 0; index < al->al_count; index++) {
1650 ae = ATTR_ENTRY(attr_buffer, index);
1651 ent_size = strlen(ae->a_name) + sizeof("system.");
1652 if (left >= ent_size) {
1653 strncpy(bp, "system.", sizeof("system."));
1654 strncat(bp, ae->a_name, ent_size - sizeof("system."));
1662 total_size += ent_size;
1664 if (al->al_more == 0) break;
1667 return (ssize_t)(retval ? retval : total_size);
1672 ssize_t sys_listxattr (const char *path, char *list, size_t size)
1674 #if defined(HAVE_LISTXATTR)
1675 #ifndef XATTR_ADD_OPT
1676 return listxattr(path, list, size);
1679 return listxattr(path, list, size, options);
1681 #elif defined(HAVE_LISTEA)
1682 return listea(path, list, size);
1683 #elif defined(HAVE_EXTATTR_LIST_FILE)
1686 return bsd_attr_list(0, arg, list, size);
1687 #elif defined(HAVE_ATTR_LIST) && defined(HAVE_SYS_ATTRIBUTES_H)
1688 return irix_attr_list(path, 0, list, size, 0);
1689 #elif defined(HAVE_ATTROPEN)
1691 int attrdirfd = solaris_attropen(path, ".", O_RDONLY, 0);
1692 if (attrdirfd >= 0) {
1693 ret = solaris_list_xattr(attrdirfd, list, size);
1703 ssize_t sys_llistxattr (const char *path, char *list, size_t size)
1705 #if defined(HAVE_LLISTXATTR)
1706 return llistxattr(path, list, size);
1707 #elif defined(HAVE_LISTXATTR) && defined(XATTR_ADD_OPT)
1708 int options = XATTR_NOFOLLOW;
1709 return listxattr(path, list, size, options);
1710 #elif defined(HAVE_LLISTEA)
1711 return llistea(path, list, size);
1712 #elif defined(HAVE_EXTATTR_LIST_LINK)
1715 return bsd_attr_list(1, arg, list, size);
1716 #elif defined(HAVE_ATTR_LIST) && defined(HAVE_SYS_ATTRIBUTES_H)
1717 return irix_attr_list(path, 0, list, size, ATTR_DONTFOLLOW);
1718 #elif defined(HAVE_ATTROPEN)
1720 int attrdirfd = solaris_attropen(path, ".", O_RDONLY|AT_SYMLINK_NOFOLLOW, 0);
1721 if (attrdirfd >= 0) {
1722 ret = solaris_list_xattr(attrdirfd, list, size);
1732 ssize_t sys_flistxattr (int filedes, char *list, size_t size)
1734 #if defined(HAVE_FLISTXATTR)
1735 #ifndef XATTR_ADD_OPT
1736 return flistxattr(filedes, list, size);
1739 return flistxattr(filedes, list, size, options);
1741 #elif defined(HAVE_FLISTEA)
1742 return flistea(filedes, list, size);
1743 #elif defined(HAVE_EXTATTR_LIST_FD)
1745 arg.filedes = filedes;
1746 return bsd_attr_list(2, arg, list, size);
1747 #elif defined(HAVE_ATTR_LISTF)
1748 return irix_attr_list(NULL, filedes, list, size, 0);
1749 #elif defined(HAVE_ATTROPEN)
1751 int attrdirfd = solaris_openat(filedes, ".", O_RDONLY|O_XATTR, 0);
1752 if (attrdirfd >= 0) {
1753 ret = solaris_list_xattr(attrdirfd, list, size);
1763 int sys_removexattr (const char *path, const char *name)
1765 #if defined(HAVE_REMOVEXATTR)
1766 #ifndef XATTR_ADD_OPT
1767 return removexattr(path, name);
1770 return removexattr(path, name, options);
1772 #elif defined(HAVE_REMOVEEA)
1773 return removeea(path, name);
1774 #elif defined(HAVE_EXTATTR_DELETE_FILE)
1776 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1777 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1778 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1780 return extattr_delete_file(path, attrnamespace, attrname);
1781 #elif defined(HAVE_ATTR_REMOVE)
1783 char *attrname = strchr(name,'.') + 1;
1785 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1787 return attr_remove(path, attrname, flags);
1788 #elif defined(HAVE_ATTROPEN)
1790 int attrdirfd = solaris_attropen(path, ".", O_RDONLY, 0);
1791 if (attrdirfd >= 0) {
1792 ret = solaris_unlinkat(attrdirfd, name);
1802 int sys_lremovexattr (const char *path, const char *name)
1804 #if defined(HAVE_LREMOVEXATTR)
1805 return lremovexattr(path, name);
1806 #elif defined(HAVE_REMOVEXATTR) && defined(XATTR_ADD_OPT)
1807 int options = XATTR_NOFOLLOW;
1808 return removexattr(path, name, options);
1809 #elif defined(HAVE_LREMOVEEA)
1810 return lremoveea(path, name);
1811 #elif defined(HAVE_EXTATTR_DELETE_LINK)
1813 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1814 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1815 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1817 return extattr_delete_link(path, attrnamespace, attrname);
1818 #elif defined(HAVE_ATTR_REMOVE)
1819 int flags = ATTR_DONTFOLLOW;
1820 char *attrname = strchr(name,'.') + 1;
1822 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1824 return attr_remove(path, attrname, flags);
1825 #elif defined(HAVE_ATTROPEN)
1827 int attrdirfd = solaris_attropen(path, ".", O_RDONLY|AT_SYMLINK_NOFOLLOW, 0);
1828 if (attrdirfd >= 0) {
1829 ret = solaris_unlinkat(attrdirfd, name);
1839 int sys_fremovexattr (int filedes, const char *name)
1841 #if defined(HAVE_FREMOVEXATTR)
1842 #ifndef XATTR_ADD_OPT
1843 return fremovexattr(filedes, name);
1846 return fremovexattr(filedes, name, options);
1848 #elif defined(HAVE_FREMOVEEA)
1849 return fremoveea(filedes, name);
1850 #elif defined(HAVE_EXTATTR_DELETE_FD)
1852 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1853 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1854 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1856 return extattr_delete_fd(filedes, attrnamespace, attrname);
1857 #elif defined(HAVE_ATTR_REMOVEF)
1859 char *attrname = strchr(name,'.') + 1;
1861 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1863 return attr_removef(filedes, attrname, flags);
1864 #elif defined(HAVE_ATTROPEN)
1866 int attrdirfd = solaris_openat(filedes, ".", O_RDONLY|O_XATTR, 0);
1867 if (attrdirfd >= 0) {
1868 ret = solaris_unlinkat(attrdirfd, name);
1878 int sys_setxattr (const char *path, const char *name, const void *value, size_t size, int flags)
1880 #if defined(HAVE_SETXATTR)
1881 #ifndef XATTR_ADD_OPT
1882 return setxattr(path, name, value, size, flags);
1885 return setxattr(path, name, value, size, 0, options);
1887 #elif defined(HAVE_SETEA)
1888 return setea(path, name, value, size, flags);
1889 #elif defined(HAVE_EXTATTR_SET_FILE)
1892 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1893 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1894 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1896 /* Check attribute existence */
1897 retval = extattr_get_file(path, attrnamespace, attrname, NULL, 0);
1899 /* REPLACE attribute, that doesn't exist */
1900 if (flags & XATTR_REPLACE && errno == ENOATTR) {
1904 /* Ignore other errors */
1907 /* CREATE attribute, that already exists */
1908 if (flags & XATTR_CREATE) {
1914 retval = extattr_set_file(path, attrnamespace, attrname, value, size);
1915 return (retval < 0) ? -1 : 0;
1916 #elif defined(HAVE_ATTR_SET)
1918 char *attrname = strchr(name,'.') + 1;
1920 if (strncmp(name, "system", 6) == 0) myflags |= ATTR_ROOT;
1921 if (flags & XATTR_CREATE) myflags |= ATTR_CREATE;
1922 if (flags & XATTR_REPLACE) myflags |= ATTR_REPLACE;
1924 return attr_set(path, attrname, (const char *)value, size, myflags);
1925 #elif defined(HAVE_ATTROPEN)
1927 int myflags = O_RDWR;
1929 if (flags & XATTR_CREATE) myflags |= O_EXCL;
1930 if (!(flags & XATTR_REPLACE)) myflags |= O_CREAT;
1931 attrfd = solaris_attropen(path, name, myflags, (mode_t) SOLARIS_ATTRMODE);
1933 ret = solaris_write_xattr(attrfd, value, size);
1943 int sys_lsetxattr (const char *path, const char *name, const void *value, size_t size, int flags)
1945 #if defined(HAVE_LSETXATTR)
1946 return lsetxattr(path, name, value, size, flags);
1947 #elif defined(HAVE_SETXATTR) && defined(XATTR_ADD_OPT)
1948 int options = XATTR_NOFOLLOW;
1949 return setxattr(path, name, value, size, 0, options);
1950 #elif defined(LSETEA)
1951 return lsetea(path, name, value, size, flags);
1952 #elif defined(HAVE_EXTATTR_SET_LINK)
1955 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1956 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1957 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1959 /* Check attribute existence */
1960 retval = extattr_get_link(path, attrnamespace, attrname, NULL, 0);
1962 /* REPLACE attribute, that doesn't exist */
1963 if (flags & XATTR_REPLACE && errno == ENOATTR) {
1967 /* Ignore other errors */
1970 /* CREATE attribute, that already exists */
1971 if (flags & XATTR_CREATE) {
1978 retval = extattr_set_link(path, attrnamespace, attrname, value, size);
1979 return (retval < 0) ? -1 : 0;
1980 #elif defined(HAVE_ATTR_SET)
1981 int myflags = ATTR_DONTFOLLOW;
1982 char *attrname = strchr(name,'.') + 1;
1984 if (strncmp(name, "system", 6) == 0) myflags |= ATTR_ROOT;
1985 if (flags & XATTR_CREATE) myflags |= ATTR_CREATE;
1986 if (flags & XATTR_REPLACE) myflags |= ATTR_REPLACE;
1988 return attr_set(path, attrname, (const char *)value, size, myflags);
1989 #elif defined(HAVE_ATTROPEN)
1991 int myflags = O_RDWR | AT_SYMLINK_NOFOLLOW;
1993 if (flags & XATTR_CREATE) myflags |= O_EXCL;
1994 if (!(flags & XATTR_REPLACE)) myflags |= O_CREAT;
1995 attrfd = solaris_attropen(path, name, myflags, (mode_t) SOLARIS_ATTRMODE);
1997 ret = solaris_write_xattr(attrfd, value, size);
2007 int sys_fsetxattr (int filedes, const char *name, const void *value, size_t size, int flags)
2009 #if defined(HAVE_FSETXATTR)
2010 #ifndef XATTR_ADD_OPT
2011 return fsetxattr(filedes, name, value, size, flags);
2014 return fsetxattr(filedes, name, value, size, 0, options);
2016 #elif defined(HAVE_FSETEA)
2017 return fsetea(filedes, name, value, size, flags);
2018 #elif defined(HAVE_EXTATTR_SET_FD)
2021 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
2022 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
2023 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
2025 /* Check attribute existence */
2026 retval = extattr_get_fd(filedes, attrnamespace, attrname, NULL, 0);
2028 /* REPLACE attribute, that doesn't exist */
2029 if (flags & XATTR_REPLACE && errno == ENOATTR) {
2033 /* Ignore other errors */
2036 /* CREATE attribute, that already exists */
2037 if (flags & XATTR_CREATE) {
2043 retval = extattr_set_fd(filedes, attrnamespace, attrname, value, size);
2044 return (retval < 0) ? -1 : 0;
2045 #elif defined(HAVE_ATTR_SETF)
2047 char *attrname = strchr(name,'.') + 1;
2049 if (strncmp(name, "system", 6) == 0) myflags |= ATTR_ROOT;
2050 if (flags & XATTR_CREATE) myflags |= ATTR_CREATE;
2051 if (flags & XATTR_REPLACE) myflags |= ATTR_REPLACE;
2053 return attr_setf(filedes, attrname, (const char *)value, size, myflags);
2054 #elif defined(HAVE_ATTROPEN)
2056 int myflags = O_RDWR | O_XATTR;
2058 if (flags & XATTR_CREATE) myflags |= O_EXCL;
2059 if (!(flags & XATTR_REPLACE)) myflags |= O_CREAT;
2060 attrfd = solaris_openat(filedes, name, myflags, (mode_t) SOLARIS_ATTRMODE);
2062 ret = solaris_write_xattr(attrfd, value, size);
2072 /**************************************************************************
2073 helper functions for Solaris' EA support
2074 ****************************************************************************/
2075 #ifdef HAVE_ATTROPEN
2076 static ssize_t solaris_read_xattr(int attrfd, void *value, size_t size)
2080 if (fstat(attrfd, &sbuf) == -1) {
2085 /* This is to return the current size of the named extended attribute */
2087 return sbuf.st_size;
2090 /* check size and read xattr */
2091 if (sbuf.st_size > size) {
2096 return read(attrfd, value, sbuf.st_size);
2099 static ssize_t solaris_list_xattr(int attrdirfd, char *list, size_t size)
2105 int newfd = dup(attrdirfd);
2106 /* CAUTION: The originating file descriptor should not be
2107 used again following the call to fdopendir().
2108 For that reason we dup() the file descriptor
2109 here to make things more clear. */
2110 dirp = fdopendir(newfd);
2112 while ((de = readdir(dirp))) {
2113 size_t listlen = strlen(de->d_name);
2114 if (!strcmp(de->d_name, ".") || !strcmp(de->d_name, "..")) {
2115 /* we don't want "." and ".." here: */
2116 DEBUG(10,("skipped EA %s\n",de->d_name));
2121 /* return the current size of the list of extended attribute names*/
2124 /* check size and copy entrieѕ + nul into list. */
2125 if ((len + listlen + 1) > size) {
2130 safe_strcpy(list + len, de->d_name, listlen);
2138 if (closedir(dirp) == -1) {
2139 DEBUG(0,("closedir dirp failed: %s\n",strerror(errno)));
2145 static int solaris_unlinkat(int attrdirfd, const char *name)
2147 if (unlinkat(attrdirfd, name, 0) == -1) {
2148 if (errno == ENOENT) {
2156 static int solaris_attropen(const char *path, const char *attrpath, int oflag, mode_t mode)
2158 int filedes = attropen(path, attrpath, oflag, mode);
2159 if (filedes == -1) {
2160 DEBUG(10,("attropen FAILED: path: %s, name: %s, errno: %s\n",path,attrpath,strerror(errno)));
2161 if (errno == EINVAL) {
2170 static int solaris_openat(int fildes, const char *path, int oflag, mode_t mode)
2172 int filedes = openat(fildes, path, oflag, mode);
2173 if (filedes == -1) {
2174 DEBUG(10,("openat FAILED: fd: %s, path: %s, errno: %s\n",filedes,path,strerror(errno)));
2175 if (errno == EINVAL) {
2184 static int solaris_write_xattr(int attrfd, const char *value, size_t size)
2186 if ((ftruncate(attrfd, 0) == 0) && (write(attrfd, value, size) == size)) {
2189 DEBUG(10,("solaris_write_xattr FAILED!\n"));
2193 #endif /*HAVE_ATTROPEN*/
2196 /****************************************************************************
2197 Return the major devicenumber for UNIX extensions.
2198 ****************************************************************************/
2200 uint32 unix_dev_major(SMB_DEV_T dev)
2202 #if defined(HAVE_DEVICE_MAJOR_FN)
2203 return (uint32)major(dev);
2205 return (uint32)(dev >> 8);
2209 /****************************************************************************
2210 Return the minor devicenumber for UNIX extensions.
2211 ****************************************************************************/
2213 uint32 unix_dev_minor(SMB_DEV_T dev)
2215 #if defined(HAVE_DEVICE_MINOR_FN)
2216 return (uint32)minor(dev);
2218 return (uint32)(dev & 0xff);
2222 #if defined(WITH_AIO)
2224 /*******************************************************************
2225 An aio_read wrapper that will deal with 64-bit sizes.
2226 ********************************************************************/
2228 int sys_aio_read(SMB_STRUCT_AIOCB *aiocb)
2230 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_READ64)
2231 return aio_read64(aiocb);
2232 #elif defined(HAVE_AIO_READ)
2233 return aio_read(aiocb);
2240 /*******************************************************************
2241 An aio_write wrapper that will deal with 64-bit sizes.
2242 ********************************************************************/
2244 int sys_aio_write(SMB_STRUCT_AIOCB *aiocb)
2246 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_WRITE64)
2247 return aio_write64(aiocb);
2248 #elif defined(HAVE_AIO_WRITE)
2249 return aio_write(aiocb);
2256 /*******************************************************************
2257 An aio_return wrapper that will deal with 64-bit sizes.
2258 ********************************************************************/
2260 ssize_t sys_aio_return(SMB_STRUCT_AIOCB *aiocb)
2262 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_RETURN64)
2263 return aio_return64(aiocb);
2264 #elif defined(HAVE_AIO_RETURN)
2265 return aio_return(aiocb);
2272 /*******************************************************************
2273 An aio_cancel wrapper that will deal with 64-bit sizes.
2274 ********************************************************************/
2276 int sys_aio_cancel(int fd, SMB_STRUCT_AIOCB *aiocb)
2278 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_CANCEL64)
2279 return aio_cancel64(fd, aiocb);
2280 #elif defined(HAVE_AIO_CANCEL)
2281 return aio_cancel(fd, aiocb);
2288 /*******************************************************************
2289 An aio_error wrapper that will deal with 64-bit sizes.
2290 ********************************************************************/
2292 int sys_aio_error(const SMB_STRUCT_AIOCB *aiocb)
2294 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_ERROR64)
2295 return aio_error64(aiocb);
2296 #elif defined(HAVE_AIO_ERROR)
2297 return aio_error(aiocb);
2304 /*******************************************************************
2305 An aio_fsync wrapper that will deal with 64-bit sizes.
2306 ********************************************************************/
2308 int sys_aio_fsync(int op, SMB_STRUCT_AIOCB *aiocb)
2310 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_FSYNC64)
2311 return aio_fsync64(op, aiocb);
2312 #elif defined(HAVE_AIO_FSYNC)
2313 return aio_fsync(op, aiocb);
2320 /*******************************************************************
2321 An aio_fsync wrapper that will deal with 64-bit sizes.
2322 ********************************************************************/
2324 int sys_aio_suspend(const SMB_STRUCT_AIOCB * const cblist[], int n, const struct timespec *timeout)
2326 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_SUSPEND64)
2327 return aio_suspend64(cblist, n, timeout);
2328 #elif defined(HAVE_AIO_FSYNC)
2329 return aio_suspend(cblist, n, timeout);
2335 #else /* !WITH_AIO */
2337 int sys_aio_read(SMB_STRUCT_AIOCB *aiocb)
2343 int sys_aio_write(SMB_STRUCT_AIOCB *aiocb)
2349 ssize_t sys_aio_return(SMB_STRUCT_AIOCB *aiocb)
2355 int sys_aio_cancel(int fd, SMB_STRUCT_AIOCB *aiocb)
2361 int sys_aio_error(const SMB_STRUCT_AIOCB *aiocb)
2367 int sys_aio_fsync(int op, SMB_STRUCT_AIOCB *aiocb)
2373 int sys_aio_suspend(const SMB_STRUCT_AIOCB * const cblist[], int n, const struct timespec *timeout)
2378 #endif /* WITH_AIO */
2380 int sys_getpeereid( int s, uid_t *uid)
2382 #if defined(HAVE_PEERCRED)
2384 socklen_t cred_len = sizeof(struct ucred);
2387 ret = getsockopt(s, SOL_SOCKET, SO_PEERCRED, (void *)&cred, &cred_len);
2392 if (cred_len != sizeof(struct ucred)) {
2405 int sys_getnameinfo(const struct sockaddr *psa,
2414 * For Solaris we must make sure salen is the
2415 * correct length for the incoming sa_family.
2418 if (salen == sizeof(struct sockaddr_storage)) {
2419 salen = sizeof(struct sockaddr_in);
2420 #if defined(HAVE_IPV6)
2421 if (psa->sa_family == AF_INET6) {
2422 salen = sizeof(struct sockaddr_in6);
2426 return getnameinfo(psa, salen, host, hostlen, service, servlen, flags);
2429 int sys_connect(int fd, const struct sockaddr * addr)
2431 socklen_t salen = -1;
2433 if (addr->sa_family == AF_INET) {
2434 salen = sizeof(struct sockaddr_in);
2435 } else if (addr->sa_family == AF_UNIX) {
2436 salen = sizeof(struct sockaddr_un);
2438 #if defined(HAVE_IPV6)
2439 else if (addr->sa_family == AF_INET6) {
2440 salen = sizeof(struct sockaddr_in6);
2444 return connect(fd, addr, salen);