Update upstream slirp
[qemu/ar7.git] / tests / test-authz-pam.c
blob93d5ac8bbfa2754375ae66d100ea4957db288b3e
1 /*
2 * QEMU PAM authorization object tests
4 * Copyright (c) 2018 Red Hat, Inc.
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 of the License, or (at your option) any later version.
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.
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/>.
21 #include "qemu/osdep.h"
22 #include "qapi/error.h"
23 #include "authz/pamacct.h"
25 #include <security/pam_appl.h>
27 static bool failauth;
30 * These two functions are exported by libpam.so.
32 * By defining them again here, our impls are resolved
33 * by the linker instead of those in libpam.so
35 * The test suite is thus isolated from the host system
36 * PAM setup, so we can do predictable test scenarios
38 int
39 pam_start(const char *service_name, const char *user,
40 const struct pam_conv *pam_conversation,
41 pam_handle_t **pamh)
43 failauth = true;
44 if (!g_str_equal(service_name, "qemu-vnc")) {
45 return PAM_AUTH_ERR;
48 if (g_str_equal(user, "fred")) {
49 failauth = false;
52 return PAM_SUCCESS;
56 int
57 pam_acct_mgmt(pam_handle_t *pamh, int flags)
59 if (failauth) {
60 return PAM_AUTH_ERR;
63 return PAM_SUCCESS;
67 static void test_authz_unknown_service(void)
69 Error *local_err = NULL;
70 QAuthZPAM *auth = qauthz_pam_new("auth0",
71 "qemu-does-not-exist",
72 &error_abort);
74 g_assert_nonnull(auth);
76 g_assert_false(qauthz_is_allowed(QAUTHZ(auth), "fred", &local_err));
78 error_free_or_abort(&local_err);
79 object_unparent(OBJECT(auth));
83 static void test_authz_good_user(void)
85 QAuthZPAM *auth = qauthz_pam_new("auth0",
86 "qemu-vnc",
87 &error_abort);
89 g_assert_nonnull(auth);
91 g_assert_true(qauthz_is_allowed(QAUTHZ(auth), "fred", &error_abort));
93 object_unparent(OBJECT(auth));
97 static void test_authz_bad_user(void)
99 Error *local_err = NULL;
100 QAuthZPAM *auth = qauthz_pam_new("auth0",
101 "qemu-vnc",
102 &error_abort);
104 g_assert_nonnull(auth);
106 g_assert_false(qauthz_is_allowed(QAUTHZ(auth), "bob", &local_err));
108 error_free_or_abort(&local_err);
109 object_unparent(OBJECT(auth));
113 int main(int argc, char **argv)
115 g_test_init(&argc, &argv, NULL);
117 module_call_init(MODULE_INIT_QOM);
119 g_test_add_func("/auth/pam/unknown-service", test_authz_unknown_service);
120 g_test_add_func("/auth/pam/good-user", test_authz_good_user);
121 g_test_add_func("/auth/pam/bad-user", test_authz_bad_user);
123 return g_test_run();