Home | History | Annotate | Line # | Download | only in t
      1 /*-
      2  * Copyright (c) 2019 Dag-Erling Smrgrav
      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  * 3. The name of the author may not be used to endorse or promote
     14  *    products derived from this software without specific prior written
     15  *    permission.
     16  *
     17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     27  * SUCH DAMAGE.
     28  */
     29 
     30 #ifdef HAVE_CONFIG_H
     31 # include "config.h"
     32 #endif
     33 
     34 #include <stdint.h>
     35 #include <stdio.h>
     36 #include <unistd.h>
     37 
     38 #include <cryb/test.h>
     39 
     40 #include <security/pam_appl.h>
     41 #include <security/openpam.h>
     42 
     43 #include "t_pam_err.h"
     44 
     45 #define T_ENV_NAME	"MAGIC_WORDS"
     46 #define T_ENV_VALUE	"SQUEAMISH OSSIFRAGE"
     47 #define T_ENV_NAMEVALUE	T_ENV_NAME "=" T_ENV_VALUE
     48 
     49 struct pam_conv t_null_pamc;
     50 
     51 
     52 /***************************************************************************
     54  * Tests
     55  */
     56 
     57 static int
     58 t_env_empty(char **desc CRYB_UNUSED, void *arg CRYB_UNUSED)
     59 {
     60 	pam_handle_t *pamh;
     61 	char **envlist;
     62 	int pam_err, ret;
     63 
     64 	ret = 1;
     65 	pam_err = pam_start("t_pam_env", "test", &t_null_pamc, &pamh);
     66 	t_assert(pam_err == PAM_SUCCESS);
     67 	envlist = pam_getenvlist(pamh);
     68 	ret &= t_is_not_null(envlist);
     69 	if (envlist != NULL) {
     70 		ret &= t_is_null(*envlist);
     71 		openpam_free_envlist(envlist);
     72 	}
     73 	pam_end(pamh, pam_err);
     74 	return (ret);
     75 }
     76 
     77 static int
     78 t_putenv_simple(char **desc CRYB_UNUSED, void *arg CRYB_UNUSED)
     79 {
     80 	pam_handle_t *pamh;
     81 	char **envlist;
     82 	int pam_err, ret;
     83 
     84 	ret = 1;
     85 	pam_err = pam_start("t_pam_env", "test", &t_null_pamc, &pamh);
     86 	t_assert(pam_err == PAM_SUCCESS);
     87 	pam_err = pam_putenv(pamh, T_ENV_NAMEVALUE);
     88 	ret &= t_compare_pam_err(PAM_SUCCESS, pam_err);
     89 	envlist = pam_getenvlist(pamh);
     90 	ret &= t_is_not_null(envlist);
     91 	if (envlist != NULL) {
     92 		ret &= t_compare_str(T_ENV_NAMEVALUE, envlist[0])
     93 		    & t_is_null(envlist[1]);
     94 		openpam_free_envlist(envlist);
     95 	}
     96 	pam_end(pamh, pam_err);
     97 	return (ret);
     98 }
     99 
    100 static int
    101 t_setenv_simple(char **desc CRYB_UNUSED, void *arg CRYB_UNUSED)
    102 {
    103 	pam_handle_t *pamh;
    104 	char **envlist;
    105 	int pam_err, ret;
    106 
    107 	ret = 1;
    108 	pam_err = pam_start("t_pam_env", "test", &t_null_pamc, &pamh);
    109 	t_assert(pam_err == PAM_SUCCESS);
    110 	pam_err = pam_setenv(pamh, T_ENV_NAME, T_ENV_VALUE, 0);
    111 	ret &= t_compare_pam_err(PAM_SUCCESS, pam_err);
    112 	envlist = pam_getenvlist(pamh);
    113 	ret &= t_is_not_null(envlist);
    114 	if (envlist != NULL) {
    115 		ret &= t_compare_str(T_ENV_NAMEVALUE, envlist[0])
    116 		    & t_is_null(envlist[1]);
    117 		openpam_free_envlist(envlist);
    118 	}
    119 	pam_end(pamh, pam_err);
    120 	return (ret);
    121 }
    122 
    123 static int
    124 t_getenv_empty(char **desc CRYB_UNUSED, void *arg CRYB_UNUSED)
    125 {
    126 	pam_handle_t *pamh;
    127 	const char *value;
    128 	int pam_err, ret;
    129 
    130 	ret = 1;
    131 	pam_err = pam_start("t_pam_env", "test", &t_null_pamc, &pamh);
    132 	t_assert(pam_err == PAM_SUCCESS);
    133 	value = pam_getenv(pamh, T_ENV_NAME);
    134 	ret &= t_compare_str(NULL, value);
    135 	pam_end(pamh, pam_err);
    136 	return (ret);
    137 }
    138 
    139 static int
    140 t_getenv_simple_miss(char **desc CRYB_UNUSED, void *arg CRYB_UNUSED)
    141 {
    142 	pam_handle_t *pamh;
    143 	const char *value;
    144 	int pam_err, ret;
    145 
    146 	ret = 1;
    147 	pam_err = pam_start("t_pam_env", "test", &t_null_pamc, &pamh);
    148 	t_assert(pam_err == PAM_SUCCESS);
    149 	pam_err = pam_setenv(pamh, T_ENV_NAME, T_ENV_VALUE, 0);
    150 	t_assert(pam_err == PAM_SUCCESS);
    151 	value = pam_getenv(pamh, "XYZZY");
    152 	ret &= t_compare_str(NULL, value);
    153 	pam_end(pamh, pam_err);
    154 	return (ret);
    155 }
    156 
    157 static int
    158 t_getenv_simple_hit(char **desc CRYB_UNUSED, void *arg CRYB_UNUSED)
    159 {
    160 	pam_handle_t *pamh;
    161 	const char *value;
    162 	int pam_err, ret;
    163 
    164 	ret = 1;
    165 	pam_err = pam_start("t_pam_env", "test", &t_null_pamc, &pamh);
    166 	t_assert(pam_err == PAM_SUCCESS);
    167 	pam_err = pam_setenv(pamh, T_ENV_NAME, T_ENV_VALUE, 0);
    168 	t_assert(pam_err == PAM_SUCCESS);
    169 	value = pam_getenv(pamh, T_ENV_NAME);
    170 	ret &= t_compare_str(T_ENV_VALUE, value);
    171 	pam_end(pamh, pam_err);
    172 	return (ret);
    173 }
    174 
    175 
    176 /***************************************************************************
    178  * Boilerplate
    179  */
    180 
    181 static int
    182 t_prepare(int argc CRYB_UNUSED, char *argv[] CRYB_UNUSED)
    183 {
    184 
    185 	openpam_set_feature(OPENPAM_FALLBACK_TO_OTHER, 0);
    186 
    187 	t_add_test(t_env_empty, NULL, "initially empty");
    188 	t_add_test(t_putenv_simple, NULL, "put - simple");
    189 	t_add_test(t_setenv_simple, NULL, "set - simple");
    190 	t_add_test(t_getenv_empty, NULL, "get - empty");
    191 	t_add_test(t_getenv_simple_miss, NULL, "get - simple (miss)");
    192 	t_add_test(t_getenv_simple_hit, NULL, "get - simple (hit)");
    193 
    194 	return (0);
    195 }
    196 
    197 int
    198 main(int argc, char *argv[])
    199 {
    200 
    201 	t_main(t_prepare, NULL, argc, argv);
    202 }
    203