1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright 2008 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 */ 26 27 #pragma ident "%Z%%M% %I% %E% SMI" 28 29 #include "libscf_impl.h" 30 31 #include <assert.h> 32 #include <dlfcn.h> 33 #include <libintl.h> 34 #include <pthread.h> 35 #include <stdarg.h> 36 #include <stdio.h> 37 #include <stdlib.h> 38 #include <string.h> 39 #include <sys/machelf.h> 40 #include <thread.h> 41 42 #include <ucontext.h> 43 44 extern int ndebug; 45 46 static struct scf_error_info { 47 scf_error_t ei_code; 48 const char *ei_desc; 49 } scf_errors[] = { 50 {SCF_ERROR_NONE, "no error"}, 51 {SCF_ERROR_NOT_BOUND, "handle not bound"}, 52 {SCF_ERROR_NOT_SET, "cannot use unset argument"}, 53 {SCF_ERROR_NOT_FOUND, "entity not found"}, 54 {SCF_ERROR_TYPE_MISMATCH, "type does not match value"}, 55 {SCF_ERROR_IN_USE, "cannot modify while in-use"}, 56 {SCF_ERROR_CONNECTION_BROKEN, "connection to repository broken"}, 57 {SCF_ERROR_INVALID_ARGUMENT, "invalid argument"}, 58 {SCF_ERROR_NO_MEMORY, "no memory available"}, 59 {SCF_ERROR_CONSTRAINT_VIOLATED, "required constraint not met"}, 60 {SCF_ERROR_EXISTS, "object already exists"}, 61 {SCF_ERROR_NO_SERVER, "repository server unavailable"}, 62 {SCF_ERROR_NO_RESOURCES, "server has insufficient resources"}, 63 {SCF_ERROR_PERMISSION_DENIED, "insufficient privileges for action"}, 64 {SCF_ERROR_BACKEND_ACCESS, "backend refused access"}, 65 {SCF_ERROR_BACKEND_READONLY, "backend is read-only"}, 66 {SCF_ERROR_HANDLE_MISMATCH, "mismatched SCF handles"}, 67 {SCF_ERROR_HANDLE_DESTROYED, "object bound to destroyed handle"}, 68 {SCF_ERROR_VERSION_MISMATCH, "incompatible SCF version"}, 69 {SCF_ERROR_DELETED, "object has been deleted"}, 70 71 {SCF_ERROR_CALLBACK_FAILED, "user callback function failed"}, 72 73 {SCF_ERROR_INTERNAL, "internal error"} 74 }; 75 #define SCF_NUM_ERRORS (sizeof (scf_errors) / sizeof (*scf_errors)) 76 77 /* a SWAG just in case things get out of sync, we can notice */ 78 #define LOOKS_VALID(e) \ 79 ((e) >= scf_errors[0].ei_code && \ 80 (e) < scf_errors[SCF_NUM_ERRORS - 1].ei_code + 10) 81 82 static scf_error_t _scf_fallback_error = SCF_ERROR_NONE; 83 84 #if defined(PTHREAD_ONCE_KEY_NP) 85 86 static pthread_key_t scf_error_key = PTHREAD_ONCE_KEY_NP; 87 88 int 89 scf_setup_error(void) 90 { 91 return (pthread_key_create_once_np(&scf_error_key, NULL) == 0); 92 } 93 94 #else /* PTHREAD_ONCE_KEY_NP */ 95 96 /* 97 * This old code is here to enable the building of a native version 98 * of libscf.so when the build machine has not yet been upgraded 99 * to a version of libc that provides pthread_key_create_once_np(). 100 * It should be deleted when solaris_nevada ships. 101 * This code is not MT-safe in a relaxed memory model. 102 */ 103 104 static pthread_key_t scf_error_key = 0; 105 106 int 107 scf_setup_error(void) 108 { 109 static pthread_mutex_t scf_key_lock = PTHREAD_MUTEX_INITIALIZER; 110 static volatile int scf_error_key_setup = 0; 111 112 if (scf_error_key_setup == 0) { 113 (void) pthread_mutex_lock(&scf_key_lock); 114 if (scf_error_key_setup == 0) { 115 if (pthread_key_create(&scf_error_key, NULL) == 0) 116 scf_error_key_setup = 1; 117 } 118 (void) pthread_mutex_unlock(&scf_key_lock); 119 } 120 121 return (scf_error_key_setup == 1); 122 } 123 124 #endif /* PTHREAD_ONCE_KEY_NP */ 125 126 int 127 scf_set_error(scf_error_t code) 128 { 129 assert(LOOKS_VALID(code)); 130 131 if (scf_setup_error()) 132 (void) pthread_setspecific(scf_error_key, (void *)code); 133 else 134 _scf_fallback_error = code; 135 return (-1); 136 } 137 138 scf_error_t 139 scf_error(void) 140 { 141 scf_error_t ret; 142 143 ret = (scf_error_t)pthread_getspecific(scf_error_key); 144 if (ret == 0) 145 return (_scf_fallback_error); 146 assert(LOOKS_VALID(ret)); 147 return (ret); 148 } 149 150 const char * 151 scf_strerror(scf_error_t code) 152 { 153 struct scf_error_info *cur, *end; 154 155 cur = scf_errors; 156 end = cur + SCF_NUM_ERRORS; 157 158 for (; cur < end; cur++) 159 if (code == cur->ei_code) 160 return (dgettext(TEXT_DOMAIN, cur->ei_desc)); 161 162 return (dgettext(TEXT_DOMAIN, "unknown error")); 163 } 164 165 const char * 166 scf_get_msg(scf_msg_t msg) 167 { 168 switch (msg) { 169 case SCF_MSG_ARGTOOLONG: 170 return (dgettext(TEXT_DOMAIN, 171 "Argument '%s' is too long, ignoring\n")); 172 173 case SCF_MSG_PATTERN_NOINSTANCE: 174 return (dgettext(TEXT_DOMAIN, 175 "Pattern '%s' doesn't match any instances\n")); 176 177 case SCF_MSG_PATTERN_NOINSTSVC: 178 return (dgettext(TEXT_DOMAIN, 179 "Pattern '%s' doesn't match any instances or services\n")); 180 181 case SCF_MSG_PATTERN_NOSERVICE: 182 return (dgettext(TEXT_DOMAIN, 183 "Pattern '%s' doesn't match any services\n")); 184 185 case SCF_MSG_PATTERN_NOENTITY: 186 return (dgettext(TEXT_DOMAIN, 187 "Pattern '%s' doesn't match any entities\n")); 188 189 case SCF_MSG_PATTERN_MULTIMATCH: 190 return (dgettext(TEXT_DOMAIN, 191 "Pattern '%s' matches multiple instances:\n")); 192 193 case SCF_MSG_PATTERN_POSSIBLE: 194 return (dgettext(TEXT_DOMAIN, " %s\n")); 195 196 case SCF_MSG_PATTERN_LEGACY: 197 return (dgettext(TEXT_DOMAIN, 198 "Operation not supported for legacy service '%s'\n")); 199 200 default: 201 abort(); 202 /* NOTREACHED */ 203 } 204 205 } 206