lib/libpam/libpam/pam_debug_log.c

   1 /*-
   2  * Copyright 2001 Mark R V Murray
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  *
  26  * $FreeBSD$
  27  */
  28
  29 #include <security/pam_modules.h>
  30 #include <libgen.h>
  31 #include <stdarg.h>
  32 #include <stdio.h>
  33 #include <stdlib.h>
  34 #include <string.h>
  35 #include <syslog.h>
  36
  37 #include "pam_mod_misc.h"
  38
  39 #define FMTBUFSIZ       256
  40
  41 static char *modulename(const char *);
  42
  43 /* Log a debug message, including the function name and a
  44  * cleaned up filename.
  45  */
  46 void
  47 _pam_log(struct options *options, const char *file, const char *function,
  48     const char *format, ...)
  49 {
  50         va_list ap;
  51         char *fmtbuf, *modname;
  52
  53         if (pam_test_option(options, PAM_OPT_DEBUG, NULL)) {
  54                 modname = modulename(file);
  55                 va_start(ap, format);
  56                 asprintf(&fmtbuf, "%s: %s: %s", modname, function, format);
  57                 vsyslog(LOG_DEBUG, fmtbuf, ap);
  58                 free(fmtbuf);
  59                 va_end(ap);
  60         }
  61 }
  62
  63 /* Log a return value, including the function name and a
  64  * cleaned up filename.
  65  */
  66 void
  67 _pam_log_retval(struct options *options, const char *file, const char *function,
  68     int retval)
  69 {
  70         char *modname;
  71
  72         if (pam_test_option(options, PAM_OPT_DEBUG, NULL)) {
  73                 modname = modulename(file);
  74
  75                 switch (retval) {
  76                 case PAM_SUCCESS:
  77                         syslog(LOG_DEBUG, "%s: %s: returning PAM_SUCCESS",
  78                             modname, function);
  79                         break;
  80                 case PAM_AUTH_ERR:
  81                         syslog(LOG_DEBUG, "%s: %s: returning PAM_AUTH_ERR",
  82                             modname, function);
  83                         break;
  84                 case PAM_IGNORE:
  85                         syslog(LOG_DEBUG, "%s: %s: returning PAM_IGNORE",
  86                             modname, function);
  87                         break;
  88                 default:
  89                         syslog(LOG_DEBUG, "%s: %s: returning (%d)",
  90                             modname, function, retval);
  91                 }
  92
  93                 free(modname);
  94         }
  95 }
  96
  97 /* Print a verbose error, including the function name and a
  98  * cleaned up filename.
  99  */
 100 void
 101 _pam_verbose_error(pam_handle_t *pamh, struct options *options,
 102     const char *file, const char *function, const char *format, ...)
 103 {
 104         va_list ap;
 105         char *statusmsg, *fmtbuf, *modname;
 106
 107         if (!pam_test_option(options, PAM_OPT_NO_WARN, NULL)) {
 108                 modname = modulename(file);
 109                 va_start(ap, format);
 110                 asprintf(&fmtbuf, "%s: %s: %s", modname, function, format);
 111                 vasprintf(&statusmsg, fmtbuf, ap);
 112                 pam_prompt(pamh, PAM_ERROR_MSG, statusmsg, NULL);
 113                 free(statusmsg);
 114                 free(fmtbuf);
 115                 va_end(ap);
 116         }
 117 }
 118
 119 static char *
 120 modulename(const char *file)
 121 {
 122         char *modname, *period;
 123
 124         modname = strdup(basename(file));
 125         period = strchr(modname, '.');
 126         if (period != NULL)
 127                 *period = '\0';
 128
 129         return modname;
 130 }