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 2009 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 */ 26 27 #include <stdio.h> 28 #include <stdlib.h> 29 #include <stdarg.h> 30 #include <string.h> 31 #include <strings.h> 32 #include <libnvpair.h> 33 #include <sys/types.h> 34 #include <fm/topo_mod.h> 35 36 #define BUFSZ 128 37 38 static char * 39 get_fmtstr(topo_mod_t *mod, nvlist_t *in) 40 { 41 char *fmtstr; 42 nvlist_t *args; 43 int ret; 44 45 topo_mod_dprintf(mod, "get_fmtstr() called\n"); 46 47 if ((ret = nvlist_lookup_nvlist(in, TOPO_PROP_ARGS, &args)) != 0) { 48 topo_mod_dprintf(mod, "Failed to lookup 'args' list (%s)\n", 49 strerror(ret)); 50 (void) topo_mod_seterrno(mod, EMOD_NVL_INVAL); 51 return (NULL); 52 } 53 if ((ret = nvlist_lookup_string(args, "format", &fmtstr)) != 0) { 54 topo_mod_dprintf(mod, "Failed to lookup 'format' arg (%s)\n", 55 strerror(ret)); 56 (void) topo_mod_seterrno(mod, EMOD_NVL_INVAL); 57 return (NULL); 58 } 59 return (fmtstr); 60 } 61 62 static int 63 store_prop_val(topo_mod_t *mod, void *buf, char *propname, topo_type_t type, 64 nvlist_t **out) 65 { 66 if (topo_mod_nvalloc(mod, out, NV_UNIQUE_NAME) != 0) { 67 topo_mod_dprintf(mod, "Failed to allocate 'out' nvlist\n"); 68 return (topo_mod_seterrno(mod, EMOD_NOMEM)); 69 } 70 if (nvlist_add_string(*out, TOPO_PROP_VAL_NAME, propname) != 0) { 71 topo_mod_dprintf(mod, "Failed to set '%s'\n", 72 TOPO_PROP_VAL_NAME); 73 nvlist_free(*out); 74 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 75 } 76 if (nvlist_add_uint32(*out, TOPO_PROP_VAL_TYPE, type) 77 != 0) { 78 topo_mod_dprintf(mod, "Failed to set '%s'\n", 79 TOPO_PROP_VAL_TYPE); 80 nvlist_free(*out); 81 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 82 } 83 if (type == TOPO_TYPE_STRING) { 84 if (nvlist_add_string(*out, TOPO_PROP_VAL_VAL, (char *)buf) 85 != 0) { 86 topo_mod_dprintf(mod, "Failed to set '%s'\n", 87 TOPO_PROP_VAL_VAL); 88 nvlist_free(*out); 89 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 90 } 91 } else if (type == TOPO_TYPE_FMRI) { 92 if (nvlist_add_nvlist(*out, TOPO_PROP_VAL_VAL, (nvlist_t *)buf) 93 != 0) { 94 topo_mod_dprintf(mod, "Failed to set '%s'\n", 95 TOPO_PROP_VAL_VAL); 96 nvlist_free(*out); 97 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 98 } 99 } else if (type == TOPO_TYPE_UINT32) { 100 if (nvlist_add_uint32(*out, TOPO_PROP_VAL_VAL, *(uint32_t *)buf) 101 != 0) { 102 topo_mod_dprintf(mod, "Failed to set '%s'\n", 103 TOPO_PROP_VAL_VAL); 104 nvlist_free(*out); 105 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 106 } 107 } 108 return (0); 109 } 110 111 /* 112 * This is a somewhat generic property method for labelling the PSU and fan 113 * FRU's that we're enumerating. It takes the following three arguments: 114 * 115 * format: a string containing a printf-like format with a two %d tokens 116 * for the cpu and dimm slot label numbers, which this method 117 * computes 118 * 119 * i.e.: Fan %d 120 * 121 * offset: a numeric offset that we'll number the FRU's from. This is to 122 * allow for the fact that some systems may number the FRU's 123 * from zero while others may start from one 124 */ 125 /* ARGSUSED */ 126 int 127 ipmi_fru_label(topo_mod_t *mod, tnode_t *node, topo_version_t vers, 128 nvlist_t *in, nvlist_t **out) 129 { 130 char *fmtstr, buf[BUFSZ]; 131 int ret; 132 uint32_t offset; 133 nvlist_t *args; 134 135 topo_mod_dprintf(mod, "ipmi_fru_label() called\n"); 136 if ((ret = nvlist_lookup_nvlist(in, TOPO_PROP_ARGS, &args)) != 0) { 137 topo_mod_dprintf(mod, "Failed to lookup 'args' list (%s)\n", 138 strerror(ret)); 139 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 140 } 141 if ((ret = nvlist_lookup_uint32(args, "offset", &offset)) != 0) { 142 topo_mod_dprintf(mod, "Failed to lookup 'offset' arg (%s)\n", 143 strerror(ret)); 144 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 145 } 146 147 if ((fmtstr = get_fmtstr(mod, in)) == NULL) { 148 topo_mod_dprintf(mod, "Failed to retrieve 'format' arg\n"); 149 /* topo errno already set */ 150 return (-1); 151 } 152 153 /* LINTED: E_SEC_PRINTF_VAR_FMT */ 154 (void) snprintf(buf, BUFSZ, fmtstr, 155 (topo_node_instance(node) + offset)); 156 157 if (store_prop_val(mod, (void *)buf, "label", TOPO_TYPE_STRING, out) 158 != 0) { 159 topo_mod_dprintf(mod, "Failed to set label\n"); 160 /* topo errno already set */ 161 return (-1); 162 } 163 164 return (0); 165 } 166 /* 167 * This is a somewhat generic property method for attaching a FRU fmri onto 168 * a power supply or fan based on the assumption that the FRU will either be 169 * the fan/psu itself or the parent node. 170 * 171 * entity: either "self" or "parent" 172 */ 173 /* ARGSUSED */ 174 int 175 ipmi_fru_fmri(topo_mod_t *mod, tnode_t *node, topo_version_t vers, 176 nvlist_t *in, nvlist_t **out) 177 { 178 char *entity; 179 int ret, err; 180 nvlist_t *args, *fru; 181 182 topo_mod_dprintf(mod, "ipmi_fru_fmri() called\n"); 183 if ((ret = nvlist_lookup_nvlist(in, TOPO_PROP_ARGS, &args)) != 0) { 184 topo_mod_dprintf(mod, "Failed to lookup 'args' list (%s)\n", 185 strerror(ret)); 186 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 187 } 188 if ((ret = nvlist_lookup_string(args, "entity", &entity)) != 0) { 189 topo_mod_dprintf(mod, "Failed to lookup 'entity' arg (%s)\n", 190 strerror(ret)); 191 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 192 } 193 194 if (strcasecmp(entity, "self") == 0) { 195 if (topo_node_resource(node, &fru, &err) != 0) 196 return (-1); 197 } else if (strcasecmp(entity, "parent") == 0) { 198 if (topo_node_resource(topo_node_parent(node), &fru, &err) != 0) 199 return (-1); 200 } else { 201 topo_mod_dprintf(mod, "Invalid 'entity' value\n"); 202 return (topo_mod_seterrno(mod, EMOD_NVL_INVAL)); 203 } 204 205 if (store_prop_val(mod, (void *)fru, "FRU", TOPO_TYPE_FMRI, out) != 0) { 206 nvlist_free(fru); 207 topo_mod_dprintf(mod, "Failed to set FRU\n"); 208 /* topo errno already set */ 209 return (-1); 210 } 211 212 nvlist_free(fru); 213 214 return (0); 215 } 216