git.gag.com Git - debian/sudo/blob - auth/rfc1938.c

   1 /*
   2  * Copyright (c) 1994-1996, 1998-1999, 2001, 2003
   3  *      Todd C. Miller <Todd.Miller@courtesan.com>.
   4  *
   5  * Permission to use, copy, modify, and distribute this software for any
   6  * purpose with or without fee is hereby granted, provided that the above
   7  * copyright notice and this permission notice appear in all copies.
   8  *
   9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  16  *
  17  * Sponsored in part by the Defense Advanced Research Projects
  18  * Agency (DARPA) and Air Force Research Laboratory, Air Force
  19  * Materiel Command, USAF, under agreement number F39502-99-1-0512.
  20  */
  21
  22 #include "config.h"
  23
  24 #include <sys/types.h>
  25 #include <sys/param.h>
  26 #include <stdio.h>
  27 #ifdef STDC_HEADERS
  28 # include <stdlib.h>
  29 # include <stddef.h>
  30 #else
  31 # ifdef HAVE_STDLIB_H
  32 #  include <stdlib.h>
  33 # endif
  34 #endif /* STDC_HEADERS */
  35 #ifdef HAVE_STRING_H
  36 # include <string.h>
  37 #else
  38 # ifdef HAVE_STRINGS_H
  39 #  include <strings.h>
  40 # endif
  41 #endif /* HAVE_STRING_H */
  42 #ifdef HAVE_UNISTD_H
  43 # include <unistd.h>
  44 #endif /* HAVE_UNISTD_H */
  45 #ifdef HAVE_ERR_H
  46 # include <err.h>
  47 #else
  48 # include "emul/err.h"
  49 #endif /* HAVE_ERR_H */
  50 #include <pwd.h>
  51
  52 #if defined(HAVE_SKEY)
  53 # include <skey.h>
  54 # define RFC1938                                skey
  55 #  ifdef __NetBSD__
  56 #   define rfc1938challenge(a,b,c,d)    skeychallenge((a),(b),(c),(d))
  57 #  else
  58 #   define rfc1938challenge(a,b,c,d)    skeychallenge((a),(b),(c))
  59 #  endif
  60 # define rfc1938verify(a,b)             skeyverify((a),(b))
  61 #elif defined(HAVE_OPIE)
  62 # include <opie.h>
  63 # define RFC1938                        opie
  64 # define rfc1938challenge(a,b,c,d)      opiechallenge((a),(b),(c))
  65 # define rfc1938verify(a,b)             opieverify((a),(b))
  66 #endif
  67
  68 #include "sudo.h"
  69 #include "sudo_auth.h"
  70
  71 #ifndef lint
  72 static const char rcsid[] = "$Sudo: rfc1938.c,v 1.16 2004/02/13 21:36:47 millert Exp $";
  73 #endif /* lint */
  74
  75 int
  76 rfc1938_setup(pw, promptp, auth)
  77     struct passwd *pw;
  78     char **promptp;
  79     sudo_auth *auth;
  80 {
  81     char challenge[256];
  82     static char *orig_prompt = NULL, *new_prompt = NULL;
  83     static int op_len, np_size;
  84     static struct RFC1938 rfc1938;
  85
  86     /* Stash a pointer to the rfc1938 struct if we have not initialized */
  87     if (!auth->data)
  88         auth->data = &rfc1938;
  89
  90     /* Save the original prompt */
  91     if (orig_prompt == NULL) {
  92         orig_prompt = *promptp;
  93         op_len = strlen(orig_prompt);
  94
  95         /* Ignore trailing colon (we will add our own) */
  96         if (orig_prompt[op_len - 1] == ':')
  97             op_len--;
  98         else if (op_len >= 2 && orig_prompt[op_len - 1] == ' '
  99             && orig_prompt[op_len - 2] == ':')
 100             op_len -= 2;
 101     }
 102
 103 #ifdef HAVE_SKEY
 104     /* Close old stream */
 105     if (rfc1938.keyfile)
 106         (void) fclose(rfc1938.keyfile);
 107 #endif
 108
 109     /*
 110      * Look up the user and get the rfc1938 challenge.
 111      * If the user is not in the OTP db, only post a fatal error if
 112      * we are running alone (since they may just use a normal passwd).
 113      */
 114     if (rfc1938challenge(&rfc1938, pw->pw_name, challenge, sizeof(challenge))) {
 115         if (IS_ONEANDONLY(auth)) {
 116             warnx("you do not exist in the %s database", auth->name);
 117             return(AUTH_FATAL);
 118         } else {
 119             return(AUTH_FAILURE);
 120         }
 121     }
 122
 123     /* Get space for new prompt with embedded challenge */
 124     if (np_size < op_len + strlen(challenge) + 7) {
 125         np_size = op_len + strlen(challenge) + 7;
 126         new_prompt = (char *) erealloc(new_prompt, np_size);
 127     }
 128
 129     if (def_long_otp_prompt)
 130         (void) snprintf(new_prompt, np_size, "%s\n%s", challenge, orig_prompt);
 131     else
 132         (void) snprintf(new_prompt, np_size, "%.*s [ %s ]:", op_len,
 133             orig_prompt, challenge);
 134
 135     *promptp = new_prompt;
 136     return(AUTH_SUCCESS);
 137 }
 138
 139 int
 140 rfc1938_verify(pw, pass, auth)
 141     struct passwd *pw;
 142     char *pass;
 143     sudo_auth *auth;
 144 {
 145
 146     if (rfc1938verify((struct RFC1938 *) auth->data, pass) == 0)
 147         return(AUTH_SUCCESS);
 148     else
 149         return(AUTH_FAILURE);
 150 }