authz/pamacct.c

   1 /*
   2  * QEMU PAM authorization driver
   3  *
   4  * Copyright (c) 2018 Red Hat, Inc.
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
  18  *
  19  */
  20
  21 #include "qemu/osdep.h"
  22 #include "authz/pamacct.h"
  23 #include "trace.h"
  24 #include "qemu/module.h"
  25 #include "qom/object_interfaces.h"
  26
  27 #include <security/pam_appl.h>
  28
  29
  30 static bool qauthz_pam_is_allowed(QAuthZ *authz,
  31                                   const char *identity,
  32                                   Error **errp)
  33 {
  34     QAuthZPAM *pauthz = QAUTHZ_PAM(authz);
  35     const struct pam_conv pam_conversation = { 0 };
  36     pam_handle_t *pamh = NULL;
  37     int ret;
  38
  39     trace_qauthz_pam_check(authz, identity, pauthz->service);
  40     ret = pam_start(pauthz->service,
  41                     identity,
  42                     &pam_conversation,
  43                     &pamh);
  44     if (ret != PAM_SUCCESS) {
  45         error_setg(errp, "Unable to start PAM transaction: %s",
  46                    pam_strerror(NULL, ret));
  47         return false;
  48     }
  49
  50     ret = pam_acct_mgmt(pamh, PAM_SILENT);
  51     pam_end(pamh, ret);
  52     if (ret != PAM_SUCCESS) {
  53         error_setg(errp, "Unable to authorize user '%s': %s",
  54                    identity, pam_strerror(pamh, ret));
  55         return false;
  56     }
  57
  58     return true;
  59 }
  60
  61
  62 static void
  63 qauthz_pam_prop_set_service(Object *obj,
  64                             const char *service,
  65                             Error **errp G_GNUC_UNUSED)
  66 {
  67     QAuthZPAM *pauthz = QAUTHZ_PAM(obj);
  68
  69     g_free(pauthz->service);
  70     pauthz->service = g_strdup(service);
  71 }
  72
  73
  74 static char *
  75 qauthz_pam_prop_get_service(Object *obj,
  76                             Error **errp G_GNUC_UNUSED)
  77 {
  78     QAuthZPAM *pauthz = QAUTHZ_PAM(obj);
  79
  80     return g_strdup(pauthz->service);
  81 }
  82
  83
  84 static void
  85 qauthz_pam_complete(UserCreatable *uc, Error **errp)
  86 {
  87 }
  88
  89
  90 static void
  91 qauthz_pam_finalize(Object *obj)
  92 {
  93     QAuthZPAM *pauthz = QAUTHZ_PAM(obj);
  94
  95     g_free(pauthz->service);
  96 }
  97
  98
  99 static void
 100 qauthz_pam_class_init(ObjectClass *oc, void *data)
 101 {
 102     UserCreatableClass *ucc = USER_CREATABLE_CLASS(oc);
 103     QAuthZClass *authz = QAUTHZ_CLASS(oc);
 104
 105     ucc->complete = qauthz_pam_complete;
 106     authz->is_allowed = qauthz_pam_is_allowed;
 107
 108     object_class_property_add_str(oc, "service",
 109                                   qauthz_pam_prop_get_service,
 110                                   qauthz_pam_prop_set_service);
 111 }
 112
 113
 114 QAuthZPAM *qauthz_pam_new(const char *id,
 115                           const char *service,
 116                           Error **errp)
 117 {
 118     return QAUTHZ_PAM(
 119         object_new_with_props(TYPE_QAUTHZ_PAM,
 120                               object_get_objects_root(),
 121                               id, errp,
 122                               "service", service,
 123                               NULL));
 124 }
 125
 126
 127 static const TypeInfo qauthz_pam_info = {
 128     .parent = TYPE_QAUTHZ,
 129     .name = TYPE_QAUTHZ_PAM,
 130     .instance_size = sizeof(QAuthZPAM),
 131     .instance_finalize = qauthz_pam_finalize,
 132     .class_init = qauthz_pam_class_init,
 133     .interfaces = (InterfaceInfo[]) {
 134         { TYPE_USER_CREATABLE },
 135         { }
 136     }
 137 };
 138
 139
 140 static void
 141 qauthz_pam_register_types(void)
 142 {
 143     type_register_static(&qauthz_pam_info);
 144 }
 145
 146
 147 type_init(qauthz_pam_register_types);