git.sur5r.net Git - openldap/blob - libraries/liblutil/getpass.c

   1 /* getpass.c -- get password from user */
   2 /* $OpenLDAP$ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 1998-2006 The OpenLDAP Foundation.
   6  * Portions Copyright 1998-2003 Kurt D. Zeilenga.
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted only as authorized by the OpenLDAP
  11  * Public License.
  12  *
  13  * A copy of this license is available in the file LICENSE in the
  14  * top-level directory of the distribution or, alternatively, at
  15  * <http://www.OpenLDAP.org/license.html>.
  16  */
  17 /* Portions Copyright (c) 1992, 1993  Regents of the University of Michigan.
  18  * All rights reserved.
  19  *
  20  * Redistribution and use in source and binary forms are permitted
  21  * provided that this notice is preserved and that due credit is given
  22  * to the University of Michigan at Ann Arbor. The name of the University
  23  * may not be used to endorse or promote products derived from this
  24  * software without specific prior written permission. This software
  25  * is provided ``as is'' without express or implied warranty.
  26  */
  27 /* This work was originally developed by the University of Michigan
  28  * and distributed as part of U-MICH LDAP.  It was adapted for use in
  29  * -llutil by Kurt D. Zeilenga.
  30  */
  31
  32 #include "portable.h"
  33
  34 #include <stdio.h>
  35
  36 #include <ac/stdlib.h>
  37
  38 #include <ac/ctype.h>
  39 #include <ac/signal.h>
  40 #include <ac/string.h>
  41 #include <ac/termios.h>
  42 #include <ac/time.h>
  43 #include <ac/unistd.h>
  44
  45 #ifdef NEED_GETPASSPHRASE
  46
  47 #ifdef HAVE_FCNTL_H
  48 #include <fcntl.h>
  49 #endif
  50
  51 #ifdef HAVE_CONIO_H
  52 #include <conio.h>
  53 #endif
  54
  55 #include <lber.h>
  56 #include <ldap.h>
  57
  58 #include "ldap_defaults.h"
  59
  60 char *
  61 lutil_getpass( const char *prompt )
  62 {
  63 #if !defined(HAVE_POSIX_TERMIOS) && !defined(HAVE_SGTTY_H)
  64         static char buf[256];
  65         int i, c;
  66
  67         if( prompt == NULL ) prompt = _("Password: ");
  68
  69 #ifdef DEBUG
  70         if (debug & D_TRACE)
  71                 printf("->getpass(%s)\n", prompt);
  72 #endif
  73
  74         printf("%s", prompt);
  75         i = 0;
  76         while ( (c = getch()) != EOF && c != '\n' && c != '\r' )
  77                 buf[i++] = c;
  78         if ( c == EOF )
  79                 return( NULL );
  80         buf[i] = '\0';
  81         return (buf);
  82 #else
  83         int no_pass = 0;
  84         char i, j, k;
  85         TERMIO_TYPE ttyb;
  86         TERMFLAG_TYPE flags;
  87         static char pbuf[513];
  88         register char *p;
  89         register int c;
  90         FILE *fi;
  91         RETSIGTYPE (*sig)( int sig );
  92
  93         if( prompt == NULL ) prompt = _("Password: ");
  94
  95 #ifdef DEBUG
  96         if (debug & D_TRACE)
  97                 printf("->getpass(%s)\n", prompt);
  98 #endif
  99         /*
 100          *  Stolen from the getpass() routine.  Can't use the plain
 101          *  getpass() for two reasons.  One is that LDAP passwords
 102          *  can be really, really long - much longer than 8 chars.
 103          *  The second is that we like to make this client available
 104          *  out of inetd via a Merit asynch port, and we need to be
 105          *  able to do telnet control codes to turn on and off line
 106          *  blanking.
 107          */
 108         if ((fi = fdopen(open("/dev/tty", 2), "r")) == NULL)
 109                 fi = stdin;
 110         else
 111                 setbuf(fi, (char *)NULL);
 112         sig = SIGNAL (SIGINT, SIG_IGN);
 113         if (fi != stdin) {
 114                 if (GETATTR(fileno(fi), &ttyb) < 0)
 115                         perror("GETATTR");
 116         }
 117         flags = GETFLAGS( ttyb );
 118         SETFLAGS( ttyb, flags & ~ECHO );
 119         if (fi != stdin) {
 120                 if (SETATTR(fileno(fi), &ttyb) < 0)
 121                         perror("SETATTR");
 122         }
 123
 124         /*  blank the line if through Merit */
 125         if (fi == stdin) {
 126                 printf("%c%c%c", 255, 251, 1);
 127                 fflush(stdout);
 128                 (void) scanf("%c%c%c", &i, &j, &k);
 129                 fflush(stdin);
 130         }
 131
 132         /* fetch the password */
 133         fprintf(stdout, "%s", prompt);
 134         fflush(stdout);
 135         for (p=pbuf; (c = getc(fi))!='\n' && c!=EOF;) {
 136                 if (c == '\r')
 137                         break;
 138                 if (p < &pbuf[512])
 139                         *p++ = c;
 140         }
 141         if (c == EOF)
 142                 no_pass = 1;
 143         else {
 144                 *p = '\0';
 145                 if (*(p - 1) == '\r')
 146                         *(p - 1) = '\0';
 147         }
 148
 149         /*  unblank the line if through Merit */
 150         if (fi == stdin) {
 151                 printf("%c%c%c", 255, 252, 1);
 152                 fflush(stdout);
 153                 (void) scanf("%c%c%c", &i, &j, &k);
 154                 fflush(stdin);
 155                 printf("\n"); fflush(stdout);
 156         }
 157         fprintf(stdout, "\n");
 158         fflush(stdout);
 159
 160         /* tidy up */
 161         SETFLAGS( ttyb, flags );
 162         if (fi != stdin) {
 163                 if (SETATTR(fileno(fi), &ttyb) < 0)
 164                         perror("SETATTR");
 165         }
 166         (void) SIGNAL (SIGINT, sig);
 167         if (fi != stdin)
 168                 (void) fclose(fi);
 169         else
 170                 i = getchar();
 171         if (no_pass)
 172                 return(NULL);
 173         return(pbuf);
 174 #endif
 175 }
 176
 177 #endif /* !NEED_GETPASSPHRASE */