1 /*
2  * Copyright (c) 1990,1993 Regents of The University of Michigan.
3  * All Rights Reserved.  See COPYRIGHT.
4  */
5 
6 #ifdef HAVE_CONFIG_H
7 #include "config.h"
8 #endif /* HAVE_CONFIG_H */
9 
10 #include <stdio.h>
11 #include <stdlib.h>
12 #include <errno.h>
13 #include <unistd.h>
14 #include <sys/types.h>
15 #include <sys/param.h>
16 #include <sys/stat.h>
17 #include <arpa/inet.h>
18 
19 #include <atalk/afp.h>
20 #include <atalk/compat.h>
21 #include <atalk/util.h>
22 #include <limits.h>
23 #include <string.h>
24 #include <ctype.h>
25 #include <time.h>
26 #include <pwd.h>
27 #include <grp.h>
28 
29 #ifdef TRU64
30 #include <netdb.h>
31 #include <arpa/inet.h>
32 #include <sia.h>
33 #include <siad.h>
34 
35 extern void afp_get_cmdline( int *ac, char ***av );
36 #endif /* TRU64 */
37 
38 #include <atalk/logger.h>
39 #include <atalk/server_ipc.h>
40 #include <atalk/uuid.h>
41 #include <atalk/globals.h>
42 #include <atalk/fce_api.h>
43 #include <atalk/spotlight.h>
44 #include <atalk/unix.h>
45 
46 #include "auth.h"
47 #include "uam_auth.h"
48 #include "switch.h"
49 #include "status.h"
50 #include "fork.h"
51 #include "extattrs.h"
52 #ifdef HAVE_ACLS
53 #include "acls.h"
54 #endif
55 
56 static int afp_version_index;
57 static struct uam_mod uam_modules = {NULL, NULL, &uam_modules, &uam_modules};
58 static struct uam_obj uam_login = {"", "", 0, {{NULL, NULL, NULL, NULL }}, &uam_login,
59                                    &uam_login};
60 static struct uam_obj uam_changepw = {"", "", 0, {{NULL, NULL, NULL, NULL}}, &uam_changepw,
61                                       &uam_changepw};
62 
63 static struct uam_obj *afp_uam = NULL;
64 
65 
status_versions(char * data,const DSI * dsi)66 void status_versions( char *data, const DSI *dsi)
67 {
68     char                *start = data;
69     uint16_t           status;
70     int         len, num, i, count = 0;
71 
72     memcpy(&status, start + AFPSTATUS_VERSOFF, sizeof(status));
73     num = sizeof( afp_versions ) / sizeof( afp_versions[ 0 ] );
74 
75     for ( i = 0; i < num; i++ ) {
76         if ( !dsi && (afp_versions[ i ].av_number >= 22)) continue;
77         count++;
78     }
79     data += ntohs( status );
80     *data++ = count;
81 
82     for ( i = 0; i < num; i++ ) {
83         if ( !dsi && (afp_versions[ i ].av_number >= 22)) continue;
84         len = strlen( afp_versions[ i ].av_name );
85         *data++ = len;
86         memcpy( data, afp_versions[ i ].av_name , len );
87         data += len;
88     }
89     status = htons( data - start );
90     memcpy(start + AFPSTATUS_UAMSOFF, &status, sizeof(status));
91 }
92 
status_uams(char * data,const char * authlist)93 void status_uams(char *data, const char *authlist)
94 {
95     char                *start = data;
96     uint16_t           status;
97     struct uam_obj      *uams;
98     int         len, num = 0;
99 
100     memcpy(&status, start + AFPSTATUS_UAMSOFF, sizeof(status));
101     uams = &uam_login;
102     while ((uams = uams->uam_prev) != &uam_login) {
103         if (strstr(authlist, uams->uam_path))
104             num++;
105     }
106 
107     data += ntohs( status );
108     *data++ = num;
109     while ((uams = uams->uam_prev) != &uam_login) {
110         if (strstr(authlist, uams->uam_path)) {
111             LOG(log_info, logtype_afpd, "uam: \"%s\" available", uams->uam_name);
112             len = strlen( uams->uam_name);
113             *data++ = len;
114             memcpy( data, uams->uam_name, len );
115             data += len;
116         }
117     }
118 
119     /* icon offset */
120     status = htons(data - start);
121     memcpy(start + AFPSTATUS_ICONOFF, &status, sizeof(status));
122 }
123 
124 /* handle errors by closing the connection. this is only needed
125  * by the afp_* functions. */
send_reply(const AFPObj * obj,const int err)126 static int send_reply(const AFPObj *obj, const int err)
127 {
128     if ((err == AFP_OK) || (err == AFPERR_AUTHCONT))
129         return err;
130 
131     obj->reply(obj->dsi, err);
132     obj->exit(0);
133 
134     return AFP_OK;
135 }
136 
afp_errpwdexpired(AFPObj * obj _U_,char * ibuf _U_,size_t ibuflen _U_,char * rbuf _U_,size_t * rbuflen)137 static int afp_errpwdexpired(AFPObj *obj _U_, char *ibuf _U_, size_t ibuflen _U_,
138                              char *rbuf _U_, size_t *rbuflen)
139 {
140     *rbuflen = 0;
141     return AFPERR_PWDEXPR;
142 }
143 
afp_null_nolog(AFPObj * obj _U_,char * ibuf _U_,size_t ibuflen _U_,char * rbuf _U_,size_t * rbuflen)144 static int afp_null_nolog(AFPObj *obj _U_, char *ibuf _U_, size_t ibuflen _U_,
145                           char *rbuf _U_, size_t *rbuflen)
146 {
147     *rbuflen = 0;
148     return( AFPERR_NOOP );
149 }
150 
set_auth_switch(const AFPObj * obj,int expired)151 static int set_auth_switch(const AFPObj *obj, int expired)
152 {
153     int i;
154 
155     if (expired) {
156         /*
157          * BF: expired password handling
158          * to allow the user to change his/her password we have to allow login
159          * but every following call except for FPChangePassword will be thrown
160          * away with an AFPERR_PWDEXPR error. (thanks to Leland Wallace from Apple
161          * for clarifying this)
162          */
163 
164         for (i=0; i<=0xff; i++) {
165             uam_afpserver_action(i, UAM_AFPSERVER_PREAUTH, afp_errpwdexpired, NULL);
166         }
167         uam_afpserver_action(AFP_LOGOUT, UAM_AFPSERVER_PREAUTH, afp_logout, NULL);
168         uam_afpserver_action(AFP_CHANGEPW, UAM_AFPSERVER_PREAUTH, afp_changepw, NULL);
169     }
170     else {
171         afp_switch = postauth_switch;
172         switch (obj->afp_version) {
173 
174         case 34:
175         case 33:
176         case 32:
177 #ifdef HAVE_ACLS
178             uam_afpserver_action(AFP_GETACL, UAM_AFPSERVER_POSTAUTH, afp_getacl, NULL);
179             uam_afpserver_action(AFP_SETACL, UAM_AFPSERVER_POSTAUTH, afp_setacl, NULL);
180             uam_afpserver_action(AFP_ACCESS, UAM_AFPSERVER_POSTAUTH, afp_access, NULL);
181 #endif /* HAVE_ACLS */
182             uam_afpserver_action(AFP_GETEXTATTR, UAM_AFPSERVER_POSTAUTH, afp_getextattr, NULL);
183             uam_afpserver_action(AFP_SETEXTATTR, UAM_AFPSERVER_POSTAUTH, afp_setextattr, NULL);
184             uam_afpserver_action(AFP_REMOVEATTR, UAM_AFPSERVER_POSTAUTH, afp_remextattr, NULL);
185             uam_afpserver_action(AFP_LISTEXTATTR, UAM_AFPSERVER_POSTAUTH, afp_listextattr, NULL);
186 
187         case 31:
188             uam_afpserver_action(AFP_SYNCDIR, UAM_AFPSERVER_POSTAUTH, afp_syncdir, NULL);
189             uam_afpserver_action(AFP_SYNCFORK, UAM_AFPSERVER_POSTAUTH, afp_syncfork, NULL);
190 #ifdef HAVE_TRACKER
191             uam_afpserver_action(AFP_SPOTLIGHT_PRIVATE, UAM_AFPSERVER_POSTAUTH, afp_spotlight_rpc, NULL);
192 #endif
193             uam_afpserver_action(AFP_ENUMERATE_EXT2, UAM_AFPSERVER_POSTAUTH, afp_enumerate_ext2, NULL);
194 
195         case 30:
196             uam_afpserver_action(AFP_ENUMERATE_EXT, UAM_AFPSERVER_POSTAUTH, afp_enumerate_ext, NULL);
197             uam_afpserver_action(AFP_BYTELOCK_EXT,  UAM_AFPSERVER_POSTAUTH, afp_bytelock_ext, NULL);
198             /* catsearch_ext uses the same packet as catsearch FIXME double check this, it wasn't true for enue
199                enumerate_ext */
200             uam_afpserver_action(AFP_CATSEARCH_EXT, UAM_AFPSERVER_POSTAUTH, afp_catsearch_ext, NULL);
201             uam_afpserver_action(AFP_GETSESSTOKEN,  UAM_AFPSERVER_POSTAUTH, afp_getsession, NULL);
202             uam_afpserver_action(AFP_READ_EXT,      UAM_AFPSERVER_POSTAUTH, afp_read_ext, NULL);
203             uam_afpserver_action(AFP_WRITE_EXT,     UAM_AFPSERVER_POSTAUTH, afp_write_ext, NULL);
204             uam_afpserver_action(AFP_DISCTOLDSESS,  UAM_AFPSERVER_POSTAUTH, afp_disconnect, NULL);
205 
206         case 22:
207             /*
208              * If first connection to a server is done in classic AFP2.2 version is used
209              * but OSX uses AFP3.x FPzzz command !
210              */
211             uam_afpserver_action(AFP_ZZZ,  UAM_AFPSERVER_POSTAUTH, afp_zzz, NULL);
212             break;
213         }
214     }
215 
216     return AFP_OK;
217 }
218 
login(AFPObj * obj,struct passwd * pwd,void (* logout)(void),int expired)219 static int login(AFPObj *obj, struct passwd *pwd, void (*logout)(void), int expired)
220 {
221     bool admin = false;
222     int i;
223 
224     if ( pwd->pw_uid == 0 ) {   /* don't allow root login */
225         LOG(log_error, logtype_afpd, "login: root login denied!" );
226         return AFPERR_NOTAUTH;
227     }
228 
229     if (obj->cnx_cnt > obj->cnx_max) {
230         LOG(log_error, logtype_dsi, "login: too many connections, limit: %d", obj->cnx_max);
231         return AFPERR_MAXSESS;
232     }
233 
234     LOG(log_note, logtype_afpd, "Login by %s (%s)",
235         pwd->pw_name, afp_versions[afp_version_index].av_name);
236 
237     if (set_groups(obj, pwd) != 0)
238         return AFPERR_BADUAM;
239 
240     LOG(log_debug, logtype_afpd, "obj->options.admingid == %d", obj->options.admingid);
241 
242     if (obj->options.admingid != 0) {
243         for (i = 0; i < obj->ngroups; i++) {
244             if (obj->groups[i] == obj->options.admingid) {
245                 admin = true;
246             }
247         }
248     }
249     if (admin) {
250         ad_setfuid(0);
251         LOG(log_info, logtype_afpd, "admin login -- %s", pwd->pw_name );
252     } else {
253         if (setegid( pwd->pw_gid ) < 0 || seteuid( pwd->pw_uid ) < 0) {
254             LOG(log_error, logtype_afpd, "login: %s %s", pwd->pw_name, strerror(errno) );
255             return AFPERR_BADUAM;
256         }
257     }
258 
259     if (obj->options.force_user) {
260         if (seteuid(obj->options.force_uid) < 0) {
261             LOG(log_error, logtype_afpd, "login: %s %s", pwd->pw_name, strerror(errno));
262             return AFPERR_BADUAM;
263         }
264         LOG(log_info, logtype_afpd, "login: force uid: %ju", (uintmax_t)obj->options.force_uid);
265     }
266 
267     if (obj->options.force_group) {
268         if (setegid(obj->options.force_gid) < 0) {
269             LOG(log_error, logtype_afpd, "login: %s %s", pwd->pw_name, strerror(errno));
270             return AFPERR_BADUAM;
271         }
272         LOG(log_info, logtype_afpd, "login: force gid: %ju", (uintmax_t)obj->options.force_gid);
273     }
274 
275     LOG(log_debug, logtype_afpd, "login: supplementary groups: %s", print_groups(obj->ngroups, obj->groups));
276 
277     set_auth_switch(obj, expired);
278     obj->logout = logout;
279     obj->uid = pwd->pw_uid;
280     obj->euid = geteuid();
281 
282     /* pam_umask or similar might have changed our umask */
283     (void)umask(obj->options.umask);
284 
285     /* Some PAM module might have reset our signal handlers and timer, so we need to reestablish them */
286     afp_over_dsi_sighandlers(obj);
287 
288     /* Send FCE login event */
289     fce_register(obj, FCE_LOGIN, "", NULL);
290 
291     return( AFP_OK );
292 }
293 
294 /* ---------------------- */
afp_zzz(AFPObj * obj,char * ibuf,size_t ibuflen,char * rbuf,size_t * rbuflen)295 int afp_zzz(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_t *rbuflen)
296 {
297     uint32_t data;
298     DSI *dsi = (DSI *)AFPobj->dsi;
299 
300     *rbuflen = 0;
301     ibuf += 2;
302     ibuflen -= 2;
303 
304     if (ibuflen < 4)
305         return AFPERR_MISC;
306     memcpy(&data, ibuf, 4); /* flag */
307     data = ntohl(data);
308 
309     /*
310      * Possible sleeping states:
311      * 1) normal sleep: DSI_SLEEPING (up to 10.3)
312      * 2) extended sleep: DSI_SLEEPING | DSI_EXTSLEEP (starting with 10.4)
313      */
314 
315     if (data & AFPZZZ_EXT_WAKEUP) {
316         /* wakeup request from exetended sleep */
317         if (dsi->flags & DSI_EXTSLEEP) {
318             LOG(log_note, logtype_afpd, "afp_zzz: waking up from extended sleep");
319             dsi->flags &= ~(DSI_SLEEPING | DSI_EXTSLEEP);
320             ipc_child_state(obj, DSI_RUNNING);
321         }
322     } else {
323         /* sleep request */
324         dsi->flags |= DSI_SLEEPING;
325         if (data & AFPZZZ_EXT_SLEEP) {
326             LOG(log_note, logtype_afpd, "afp_zzz: entering extended sleep");
327             dsi->flags |= DSI_EXTSLEEP;
328             ipc_child_state(obj, DSI_EXTSLEEP);
329         } else {
330             LOG(log_note, logtype_afpd, "afp_zzz: entering normal sleep");
331             ipc_child_state(obj, DSI_SLEEPING);
332         }
333     }
334 
335     /*
336      * According to AFP 3.3 spec we should not return anything,
337      * but eg 10.5.8 server still returns the numbers of hours
338      * the server is keeping the sessino (ie max sleeptime).
339      */
340     data = obj->options.sleep / 120; /* hours */
341     if (!data) {
342         data = 1;
343     }
344     *rbuflen = sizeof(data);
345     data = htonl(data);
346     memcpy(rbuf, &data, sizeof(data));
347     rbuf += sizeof(data);
348 
349     return AFP_OK;
350 }
351 
352 /* ---------------------- */
create_session_token(AFPObj * obj)353 static int create_session_token(AFPObj *obj)
354 {
355     pid_t pid;
356 
357     /* use 8 bytes for token as OSX, don't know if it helps */
358     if ( sizeof(pid_t) > SESSIONTOKEN_LEN) {
359         LOG(log_error, logtype_afpd, "sizeof(pid_t) > %u", SESSIONTOKEN_LEN );
360         return AFPERR_MISC;
361     }
362 
363     if ( NULL == (obj->sinfo.sessiontoken = malloc(SESSIONTOKEN_LEN)) )
364         return AFPERR_MISC;
365 
366     memset(obj->sinfo.sessiontoken, 0, SESSIONTOKEN_LEN);
367     obj->sinfo.sessiontoken_len = SESSIONTOKEN_LEN;
368     pid = getpid();
369     memcpy(obj->sinfo.sessiontoken, &pid, sizeof(pid_t));
370 
371     return 0;
372 }
373 
create_session_key(AFPObj * obj)374 static int create_session_key(AFPObj *obj)
375 {
376     /* create session key */
377     if (obj->sinfo.sessionkey == NULL) {
378         if (NULL == (obj->sinfo.sessionkey = malloc(SESSIONKEY_LEN)) )
379             return AFPERR_MISC;
380         uam_random_string(obj, obj->sinfo.sessionkey, SESSIONKEY_LEN);
381         obj->sinfo.sessionkey_len = SESSIONKEY_LEN;
382     }
383     return AFP_OK;
384 }
385 
386 
387 /* ---------------------- */
afp_getsession(AFPObj * obj,char * ibuf,size_t ibuflen,char * rbuf,size_t * rbuflen)388 int afp_getsession(
389     AFPObj *obj,
390     char   *ibuf, size_t ibuflen,
391     char   *rbuf, size_t *rbuflen)
392 {
393     uint16_t           type;
394     uint32_t           idlen = 0;
395     uint32_t       boottime;
396     uint32_t           tklen, tp;
397     char                *token;
398     char                *p;
399 
400     *rbuflen = 0;
401     tklen = 0;
402 
403     if (ibuflen < 2 + sizeof(type)) {
404         return AFPERR_PARAM;
405     }
406 
407     ibuf += 2;
408     ibuflen -= 2;
409 
410     memcpy(&type, ibuf, sizeof(type));
411     type = ntohs(type);
412     ibuf += sizeof(type);
413     ibuflen -= sizeof(type);
414 
415     if ( obj->sinfo.sessiontoken == NULL ) {
416         if ( create_session_token( obj ) )
417             return AFPERR_MISC;
418     }
419 
420     /*
421      *
422      */
423     switch (type) {
424     case 0: /* old version ?*/
425         tklen = obj->sinfo.sessiontoken_len;
426         token = obj->sinfo.sessiontoken;
427         break;
428     case 1: /* disconnect */
429     case 2: /* reconnect update id */
430         if (ibuflen >= sizeof(idlen)) {
431             memcpy(&idlen, ibuf, sizeof(idlen));
432             idlen = ntohl(idlen);
433             ibuf += sizeof(idlen);
434             ibuflen -= sizeof(idlen);
435             if (ibuflen < idlen) {
436                 return AFPERR_PARAM;
437             }
438             /* memcpy (id, ibuf, idlen) */
439             tklen = obj->sinfo.sessiontoken_len;
440             token = obj->sinfo.sessiontoken;
441         }
442         break;
443     case 3:
444     case 4:
445         if (ibuflen >= 8 ) {
446             p = ibuf;
447             memcpy( &idlen, ibuf, sizeof(idlen));
448             idlen = ntohl(idlen);
449             ibuf += sizeof(idlen);
450             ibuflen -= sizeof(idlen);
451             ibuf += sizeof(boottime);
452             ibuflen -= sizeof(boottime);
453             if (ibuflen < idlen || idlen > (90-10)) {
454                 return AFPERR_PARAM;
455             }
456             if (!obj->sinfo.clientid) {
457                 obj->sinfo.clientid = malloc(idlen + 8);
458                 memcpy(obj->sinfo.clientid, p, idlen + 8);
459                 obj->sinfo.clientid_len = idlen + 8;
460             }
461             if (ipc_child_write(obj->ipc_fd, IPC_GETSESSION, idlen+8, p) != 0)
462                 return AFPERR_MISC;
463             tklen = obj->sinfo.sessiontoken_len;
464             token = obj->sinfo.sessiontoken;
465         }
466         break;
467     case 8: /* Panther Kerberos Token */
468         tklen = obj->sinfo.cryptedkey_len;
469         token = obj->sinfo.cryptedkey;
470         break;
471     default:
472         return AFPERR_NOOP;
473         break;
474 
475     }
476 
477     if (tklen == 0)
478         return AFPERR_MISC;
479 
480     tp = htonl(tklen);
481     memcpy(rbuf, &tp, sizeof(tklen));
482     rbuf += sizeof(tklen);
483     *rbuflen += sizeof(tklen);
484 
485     memcpy(rbuf, token, tklen);
486     *rbuflen += tklen;
487 
488     return AFP_OK;
489 }
490 
491 /* ---------------------- */
afp_disconnect(AFPObj * obj,char * ibuf,size_t ibuflen _U_,char * rbuf _U_,size_t * rbuflen)492 int afp_disconnect(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
493 {
494     DSI                 *dsi = (DSI *)obj->dsi;
495     uint16_t           type;
496     uint32_t           tklen;
497     pid_t               token;
498     int                 i;
499 
500     *rbuflen = 0;
501     ibuf += 2;
502 
503 #if 0
504     /* check for guest user */
505     if ( 0 == (strcasecmp(obj->username, obj->options.guest)) ) {
506         return AFPERR_MISC;
507     }
508 #endif
509 
510     memcpy(&type, ibuf, sizeof(type));
511     type = ntohs(type);
512     ibuf += sizeof(type);
513 
514     memcpy(&tklen, ibuf, sizeof(tklen));
515     tklen = ntohl(tklen);
516     ibuf += sizeof(tklen);
517 
518     if ( sizeof(pid_t) > SESSIONTOKEN_LEN) {
519         LOG(log_error, logtype_afpd, "sizeof(pid_t) > %u", SESSIONTOKEN_LEN );
520         return AFPERR_MISC;
521     }
522     if (tklen != SESSIONTOKEN_LEN) {
523         return AFPERR_MISC;
524     }
525     tklen = sizeof(pid_t);
526     memcpy(&token, ibuf, tklen);
527 
528     /* our stuff is pid + zero pad */
529     ibuf += tklen;
530     for (i = tklen; i < SESSIONTOKEN_LEN; i++, ibuf++) {
531         if (*ibuf != 0) {
532             return AFPERR_MISC;
533         }
534     }
535 
536     LOG(log_note, logtype_afpd, "afp_disconnect: trying primary reconnect");
537     dsi->flags |= DSI_RECONINPROG;
538 
539     /* Deactivate tickle timer */
540     const struct itimerval none = {{0, 0}, {0, 0}};
541     setitimer(ITIMER_REAL, &none, NULL);
542 
543     /* check for old session, possibly transferring session from here to there */
544     if (ipc_child_write(obj->ipc_fd, IPC_DISCOLDSESSION, tklen, &token) != 0)
545         goto exit;
546     /* write uint16_t DSI request ID */
547     if (writet(obj->ipc_fd, &dsi->header.dsi_requestID, 2, 0, 2) != 2) {
548         LOG(log_error, logtype_afpd, "afp_disconnect: couldn't send DSI request ID");
549         goto exit;
550     }
551     /* now send our connected AFP client socket */
552     if (send_fd(obj->ipc_fd, dsi->socket) != 0)
553         goto exit;
554     /* Now see what happens: either afpd master sends us SIGTERM because our session */
555     /* has been transferred to a old disconnected session, or we continue    */
556     sleep(5);
557 
558     if (!(dsi->flags & DSI_RECONINPROG)) { /* deleted in SIGTERM handler */
559         /* Reconnect succeeded, we exit now after sleeping some more */
560         sleep(2); /* sleep some more to give the recon. session time */
561         LOG(log_note, logtype_afpd, "afp_disconnect: primary reconnect succeeded");
562         exit(0);
563     }
564 
565 exit:
566     /* Reinstall tickle timer */
567     setitimer(ITIMER_REAL, &dsi->timer, NULL);
568 
569     LOG(log_error, logtype_afpd, "afp_disconnect: primary reconnect failed");
570     return AFPERR_MISC;
571 }
572 
573 /* ---------------------- */
get_version(AFPObj * obj,char * ibuf,size_t ibuflen,size_t len)574 static int get_version(AFPObj *obj, char *ibuf, size_t ibuflen, size_t len)
575 {
576     int num,i;
577 
578     if (!len || len > ibuflen)
579         return AFPERR_BADVERS;
580 
581     num = sizeof( afp_versions ) / sizeof( afp_versions[ 0 ]);
582     for ( i = 0; i < num; i++ ) {
583         if ( strncmp( ibuf, afp_versions[ i ].av_name , len ) == 0 ) {
584             obj->afp_version = afp_versions[ i ].av_number;
585             afp_version_index = i;
586             break;
587         }
588     }
589     if ( i == num )                 /* An inappropo version */
590         return AFPERR_BADVERS ;
591 
592     /* FIXME Hack */
593     if (obj->afp_version >= 30 && sizeof(off_t) != 8) {
594         LOG(log_error, logtype_afpd, "get_version: no LARGE_FILE support recompile!" );
595         return AFPERR_BADVERS ;
596     }
597 
598     return 0;
599 }
600 
601 /* ---------------------- */
afp_login(AFPObj * obj,char * ibuf,size_t ibuflen,char * rbuf,size_t * rbuflen)602 int afp_login(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_t *rbuflen)
603 {
604     struct passwd *pwd = NULL;
605     size_t len;
606     int     i;
607 
608     *rbuflen = 0;
609 
610     if ( nologin & 1)
611         return send_reply(obj, AFPERR_SHUTDOWN );
612 
613     if (ibuflen < 2)
614         return send_reply(obj, AFPERR_BADVERS );
615 
616     ibuf++;
617     len = (unsigned char) *ibuf++;
618     ibuflen -= 2;
619 
620     i = get_version(obj, ibuf, ibuflen, len);
621     if (i)
622         return send_reply(obj, i );
623 
624     if (ibuflen <= len)
625         return send_reply(obj, AFPERR_BADUAM);
626 
627     ibuf += len;
628     ibuflen -= len;
629 
630     len = (unsigned char) *ibuf++;
631     ibuflen--;
632 
633     if (!len || len > ibuflen)
634         return send_reply(obj, AFPERR_BADUAM);
635 
636     if (NULL == (afp_uam = auth_uamfind(UAM_SERVER_LOGIN, ibuf, len)) )
637         return send_reply(obj, AFPERR_BADUAM);
638     ibuf += len;
639     ibuflen -= len;
640 
641     if (AFP_OK != (i = create_session_key(obj)) )
642         return send_reply(obj, i);
643 
644     i = afp_uam->u.uam_login.login(obj, &pwd, ibuf, ibuflen, rbuf, rbuflen);
645 
646     if (!pwd || ( i != AFP_OK && i != AFPERR_PWDEXPR))
647         return send_reply(obj, i);
648 
649     return send_reply(obj, login(obj, pwd, afp_uam->u.uam_login.logout, ((i==AFPERR_PWDEXPR)?1:0)));
650 }
651 
652 /* ---------------------- */
afp_login_ext(AFPObj * obj,char * ibuf,size_t ibuflen,char * rbuf,size_t * rbuflen)653 int afp_login_ext(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_t *rbuflen)
654 {
655     struct passwd *pwd = NULL;
656     size_t  len;
657     int     i;
658     char        type;
659     uint16_t   len16;
660     char        *username;
661 
662     *rbuflen = 0;
663 
664     if ( nologin & 1)
665         return send_reply(obj, AFPERR_SHUTDOWN );
666 
667     if (ibuflen < 5)
668         return send_reply(obj, AFPERR_BADVERS );
669 
670     ibuf++;
671     ibuf++;     /* pad  */
672     ibuf +=2;   /* flag */
673 
674     len = (unsigned char) *ibuf;
675     ibuf++;
676     ibuflen -= 5;
677 
678     i = get_version(obj, ibuf, ibuflen, len);
679     if (i)
680         return send_reply(obj, i );
681 
682     if (ibuflen <= len)
683         return send_reply(obj, AFPERR_BADUAM);
684 
685     ibuf    += len;
686     ibuflen -= len;
687 
688     len = (unsigned char) *ibuf;
689     ibuf++;
690     ibuflen--;
691 
692     if (!len || len > ibuflen)
693         return send_reply(obj, AFPERR_BADUAM);
694 
695     if ((afp_uam = auth_uamfind(UAM_SERVER_LOGIN, ibuf, len)) == NULL)
696         return send_reply(obj, AFPERR_BADUAM);
697     ibuf    += len;
698     ibuflen -= len;
699 
700     if (!afp_uam->u.uam_login.login_ext) {
701         LOG(log_error, logtype_afpd, "login_ext: uam %s not AFP 3 ready!", afp_uam->uam_name );
702         return send_reply(obj, AFPERR_BADUAM);
703     }
704     /* user name */
705     if (ibuflen <= 1 +sizeof(len16))
706         return send_reply(obj, AFPERR_PARAM);
707     type = *ibuf;
708     username = ibuf;
709     ibuf++;
710     ibuflen--;
711     if (type != 3)
712         return send_reply(obj, AFPERR_PARAM);
713 
714     memcpy(&len16, ibuf, sizeof(len16));
715     ibuf += sizeof(len16);
716     ibuflen -= sizeof(len16);
717     len = ntohs(len16);
718     if (len > ibuflen)
719         return send_reply(obj, AFPERR_PARAM);
720     ibuf += len;
721     ibuflen -= len;
722 
723     /* directory service name */
724     if (!ibuflen)
725         return send_reply(obj, AFPERR_PARAM);
726     type = *ibuf;
727     ibuf++;
728     ibuflen--;
729 
730     switch(type) {
731     case 1:
732     case 2:
733         if (!ibuflen)
734             return send_reply(obj, AFPERR_PARAM);
735         len = (unsigned char) *ibuf;
736         ibuf++;
737         ibuflen--;
738         break;
739     case 3:
740         /* With "No User Authen" it is equal */
741         if (ibuflen < sizeof(len16))
742             return send_reply(obj, AFPERR_PARAM);
743         memcpy(&len16, ibuf, sizeof(len16));
744         ibuf += sizeof(len16);
745         ibuflen -= sizeof(len16);
746         len = ntohs(len16);
747         break;
748     default:
749         return send_reply(obj, AFPERR_PARAM);
750     }
751 #if 0
752     if (len != 0) {
753         LOG(log_error, logtype_afpd, "login_ext: directory service path not null!" );
754         return send_reply(obj, AFPERR_PARAM);
755     }
756 #endif
757     ibuf += len;
758     ibuflen -= len;
759 
760     /* Pad */
761     if (ibuflen && ((unsigned long) ibuf & 1)) { /* pad character */
762         ibuf++;
763         ibuflen--;
764     }
765 
766     if (AFP_OK != (i = create_session_key(obj)) ) {
767         return send_reply(obj, i);
768     }
769 
770     /* FIXME user name are in UTF8 */
771     i = afp_uam->u.uam_login.login_ext(obj, username, &pwd, ibuf, ibuflen, rbuf, rbuflen);
772 
773     if (!pwd || ( i != AFP_OK && i != AFPERR_PWDEXPR))
774         return send_reply(obj, i);
775 
776     return send_reply(obj, login(obj, pwd, afp_uam->u.uam_login.logout, ((i==AFPERR_PWDEXPR)?1:0)));
777 }
778 
779 /* ---------------------- */
afp_logincont(AFPObj * obj,char * ibuf,size_t ibuflen,char * rbuf,size_t * rbuflen)780 int afp_logincont(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_t *rbuflen)
781 {
782     struct passwd *pwd = NULL;
783     int err;
784 
785     if ( afp_uam == NULL || afp_uam->u.uam_login.logincont == NULL || ibuflen < 2 ) {
786         *rbuflen = 0;
787         return send_reply(obj, AFPERR_NOTAUTH );
788     }
789 
790     ibuf += 2; ibuflen -= 2;
791     err = afp_uam->u.uam_login.logincont(obj, &pwd, ibuf, ibuflen,
792                                          rbuf, rbuflen);
793     if (!pwd || ( err != AFP_OK && err != AFPERR_PWDEXPR))
794         return send_reply(obj, err);
795 
796     return send_reply(obj, login(obj, pwd, afp_uam->u.uam_login.logout, ((err==AFPERR_PWDEXPR)?1:0)));
797 }
798 
799 
afp_logout(AFPObj * obj,char * ibuf _U_,size_t ibuflen _U_,char * rbuf _U_,size_t * rbuflen)800 int afp_logout(AFPObj *obj, char *ibuf _U_, size_t ibuflen  _U_, char *rbuf  _U_, size_t *rbuflen)
801 {
802     DSI *dsi = (DSI *)(obj->dsi);
803 
804     LOG(log_note, logtype_afpd, "AFP logout by %s", obj->username);
805     of_close_all_forks(obj);
806     close_all_vol(obj);
807     dsi->flags = DSI_AFP_LOGGED_OUT;
808     *rbuflen = 0;
809 
810     /* Send FCE login event */
811     fce_register(obj, FCE_LOGOUT, "", NULL);
812 
813     return AFP_OK;
814 }
815 
816 
817 
818 /* change password  --
819  * NOTE: an FPLogin must already have completed successfully for this
820  *       to work. this also does a little pre-processing before it hands
821  *       it off to the uam.
822  */
afp_changepw(AFPObj * obj,char * ibuf,size_t ibuflen,char * rbuf,size_t * rbuflen)823 int afp_changepw(AFPObj *obj, char *ibuf, size_t ibuflen, char *rbuf, size_t *rbuflen)
824 {
825     char username[MACFILELEN + 1], *start = ibuf;
826     struct uam_obj *uam;
827     struct passwd *pwd;
828     size_t len;
829     int    ret;
830 
831     *rbuflen = 0;
832     ibuf += 2;
833 
834     /* check if password change is allowed, OS-X ignores the flag.
835      * we shouldn't trust the client on this anyway.
836      * not sure about the "right" error code, NOOP for now */
837     if (!(obj->options.passwdbits & PASSWD_SET))
838         return AFPERR_NOOP;
839 
840     /* make sure we can deal w/ this uam */
841     len = (unsigned char) *ibuf++;
842     if ((uam = auth_uamfind(UAM_SERVER_CHANGEPW, ibuf, len)) == NULL)
843         return AFPERR_BADUAM;
844 
845     ibuf += len;
846     if ((len + 1) & 1) /* pad byte */
847         ibuf++;
848 
849     if (obj->afp_version < 30) {
850         len = (unsigned char) *ibuf++;
851         if ( len > sizeof(username) - 1) {
852             return AFPERR_PARAM;
853         }
854         memcpy(username, ibuf, len);
855         username[ len ] = '\0';
856         ibuf += len;
857         if ((len + 1) & 1) /* pad byte */
858             ibuf++;
859     } else {
860         /* AFP > 3.0 doesn't pass the username, APF 3.1 specs page 124 */
861         if ( ibuf[0] != '\0' || ibuf[1] != '\0')
862             return AFPERR_PARAM;
863         ibuf += 2;
864         len = MIN(sizeof(username) - 1, strlen(obj->username));
865         memcpy(username, obj->username, len);
866         username[ len ] = '\0';
867     }
868 
869 
870     LOG(log_info, logtype_afpd, "changing password for <%s>", username);
871 
872     if (( pwd = uam_getname( obj, username, sizeof(username))) == NULL )
873         return AFPERR_PARAM;
874 
875     /* send it off to the uam. we really don't use ibuflen right now. */
876     if (ibuflen < (size_t)(ibuf - start))
877         return AFPERR_PARAM;
878 
879     ibuflen -= (ibuf - start);
880     ret = uam->u.uam_changepw(obj, username, pwd, ibuf, ibuflen,
881                               rbuf, rbuflen);
882     LOG(log_info, logtype_afpd, "password change %s.",
883         (ret == AFPERR_AUTHCONT) ? "continued" :
884         (ret ? "failed" : "succeeded"));
885     if ( ret == AFP_OK )
886         set_auth_switch(obj, 0);
887 
888     return ret;
889 }
890 
891 
892 /* FPGetUserInfo */
afp_getuserinfo(AFPObj * obj _U_,char * ibuf,size_t ibuflen _U_,char * rbuf,size_t * rbuflen)893 int afp_getuserinfo(AFPObj *obj _U_, char *ibuf, size_t ibuflen _U_, char *rbuf, size_t *rbuflen)
894 {
895     uint8_t  thisuser;
896     uint32_t id;
897     uint16_t bitmap;
898     char *bitmapp;
899 
900     LOG(log_debug, logtype_afpd, "begin afp_getuserinfo:");
901 
902     *rbuflen = 0;
903     ibuf++;
904     thisuser = *ibuf++;
905     ibuf += sizeof(id); /* userid is not used in AFP 2.0 */
906     memcpy(&bitmap, ibuf, sizeof(bitmap));
907     bitmap = ntohs(bitmap);
908 
909     /* deal with error cases. we don't have to worry about
910      * AFPERR_ACCESS or AFPERR_NOITEM as geteuid and getegid always
911      * succeed. */
912     if (!thisuser)
913         return AFPERR_PARAM;
914     if ((bitmap & USERIBIT_ALL) != bitmap)
915         return AFPERR_BITMAP;
916 
917     /* remember place where we store the possibly modified bitmap later */
918     memcpy(rbuf, ibuf, sizeof(bitmap));
919     bitmapp = rbuf;
920     rbuf += sizeof(bitmap);
921     *rbuflen = sizeof(bitmap);
922 
923     /* copy the user/group info */
924     if (bitmap & USERIBIT_USER) {
925         id = htonl(geteuid());
926         memcpy(rbuf, &id, sizeof(id));
927         rbuf += sizeof(id);
928         *rbuflen += sizeof(id);
929     }
930 
931     if (bitmap & USERIBIT_GROUP) {
932         id = htonl(getegid());
933         memcpy(rbuf, &id, sizeof(id));
934         rbuf += sizeof(id);
935         *rbuflen += sizeof(id);
936     }
937 
938     if (bitmap & USERIBIT_UUID) {
939         if ( ! (obj->options.flags & OPTION_UUID)) {
940             bitmap &= ~USERIBIT_UUID;
941             bitmap = htons(bitmap);
942             memcpy(bitmapp, &bitmap, sizeof(bitmap));
943         } else {
944             LOG(log_debug, logtype_afpd, "afp_getuserinfo: get UUID for \'%s\'", obj->username);
945             int ret;
946             atalk_uuid_t uuid;
947             ret = getuuidfromname( obj->username, UUID_USER, uuid);
948             if (ret != 0) {
949                 LOG(log_info, logtype_afpd, "afp_getuserinfo: error getting UUID !");
950                 return AFPERR_NOITEM;
951             }
952             LOG(log_debug, logtype_afpd, "afp_getuserinfo: got UUID: %s", uuid_bin2string(uuid));
953 
954             memcpy(rbuf, uuid, UUID_BINSIZE);
955             rbuf += UUID_BINSIZE;
956             *rbuflen += UUID_BINSIZE;
957         }
958     }
959 
960     LOG(log_debug, logtype_afpd, "END afp_getuserinfo:");
961     return AFP_OK;
962 }
963 
964 #define UAM_LIST(type) (((type) == UAM_SERVER_LOGIN || (type) == UAM_SERVER_LOGIN_EXT) ? &uam_login : \
965                         (((type) == UAM_SERVER_CHANGEPW) ?              \
966                          &uam_changepw : NULL))
967 
968 /* just do a linked list search. this could be sped up with a hashed
969  * list, but i doubt anyone's going to have enough uams to matter. */
auth_uamfind(const int type,const char * name,const int len)970 struct uam_obj *auth_uamfind(const int type, const char *name,
971                              const int len)
972 {
973     struct uam_obj *prev, *start;
974 
975     if (!name || !(start = UAM_LIST(type)))
976         return NULL;
977 
978     prev = start;
979     while ((prev = prev->uam_prev) != start)
980         if (strndiacasecmp(prev->uam_name, name, len) == 0)
981             return prev;
982 
983     return NULL;
984 }
985 
auth_register(const int type,struct uam_obj * uam)986 int auth_register(const int type, struct uam_obj *uam)
987 {
988     struct uam_obj *start;
989 
990     if (!uam || !uam->uam_name || (*uam->uam_name == '\0'))
991         return -1;
992 
993     if (!(start = UAM_LIST(type)))
994         return 1; /* we don't know what to do with it, caller must free it */
995 
996     uam_attach(start, uam);
997     return 0;
998 }
999 
1000 /* load all of the modules */
auth_load(AFPObj * obj,const char * path,const char * list)1001 int auth_load(AFPObj *obj, const char *path, const char *list)
1002 {
1003     char name[MAXPATHLEN + 1], buf[MAXPATHLEN + 1], *p, *last;
1004     struct uam_mod *mod;
1005     struct stat st;
1006     size_t len;
1007 
1008     if (!path || !*path || !list || (len = strlen(path)) > sizeof(name) - 2)
1009         return -1;
1010 
1011     LOG(log_debug, logtype_afpd, "auth_load: %s, %s", path, list);
1012 
1013     strlcpy(buf, list, sizeof(buf));
1014     if ((p = strtok_r(buf, ", ", &last)) == NULL)
1015         return -1;
1016 
1017     strcpy(name, path);
1018     if (name[len - 1] != '/') {
1019         strcat(name, "/");
1020         len++;
1021     }
1022 
1023     while (p) {
1024         strlcpy(name + len, p, sizeof(name) - len);
1025         LOG(log_debug, logtype_afpd, "uam: loading (%s)", name);
1026         /*
1027           if ((stat(name, &st) == 0) && (mod = uam_load(name, p))) {
1028         */
1029         if (stat(name, &st) == 0) {
1030             if ((mod = uam_load(obj, name, p))) {
1031                 uam_attach(&uam_modules, mod);
1032                 LOG(log_debug, logtype_afpd, "uam: %s loaded", p);
1033             } else {
1034                 LOG(log_error, logtype_afpd, "uam: %s load failure",p);
1035             }
1036         } else {
1037             LOG(log_info, logtype_afpd, "uam: uam not found (status=%d)", stat(name, &st));
1038         }
1039         p = strtok_r(NULL, ", ", &last);
1040     }
1041 
1042     return 0;
1043 }
1044 
1045 /* get rid of all of the uams */
auth_unload(void)1046 void auth_unload(void)
1047 {
1048     struct uam_mod *mod, *prev, *start = &uam_modules;
1049 
1050     prev = start->uam_prev;
1051     while ((mod = prev) != start) {
1052         prev = prev->uam_prev;
1053         uam_detach(mod);
1054         uam_unload(mod);
1055     }
1056 }
1057