3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 2000-2005 The OpenLDAP Foundation.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted only as authorized by the OpenLDAP
12 * A copy of this license is available in the file LICENSE in the
13 * top-level directory of the distribution or, alternatively, at
14 * <http://www.OpenLDAP.org/license.html>.
19 #ifndef HAVE_GETPEEREID
21 #include <sys/types.h>
22 #include <ac/unistd.h>
24 #include <ac/socket.h>
27 #ifdef HAVE_GETPEERUCRED
31 #ifdef HAVE_SYS_UCRED_H
33 #include <grp.h> /* for NGROUPS on Tru64 5.1 */
35 #include <sys/ucred.h>
38 #if !defined(HAVE_GETPEERUCRED) && \
39 !defined(SO_PEERCRED) && !defined(LOCAL_PEERCRED) && \
40 defined(HAVE_SENDMSG) && (defined(HAVE_STRUCT_MSGHDR_MSG_ACCRIGHTSLEN) || \
41 defined(HAVE_STRUCT_MSGHDR_MSG_CONTROL))
52 int getpeereid( int s, uid_t *euid, gid_t *egid )
55 #if defined( HAVE_GETPEERUCRED )
57 if( getpeerucred( s, &uc ) == 0 ) {
58 *euid = ucred_geteuid( uc );
59 *egid = ucred_getegid( uc );
63 #elif defined( SO_PEERCRED )
64 struct ucred peercred;
65 socklen_t peercredlen = sizeof peercred;
67 if(( getsockopt( s, SOL_SOCKET, SO_PEERCRED,
68 (void *)&peercred, &peercredlen ) == 0 )
69 && ( peercredlen == sizeof peercred ))
76 #elif defined( LOCAL_PEERCRED )
77 struct xucred peercred;
78 socklen_t peercredlen = sizeof peercred;
80 if(( getsockopt( s, LOCAL_PEERCRED, 1,
81 (void *)&peercred, &peercredlen ) == 0 )
82 && ( peercred.cr_version == XUCRED_VERSION ))
84 *euid = peercred.cr_uid;
85 *egid = peercred.cr_gid;
88 #elif defined( DO_SENDMSG )
92 struct msghdr msg = {0};
93 # ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
95 # define CMSG_SPACE(len) (_CMSG_ALIGN(sizeof(struct cmsghdr)) + _CMSG_ALIGN(len))
98 # define CMSG_LEN(len) (_CMSG_ALIGN(sizeof(struct cmsghdr)) + (len))
102 unsigned char control[CMSG_SPACE(sizeof(int))];
104 struct cmsghdr *cmsg;
105 # endif /* HAVE_STRUCT_MSGHDR_MSG_CONTROL */
111 iov.iov_base = dummy;
112 iov.iov_len = sizeof dummy;
115 # ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
116 msg.msg_control = control_un.control;
117 msg.msg_controllen = sizeof( control_un.control );
119 cmsg = CMSG_FIRSTHDR( &msg );
122 * AIX returns a bogus file descriptor if recvmsg() is
123 * called with MSG_PEEK (is this a bug?). Hence we need
124 * to receive the Abandon PDU.
126 if( recvmsg( s, &msg, MSG_WAITALL ) >= 0 &&
127 cmsg->cmsg_len == CMSG_LEN( sizeof(int) ) &&
128 cmsg->cmsg_level == SOL_SOCKET &&
129 cmsg->cmsg_type == SCM_RIGHTS )
131 msg.msg_accrights = (char *)fd;
132 msg.msg_accrightslen = sizeof(fd);
133 if( recvmsg( s, &msg, MSG_PEEK) >= 0 && msg.msg_accrightslen == sizeof(int) )
134 # endif /* HAVE_STRUCT_MSGHDR_MSG_CONTROL*/
136 /* We must receive a valid descriptor, it must be a pipe,
137 * and it must only be accessible by its owner.
139 # ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
140 fd[0] = (*(int *)CMSG_DATA( cmsg ));
142 err = fstat( fd[0], &st );
144 if( err == 0 && S_ISFIFO(st.st_mode) &&
145 ((st.st_mode & (S_IRWXG|S_IRWXO)) == 0))
152 #elif defined(SOCKCREDSIZE)
159 memset(&msg, 0, sizeof msg);
160 crmsgsize = CMSG_SPACE(SOCKCREDSIZE(NGROUPS));
161 if (crmsgsize == 0) goto sc_err;
162 crmsg = malloc(crmsgsize);
163 if (crmsg == NULL) goto sc_err;
164 memset(crmsg, 0, crmsgsize);
166 msg.msg_control = crmsg;
167 msg.msg_controllen = crmsgsize;
169 if (recvmsg(s, &msg, 0) < 0) {
174 if (msg.msg_controllen == 0 || (msg.msg_flags & MSG_CTRUNC) != 0) {
179 cmp = CMSG_FIRSTHDR(&msg);
180 if (cmp->cmsg_level != SOL_SOCKET || cmp->cmsg_type != SCM_CREDS) {
185 sc = (struct sockcred *)(void *)CMSG_DATA(cmp);
195 #endif /* LDAP_PF_LOCAL */
200 #endif /* HAVE_GETPEEREID */