pppd/plugins/passprompt.c

   1 /*
   2  * passprompt.c - pppd plugin to invoke an external PAP password prompter
   3  *
   4  * Copyright 1999 Paul Mackerras, Alan Curry.
   5  *
   6  *  This program is free software; you can redistribute it and/or
   7  *  modify it under the terms of the GNU General Public License
   8  *  as published by the Free Software Foundation; either version
   9  *  2 of the License, or (at your option) any later version.
  10  */
  11
  12 #ifdef HAVE_CONFIG_H
  13 #include "config.h"
  14 #endif
  15
  16 #include <errno.h>
  17 #include <unistd.h>
  18 #include <sys/wait.h>
  19 #include <syslog.h>
  20 #include "pppd.h"
  21
  22 char pppd_version[] = VERSION;
  23
  24 static char promptprog[PATH_MAX+1];
  25 static int promptprog_refused = 0;
  26
  27 static option_t options[] = {
  28     { "promptprog", o_string, promptprog,
  29       "External PAP password prompting program",
  30       OPT_STATIC, NULL, PATH_MAX },
  31     { NULL }
  32 };
  33
  34 static int promptpass(char *user, char *passwd)
  35 {
  36     int p[2];
  37     pid_t kid;
  38     int readgood, wstat;
  39     ssize_t red;
  40
  41     if (promptprog_refused || promptprog[0] == 0 || access(promptprog, X_OK) < 0)
  42         return -1;      /* sorry, can't help */
  43
  44     if (!passwd)
  45         return 1;
  46
  47     if (pipe(p)) {
  48         warn("Can't make a pipe for %s", promptprog);
  49         return 0;
  50     }
  51     if ((kid = fork()) == (pid_t) -1) {
  52         warn("Can't fork to run %s", promptprog);
  53         close(p[0]);
  54         close(p[1]);
  55         return 0;
  56     }
  57     if (!kid) {
  58         /* we are the child, exec the program */
  59         char *argv[5], fdstr[32];
  60         sys_close();
  61         closelog();
  62         close(p[0]);
  63         seteuid(getuid());
  64         setegid(getgid());
  65         argv[0] = promptprog;
  66         argv[1] = user;
  67         argv[2] = remote_name;
  68         sprintf(fdstr, "%d", p[1]);
  69         argv[3] = fdstr;
  70         argv[4] = 0;
  71         execv(*argv, argv);
  72         _exit(127);
  73     }
  74
  75     /* we are the parent, read the password from the pipe */
  76     close(p[1]);
  77     readgood = 0;
  78     do {
  79         red = read(p[0], passwd + readgood, MAXSECRETLEN-1 - readgood);
  80         if (red == 0)
  81             break;
  82         if (red < 0) {
  83             if (errno == EINTR && !got_sigterm)
  84                 continue;
  85             error("Can't read secret from %s: %m", promptprog);
  86             readgood = -1;
  87             break;
  88         }
  89         readgood += red;
  90     } while (readgood < MAXSECRETLEN - 1);
  91     close(p[0]);
  92
  93     /* now wait for child to exit */
  94     while (waitpid(kid, &wstat, 0) < 0) {
  95         if (errno != EINTR || got_sigterm) {
  96             warn("error waiting for %s: %m", promptprog);
  97             break;
  98         }
  99     }
 100
 101     if (readgood < 0)
 102         return 0;
 103     passwd[readgood] = 0;
 104     if (!WIFEXITED(wstat))
 105         warn("%s terminated abnormally", promptprog);
 106     if (WEXITSTATUS(wstat)) {
 107             warn("%s exited with code %d", promptprog, WEXITSTATUS(wstat));
 108             /* code when cancel was hit in the prompt prog */
 109             if (WEXITSTATUS(wstat) == 128) {
 110                 promptprog_refused = 1;
 111             }
 112             return -1;
 113     }
 114     return 1;
 115 }
 116
 117 void plugin_init(void)
 118 {
 119     add_options(options);
 120     pap_passwd_hook = promptpass;
 121 #ifdef USE_EAPTLS
 122     eaptls_passwd_hook = promptpass;
 123 #endif
 124 }