X-Git-Url: http://git.ozlabs.org/?p=petitboot;a=blobdiff_plain;f=discover%2Fplatform-powerpc.c;h=5d7cc597697f683fda11a439a0e2cc278d24f493;hp=b0a35a7dfff4ea9a886513de2260658ea8cf42a6;hb=78c3a044d2302bacf27ac2d9ef179bc35824af4c;hpb=a984595cfb4910ba6f464c69c316f1613f10f894 diff --git a/discover/platform-powerpc.c b/discover/platform-powerpc.c index b0a35a7..5d7cc59 100644 --- a/discover/platform-powerpc.c +++ b/discover/platform-powerpc.c @@ -1,59 +1,54 @@ +#include #include #include -#include +#include +#include #include #include #include +#include +#include +#include #include #include #include #include +#include +#include "hostboot.h" #include "platform.h" +#include "ipmi.h" +#include "dt.h" static const char *partition = "common"; - -struct param { - char *name; - char *value; - bool modified; - struct list_item list; -}; +static const char *sysparams_dir = "/sys/firmware/opal/sysparams/"; +static const char *devtree_dir = "/proc/device-tree/"; struct platform_powerpc { - struct list params; -}; - -static const char *known_params[] = { - "auto-boot?", - "petitboot,network", - "petitboot,timeout", - NULL, + struct param_list *params; + struct ipmi *ipmi; + char *ipmi_mailbox_original_config; + int (*get_ipmi_bootdev)( + struct platform_powerpc *platform, + uint8_t *bootdev, bool *persistent); + int (*clear_ipmi_bootdev)( + struct platform_powerpc *platform, + bool persistent); + int (*get_ipmi_boot_mailbox)( + struct platform_powerpc *platform, + char **buf); + int (*clear_ipmi_boot_mailbox)( + struct platform_powerpc *platform); + int (*set_os_boot_sensor)( + struct platform_powerpc *platform); + void (*get_platform_versions)(struct system_info *info); }; #define to_platform_powerpc(p) \ (struct platform_powerpc *)(p->platform_data) -/* a partition max a max size of 64k * 16bytes = 1M */ -static const int max_partition_size = 64 * 1024 * 16; - -static bool param_is_known(const char *param, unsigned int len) -{ - const char *known_param; - unsigned int i; - - for (i = 0; known_params[i]; i++) { - known_param = known_params[i]; - if (len == strlen(known_param) && - !strncmp(param, known_param, len)) - return true; - } - - return false; -} - static int parse_nvram_params(struct platform_powerpc *platform, char *buf, int len) { @@ -82,7 +77,6 @@ static int parse_nvram_params(struct platform_powerpc *platform, for (pos = buf + i; pos < buf + len; pos += paramlen + 1) { unsigned int namelen; - struct param *param; char *newline; newline = strchr(pos, '\n'); @@ -102,16 +96,13 @@ static int parse_nvram_params(struct platform_powerpc *platform, if (namelen == 0) continue; - if (!param_is_known(name, namelen)) + if (!param_list_is_known_n(platform->params, name, namelen)) continue; + *value = '\0'; value++; - param = talloc(platform, struct param); - param->modified = false; - param->name = talloc_strndup(platform, name, namelen); - param->value = talloc_strdup(platform, value); - list_add(&platform->params, ¶m->list); + param_list_set(platform->params, name, value, false); } return 0; @@ -119,7 +110,7 @@ static int parse_nvram_params(struct platform_powerpc *platform, static int parse_nvram(struct platform_powerpc *platform) { - struct process *process; + struct process_stdout *stdout; const char *argv[5]; int rc; @@ -129,23 +120,17 @@ static int parse_nvram(struct platform_powerpc *platform) argv[3] = partition; argv[4] = NULL; - process = process_create(platform); - process->path = "nvram"; - process->argv = argv; - process->keep_stdout = true; - - rc = process_run_sync(process); + rc = process_get_stdout_argv(NULL, &stdout, argv); - if (rc || !process_exit_ok(process)) { + if (rc) { fprintf(stderr, "nvram process returned " "non-zero exit status\n"); rc = -1; } else { - rc = parse_nvram_params(platform, process->stdout_buf, - process->stdout_len); + rc = parse_nvram_params(platform, stdout->buf, stdout->len); } - process_release(process); + talloc_free(stdout); return rc; } @@ -154,7 +139,7 @@ static int write_nvram(struct platform_powerpc *platform) struct process *process; struct param *param; const char *argv[6]; - int rc; + int rc = 0; argv[0] = "nvram"; argv[1] = "--update-config"; @@ -167,7 +152,7 @@ static int write_nvram(struct platform_powerpc *platform) process->path = "nvram"; process->argv = argv; - list_for_each_entry(&platform->params, param, list) { + param_list_for_each(platform->params, param) { char *paramstr; if (!param->modified) @@ -193,327 +178,696 @@ static int write_nvram(struct platform_powerpc *platform) return rc; } -static const char *get_param(struct platform_powerpc *platform, - const char *name) +static void params_update_all(struct param_list *pl, + const struct config *config, const struct config *defaults) { - struct param *param; + char *tmp = NULL; + const char *val; - list_for_each_entry(&platform->params, param, list) - if (!strcmp(param->name, name)) - return param->value; - return NULL; -} + if (config->autoboot_enabled == defaults->autoboot_enabled) + val = ""; + else + val = config->autoboot_enabled ? "true" : "false"; -static void set_param(struct platform_powerpc *platform, const char *name, - const char *value) -{ - struct param *param; + param_list_set_non_empty(pl, "auto-boot?", val, true); - list_for_each_entry(&platform->params, param, list) { - if (strcmp(param->name, name)) - continue; + if (config->autoboot_timeout_sec == defaults->autoboot_timeout_sec) + val = ""; + else + val = tmp = talloc_asprintf(pl, "%d", + config->autoboot_timeout_sec); - if (!strcmp(param->value, value)) - return; + param_list_set_non_empty(pl, "petitboot,timeout", val, true); + if (tmp) + talloc_free(tmp); - talloc_free(param->value); - param->value = talloc_strdup(param, value); - param->modified = true; - return; + val = config->lang ?: ""; + param_list_set_non_empty(pl, "petitboot,language", val, true); + + if (config->allow_writes == defaults->allow_writes) + val = ""; + else + val = config->allow_writes ? "true" : "false"; + param_list_set_non_empty(pl, "petitboot,write?", val, true); + + if (!config->manual_console) { + val = config->boot_console ?: ""; + param_list_set_non_empty(pl, "petitboot,console", val, true); } + val = config->http_proxy ?: ""; + param_list_set_non_empty(pl, "petitboot,http_proxy", val, true); + val = config->https_proxy ?: ""; + param_list_set_non_empty(pl, "petitboot,https_proxy", val, true); - param = talloc(platform, struct param); - param->modified = true; - param->name = talloc_strdup(platform, name); - param->value = talloc_strdup(platform, value); - list_add(&platform->params, ¶m->list); + params_update_network_values(pl, "petitboot,network", config); + params_update_bootdev_values(pl, "petitboot,bootdevs", config); } -static int parse_hwaddr(struct interface_config *ifconf, char *str) +static void config_set_ipmi_bootdev(struct config *config, enum ipmi_bootdev bootdev, + bool persistent) { - int i; + config->ipmi_bootdev = bootdev; + config->ipmi_bootdev_persistent = persistent; - if (strlen(str) != strlen("00:00:00:00:00:00")) - return -1; + if (bootdev == IPMI_BOOTDEV_SAFE) + config->safe_mode = true; +} - for (i = 0; i < HWADDR_SIZE; i++) { - char byte[3], *endp; - unsigned long x; +static int read_bootdev_sysparam(const char *name, uint8_t *val) +{ + uint8_t buf[2]; + char path[50]; + int fd, rc; - byte[0] = str[i * 3 + 0]; - byte[1] = str[i * 3 + 1]; - byte[2] = '\0'; + assert(strlen(sysparams_dir) + strlen(name) < sizeof(path)); + snprintf(path, sizeof(path), "%s%s", sysparams_dir, name); - x = strtoul(byte, &endp, 16); - if (endp != byte + 2) - return -1; + fd = open(path, O_RDONLY); + if (fd < 0) { + pb_debug("powerpc: can't access sysparam %s\n", + name); + return -1; + } - ifconf->hwaddr[i] = x & 0xff; + rc = read(fd, buf, sizeof(buf)); + + close(fd); + + /* bootdev definitions should only be one byte in size */ + if (rc != 1) { + pb_debug("powerpc: sysparam %s read returned %d\n", + name, rc); + return -1; } + pb_debug("powerpc: sysparam %s: 0x%02x\n", name, buf[0]); + + if (!ipmi_bootdev_is_valid(buf[0])) + return -1; + + *val = buf[0]; return 0; } -static int parse_one_interface_config(struct config *config, - char *confstr) +static int write_bootdev_sysparam(const char *name, uint8_t val) { - struct interface_config *ifconf; - char *tok, *saveptr; - - ifconf = talloc_zero(config, struct interface_config); + char path[50]; + int fd, rc; - if (!confstr || !strlen(confstr)) - goto out_err; + assert(strlen(sysparams_dir) + strlen(name) < sizeof(path)); + snprintf(path, sizeof(path), "%s%s", sysparams_dir, name); - /* first token should be the mac address */ - tok = strtok_r(confstr, ",", &saveptr); - if (!tok) - goto out_err; - - if (parse_hwaddr(ifconf, tok)) - goto out_err; + fd = open(path, O_WRONLY); + if (fd < 0) { + pb_debug("powerpc: can't access sysparam %s for writing\n", + name); + return -1; + } - /* second token is the method */ - tok = strtok_r(NULL, ",", &saveptr); - if (!tok || !strlen(tok) || !strcmp(tok, "ignore")) { - ifconf->ignore = true; + for (;;) { + errno = 0; + rc = write(fd, &val, sizeof(val)); + if (rc == sizeof(val)) { + rc = 0; + break; + } - } else if (!strcmp(tok, "dhcp")) { - ifconf->method = CONFIG_METHOD_DHCP; + if (rc <= 0 && errno != EINTR) { + pb_log("powerpc: error updating sysparam %s: %s", + name, strerror(errno)); + rc = -1; + break; + } + } - } else if (!strcmp(tok, "static")) { - ifconf->method = CONFIG_METHOD_STATIC; + close(fd); - /* ip/mask, [optional] gateway */ - tok = strtok_r(NULL, ",", &saveptr); - if (!tok) - goto out_err; - ifconf->static_config.address = - talloc_strdup(ifconf, tok); + if (!rc) + pb_debug("powerpc: set sysparam %s: 0x%02x\n", name, val); - tok = strtok_r(NULL, ",", &saveptr); - if (tok) { - ifconf->static_config.gateway = - talloc_strdup(ifconf, tok); - } + return rc; +} +static int clear_ipmi_bootdev_sysparams( + struct platform_powerpc *platform __attribute__((unused)), + bool persistent) +{ + if (persistent) { + /* invalidate default-boot-device setting */ + write_bootdev_sysparam("default-boot-device", 0xff); } else { - pb_log("Unknown network configuration method %s\n", tok); - goto out_err; + /* invalidate next-boot-device setting */ + write_bootdev_sysparam("next-boot-device", 0xff); } + return 0; +} + +static int get_ipmi_bootdev_sysparams( + struct platform_powerpc *platform __attribute__((unused)), + uint8_t *bootdev, bool *persistent) +{ + uint8_t next_bootdev, default_bootdev; + bool next_valid, default_valid; + int rc; - config->network.interfaces = talloc_realloc(config, - config->network.interfaces, - struct interface_config *, - ++config->network.n_interfaces); + rc = read_bootdev_sysparam("next-boot-device", &next_bootdev); + next_valid = rc == 0; - config->network.interfaces[config->network.n_interfaces - 1] = ifconf; + rc = read_bootdev_sysparam("default-boot-device", &default_bootdev); + default_valid = rc == 0; + /* nothing valid? no need to change the config */ + if (!next_valid && !default_valid) + return -1; + + *persistent = !next_valid; + *bootdev = next_valid ? next_bootdev : default_bootdev; return 0; -out_err: - talloc_free(ifconf); - return -1; } -static int parse_one_dns_config(struct config *config, - char *confstr) +static int clear_ipmi_bootdev_ipmi(struct platform_powerpc *platform, + bool persistent __attribute__((unused))) { - char *tok, *saveptr; + uint16_t resp_len; + uint8_t resp[1]; + uint8_t req[] = { + 0x05, /* parameter selector: boot flags */ + 0x80, /* data 1: valid */ + 0x00, /* data 2: bootdev: no override */ + 0x00, /* data 3: system defaults */ + 0x00, /* data 4: no request for shared mode, mux defaults */ + 0x00, /* data 5: no instance request */ + }; + + resp_len = sizeof(resp); + + ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS, + IPMI_CMD_CHASSIS_SET_SYSTEM_BOOT_OPTIONS, + req, sizeof(req), + resp, &resp_len, + ipmi_timeout); + return 0; +} + +static int get_ipmi_bootdev_ipmi(struct platform_powerpc *platform, + uint8_t *bootdev, bool *persistent) +{ + uint16_t resp_len; + uint8_t resp[8]; + char *debug_buf; + int rc; + uint8_t req[] = { + 0x05, /* parameter selector: boot flags */ + 0x00, /* no set selector */ + 0x00, /* no block selector */ + }; + + resp_len = sizeof(resp); + rc = ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS, + IPMI_CMD_CHASSIS_GET_SYSTEM_BOOT_OPTIONS, + req, sizeof(req), + resp, &resp_len, + ipmi_timeout); + if (rc) { + pb_log("platform: error reading IPMI boot options\n"); + return -1; + } + + if (resp_len != sizeof(resp)) { + pb_log("platform: unexpected length (%d) in " + "boot options response\n", resp_len); + return -1; + } + + debug_buf = format_buffer(platform, resp, resp_len); + pb_debug_fn("IPMI get_bootdev response:\n%s\n", debug_buf); + talloc_free(debug_buf); + + if (resp[0] != 0) { + pb_log("platform: non-zero completion code %d from IPMI req\n", + resp[0]); + return -1; + } - for (tok = strtok_r(confstr, ",", &saveptr); tok; - tok = strtok_r(NULL, ",", &saveptr)) { + /* check for correct parameter version */ + if ((resp[1] & 0xf) != 0x1) { + pb_log("platform: unexpected version (0x%x) in " + "boot options response\n", resp[0]); + return -1; + } - char *server = talloc_strdup(config, tok); + /* check for valid paramters */ + if (resp[2] & 0x80) { + pb_debug("platform: boot options are invalid/locked\n"); + return -1; + } - config->network.dns_servers = talloc_realloc(config, - config->network.dns_servers, const char *, - ++config->network.n_dns_servers); + *persistent = false; - config->network.dns_servers[config->network.n_dns_servers - 1] - = server; + /* check for valid flags */ + if (!(resp[3] & 0x80)) { + pb_debug("platform: boot flags are invalid, ignoring\n"); + return -1; } + *persistent = resp[3] & 0x40; + *bootdev = (resp[4] >> 2) & 0x0f; return 0; } -static void populate_network_config(struct platform_powerpc *platform, - struct config *config) +static int get_ipmi_boot_mailbox_block(struct platform_powerpc *platform, + char *buf, uint8_t block) { - const char *cval; - char *val; - int i; + size_t blocksize = 16; + uint8_t resp[3 + 16]; + uint16_t resp_len; + char *debug_buf; + int rc; + uint8_t req[] = { + 0x07, /* parameter selector: boot initiator mailbox */ + block, /* set selector */ + 0x00, /* no block selector */ + }; + + resp_len = sizeof(resp); + rc = ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS, + IPMI_CMD_CHASSIS_GET_SYSTEM_BOOT_OPTIONS, + req, sizeof(req), + resp, &resp_len, + ipmi_timeout); + if (rc) { + pb_log("platform: error reading IPMI boot options\n"); + return -1; + } - cval = get_param(platform, "petitboot,network"); - if (!cval || !strlen(cval)) - return; + if (resp_len < sizeof(resp)) { + if (resp_len < 3) { + pb_log("platform: unexpected length (%d) in " + "boot options mailbox response\n", + resp_len); + return -1; + } - val = talloc_strdup(config, cval); + if (resp_len == 4) { + pb_debug_fn("block %hu empty\n", block); + return 0; + } - for (i = 0; ; i++) { - char *tok, *saveptr; + blocksize = sizeof(resp) - 3; + pb_debug_fn("Mailbox block %hu returns only %zu bytes in block\n", + block, blocksize); + } - tok = strtok_r(i == 0 ? val : NULL, " ", &saveptr); - if (!tok) - break; + debug_buf = format_buffer(platform, resp, resp_len); + pb_debug_fn("IPMI bootdev mailbox block %hu:\n%s\n", block, debug_buf); + talloc_free(debug_buf); - if (!strncasecmp(tok, "dns,", strlen("dns,"))) - parse_one_dns_config(config, tok + strlen("dns,")); - else - parse_one_interface_config(config, tok); + if (resp[0] != 0) { + pb_log("platform: non-zero completion code %d from IPMI req\n", + resp[0]); + return -1; + } + /* check for correct parameter version */ + if ((resp[1] & 0xf) != 0x1) { + pb_log("platform: unexpected version (0x%x) in " + "boot mailbox response\n", resp[0]); + return -1; + } + + /* check for valid paramters */ + if (resp[2] & 0x80) { + pb_debug("platform: boot mailbox parameters are invalid/locked\n"); + return -1; } - talloc_free(val); + memcpy(buf, &resp[3], blocksize); + + return blocksize; } -static void populate_config(struct platform_powerpc *platform, - struct config *config) +static int get_ipmi_boot_mailbox(struct platform_powerpc *platform, + char **buf) { - const char *val; - char *end; - unsigned long timeout; - - /* if the "auto-boot?' property is present and "false", disable auto - * boot */ - val = get_param(platform, "auto-boot?"); - config->autoboot_enabled = !val || strcmp(val, "false"); - - val = get_param(platform, "petitboot,timeout"); - if (val) { - timeout = strtoul(val, &end, 10); - if (end != val) { - if (timeout >= INT_MAX) - timeout = INT_MAX; - config->autoboot_timeout_sec = (int)timeout; + char *mailbox_buffer, *prefix; + const size_t blocksize = 16; + char block_buffer[blocksize]; + size_t mailbox_size; + int content_size; + uint8_t i; + int rc; + + mailbox_buffer = NULL; + mailbox_size = 0; + + /* + * The BMC may hold up to 255 blocks of data but more likely the number + * will be closer to the minimum of 5 set by the specification and error + * on higher numbers. + */ + for (i = 0; i < UCHAR_MAX; i++) { + rc = get_ipmi_boot_mailbox_block(platform, block_buffer, i); + if (rc < 3 && i == 0) { + /* + * Immediate failure, no blocks read or missing IANA + * number. + */ + return -1; + } + if (rc < 1) { + /* Error or no bytes read */ + break; } - } - populate_network_config(platform, config); -} + if (i == 0) { + /* + * The first three bytes of block zero are an IANA + * Enterprise ID number. Check it matches the IBM + * number, '2'. + */ + if (block_buffer[0] != 0x02 || + block_buffer[1] != 0x00 || + block_buffer[2] != 0x00) { + pb_log_fn("IANA number unrecognised: 0x%x:0x%x:0x%x\n", + block_buffer[0], + block_buffer[1], + block_buffer[2]); + return -1; + } + } -static char *iface_config_str(void *ctx, struct interface_config *config) -{ - char *str; + mailbox_buffer = talloc_realloc(platform, mailbox_buffer, + char, mailbox_size + rc); + if (!mailbox_buffer) { + pb_log_fn("Failed to allocate mailbox buffer\n"); + return -1; + } + memcpy(mailbox_buffer + mailbox_size, block_buffer, rc); + mailbox_size += rc; + } - /* todo: HWADDR size is hardcoded as 6, but we may need to handle - * different hardware address formats */ - str = talloc_asprintf(ctx, "%02x:%02x:%02x:%02x:%02x:%02x,", - config->hwaddr[0], config->hwaddr[1], - config->hwaddr[2], config->hwaddr[3], - config->hwaddr[4], config->hwaddr[5]); + if (i < 5) + pb_log_fn("Only %hu blocks read, spec requires at least 5.\n" + "Send a bug report to your preferred BMC vendor!\n", + i); + else + pb_debug_fn("%hu blocks read (%zu bytes)\n", i, mailbox_size); - if (config->ignore) { - str = talloc_asprintf_append(str, "ignore"); + if (mailbox_size < 3 + strlen("petitboot,bootdevs=")) + return -1; - } else if (config->method == CONFIG_METHOD_DHCP) { - str = talloc_asprintf_append(str, "dhcp"); + prefix = talloc_strndup(mailbox_buffer, mailbox_buffer + 3, + strlen("petitboot,bootdevs=")); + if (!prefix) { + pb_log_fn("Couldn't check prefix\n"); + talloc_free(mailbox_buffer); + return -1; + } - } else if (config->method == CONFIG_METHOD_STATIC) { - str = talloc_asprintf_append(str, "static,%s%s%s", - config->static_config.address, - config->static_config.gateway ? "," : "", - config->static_config.gateway ?: ""); + if (strncmp(prefix, "petitboot,bootdevs=", + strlen("petitboot,bootdevs=")) != 0 ) { + /* Empty or garbage */ + pb_debug_fn("Buffer looks unconfigured\n"); + talloc_free(mailbox_buffer); + *buf = NULL; + return 0; } - return str; + + /* Don't include IANA number in buffer */ + content_size = mailbox_size - 3 - strlen("petitboot,bootdevs="); + *buf = talloc_memdup(platform, + mailbox_buffer + 3 + strlen("petitboot,bootdevs="), + content_size + 1); + (*buf)[content_size] = '\0'; + + talloc_free(mailbox_buffer); + return 0; } -static char *dns_config_str(void *ctx, const char **dns_servers, int n) +static int clear_ipmi_boot_mailbox(struct platform_powerpc *platform) { - char *str; - int i; + uint8_t req[18] = {0}; /* req (2) + blocksize (16) */ + uint16_t resp_len; + uint8_t resp[1]; + uint8_t i; + int rc; - str = talloc_strdup(ctx, "dns,"); - for (i = 0; i < n; i++) { - str = talloc_asprintf_append(str, "%s%s", - i == 0 ? "" : ",", - dns_servers[i]); + req[0] = 0x07; /* parameter selector: boot initiator mailbox */ + + resp_len = sizeof(resp); + + for (i = 0; i < UCHAR_MAX; i++) { + req[1] = i; /* set selector */ + rc = ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS, + IPMI_CMD_CHASSIS_SET_SYSTEM_BOOT_OPTIONS, + req, sizeof(req), + resp, &resp_len, + ipmi_timeout); + + if (rc || resp[0]) { + if (i == 0) { + pb_log_fn("error clearing IPMI boot mailbox, " + "rc %d resp[0] %hu\n", + rc, resp[0]); + return -1; + } + break; + } } - return str; + pb_debug_fn("Cleared %hu blocks\n", i); + + return 0; } -static void update_string_config(struct platform_powerpc *platform, - const char *name, const char *value) +static int set_ipmi_os_boot_sensor(struct platform_powerpc *platform) { - const char *cur; + int sensor_number; + uint16_t resp_len; + uint8_t resp[1]; + uint8_t req[] = { + 0x00, /* sensor number: os boot */ + 0xA9, /* operation: set everything */ + 0x00, /* sensor reading: none */ + 0x40, /* assertion mask lsb: set state 6 */ + 0x00, /* assertion mask msb: none */ + 0x00, /* deassertion mask lsb: none */ + 0x00, /* deassertion mask msb: none */ + 0x00, /* event data 1: none */ + 0x00, /* event data 2: none */ + 0x00, /* event data 3: none */ + }; + + sensor_number = get_ipmi_sensor(platform, IPMI_SENSOR_ID_OS_BOOT); + if (sensor_number < 0) { + pb_log("Couldn't find OS boot sensor in device tree\n"); + return -1; + } - cur = get_param(platform, name); + req[0] = sensor_number; - /* don't set an empty parameter if it doesn't already exist */ - if (!cur && !strlen(value)) - return; + resp_len = sizeof(resp); - set_param(platform, name, value); + ipmi_transaction(platform->ipmi, IPMI_NETFN_SE, + IPMI_CMD_SENSOR_SET, + req, sizeof(req), + resp, &resp_len, + ipmi_timeout); return 0; + + return 0; } -static void update_network_config(struct platform_powerpc *platform, - struct config *config) +static void get_ipmi_network_override(struct platform_powerpc *platform, + struct config *config) { - unsigned int i; - char *val; - - val = talloc_strdup(platform, ""); - - for (i = 0; i < config->network.n_interfaces; i++) { - char *iface_str = iface_config_str(platform, - config->network.interfaces[i]); - val = talloc_asprintf_append(val, "%s%s", - *val == '\0' ? "" : " ", iface_str); - talloc_free(iface_str); + uint16_t min_len = 12, resp_len = 53, version; + const uint32_t magic_value = 0x21706221; + uint8_t resp[resp_len]; + char *debug_buf; + uint32_t cookie; + bool persistent; + int i, rc; + uint8_t req[] = { + 0x61, /* parameter selector: OEM section (network) */ + 0x00, /* no set selector */ + 0x00, /* no block selector */ + }; + + rc = ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS, + IPMI_CMD_CHASSIS_GET_SYSTEM_BOOT_OPTIONS, + req, sizeof(req), + resp, &resp_len, + ipmi_timeout); + + debug_buf = format_buffer(platform, resp, resp_len); + pb_debug_fn("IPMI net override response:\n%s\n", debug_buf); + talloc_free(debug_buf); + + if (rc) { + pb_debug("IPMI network config option unavailable\n"); + return; } - if (config->network.n_dns_servers) { - char *dns_str = dns_config_str(platform, - config->network.dns_servers, - config->network.n_dns_servers); - val = talloc_asprintf_append(val, "%s%s", - *val == '\0' ? "" : " ", dns_str); - talloc_free(dns_str); + if (resp_len < min_len) { + pb_debug("IPMI net response too small\n"); + return; } - update_string_config(platform, "petitboot,network", val); + if (resp[0] != 0) { + pb_log("platform: non-zero completion code %d from IPMI network req\n", + resp[0]); + return; + } - talloc_free(val); -} + /* Check for correct parameter version */ + if ((resp[1] & 0xf) != 0x1) { + pb_log("platform: unexpected version (0x%x) in network override response\n", + resp[0]); + return; + } -static int update_config(struct platform_powerpc *platform, - struct config *config, struct config *defaults) -{ - char *tmp = NULL; - const char *val; + /* Check that the parameters are valid */ + if (resp[2] & 0x80) { + pb_debug("platform: network override is invalid/locked\n"); + return; + } - if (config->autoboot_enabled == defaults->autoboot_enabled) - val = ""; - else - val = config->autoboot_enabled ? "true" : "false"; - update_string_config(platform, "auto-boot?", val); + /* Check for valid parameters in the boot flags section */ + if (!(resp[3] & 0x80)) { + pb_debug("platform: network override valid flag not set\n"); + return; + } + /* Read the persistent flag; if it is set we need to save this config */ + persistent = resp[3] & 0x40; + if (persistent) + pb_debug("platform: network override is persistent\n"); + + /* Check 4-byte cookie value */ + i = 4; + memcpy(&cookie, &resp[i], sizeof(cookie)); + cookie = __be32_to_cpu(cookie); + if (cookie != magic_value) { + pb_log_fn("Incorrect cookie %x\n", cookie); + return; + } + i += sizeof(cookie); + + /* Check 2-byte version number */ + memcpy(&version, &resp[i], sizeof(version)); + version = __be16_to_cpu(version); + i += sizeof(version); + if (version != 1) { + pb_debug("Unexpected version: %u\n", version); + return; + } - if (config->autoboot_timeout_sec == defaults->autoboot_timeout_sec) - val = ""; - else - val = tmp = talloc_asprintf(platform, "%d", - config->autoboot_timeout_sec); + /* Interpret the rest of the interface config */ + rc = parse_ipmi_interface_override(config, &resp[i], resp_len - i); - update_string_config(platform, "petitboot,timeout", val); - if (tmp) - talloc_free(tmp); + if (!rc && persistent) { + /* Write this new config to NVRAM */ + params_update_network_values(platform->params, + "petitboot,network", config); + rc = write_nvram(platform); + if (rc) + pb_log("platform: Failed to save persistent interface override\n"); + } +} - update_network_config(platform, config); +static void config_get_active_consoles(struct config *config) +{ + struct stat sbuf; + char *fsp_prop = NULL; + + config->n_consoles = 2; + config->consoles = talloc_array(config, char *, config->n_consoles); + if (!config->consoles) + goto err; + + config->consoles[0] = talloc_asprintf(config->consoles, + "/dev/hvc0 [IPMI / Serial]"); + config->consoles[1] = talloc_asprintf(config->consoles, + "/dev/tty1 [VGA]"); + + fsp_prop = talloc_asprintf(config, "%sfsps", devtree_dir); + if (stat(fsp_prop, &sbuf) == 0) { + /* FSP based machines also have a separate serial console */ + config->consoles = talloc_realloc(config, config->consoles, + char *, config->n_consoles + 1); + if (!config->consoles) + goto err; + config->consoles[config->n_consoles++] = talloc_asprintf( + config->consoles, + "/dev/hvc1 [Serial]"); + } - return write_nvram(platform); + return; +err: + config->n_consoles = 0; + pb_log("Failed to allocate memory for consoles\n"); } static int load_config(struct platform *p, struct config *config) { struct platform_powerpc *platform = to_platform_powerpc(p); + const char *hash; int rc; rc = parse_nvram(platform); if (rc) - return rc; + pb_log_fn("Failed to parse nvram\n"); + + /* + * If we have an IPMI mailbox configuration available use it instead of + * the boot order found in NVRAM. + */ + if (platform->get_ipmi_boot_mailbox) { + char *mailbox; + struct param *param; + rc = platform->get_ipmi_boot_mailbox(platform, &mailbox); + if (!rc && mailbox) { + platform->ipmi_mailbox_original_config = + talloc_strdup( + platform, + param_list_get_value( + platform->params, "petitboot,bootdevs")); + param_list_set(platform->params, "petitboot,bootdevs", + mailbox, false); + param = param_list_get_param(platform->params, + "petitboot,bootdevs"); + /* Avoid writing this to NVRAM */ + param->modified = false; + config->ipmi_bootdev_mailbox = true; + talloc_free(mailbox); + } + } + + config_populate_all(config, platform->params); - populate_config(platform, config); + if (platform->get_ipmi_bootdev) { + bool bootdev_persistent; + uint8_t bootdev = IPMI_BOOTDEV_INVALID; + rc = platform->get_ipmi_bootdev(platform, &bootdev, + &bootdev_persistent); + if (!rc && ipmi_bootdev_is_valid(bootdev)) { + config_set_ipmi_bootdev(config, bootdev, + bootdev_persistent); + } + } + + if (platform->ipmi) + get_ipmi_network_override(platform, config); + + config_get_active_consoles(config); + + + hash = param_list_get_value(platform->params, "petitboot,password"); + if (hash) { + rc = crypt_set_password_hash(platform, hash); + if (rc) + pb_log("Failed to set password hash\n"); + } return 0; } @@ -522,24 +876,109 @@ static int save_config(struct platform *p, struct config *config) { struct platform_powerpc *platform = to_platform_powerpc(p); struct config *defaults; - int rc; + struct param *param; + + if (config->ipmi_bootdev == IPMI_BOOTDEV_INVALID && + platform->clear_ipmi_bootdev) { + platform->clear_ipmi_bootdev(platform, + config->ipmi_bootdev_persistent); + config->ipmi_bootdev = IPMI_BOOTDEV_NONE; + config->ipmi_bootdev_persistent = false; + } + + if (!config->ipmi_bootdev_mailbox && + platform->ipmi_mailbox_original_config) { + param = param_list_get_param(platform->params, + "petitboot,bootdevs"); + /* Restore old boot order if unmodified */ + if (!param->modified) { + param_list_set(platform->params, "petitboot,bootdevs", + platform->ipmi_mailbox_original_config, + false); + param->modified = false; + config_populate_bootdev(config, platform->params); + } + platform->clear_ipmi_boot_mailbox(platform); + talloc_free(platform->ipmi_mailbox_original_config); + platform->ipmi_mailbox_original_config = NULL; + } defaults = talloc_zero(platform, struct config); config_set_defaults(defaults); - rc = update_config(platform, config, defaults); + params_update_all(platform->params, config, defaults); talloc_free(defaults); - return rc; + return write_nvram(platform); +} + +static void pre_boot(struct platform *p, const struct config *config) +{ + struct platform_powerpc *platform = to_platform_powerpc(p); + + if (!config->ipmi_bootdev_persistent && platform->clear_ipmi_bootdev) + platform->clear_ipmi_bootdev(platform, false); + + if (platform->set_os_boot_sensor) + platform->set_os_boot_sensor(platform); +} + +static int get_sysinfo(struct platform *p, struct system_info *sysinfo) +{ + struct platform_powerpc *platform = p->platform_data; + char *buf, *filename; + int len, rc; + + filename = talloc_asprintf(platform, "%smodel", devtree_dir); + rc = read_file(platform, filename, &buf, &len); + if (rc == 0) + sysinfo->type = talloc_steal(sysinfo, buf); + talloc_free(filename); + + filename = talloc_asprintf(platform, "%ssystem-id", devtree_dir); + rc = read_file(platform, filename, &buf, &len); + if (rc == 0) + sysinfo->identifier = talloc_steal(sysinfo, buf); + talloc_free(filename); + + sysinfo->bmc_mac = talloc_zero_size(sysinfo, HWADDR_SIZE); + + if (platform->ipmi) { + ipmi_get_bmc_mac(platform->ipmi, sysinfo->bmc_mac); + ipmi_get_bmc_versions(platform->ipmi, sysinfo); + } + + if (platform->get_platform_versions) + platform->get_platform_versions(sysinfo); + + return 0; +} + +static bool restrict_clients(struct platform *p) +{ + struct platform_powerpc *platform = to_platform_powerpc(p); + + return param_list_get_value(platform->params, "petitboot,password") != NULL; +} + +static int set_password(struct platform *p, const char *hash) +{ + struct platform_powerpc *platform = to_platform_powerpc(p); + + param_list_set(platform->params, "petitboot,password", hash, true); + write_nvram(platform); + + return 0; } static bool probe(struct platform *p, void *ctx) { struct platform_powerpc *platform; struct stat statbuf; + bool bmc_present; int rc; - /* we need a device tree and a working nvram binary */ + /* we need a device tree */ rc = stat("/proc/device-tree", &statbuf); if (rc) return false; @@ -547,23 +986,48 @@ static bool probe(struct platform *p, void *ctx) if (!S_ISDIR(statbuf.st_mode)) return false; - rc = process_run_simple(ctx, "nvram", "--print-config", NULL); - if (!WIFEXITED(rc) || WEXITSTATUS(rc) != 0) - return false; - - platform = talloc(ctx, struct platform_powerpc); - list_init(&platform->params); + platform = talloc_zero(ctx, struct platform_powerpc); + platform->params = talloc_zero(platform, struct param_list); + param_list_init(platform->params, common_known_params()); p->platform_data = platform; + + bmc_present = stat("/proc/device-tree/bmc", &statbuf) == 0; + + if (ipmi_present() && bmc_present) { + pb_debug("platform: using direct IPMI for IPMI paramters\n"); + platform->ipmi = ipmi_open(platform); + platform->get_ipmi_bootdev = get_ipmi_bootdev_ipmi; + platform->clear_ipmi_bootdev = clear_ipmi_bootdev_ipmi; + platform->get_ipmi_boot_mailbox = get_ipmi_boot_mailbox; + platform->clear_ipmi_boot_mailbox = clear_ipmi_boot_mailbox; + platform->set_os_boot_sensor = set_ipmi_os_boot_sensor; + } else if (!stat(sysparams_dir, &statbuf)) { + pb_debug("platform: using sysparams for IPMI paramters\n"); + platform->get_ipmi_bootdev = get_ipmi_bootdev_sysparams; + platform->clear_ipmi_bootdev = clear_ipmi_bootdev_sysparams; + + } else { + pb_log("platform: no IPMI parameter support\n"); + } + + if (bmc_present) + platform->get_platform_versions = hostboot_load_versions; + return true; } + static struct platform platform_powerpc = { - .name = "powerpc", - .dhcp_arch_id = 0x000e, - .probe = probe, - .load_config = load_config, - .save_config = save_config, + .name = "powerpc", + .dhcp_arch_id = 0x000e, + .probe = probe, + .load_config = load_config, + .save_config = save_config, + .pre_boot = pre_boot, + .get_sysinfo = get_sysinfo, + .restrict_clients = restrict_clients, + .set_password = set_password, }; register_platform(platform_powerpc);