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 /*******************************************************************
585 ********************************************************************/
587 int sys_lchown(const char *fname,uid_t uid,gid_t gid)
592 DEBUG(1,("WARNING: no lchown!\n"));
598 return(lchown(fname,uid,gid));
602 /*******************************************************************
603 os/2 also doesn't have chroot
604 ********************************************************************/
605 int sys_chroot(const char *dname)
610 DEBUG(1,("WARNING: no chroot!\n"));
616 return(chroot(dname));
620 #if defined(HAVE_POSIX_CAPABILITIES)
622 /**************************************************************************
623 Try and abstract process capabilities (for systems that have them).
624 ****************************************************************************/
626 /* Set the POSIX capabilities needed for the given purpose into the effective
627 * capability set of the current process. Make sure they are always removed
628 * from the inheritable set, because there is no circumstance in which our
629 * children should inherit our elevated privileges.
631 static bool set_process_capability(enum smbd_capability capability,
634 cap_value_t cap_vals[2] = {0};
635 int num_cap_vals = 0;
639 #if defined(HAVE_PRCTL) && defined(PR_GET_KEEPCAPS) && defined(PR_SET_KEEPCAPS)
640 /* On Linux, make sure that any capabilities we grab are sticky
641 * across UID changes. We expect that this would allow us to keep both
642 * the effective and permitted capability sets, but as of circa 2.6.16,
643 * only the permitted set is kept. It is a bug (which we work around)
644 * that the effective set is lost, but we still require the effective
647 if (!prctl(PR_GET_KEEPCAPS)) {
648 prctl(PR_SET_KEEPCAPS, 1);
652 cap = cap_get_proc();
654 DEBUG(0,("set_process_capability: cap_get_proc failed: %s\n",
659 switch (capability) {
660 case KERNEL_OPLOCK_CAPABILITY:
661 #ifdef CAP_NETWORK_MGT
662 /* IRIX has CAP_NETWORK_MGT for oplocks. */
663 cap_vals[num_cap_vals++] = CAP_NETWORK_MGT;
666 case DMAPI_ACCESS_CAPABILITY:
667 #ifdef CAP_DEVICE_MGT
668 /* IRIX has CAP_DEVICE_MGT for DMAPI access. */
669 cap_vals[num_cap_vals++] = CAP_DEVICE_MGT;
671 /* Linux has CAP_MKNOD for DMAPI access. */
672 cap_vals[num_cap_vals++] = CAP_MKNOD;
675 case LEASE_CAPABILITY:
677 cap_vals[num_cap_vals++] = CAP_LEASE;
682 SMB_ASSERT(num_cap_vals <= ARRAY_SIZE(cap_vals));
684 if (num_cap_vals == 0) {
689 cap_set_flag(cap, CAP_EFFECTIVE, num_cap_vals, cap_vals,
690 enable ? CAP_SET : CAP_CLEAR);
692 /* We never want to pass capabilities down to our children, so make
693 * sure they are not inherited.
695 cap_set_flag(cap, CAP_INHERITABLE, num_cap_vals, cap_vals, CAP_CLEAR);
697 if (cap_set_proc(cap) == -1) {
698 DEBUG(0, ("set_process_capability: cap_set_proc failed: %s\n",
708 #endif /* HAVE_POSIX_CAPABILITIES */
710 /****************************************************************************
711 Gain the oplock capability from the kernel if possible.
712 ****************************************************************************/
714 void set_effective_capability(enum smbd_capability capability)
716 #if defined(HAVE_POSIX_CAPABILITIES)
717 set_process_capability(capability, True);
718 #endif /* HAVE_POSIX_CAPABILITIES */
721 void drop_effective_capability(enum smbd_capability capability)
723 #if defined(HAVE_POSIX_CAPABILITIES)
724 set_process_capability(capability, False);
725 #endif /* HAVE_POSIX_CAPABILITIES */
728 /**************************************************************************
729 Wrapper for random().
730 ****************************************************************************/
732 long sys_random(void)
734 #if defined(HAVE_RANDOM)
735 return (long)random();
736 #elif defined(HAVE_RAND)
739 DEBUG(0,("Error - no random function available !\n"));
744 /**************************************************************************
745 Wrapper for srandom().
746 ****************************************************************************/
748 void sys_srandom(unsigned int seed)
750 #if defined(HAVE_SRANDOM)
752 #elif defined(HAVE_SRAND)
755 DEBUG(0,("Error - no srandom function available !\n"));
760 /**************************************************************************
761 Returns equivalent to NGROUPS_MAX - using sysconf if needed.
762 ****************************************************************************/
766 #if defined(SYSCONF_SC_NGROUPS_MAX)
767 int ret = sysconf(_SC_NGROUPS_MAX);
768 return (ret == -1) ? NGROUPS_MAX : ret;
774 /**************************************************************************
775 Wrap setgroups and getgroups for systems that declare getgroups() as
776 returning an array of gid_t, but actuall return an array of int.
777 ****************************************************************************/
779 #if defined(HAVE_BROKEN_GETGROUPS)
780 static int sys_broken_getgroups(int setlen, gid_t *gidset)
787 return getgroups(setlen, &gid);
791 * Broken case. We need to allocate a
792 * GID_T array of size setlen.
801 setlen = groups_max();
803 if((group_list = SMB_MALLOC_ARRAY(GID_T, setlen)) == NULL) {
804 DEBUG(0,("sys_getgroups: Malloc fail.\n"));
808 if((ngroups = getgroups(setlen, group_list)) < 0) {
809 int saved_errno = errno;
810 SAFE_FREE(group_list);
815 for(i = 0; i < ngroups; i++)
816 gidset[i] = (gid_t)group_list[i];
818 SAFE_FREE(group_list);
822 static int sys_broken_setgroups(int setlen, gid_t *gidset)
830 if (setlen < 0 || setlen > groups_max()) {
836 * Broken case. We need to allocate a
837 * GID_T array of size setlen.
840 if((group_list = SMB_MALLOC_ARRAY(GID_T, setlen)) == NULL) {
841 DEBUG(0,("sys_setgroups: Malloc fail.\n"));
845 for(i = 0; i < setlen; i++)
846 group_list[i] = (GID_T) gidset[i];
848 if(setgroups(setlen, group_list) != 0) {
849 int saved_errno = errno;
850 SAFE_FREE(group_list);
855 SAFE_FREE(group_list);
859 #endif /* HAVE_BROKEN_GETGROUPS */
861 /* This is a list of systems that require the first GID passed to setgroups(2)
862 * to be the effective GID. If your system is one of these, add it here.
864 #if defined (FREEBSD) || defined (DARWINOS)
865 #define USE_BSD_SETGROUPS
868 #if defined(USE_BSD_SETGROUPS)
869 /* Depending on the particular BSD implementation, the first GID that is
870 * passed to setgroups(2) will either be ignored or will set the credential's
871 * effective GID. In either case, the right thing to do is to guarantee that
872 * gidset[0] is the effective GID.
874 static int sys_bsd_setgroups(gid_t primary_gid, int setlen, const gid_t *gidset)
876 gid_t *new_gidset = NULL;
880 /* setgroups(2) will fail with EINVAL if we pass too many groups. */
883 /* No group list, just make sure we are setting the efective GID. */
885 return setgroups(1, &primary_gid);
888 /* If the primary gid is not the first array element, grow the array
889 * and insert it at the front.
891 if (gidset[0] != primary_gid) {
892 new_gidset = SMB_MALLOC_ARRAY(gid_t, setlen + 1);
893 if (new_gidset == NULL) {
897 memcpy(new_gidset + 1, gidset, (setlen * sizeof(gid_t)));
898 new_gidset[0] = primary_gid;
903 DEBUG(3, ("forced to truncate group list from %d to %d\n",
908 #if defined(HAVE_BROKEN_GETGROUPS)
909 ret = sys_broken_setgroups(setlen, new_gidset ? new_gidset : gidset);
911 ret = setgroups(setlen, new_gidset ? new_gidset : gidset);
916 SAFE_FREE(new_gidset);
923 #endif /* USE_BSD_SETGROUPS */
925 /**************************************************************************
926 Wrapper for getgroups. Deals with broken (int) case.
927 ****************************************************************************/
929 int sys_getgroups(int setlen, gid_t *gidset)
931 #if defined(HAVE_BROKEN_GETGROUPS)
932 return sys_broken_getgroups(setlen, gidset);
934 return getgroups(setlen, gidset);
938 /**************************************************************************
939 Wrapper for setgroups. Deals with broken (int) case and BSD case.
940 ****************************************************************************/
942 int sys_setgroups(gid_t UNUSED(primary_gid), int setlen, gid_t *gidset)
944 #if !defined(HAVE_SETGROUPS)
947 #endif /* HAVE_SETGROUPS */
949 #if defined(USE_BSD_SETGROUPS)
950 return sys_bsd_setgroups(primary_gid, setlen, gidset);
951 #elif defined(HAVE_BROKEN_GETGROUPS)
952 return sys_broken_setgroups(setlen, gidset);
954 return setgroups(setlen, gidset);
958 /**************************************************************************
959 Wrappers for setpwent(), getpwent() and endpwent()
960 ****************************************************************************/
962 void sys_setpwent(void)
967 struct passwd *sys_getpwent(void)
972 void sys_endpwent(void)
977 /**************************************************************************
978 Wrappers for getpwnam(), getpwuid(), getgrnam(), getgrgid()
979 ****************************************************************************/
982 struct passwd *sys_getpwnam(const char *name)
984 return getpwnam(name);
987 struct passwd *sys_getpwuid(uid_t uid)
989 return getpwuid(uid);
992 struct group *sys_getgrnam(const char *name)
994 return getgrnam(name);
997 struct group *sys_getgrgid(gid_t gid)
999 return getgrgid(gid);
1002 /**************************************************************************
1003 Extract a command into an arg list.
1004 ****************************************************************************/
1006 static char **extract_args(TALLOC_CTX *mem_ctx, const char *command)
1015 if (!(trunc_cmd = talloc_strdup(mem_ctx, command))) {
1016 DEBUG(0, ("talloc failed\n"));
1020 if(!(ptr = strtok_r(trunc_cmd, " \t", &saveptr))) {
1021 TALLOC_FREE(trunc_cmd);
1030 for( argcl = 1; ptr; ptr = strtok_r(NULL, " \t", &saveptr))
1033 TALLOC_FREE(trunc_cmd);
1035 if (!(argl = TALLOC_ARRAY(mem_ctx, char *, argcl + 1))) {
1040 * Now do the extraction.
1043 if (!(trunc_cmd = talloc_strdup(mem_ctx, command))) {
1047 ptr = strtok_r(trunc_cmd, " \t", &saveptr);
1050 if (!(argl[i++] = talloc_strdup(argl, ptr))) {
1054 while((ptr = strtok_r(NULL, " \t", &saveptr)) != NULL) {
1056 if (!(argl[i++] = talloc_strdup(argl, ptr))) {
1065 DEBUG(0, ("talloc failed\n"));
1066 TALLOC_FREE(trunc_cmd);
1072 /**************************************************************************
1073 Wrapper for fork. Ensures that mypid is reset. Used so we can write
1074 a sys_getpid() that only does a system call *once*.
1075 ****************************************************************************/
1077 static pid_t mypid = (pid_t)-1;
1079 pid_t sys_fork(void)
1081 pid_t forkret = fork();
1083 if (forkret == (pid_t)0) /* Child - reset mypid so sys_getpid does a system call. */
1089 /**************************************************************************
1090 Wrapper for getpid. Ensures we only do a system call *once*.
1091 ****************************************************************************/
1093 pid_t sys_getpid(void)
1095 if (mypid == (pid_t)-1)
1101 /**************************************************************************
1102 Wrapper for popen. Safer as it doesn't search a path.
1103 Modified from the glibc sources.
1104 modified by tridge to return a file descriptor. We must kick our FILE* habit
1105 ****************************************************************************/
1107 typedef struct _popen_list
1111 struct _popen_list *next;
1114 static popen_list *popen_chain;
1116 int sys_popen(const char *command)
1118 int parent_end, child_end;
1120 popen_list *entry = NULL;
1123 if (pipe(pipe_fds) < 0)
1126 parent_end = pipe_fds[0];
1127 child_end = pipe_fds[1];
1134 if((entry = SMB_MALLOC_P(popen_list)) == NULL)
1137 ZERO_STRUCTP(entry);
1140 * Extract the command and args into a NULL terminated array.
1143 if(!(argl = extract_args(NULL, command)))
1146 entry->child_pid = sys_fork();
1148 if (entry->child_pid == -1) {
1152 if (entry->child_pid == 0) {
1158 int child_std_end = STDOUT_FILENO;
1162 if (child_end != child_std_end) {
1163 dup2 (child_end, child_std_end);
1168 * POSIX.2: "popen() shall ensure that any streams from previous
1169 * popen() calls that remain open in the parent process are closed
1170 * in the new child process."
1173 for (p = popen_chain; p; p = p->next)
1176 execv(argl[0], argl);
1187 /* Link into popen_chain. */
1188 entry->next = popen_chain;
1189 popen_chain = entry;
1190 entry->fd = parent_end;
1203 /**************************************************************************
1204 Wrapper for pclose. Modified from the glibc sources.
1205 ****************************************************************************/
1207 int sys_pclose(int fd)
1210 popen_list **ptr = &popen_chain;
1211 popen_list *entry = NULL;
1215 /* Unlink from popen_chain. */
1216 for ( ; *ptr != NULL; ptr = &(*ptr)->next) {
1217 if ((*ptr)->fd == fd) {
1219 *ptr = (*ptr)->next;
1225 if (status < 0 || close(entry->fd) < 0)
1229 * As Samba is catching and eating child process
1230 * exits we don't really care about the child exit
1231 * code, a -1 with errno = ECHILD will do fine for us.
1235 wait_pid = sys_waitpid (entry->child_pid, &wstatus, 0);
1236 } while (wait_pid == -1 && errno == EINTR);
1245 /**************************************************************************
1246 Wrappers for dlopen, dlsym, dlclose.
1247 ****************************************************************************/
1249 void *sys_dlopen(const char *name, int flags)
1251 #if defined(HAVE_DLOPEN)
1252 return dlopen(name, flags);
1258 void *sys_dlsym(void *handle, const char *symbol)
1260 #if defined(HAVE_DLSYM)
1261 return dlsym(handle, symbol);
1267 int sys_dlclose (void *handle)
1269 #if defined(HAVE_DLCLOSE)
1270 return dlclose(handle);
1276 const char *sys_dlerror(void)
1278 #if defined(HAVE_DLERROR)
1285 int sys_dup2(int oldfd, int newfd)
1287 #if defined(HAVE_DUP2)
1288 return dup2(oldfd, newfd);
1295 /**************************************************************************
1296 Wrapper for Admin Logs.
1297 ****************************************************************************/
1299 void sys_adminlog(int priority, const char *format_str, ...)
1303 char *msgbuf = NULL;
1305 va_start( ap, format_str );
1306 ret = vasprintf( &msgbuf, format_str, ap );
1312 #if defined(HAVE_SYSLOG)
1313 syslog( priority, "%s", msgbuf );
1315 DEBUG(0,("%s", msgbuf ));
1320 /******** Solaris EA helper function prototypes ********/
1321 #ifdef HAVE_ATTROPEN
1322 #define SOLARIS_ATTRMODE S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP
1323 static int solaris_write_xattr(int attrfd, const char *value, size_t size);
1324 static ssize_t solaris_read_xattr(int attrfd, void *value, size_t size);
1325 static ssize_t solaris_list_xattr(int attrdirfd, char *list, size_t size);
1326 static int solaris_unlinkat(int attrdirfd, const char *name);
1327 static int solaris_attropen(const char *path, const char *attrpath, int oflag, mode_t mode);
1328 static int solaris_openat(int fildes, const char *path, int oflag, mode_t mode);
1331 /**************************************************************************
1332 Wrappers for extented attribute calls. Based on the Linux package with
1333 support for IRIX and (Net|Free)BSD also. Expand as other systems have them.
1334 ****************************************************************************/
1336 ssize_t sys_getxattr (const char *path, const char *name, void *value, size_t size)
1338 #if defined(HAVE_GETXATTR)
1339 #ifndef XATTR_ADD_OPT
1340 return getxattr(path, name, value, size);
1343 return getxattr(path, name, value, size, 0, options);
1345 #elif defined(HAVE_GETEA)
1346 return getea(path, name, value, size);
1347 #elif defined(HAVE_EXTATTR_GET_FILE)
1350 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1351 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1352 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1354 * The BSD implementation has a nasty habit of silently truncating
1355 * the returned value to the size of the buffer, so we have to check
1356 * that the buffer is large enough to fit the returned value.
1358 if((retval=extattr_get_file(path, attrnamespace, attrname, NULL, 0)) >= 0) {
1363 if((retval=extattr_get_file(path, attrnamespace, attrname, value, size)) >= 0)
1367 DEBUG(10,("sys_getxattr: extattr_get_file() failed with: %s\n", strerror(errno)));
1369 #elif defined(HAVE_ATTR_GET)
1370 int retval, flags = 0;
1371 int valuelength = (int)size;
1372 char *attrname = strchr(name,'.') + 1;
1374 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1376 retval = attr_get(path, attrname, (char *)value, &valuelength, flags);
1378 return retval ? retval : valuelength;
1379 #elif defined(HAVE_ATTROPEN)
1381 int attrfd = solaris_attropen(path, name, O_RDONLY, 0);
1383 ret = solaris_read_xattr(attrfd, value, size);
1393 ssize_t sys_lgetxattr (const char *path, const char *name, void *value, size_t size)
1395 #if defined(HAVE_LGETXATTR)
1396 return lgetxattr(path, name, value, size);
1397 #elif defined(HAVE_GETXATTR) && defined(XATTR_ADD_OPT)
1398 int options = XATTR_NOFOLLOW;
1399 return getxattr(path, name, value, size, 0, options);
1400 #elif defined(HAVE_LGETEA)
1401 return lgetea(path, name, value, size);
1402 #elif defined(HAVE_EXTATTR_GET_LINK)
1405 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1406 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1407 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1409 if((retval=extattr_get_link(path, attrnamespace, attrname, NULL, 0)) >= 0) {
1414 if((retval=extattr_get_link(path, attrnamespace, attrname, value, size)) >= 0)
1418 DEBUG(10,("sys_lgetxattr: extattr_get_link() failed with: %s\n", strerror(errno)));
1420 #elif defined(HAVE_ATTR_GET)
1421 int retval, flags = ATTR_DONTFOLLOW;
1422 int valuelength = (int)size;
1423 char *attrname = strchr(name,'.') + 1;
1425 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1427 retval = attr_get(path, attrname, (char *)value, &valuelength, flags);
1429 return retval ? retval : valuelength;
1430 #elif defined(HAVE_ATTROPEN)
1432 int attrfd = solaris_attropen(path, name, O_RDONLY|AT_SYMLINK_NOFOLLOW, 0);
1434 ret = solaris_read_xattr(attrfd, value, size);
1444 ssize_t sys_fgetxattr (int filedes, const char *name, void *value, size_t size)
1446 #if defined(HAVE_FGETXATTR)
1447 #ifndef XATTR_ADD_OPT
1448 return fgetxattr(filedes, name, value, size);
1451 return fgetxattr(filedes, name, value, size, 0, options);
1453 #elif defined(HAVE_FGETEA)
1454 return fgetea(filedes, name, value, size);
1455 #elif defined(HAVE_EXTATTR_GET_FD)
1458 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1459 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1460 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1462 if((retval=extattr_get_fd(filedes, attrnamespace, attrname, NULL, 0)) >= 0) {
1467 if((retval=extattr_get_fd(filedes, attrnamespace, attrname, value, size)) >= 0)
1471 DEBUG(10,("sys_fgetxattr: extattr_get_fd() failed with: %s\n", strerror(errno)));
1473 #elif defined(HAVE_ATTR_GETF)
1474 int retval, flags = 0;
1475 int valuelength = (int)size;
1476 char *attrname = strchr(name,'.') + 1;
1478 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1480 retval = attr_getf(filedes, attrname, (char *)value, &valuelength, flags);
1482 return retval ? retval : valuelength;
1483 #elif defined(HAVE_ATTROPEN)
1485 int attrfd = solaris_openat(filedes, name, O_RDONLY|O_XATTR, 0);
1487 ret = solaris_read_xattr(attrfd, value, size);
1497 #if defined(HAVE_EXTATTR_LIST_FILE)
1499 #define EXTATTR_PREFIX(s) (s), (sizeof((s))-1)
1507 { EXTATTR_NAMESPACE_SYSTEM, EXTATTR_PREFIX("system.") },
1508 { EXTATTR_NAMESPACE_USER, EXTATTR_PREFIX("user.") },
1516 static ssize_t bsd_attr_list (int type, extattr_arg arg, char *list, size_t size)
1518 ssize_t list_size, total_size = 0;
1521 /* Iterate through extattr(2) namespaces */
1522 for(t = 0; t < (sizeof(extattr)/sizeof(extattr[0])); t++) {
1524 #if defined(HAVE_EXTATTR_LIST_FILE)
1526 list_size = extattr_list_file(arg.path, extattr[t].space, list, size);
1529 #if defined(HAVE_EXTATTR_LIST_LINK)
1531 list_size = extattr_list_link(arg.path, extattr[t].space, list, size);
1534 #if defined(HAVE_EXTATTR_LIST_FD)
1536 list_size = extattr_list_fd(arg.filedes, extattr[t].space, list, size);
1543 /* Some error happend. Errno should be set by the previous call */
1549 /* XXX: Call with an empty buffer may be used to calculate
1550 necessary buffer size. Unfortunately, we can't say, how
1551 many attributes were returned, so here is the potential
1552 problem with the emulation.
1555 /* Take the worse case of one char attribute names -
1556 two bytes per name plus one more for sanity.
1558 total_size += list_size + (list_size/2 + 1)*extattr[t].len;
1561 /* Count necessary offset to fit namespace prefixes */
1563 for(i = 0; i < list_size; i += list[i] + 1)
1564 len += extattr[t].len;
1566 total_size += list_size + len;
1567 /* Buffer is too small to fit the results */
1568 if(total_size > size) {
1572 /* Shift results back, so we can prepend prefixes */
1573 buf = memmove(list + len, list, list_size);
1575 for(i = 0; i < list_size; i += len + 1) {
1577 strncpy(list, extattr[t].name, extattr[t].len + 1);
1578 list += extattr[t].len;
1579 strncpy(list, buf + i + 1, len);
1590 #if defined(HAVE_ATTR_LIST) && defined(HAVE_SYS_ATTRIBUTES_H)
1591 static char attr_buffer[ATTR_MAX_VALUELEN];
1593 static ssize_t irix_attr_list(const char *path, int filedes, char *list, size_t size, int flags)
1595 int retval = 0, index;
1596 attrlist_cursor_t *cursor = 0;
1598 attrlist_t * al = (attrlist_t *)attr_buffer;
1600 size_t ent_size, left = size;
1605 retval = attr_listf(filedes, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1607 retval = attr_list(path, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1609 for (index = 0; index < al->al_count; index++) {
1610 ae = ATTR_ENTRY(attr_buffer, index);
1611 ent_size = strlen(ae->a_name) + sizeof("user.");
1612 if (left >= ent_size) {
1613 strncpy(bp, "user.", sizeof("user."));
1614 strncat(bp, ae->a_name, ent_size - sizeof("user."));
1622 total_size += ent_size;
1624 if (al->al_more == 0) break;
1631 retval = attr_listf(filedes, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1633 retval = attr_list(path, attr_buffer, ATTR_MAX_VALUELEN, flags, cursor);
1635 for (index = 0; index < al->al_count; index++) {
1636 ae = ATTR_ENTRY(attr_buffer, index);
1637 ent_size = strlen(ae->a_name) + sizeof("system.");
1638 if (left >= ent_size) {
1639 strncpy(bp, "system.", sizeof("system."));
1640 strncat(bp, ae->a_name, ent_size - sizeof("system."));
1648 total_size += ent_size;
1650 if (al->al_more == 0) break;
1653 return (ssize_t)(retval ? retval : total_size);
1658 ssize_t sys_listxattr (const char *path, char *list, size_t size)
1660 #if defined(HAVE_LISTXATTR)
1661 #ifndef XATTR_ADD_OPT
1662 return listxattr(path, list, size);
1665 return listxattr(path, list, size, options);
1667 #elif defined(HAVE_LISTEA)
1668 return listea(path, list, size);
1669 #elif defined(HAVE_EXTATTR_LIST_FILE)
1672 return bsd_attr_list(0, arg, list, size);
1673 #elif defined(HAVE_ATTR_LIST) && defined(HAVE_SYS_ATTRIBUTES_H)
1674 return irix_attr_list(path, 0, list, size, 0);
1675 #elif defined(HAVE_ATTROPEN)
1677 int attrdirfd = solaris_attropen(path, ".", O_RDONLY, 0);
1678 if (attrdirfd >= 0) {
1679 ret = solaris_list_xattr(attrdirfd, list, size);
1689 ssize_t sys_llistxattr (const char *path, char *list, size_t size)
1691 #if defined(HAVE_LLISTXATTR)
1692 return llistxattr(path, list, size);
1693 #elif defined(HAVE_LISTXATTR) && defined(XATTR_ADD_OPT)
1694 int options = XATTR_NOFOLLOW;
1695 return listxattr(path, list, size, options);
1696 #elif defined(HAVE_LLISTEA)
1697 return llistea(path, list, size);
1698 #elif defined(HAVE_EXTATTR_LIST_LINK)
1701 return bsd_attr_list(1, arg, list, size);
1702 #elif defined(HAVE_ATTR_LIST) && defined(HAVE_SYS_ATTRIBUTES_H)
1703 return irix_attr_list(path, 0, list, size, ATTR_DONTFOLLOW);
1704 #elif defined(HAVE_ATTROPEN)
1706 int attrdirfd = solaris_attropen(path, ".", O_RDONLY|AT_SYMLINK_NOFOLLOW, 0);
1707 if (attrdirfd >= 0) {
1708 ret = solaris_list_xattr(attrdirfd, list, size);
1718 ssize_t sys_flistxattr (int filedes, char *list, size_t size)
1720 #if defined(HAVE_FLISTXATTR)
1721 #ifndef XATTR_ADD_OPT
1722 return flistxattr(filedes, list, size);
1725 return flistxattr(filedes, list, size, options);
1727 #elif defined(HAVE_FLISTEA)
1728 return flistea(filedes, list, size);
1729 #elif defined(HAVE_EXTATTR_LIST_FD)
1731 arg.filedes = filedes;
1732 return bsd_attr_list(2, arg, list, size);
1733 #elif defined(HAVE_ATTR_LISTF)
1734 return irix_attr_list(NULL, filedes, list, size, 0);
1735 #elif defined(HAVE_ATTROPEN)
1737 int attrdirfd = solaris_openat(filedes, ".", O_RDONLY|O_XATTR, 0);
1738 if (attrdirfd >= 0) {
1739 ret = solaris_list_xattr(attrdirfd, list, size);
1749 int sys_removexattr (const char *path, const char *name)
1751 #if defined(HAVE_REMOVEXATTR)
1752 #ifndef XATTR_ADD_OPT
1753 return removexattr(path, name);
1756 return removexattr(path, name, options);
1758 #elif defined(HAVE_REMOVEEA)
1759 return removeea(path, name);
1760 #elif defined(HAVE_EXTATTR_DELETE_FILE)
1762 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1763 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1764 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1766 return extattr_delete_file(path, attrnamespace, attrname);
1767 #elif defined(HAVE_ATTR_REMOVE)
1769 char *attrname = strchr(name,'.') + 1;
1771 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1773 return attr_remove(path, attrname, flags);
1774 #elif defined(HAVE_ATTROPEN)
1776 int attrdirfd = solaris_attropen(path, ".", O_RDONLY, 0);
1777 if (attrdirfd >= 0) {
1778 ret = solaris_unlinkat(attrdirfd, name);
1788 int sys_lremovexattr (const char *path, const char *name)
1790 #if defined(HAVE_LREMOVEXATTR)
1791 return lremovexattr(path, name);
1792 #elif defined(HAVE_REMOVEXATTR) && defined(XATTR_ADD_OPT)
1793 int options = XATTR_NOFOLLOW;
1794 return removexattr(path, name, options);
1795 #elif defined(HAVE_LREMOVEEA)
1796 return lremoveea(path, name);
1797 #elif defined(HAVE_EXTATTR_DELETE_LINK)
1799 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1800 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1801 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1803 return extattr_delete_link(path, attrnamespace, attrname);
1804 #elif defined(HAVE_ATTR_REMOVE)
1805 int flags = ATTR_DONTFOLLOW;
1806 char *attrname = strchr(name,'.') + 1;
1808 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1810 return attr_remove(path, attrname, flags);
1811 #elif defined(HAVE_ATTROPEN)
1813 int attrdirfd = solaris_attropen(path, ".", O_RDONLY|AT_SYMLINK_NOFOLLOW, 0);
1814 if (attrdirfd >= 0) {
1815 ret = solaris_unlinkat(attrdirfd, name);
1825 int sys_fremovexattr (int filedes, const char *name)
1827 #if defined(HAVE_FREMOVEXATTR)
1828 #ifndef XATTR_ADD_OPT
1829 return fremovexattr(filedes, name);
1832 return fremovexattr(filedes, name, options);
1834 #elif defined(HAVE_FREMOVEEA)
1835 return fremoveea(filedes, name);
1836 #elif defined(HAVE_EXTATTR_DELETE_FD)
1838 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1839 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1840 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1842 return extattr_delete_fd(filedes, attrnamespace, attrname);
1843 #elif defined(HAVE_ATTR_REMOVEF)
1845 char *attrname = strchr(name,'.') + 1;
1847 if (strncmp(name, "system", 6) == 0) flags |= ATTR_ROOT;
1849 return attr_removef(filedes, attrname, flags);
1850 #elif defined(HAVE_ATTROPEN)
1852 int attrdirfd = solaris_openat(filedes, ".", O_RDONLY|O_XATTR, 0);
1853 if (attrdirfd >= 0) {
1854 ret = solaris_unlinkat(attrdirfd, name);
1864 int sys_setxattr (const char *path, const char *name, const void *value, size_t size, int flags)
1866 #if defined(HAVE_SETXATTR)
1867 #ifndef XATTR_ADD_OPT
1868 return setxattr(path, name, value, size, flags);
1871 return setxattr(path, name, value, size, 0, options);
1873 #elif defined(HAVE_SETEA)
1874 return setea(path, name, value, size, flags);
1875 #elif defined(HAVE_EXTATTR_SET_FILE)
1878 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1879 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1880 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1882 /* Check attribute existence */
1883 retval = extattr_get_file(path, attrnamespace, attrname, NULL, 0);
1885 /* REPLACE attribute, that doesn't exist */
1886 if (flags & XATTR_REPLACE && errno == ENOATTR) {
1890 /* Ignore other errors */
1893 /* CREATE attribute, that already exists */
1894 if (flags & XATTR_CREATE) {
1900 retval = extattr_set_file(path, attrnamespace, attrname, value, size);
1901 return (retval < 0) ? -1 : 0;
1902 #elif defined(HAVE_ATTR_SET)
1904 char *attrname = strchr(name,'.') + 1;
1906 if (strncmp(name, "system", 6) == 0) myflags |= ATTR_ROOT;
1907 if (flags & XATTR_CREATE) myflags |= ATTR_CREATE;
1908 if (flags & XATTR_REPLACE) myflags |= ATTR_REPLACE;
1910 return attr_set(path, attrname, (const char *)value, size, myflags);
1911 #elif defined(HAVE_ATTROPEN)
1913 int myflags = O_RDWR;
1915 if (flags & XATTR_CREATE) myflags |= O_EXCL;
1916 if (!(flags & XATTR_REPLACE)) myflags |= O_CREAT;
1917 attrfd = solaris_attropen(path, name, myflags, (mode_t) SOLARIS_ATTRMODE);
1919 ret = solaris_write_xattr(attrfd, value, size);
1929 int sys_lsetxattr (const char *path, const char *name, const void *value, size_t size, int flags)
1931 #if defined(HAVE_LSETXATTR)
1932 return lsetxattr(path, name, value, size, flags);
1933 #elif defined(HAVE_SETXATTR) && defined(XATTR_ADD_OPT)
1934 int options = XATTR_NOFOLLOW;
1935 return setxattr(path, name, value, size, 0, options);
1936 #elif defined(LSETEA)
1937 return lsetea(path, name, value, size, flags);
1938 #elif defined(HAVE_EXTATTR_SET_LINK)
1941 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
1942 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
1943 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
1945 /* Check attribute existence */
1946 retval = extattr_get_link(path, attrnamespace, attrname, NULL, 0);
1948 /* REPLACE attribute, that doesn't exist */
1949 if (flags & XATTR_REPLACE && errno == ENOATTR) {
1953 /* Ignore other errors */
1956 /* CREATE attribute, that already exists */
1957 if (flags & XATTR_CREATE) {
1964 retval = extattr_set_link(path, attrnamespace, attrname, value, size);
1965 return (retval < 0) ? -1 : 0;
1966 #elif defined(HAVE_ATTR_SET)
1967 int myflags = ATTR_DONTFOLLOW;
1968 char *attrname = strchr(name,'.') + 1;
1970 if (strncmp(name, "system", 6) == 0) myflags |= ATTR_ROOT;
1971 if (flags & XATTR_CREATE) myflags |= ATTR_CREATE;
1972 if (flags & XATTR_REPLACE) myflags |= ATTR_REPLACE;
1974 return attr_set(path, attrname, (const char *)value, size, myflags);
1975 #elif defined(HAVE_ATTROPEN)
1977 int myflags = O_RDWR | AT_SYMLINK_NOFOLLOW;
1979 if (flags & XATTR_CREATE) myflags |= O_EXCL;
1980 if (!(flags & XATTR_REPLACE)) myflags |= O_CREAT;
1981 attrfd = solaris_attropen(path, name, myflags, (mode_t) SOLARIS_ATTRMODE);
1983 ret = solaris_write_xattr(attrfd, value, size);
1993 int sys_fsetxattr (int filedes, const char *name, const void *value, size_t size, int flags)
1995 #if defined(HAVE_FSETXATTR)
1996 #ifndef XATTR_ADD_OPT
1997 return fsetxattr(filedes, name, value, size, flags);
2000 return fsetxattr(filedes, name, value, size, 0, options);
2002 #elif defined(HAVE_FSETEA)
2003 return fsetea(filedes, name, value, size, flags);
2004 #elif defined(HAVE_EXTATTR_SET_FD)
2007 int attrnamespace = (strncmp(name, "system", 6) == 0) ?
2008 EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
2009 const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
2011 /* Check attribute existence */
2012 retval = extattr_get_fd(filedes, attrnamespace, attrname, NULL, 0);
2014 /* REPLACE attribute, that doesn't exist */
2015 if (flags & XATTR_REPLACE && errno == ENOATTR) {
2019 /* Ignore other errors */
2022 /* CREATE attribute, that already exists */
2023 if (flags & XATTR_CREATE) {
2029 retval = extattr_set_fd(filedes, attrnamespace, attrname, value, size);
2030 return (retval < 0) ? -1 : 0;
2031 #elif defined(HAVE_ATTR_SETF)
2033 char *attrname = strchr(name,'.') + 1;
2035 if (strncmp(name, "system", 6) == 0) myflags |= ATTR_ROOT;
2036 if (flags & XATTR_CREATE) myflags |= ATTR_CREATE;
2037 if (flags & XATTR_REPLACE) myflags |= ATTR_REPLACE;
2039 return attr_setf(filedes, attrname, (const char *)value, size, myflags);
2040 #elif defined(HAVE_ATTROPEN)
2042 int myflags = O_RDWR | O_XATTR;
2044 if (flags & XATTR_CREATE) myflags |= O_EXCL;
2045 if (!(flags & XATTR_REPLACE)) myflags |= O_CREAT;
2046 attrfd = solaris_openat(filedes, name, myflags, (mode_t) SOLARIS_ATTRMODE);
2048 ret = solaris_write_xattr(attrfd, value, size);
2058 /**************************************************************************
2059 helper functions for Solaris' EA support
2060 ****************************************************************************/
2061 #ifdef HAVE_ATTROPEN
2062 static ssize_t solaris_read_xattr(int attrfd, void *value, size_t size)
2066 if (fstat(attrfd, &sbuf) == -1) {
2071 /* This is to return the current size of the named extended attribute */
2073 return sbuf.st_size;
2076 /* check size and read xattr */
2077 if (sbuf.st_size > size) {
2082 return read(attrfd, value, sbuf.st_size);
2085 static ssize_t solaris_list_xattr(int attrdirfd, char *list, size_t size)
2091 int newfd = dup(attrdirfd);
2092 /* CAUTION: The originating file descriptor should not be
2093 used again following the call to fdopendir().
2094 For that reason we dup() the file descriptor
2095 here to make things more clear. */
2096 dirp = fdopendir(newfd);
2098 while ((de = readdir(dirp))) {
2099 size_t listlen = strlen(de->d_name);
2100 if (!strcmp(de->d_name, ".") || !strcmp(de->d_name, "..")) {
2101 /* we don't want "." and ".." here: */
2102 DEBUG(10,("skipped EA %s\n",de->d_name));
2107 /* return the current size of the list of extended attribute names*/
2110 /* check size and copy entrieѕ + nul into list. */
2111 if ((len + listlen + 1) > size) {
2116 safe_strcpy(list + len, de->d_name, listlen);
2124 if (closedir(dirp) == -1) {
2125 DEBUG(0,("closedir dirp failed: %s\n",strerror(errno)));
2131 static int solaris_unlinkat(int attrdirfd, const char *name)
2133 if (unlinkat(attrdirfd, name, 0) == -1) {
2134 if (errno == ENOENT) {
2142 static int solaris_attropen(const char *path, const char *attrpath, int oflag, mode_t mode)
2144 int filedes = attropen(path, attrpath, oflag, mode);
2145 if (filedes == -1) {
2146 DEBUG(10,("attropen FAILED: path: %s, name: %s, errno: %s\n",path,attrpath,strerror(errno)));
2147 if (errno == EINVAL) {
2156 static int solaris_openat(int fildes, const char *path, int oflag, mode_t mode)
2158 int filedes = openat(fildes, path, oflag, mode);
2159 if (filedes == -1) {
2160 DEBUG(10,("openat FAILED: fd: %s, path: %s, errno: %s\n",filedes,path,strerror(errno)));
2161 if (errno == EINVAL) {
2170 static int solaris_write_xattr(int attrfd, const char *value, size_t size)
2172 if ((ftruncate(attrfd, 0) == 0) && (write(attrfd, value, size) == size)) {
2175 DEBUG(10,("solaris_write_xattr FAILED!\n"));
2179 #endif /*HAVE_ATTROPEN*/
2182 /****************************************************************************
2183 Return the major devicenumber for UNIX extensions.
2184 ****************************************************************************/
2186 uint32 unix_dev_major(SMB_DEV_T dev)
2188 #if defined(HAVE_DEVICE_MAJOR_FN)
2189 return (uint32)major(dev);
2191 return (uint32)(dev >> 8);
2195 /****************************************************************************
2196 Return the minor devicenumber for UNIX extensions.
2197 ****************************************************************************/
2199 uint32 unix_dev_minor(SMB_DEV_T dev)
2201 #if defined(HAVE_DEVICE_MINOR_FN)
2202 return (uint32)minor(dev);
2204 return (uint32)(dev & 0xff);
2208 #if defined(WITH_AIO)
2210 /*******************************************************************
2211 An aio_read wrapper that will deal with 64-bit sizes.
2212 ********************************************************************/
2214 int sys_aio_read(SMB_STRUCT_AIOCB *aiocb)
2216 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_READ64)
2217 return aio_read64(aiocb);
2218 #elif defined(HAVE_AIO_READ)
2219 return aio_read(aiocb);
2226 /*******************************************************************
2227 An aio_write wrapper that will deal with 64-bit sizes.
2228 ********************************************************************/
2230 int sys_aio_write(SMB_STRUCT_AIOCB *aiocb)
2232 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_WRITE64)
2233 return aio_write64(aiocb);
2234 #elif defined(HAVE_AIO_WRITE)
2235 return aio_write(aiocb);
2242 /*******************************************************************
2243 An aio_return wrapper that will deal with 64-bit sizes.
2244 ********************************************************************/
2246 ssize_t sys_aio_return(SMB_STRUCT_AIOCB *aiocb)
2248 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_RETURN64)
2249 return aio_return64(aiocb);
2250 #elif defined(HAVE_AIO_RETURN)
2251 return aio_return(aiocb);
2258 /*******************************************************************
2259 An aio_cancel wrapper that will deal with 64-bit sizes.
2260 ********************************************************************/
2262 int sys_aio_cancel(int fd, SMB_STRUCT_AIOCB *aiocb)
2264 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_CANCEL64)
2265 return aio_cancel64(fd, aiocb);
2266 #elif defined(HAVE_AIO_CANCEL)
2267 return aio_cancel(fd, aiocb);
2274 /*******************************************************************
2275 An aio_error wrapper that will deal with 64-bit sizes.
2276 ********************************************************************/
2278 int sys_aio_error(const SMB_STRUCT_AIOCB *aiocb)
2280 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_ERROR64)
2281 return aio_error64(aiocb);
2282 #elif defined(HAVE_AIO_ERROR)
2283 return aio_error(aiocb);
2290 /*******************************************************************
2291 An aio_fsync wrapper that will deal with 64-bit sizes.
2292 ********************************************************************/
2294 int sys_aio_fsync(int op, SMB_STRUCT_AIOCB *aiocb)
2296 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_FSYNC64)
2297 return aio_fsync64(op, aiocb);
2298 #elif defined(HAVE_AIO_FSYNC)
2299 return aio_fsync(op, aiocb);
2306 /*******************************************************************
2307 An aio_fsync wrapper that will deal with 64-bit sizes.
2308 ********************************************************************/
2310 int sys_aio_suspend(const SMB_STRUCT_AIOCB * const cblist[], int n, const struct timespec *timeout)
2312 #if defined(HAVE_EXPLICIT_LARGEFILE_SUPPORT) && defined(HAVE_AIOCB64) && defined(HAVE_AIO_SUSPEND64)
2313 return aio_suspend64(cblist, n, timeout);
2314 #elif defined(HAVE_AIO_FSYNC)
2315 return aio_suspend(cblist, n, timeout);
2321 #else /* !WITH_AIO */
2323 int sys_aio_read(SMB_STRUCT_AIOCB *aiocb)
2329 int sys_aio_write(SMB_STRUCT_AIOCB *aiocb)
2335 ssize_t sys_aio_return(SMB_STRUCT_AIOCB *aiocb)
2341 int sys_aio_cancel(int fd, SMB_STRUCT_AIOCB *aiocb)
2347 int sys_aio_error(const SMB_STRUCT_AIOCB *aiocb)
2353 int sys_aio_fsync(int op, SMB_STRUCT_AIOCB *aiocb)
2359 int sys_aio_suspend(const SMB_STRUCT_AIOCB * const cblist[], int n, const struct timespec *timeout)
2364 #endif /* WITH_AIO */
2366 int sys_getpeereid( int s, uid_t *uid)
2368 #if defined(HAVE_PEERCRED)
2370 socklen_t cred_len = sizeof(struct ucred);
2373 ret = getsockopt(s, SOL_SOCKET, SO_PEERCRED, (void *)&cred, &cred_len);
2378 if (cred_len != sizeof(struct ucred)) {
2391 int sys_getnameinfo(const struct sockaddr *psa,
2400 * For Solaris we must make sure salen is the
2401 * correct length for the incoming sa_family.
2404 if (salen == sizeof(struct sockaddr_storage)) {
2405 salen = sizeof(struct sockaddr_in);
2406 #if defined(HAVE_IPV6)
2407 if (psa->sa_family == AF_INET6) {
2408 salen = sizeof(struct sockaddr_in6);
2412 return getnameinfo(psa, salen, host, hostlen, service, servlen, flags);
2415 int sys_connect(int fd, const struct sockaddr * addr)
2417 socklen_t salen = -1;
2419 if (addr->sa_family == AF_INET) {
2420 salen = sizeof(struct sockaddr_in);
2421 } else if (addr->sa_family == AF_UNIX) {
2422 salen = sizeof(struct sockaddr_un);
2424 #if defined(HAVE_IPV6)
2425 else if (addr->sa_family == AF_INET6) {
2426 salen = sizeof(struct sockaddr_in6);
2430 return connect(fd, addr, salen);