imapext-2007

annotate src/osdep/unix/log_os4.c @ 0:ada5e610ab86

imap-2007e
author yuuji@gentei.org
date Mon, 14 Sep 2009 15:17:45 +0900
parents
children
rev   line source
yuuji@0 1 /* ========================================================================
yuuji@0 2 * Copyright 1988-2006 University of Washington
yuuji@0 3 *
yuuji@0 4 * Licensed under the Apache License, Version 2.0 (the "License");
yuuji@0 5 * you may not use this file except in compliance with the License.
yuuji@0 6 * You may obtain a copy of the License at
yuuji@0 7 *
yuuji@0 8 * http://www.apache.org/licenses/LICENSE-2.0
yuuji@0 9 *
yuuji@0 10 *
yuuji@0 11 * ========================================================================
yuuji@0 12 */
yuuji@0 13
yuuji@0 14 /*
yuuji@0 15 * Program: OSF/1 (Digital UNIX) 4 login
yuuji@0 16 *
yuuji@0 17 * Author: Mark Crispin
yuuji@0 18 * Networks and Distributed Computing
yuuji@0 19 * Computing & Communications
yuuji@0 20 * University of Washington
yuuji@0 21 * Administration Building, AG-44
yuuji@0 22 * Seattle, WA 98195
yuuji@0 23 * Internet: MRC@CAC.Washington.EDU
yuuji@0 24 *
yuuji@0 25 * Date: 1 August 1988
yuuji@0 26 * Last Edited: 30 August 2006
yuuji@0 27 */
yuuji@0 28
yuuji@0 29 /* Log in
yuuji@0 30 * Accepts: login passwd struct
yuuji@0 31 * argument count
yuuji@0 32 * argument vector
yuuji@0 33 * Returns: T if success, NIL otherwise
yuuji@0 34 */
yuuji@0 35
yuuji@0 36 long loginpw (struct passwd *pw,int argc,char *argv[])
yuuji@0 37 {
yuuji@0 38 int i;
yuuji@0 39 char *s;
yuuji@0 40 char *name = cpystr (pw->pw_name);
yuuji@0 41 char *host = cpystr (tcp_clienthost ());
yuuji@0 42 uid_t uid = pw->pw_uid;
yuuji@0 43 long ret = NIL;
yuuji@0 44 /* tie off address */
yuuji@0 45 if (s = strchr (host,' ')) *s = '\0';
yuuji@0 46 if (*host == '[') { /* convert [a.b.c.d] to a.b.c.d */
yuuji@0 47 memmove (host,host+1,i = strlen (host + 2));
yuuji@0 48 host[i] = '\0';
yuuji@0 49 }
yuuji@0 50 if (sia_become_user (checkpw_collect,argc,argv,host,name,NIL,NIL,NIL,NIL,
yuuji@0 51 SIA_BEU_REALLOGIN|SIA_BEU_OKROOTDIR) != SIASUCCESS)
yuuji@0 52 setreuid (0,0); /* make sure have root again */
yuuji@0 53 /* probable success, complete login */
yuuji@0 54 else ret = (!setreuid (0,0) && !setuid (uid));
yuuji@0 55 fs_give ((void **) &name);
yuuji@0 56 fs_give ((void **) &host);
yuuji@0 57 return ret;
yuuji@0 58 }

UW-IMAP'd extensions by yuuji