1 /* 2 * Automated Testing Framework (atf) 3 * 4 * Copyright (c) 2008 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND 17 * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, 18 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF 19 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS BE LIABLE FOR ANY 21 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE 23 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 24 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER 25 * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 26 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN 27 * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28 */ 29 30 #include <ctype.h> 31 #include <stdbool.h> 32 #include <stdlib.h> 33 #include <string.h> 34 35 #include "atf-c/config.h" 36 37 #include "detail/env.h" 38 #include "detail/sanity.h" 39 40 static bool initialized = false; 41 42 static struct var { 43 const char *name; 44 const char *default_value; 45 const char *value; 46 bool can_be_empty; 47 } vars[] = { 48 { "atf_build_cc", ATF_BUILD_CC, NULL, false, }, 49 { "atf_build_cflags", ATF_BUILD_CFLAGS, NULL, true, }, 50 { "atf_build_cpp", ATF_BUILD_CPP, NULL, false, }, 51 { "atf_build_cppflags", ATF_BUILD_CPPFLAGS, NULL, true, }, 52 { "atf_build_cxx", ATF_BUILD_CXX, NULL, false, }, 53 { "atf_build_cxxflags", ATF_BUILD_CXXFLAGS, NULL, true, }, 54 { "atf_includedir", ATF_INCLUDEDIR, NULL, false, }, 55 { "atf_libexecdir", ATF_LIBEXECDIR, NULL, false, }, 56 { "atf_pkgdatadir", ATF_PKGDATADIR, NULL, false, }, 57 { "atf_shell", ATF_SHELL, NULL, false, }, 58 { "atf_workdir", ATF_WORKDIR, NULL, false, }, 59 { NULL, NULL, NULL, false, }, 60 }; 61 62 /* Only used for unit testing, so this prototype is private. */ 63 void __atf_config_reinit(void); 64 65 /* --------------------------------------------------------------------- 66 * Auxiliary functions. 67 * --------------------------------------------------------------------- */ 68 69 static 70 char * 71 string_to_upper(const char *str) 72 { 73 char *uc; 74 75 uc = (char *)malloc(strlen(str) + 1); 76 if (uc != NULL) { 77 char *ucptr = uc; 78 while (*str != '\0') { 79 *ucptr = toupper((int)*str); 80 81 str++; 82 ucptr++; 83 } 84 *ucptr = '\0'; 85 } 86 87 return uc; 88 } 89 90 static 91 void 92 initialize_var(struct var *var, const char *envname) 93 { 94 PRE(var->value == NULL); 95 96 if (atf_env_has(envname)) { 97 const char *val = atf_env_get(envname); 98 if (strlen(val) > 0 || var->can_be_empty) 99 var->value = val; 100 else 101 var->value = var->default_value; 102 } else 103 var->value = var->default_value; 104 105 POST(var->value != NULL); 106 } 107 108 static 109 void 110 initialize(void) 111 { 112 struct var *var; 113 114 PRE(!initialized); 115 116 for (var = vars; var->name != NULL; var++) { 117 char *envname; 118 119 envname = string_to_upper(var->name); 120 initialize_var(var, envname); 121 free(envname); 122 } 123 124 initialized = true; 125 } 126 127 /* --------------------------------------------------------------------- 128 * Free functions. 129 * --------------------------------------------------------------------- */ 130 131 const char * 132 atf_config_get(const char *name) 133 { 134 const struct var *var; 135 const char *value; 136 137 if (!initialized) { 138 initialize(); 139 INV(initialized); 140 } 141 142 value = NULL; 143 for (var = vars; value == NULL && var->name != NULL; var++) 144 if (strcmp(var->name, name) == 0) 145 value = var->value; 146 INV(value != NULL); 147 148 return value; 149 } 150 151 void 152 __atf_config_reinit(void) 153 { 154 struct var *var; 155 156 initialized = false; 157 158 for (var = vars; var->name != NULL; var++) 159 var->value = NULL; 160 } 161