discover: Add support for multiple bootdev arguments
[petitboot] / discover / platform-powerpc.c
1
2 #include <assert.h>
3 #include <string.h>
4 #include <stdlib.h>
5 #include <limits.h>
6 #include <errno.h>
7 #include <sys/types.h>
8 #include <sys/wait.h>
9 #include <sys/fcntl.h>
10 #include <sys/stat.h>
11
12 #include <file/file.h>
13 #include <talloc/talloc.h>
14 #include <list/list.h>
15 #include <log/log.h>
16 #include <process/process.h>
17
18 #include "platform.h"
19 #include "ipmi.h"
20 #include "dt.h"
21
22 static const char *partition = "common";
23 static const char *sysparams_dir = "/sys/firmware/opal/sysparams/";
24 static const char *devtree_dir = "/proc/device-tree/";
25 static const int ipmi_timeout = 500; /* milliseconds */
26
27 struct param {
28         char                    *name;
29         char                    *value;
30         bool                    modified;
31         struct list_item        list;
32 };
33
34 struct platform_powerpc {
35         struct list     params;
36         struct ipmi     *ipmi;
37         bool            ipmi_bootdev_persistent;
38         int             (*get_ipmi_bootdev)(
39                                 struct platform_powerpc *platform,
40                                 uint8_t *bootdev, bool *persistent);
41         int             (*clear_ipmi_bootdev)(
42                                 struct platform_powerpc *platform);
43         int             (*set_os_boot_sensor)(
44                                 struct platform_powerpc *platform);
45 };
46
47 static const char *known_params[] = {
48         "auto-boot?",
49         "petitboot,network",
50         "petitboot,timeout",
51         "petitboot,bootdev",
52         "petitboot,language",
53         "petitboot,debug?",
54         NULL,
55 };
56
57 #define to_platform_powerpc(p) \
58         (struct platform_powerpc *)(p->platform_data)
59
60 /* a partition max a max size of 64k * 16bytes = 1M */
61 static const int max_partition_size = 64 * 1024 * 16;
62
63 static bool param_is_known(const char *param, unsigned int len)
64 {
65         const char *known_param;
66         unsigned int i;
67
68         for (i = 0; known_params[i]; i++) {
69                 known_param = known_params[i];
70                 if (len == strlen(known_param) &&
71                                 !strncmp(param, known_param, len))
72                         return true;
73         }
74
75         return false;
76 }
77
78 static int parse_nvram_params(struct platform_powerpc *platform,
79                 char *buf, int len)
80 {
81         char *pos, *name, *value;
82         unsigned int paramlen;
83         int i, count;
84
85         /* discard 2 header lines:
86          * "common" partiton"
87          * ------------------
88          */
89         pos = buf;
90         count = 0;
91
92         for (i = 0; i < len; i++) {
93                 if (pos[i] == '\n')
94                         count++;
95                 if (count == 2)
96                         break;
97         }
98
99         if (i == len) {
100                 fprintf(stderr, "failure parsing nvram output\n");
101                 return -1;
102         }
103
104         for (pos = buf + i; pos < buf + len; pos += paramlen + 1) {
105                 unsigned int namelen;
106                 struct param *param;
107                 char *newline;
108
109                 newline = strchr(pos, '\n');
110                 if (!newline)
111                         break;
112
113                 *newline = '\0';
114
115                 paramlen = strlen(pos);
116
117                 name = pos;
118                 value = strchr(pos, '=');
119                 if (!value)
120                         continue;
121
122                 namelen = value - name;
123                 if (namelen == 0)
124                         continue;
125
126                 if (!param_is_known(name, namelen))
127                         continue;
128
129                 value++;
130
131                 param = talloc(platform, struct param);
132                 param->modified = false;
133                 param->name = talloc_strndup(platform, name, namelen);
134                 param->value = talloc_strdup(platform, value);
135                 list_add(&platform->params, &param->list);
136         }
137
138         return 0;
139 }
140
141 static int parse_nvram(struct platform_powerpc *platform)
142 {
143         struct process *process;
144         const char *argv[5];
145         int rc;
146
147         argv[0] = "nvram";
148         argv[1] = "--print-config";
149         argv[2] = "--partition";
150         argv[3] = partition;
151         argv[4] = NULL;
152
153         process = process_create(platform);
154         process->path = "nvram";
155         process->argv = argv;
156         process->keep_stdout = true;
157
158         rc = process_run_sync(process);
159
160         if (rc || !process_exit_ok(process)) {
161                 fprintf(stderr, "nvram process returned "
162                                 "non-zero exit status\n");
163                 rc = -1;
164         } else {
165                 rc = parse_nvram_params(platform, process->stdout_buf,
166                                             process->stdout_len);
167         }
168
169         process_release(process);
170         return rc;
171 }
172
173 static int write_nvram(struct platform_powerpc *platform)
174 {
175         struct process *process;
176         struct param *param;
177         const char *argv[6];
178         int rc;
179
180         argv[0] = "nvram";
181         argv[1] = "--update-config";
182         argv[2] = NULL;
183         argv[3] = "--partition";
184         argv[4] = partition;
185         argv[5] = NULL;
186
187         process = process_create(platform);
188         process->path = "nvram";
189         process->argv = argv;
190
191         list_for_each_entry(&platform->params, param, list) {
192                 char *paramstr;
193
194                 if (!param->modified)
195                         continue;
196
197                 paramstr = talloc_asprintf(platform, "%s=%s",
198                                 param->name, param->value);
199                 argv[2] = paramstr;
200
201                 rc = process_run_sync(process);
202
203                 talloc_free(paramstr);
204
205                 if (rc || !process_exit_ok(process)) {
206                         rc = -1;
207                         pb_log("nvram update process returned "
208                                         "non-zero exit status\n");
209                         break;
210                 }
211         }
212
213         process_release(process);
214         return rc;
215 }
216
217 static const char *get_param(struct platform_powerpc *platform,
218                 const char *name)
219 {
220         struct param *param;
221
222         list_for_each_entry(&platform->params, param, list)
223                 if (!strcmp(param->name, name))
224                         return param->value;
225         return NULL;
226 }
227
228 static void set_param(struct platform_powerpc *platform, const char *name,
229                 const char *value)
230 {
231         struct param *param;
232
233         list_for_each_entry(&platform->params, param, list) {
234                 if (strcmp(param->name, name))
235                         continue;
236
237                 if (!strcmp(param->value, value))
238                         return;
239
240                 talloc_free(param->value);
241                 param->value = talloc_strdup(param, value);
242                 param->modified = true;
243                 return;
244         }
245
246
247         param = talloc(platform, struct param);
248         param->modified = true;
249         param->name = talloc_strdup(platform, name);
250         param->value = talloc_strdup(platform, value);
251         list_add(&platform->params, &param->list);
252 }
253
254 static int parse_hwaddr(struct interface_config *ifconf, char *str)
255 {
256         int i;
257
258         if (strlen(str) != strlen("00:00:00:00:00:00"))
259                 return -1;
260
261         for (i = 0; i < HWADDR_SIZE; i++) {
262                 char byte[3], *endp;
263                 unsigned long x;
264
265                 byte[0] = str[i * 3 + 0];
266                 byte[1] = str[i * 3 + 1];
267                 byte[2] = '\0';
268
269                 x = strtoul(byte, &endp, 16);
270                 if (endp != byte + 2)
271                         return -1;
272
273                 ifconf->hwaddr[i] = x & 0xff;
274         }
275
276         return 0;
277 }
278
279 static int parse_one_interface_config(struct config *config,
280                 char *confstr)
281 {
282         struct interface_config *ifconf;
283         char *tok, *saveptr;
284
285         ifconf = talloc_zero(config, struct interface_config);
286
287         if (!confstr || !strlen(confstr))
288                 goto out_err;
289
290         /* first token should be the mac address */
291         tok = strtok_r(confstr, ",", &saveptr);
292         if (!tok)
293                 goto out_err;
294
295         if (parse_hwaddr(ifconf, tok))
296                 goto out_err;
297
298         /* second token is the method */
299         tok = strtok_r(NULL, ",", &saveptr);
300         if (!tok || !strlen(tok) || !strcmp(tok, "ignore")) {
301                 ifconf->ignore = true;
302
303         } else if (!strcmp(tok, "dhcp")) {
304                 ifconf->method = CONFIG_METHOD_DHCP;
305
306         } else if (!strcmp(tok, "static")) {
307                 ifconf->method = CONFIG_METHOD_STATIC;
308
309                 /* ip/mask, [optional] gateway */
310                 tok = strtok_r(NULL, ",", &saveptr);
311                 if (!tok)
312                         goto out_err;
313                 ifconf->static_config.address =
314                         talloc_strdup(ifconf, tok);
315
316                 tok = strtok_r(NULL, ",", &saveptr);
317                 if (tok) {
318                         ifconf->static_config.gateway =
319                                 talloc_strdup(ifconf, tok);
320                 }
321
322         } else {
323                 pb_log("Unknown network configuration method %s\n", tok);
324                 goto out_err;
325         }
326
327         config->network.interfaces = talloc_realloc(config,
328                         config->network.interfaces,
329                         struct interface_config *,
330                         ++config->network.n_interfaces);
331
332         config->network.interfaces[config->network.n_interfaces - 1] = ifconf;
333
334         return 0;
335 out_err:
336         talloc_free(ifconf);
337         return -1;
338 }
339
340 static int parse_one_dns_config(struct config *config,
341                 char *confstr)
342 {
343         char *tok, *saveptr = NULL;
344
345         for (tok = strtok_r(confstr, ",", &saveptr); tok;
346                         tok = strtok_r(NULL, ",", &saveptr)) {
347
348                 char *server = talloc_strdup(config, tok);
349
350                 config->network.dns_servers = talloc_realloc(config,
351                                 config->network.dns_servers, const char *,
352                                 ++config->network.n_dns_servers);
353
354                 config->network.dns_servers[config->network.n_dns_servers - 1]
355                                 = server;
356         }
357
358         return 0;
359 }
360
361 static void populate_network_config(struct platform_powerpc *platform,
362                 struct config *config)
363 {
364         char *val, *saveptr = NULL;
365         const char *cval;
366         int i;
367
368         cval = get_param(platform, "petitboot,network");
369         if (!cval || !strlen(cval))
370                 return;
371
372         val = talloc_strdup(config, cval);
373
374         for (i = 0; ; i++) {
375                 char *tok;
376
377                 tok = strtok_r(i == 0 ? val : NULL, " ", &saveptr);
378                 if (!tok)
379                         break;
380
381                 if (!strncasecmp(tok, "dns,", strlen("dns,")))
382                         parse_one_dns_config(config, tok + strlen("dns,"));
383                 else
384                         parse_one_interface_config(config, tok);
385
386         }
387
388         talloc_free(val);
389 }
390
391 static int read_bootdev(void *ctx, char **pos, struct autoboot_option *opt)
392 {
393         char *delim = strchr(*pos, ' ');
394         int len, prefix = 0, rc = -1;
395         enum device_type type;
396
397         if (!strncmp(*pos, "uuid:", strlen("uuid:"))) {
398                 prefix = strlen("uuid:");
399                 opt->boot_type = BOOT_DEVICE_UUID;
400                 rc = 0;
401         } else if (!strncmp(*pos, "mac:", strlen("mac:"))) {
402                 prefix = strlen("mac:");
403                 opt->boot_type = BOOT_DEVICE_UUID;
404                 rc = 0;
405         } else {
406                 type = find_device_type(*pos);
407                 if (type != DEVICE_TYPE_UNKNOWN) {
408                         opt->type = type;
409                         opt->boot_type = BOOT_DEVICE_TYPE;
410                         rc = 0;
411                 }
412         }
413
414         if (opt->boot_type == BOOT_DEVICE_UUID) {
415                 if (delim)
416                         len = (int)(delim - *pos) - prefix;
417                 else
418                         len = strlen(*pos);
419
420                 opt->uuid = talloc_strndup(ctx, *pos + prefix, len);
421         }
422
423         /* Always advance pointer to next option or end */
424         if (delim)
425                 *pos = delim + 1;
426         else
427                 *pos += strlen(*pos);
428
429         return rc;
430 }
431
432 static void populate_bootdev_config(struct platform_powerpc *platform,
433                 struct config *config)
434
435 {
436         const char *val;
437
438         config->boot_device = NULL;
439
440         val = get_param(platform, "petitboot,bootdev");
441         if (!val || !strlen(val))
442                 return;
443
444         if (!strncmp(val, "uuid:", strlen("uuid:"))) {
445                 config->boot_device = talloc_strdup(config,
446                                                 val + strlen("uuid:"));
447
448         } else if (!strncmp(val, "mac:", strlen("mac:"))) {
449                 config->boot_device = talloc_strdup(config,
450                                                 val + strlen("mac:"));
451
452         } else {
453                 pb_log("bootdev config is in an unknown format "
454                                 "(expected uuid:... or mac:...)");
455         }
456 }
457
458 static void populate_config(struct platform_powerpc *platform,
459                 struct config *config)
460 {
461         const char *val;
462         char *end;
463         unsigned long timeout;
464
465         /* if the "auto-boot?' property is present and "false", disable auto
466          * boot */
467         val = get_param(platform, "auto-boot?");
468         config->autoboot_enabled = !val || strcmp(val, "false");
469
470         val = get_param(platform, "petitboot,timeout");
471         if (val) {
472                 timeout = strtoul(val, &end, 10);
473                 if (end != val) {
474                         if (timeout >= INT_MAX)
475                                 timeout = INT_MAX;
476                         config->autoboot_timeout_sec = (int)timeout;
477                 }
478         }
479
480         val = get_param(platform, "petitboot,language");
481         config->lang = val ? talloc_strdup(config, val) : NULL;
482
483         populate_network_config(platform, config);
484
485         populate_bootdev_config(platform, config);
486
487         if (!config->debug) {
488                 val = get_param(platform, "petitboot,debug?");
489                 config->debug = val && !strcmp(val, "true");
490         }
491 }
492
493 static char *iface_config_str(void *ctx, struct interface_config *config)
494 {
495         char *str;
496
497         /* todo: HWADDR size is hardcoded as 6, but we may need to handle
498          * different hardware address formats */
499         str = talloc_asprintf(ctx, "%02x:%02x:%02x:%02x:%02x:%02x,",
500                         config->hwaddr[0], config->hwaddr[1],
501                         config->hwaddr[2], config->hwaddr[3],
502                         config->hwaddr[4], config->hwaddr[5]);
503
504         if (config->ignore) {
505                 str = talloc_asprintf_append(str, "ignore");
506
507         } else if (config->method == CONFIG_METHOD_DHCP) {
508                 str = talloc_asprintf_append(str, "dhcp");
509
510         } else if (config->method == CONFIG_METHOD_STATIC) {
511                 str = talloc_asprintf_append(str, "static,%s%s%s",
512                                 config->static_config.address,
513                                 config->static_config.gateway ? "," : "",
514                                 config->static_config.gateway ?: "");
515         }
516         return str;
517 }
518
519 static char *dns_config_str(void *ctx, const char **dns_servers, int n)
520 {
521         char *str;
522         int i;
523
524         str = talloc_strdup(ctx, "dns,");
525         for (i = 0; i < n; i++) {
526                 str = talloc_asprintf_append(str, "%s%s",
527                                 i == 0 ? "" : ",",
528                                 dns_servers[i]);
529         }
530
531         return str;
532 }
533
534 static void update_string_config(struct platform_powerpc *platform,
535                 const char *name, const char *value)
536 {
537         const char *cur;
538
539         cur = get_param(platform, name);
540
541         /* don't set an empty parameter if it doesn't already exist */
542         if (!cur && !strlen(value))
543                 return;
544
545         set_param(platform, name, value);
546 }
547
548 static void update_network_config(struct platform_powerpc *platform,
549         struct config *config)
550 {
551         unsigned int i;
552         char *val;
553
554         val = talloc_strdup(platform, "");
555
556         for (i = 0; i < config->network.n_interfaces; i++) {
557                 char *iface_str = iface_config_str(platform,
558                                         config->network.interfaces[i]);
559                 val = talloc_asprintf_append(val, "%s%s",
560                                 *val == '\0' ? "" : " ", iface_str);
561                 talloc_free(iface_str);
562         }
563
564         if (config->network.n_dns_servers) {
565                 char *dns_str = dns_config_str(platform,
566                                                 config->network.dns_servers,
567                                                 config->network.n_dns_servers);
568                 val = talloc_asprintf_append(val, "%s%s",
569                                 *val == '\0' ? "" : " ", dns_str);
570                 talloc_free(dns_str);
571         }
572
573         update_string_config(platform, "petitboot,network", val);
574
575         talloc_free(val);
576 }
577
578 static void update_bootdev_config(struct platform_powerpc *platform,
579                 struct config *config)
580 {
581         char *val, *tmp = NULL;
582
583         if (!config->boot_device)
584                 val = "";
585         else
586                 tmp = val = talloc_asprintf(platform,
587                                 "uuid:%s", config->boot_device);
588
589         update_string_config(platform, "petitboot,bootdev", val);
590         talloc_free(tmp);
591 }
592
593 static int update_config(struct platform_powerpc *platform,
594                 struct config *config, struct config *defaults)
595 {
596         char *tmp = NULL;
597         const char *val;
598
599         if (config->autoboot_enabled == defaults->autoboot_enabled)
600                 val = "";
601         else
602                 val = config->autoboot_enabled ? "true" : "false";
603         update_string_config(platform, "auto-boot?", val);
604
605         if (config->autoboot_timeout_sec == defaults->autoboot_timeout_sec)
606                 val = "";
607         else
608                 val = tmp = talloc_asprintf(platform, "%d",
609                                 config->autoboot_timeout_sec);
610
611         update_string_config(platform, "petitboot,timeout", val);
612         if (tmp)
613                 talloc_free(tmp);
614
615         val = config->lang ?: "";
616         update_string_config(platform, "petitboot,language", val);
617
618         update_network_config(platform, config);
619
620         update_bootdev_config(platform, config);
621
622         return write_nvram(platform);
623 }
624
625 static void set_ipmi_bootdev(struct config *config, enum ipmi_bootdev bootdev,
626                 bool persistent)
627 {
628         config->ipmi_bootdev = bootdev;
629         config->ipmi_bootdev_persistent = persistent;
630
631         switch (bootdev) {
632         case IPMI_BOOTDEV_NONE:
633         case IPMI_BOOTDEV_DISK:
634         case IPMI_BOOTDEV_NETWORK:
635         case IPMI_BOOTDEV_CDROM:
636                 break;
637         case IPMI_BOOTDEV_SETUP:
638                 config->autoboot_enabled = false;
639                 break;
640         case IPMI_BOOTDEV_SAFE:
641                 config->autoboot_enabled = false;
642                 config->safe_mode = true;
643                 break;
644         }
645 }
646
647 static int read_bootdev_sysparam(const char *name, uint8_t *val)
648 {
649         uint8_t buf[2];
650         char path[50];
651         int fd, rc;
652
653         strcpy(path, sysparams_dir);
654         assert(strlen(name) < sizeof(path) - strlen(path));
655         strcat(path, name);
656
657         fd = open(path, O_RDONLY);
658         if (fd < 0) {
659                 pb_debug("powerpc: can't access sysparam %s\n",
660                                 name);
661                 return -1;
662         }
663
664         rc = read(fd, buf, sizeof(buf));
665
666         close(fd);
667
668         /* bootdev definitions should only be one byte in size */
669         if (rc != 1) {
670                 pb_debug("powerpc: sysparam %s read returned %d\n",
671                                 name, rc);
672                 return -1;
673         }
674
675         pb_debug("powerpc: sysparam %s: 0x%02x\n", name, buf[0]);
676
677         if (!ipmi_bootdev_is_valid(buf[0]))
678                 return -1;
679
680         *val = buf[0];
681         return 0;
682 }
683
684 static int write_bootdev_sysparam(const char *name, uint8_t val)
685 {
686         char path[50];
687         int fd, rc;
688
689         strcpy(path, sysparams_dir);
690         assert(strlen(name) < sizeof(path) - strlen(path));
691         strcat(path, name);
692
693         fd = open(path, O_WRONLY);
694         if (fd < 0) {
695                 pb_debug("powerpc: can't access sysparam %s for writing\n",
696                                 name);
697                 return -1;
698         }
699
700         for (;;) {
701                 errno = 0;
702                 rc = write(fd, &val, sizeof(val));
703                 if (rc == sizeof(val)) {
704                         rc = 0;
705                         break;
706                 }
707
708                 if (rc <= 0 && errno != EINTR) {
709                         pb_log("powerpc: error updating sysparam %s: %s",
710                                         name, strerror(errno));
711                         rc = -1;
712                         break;
713                 }
714         }
715
716         close(fd);
717
718         if (!rc)
719                 pb_debug("powerpc: set sysparam %s: 0x%02x\n", name, val);
720
721         return rc;
722 }
723
724 static int clear_ipmi_bootdev_sysparams(
725                 struct platform_powerpc *platform __attribute__((unused)))
726 {
727         /* invalidate next-boot-device setting */
728         write_bootdev_sysparam("next-boot-device", 0xff);
729         return 0;
730 }
731
732 static int get_ipmi_bootdev_sysparams(
733                 struct platform_powerpc *platform __attribute__((unused)),
734                 uint8_t *bootdev, bool *persistent)
735 {
736         uint8_t next_bootdev, default_bootdev;
737         bool next_valid, default_valid;
738         int rc;
739
740         rc = read_bootdev_sysparam("next-boot-device", &next_bootdev);
741         next_valid = rc == 0;
742
743         rc = read_bootdev_sysparam("default-boot-device", &default_bootdev);
744         default_valid = rc == 0;
745
746         /* nothing valid? no need to change the config */
747         if (!next_valid && !default_valid)
748                 return -1;
749
750         *persistent = !next_valid;
751         *bootdev = next_valid ? next_bootdev : default_bootdev;
752         return 0;
753 }
754
755 static int clear_ipmi_bootdev_ipmi(struct platform_powerpc *platform)
756 {
757         uint16_t resp_len;
758         uint8_t resp[1];
759         uint8_t req[] = {
760                 0x05, /* parameter selector: boot flags */
761                 0x80, /* data 1: valid */
762                 0x00, /* data 2: bootdev: no override */
763                 0x00, /* data 3: system defaults */
764                 0x00, /* data 4: no request for shared mode, mux defaults */
765                 0x00, /* data 5: no instance request */
766         };
767
768         resp_len = sizeof(resp);
769
770         ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS,
771                         IPMI_CMD_CHASSIS_SET_SYSTEM_BOOT_OPTIONS,
772                         req, sizeof(req),
773                         resp, &resp_len,
774                         ipmi_timeout);
775         return 0;
776 }
777
778 static int get_ipmi_bootdev_ipmi(struct platform_powerpc *platform,
779                 uint8_t *bootdev, bool *persistent)
780 {
781         uint16_t resp_len;
782         uint8_t resp[8];
783         int rc;
784         uint8_t req[] = {
785                 0x05, /* parameter selector: boot flags */
786                 0x00, /* no set selector */
787                 0x00, /* no block selector */
788         };
789
790         resp_len = sizeof(resp);
791         rc = ipmi_transaction(platform->ipmi, IPMI_NETFN_CHASSIS,
792                         IPMI_CMD_CHASSIS_GET_SYSTEM_BOOT_OPTIONS,
793                         req, sizeof(req),
794                         resp, &resp_len,
795                         ipmi_timeout);
796         if (rc) {
797                 pb_log("platform: error reading IPMI boot options\n");
798                 return -1;
799         }
800
801         if (resp_len != sizeof(resp)) {
802                 pb_log("platform: unexpected length (%d) in "
803                                 "boot options response\n", resp_len);
804                 return -1;
805         }
806
807         if (resp[0] != 0) {
808                 pb_log("platform: non-zero completion code %d from IPMI req\n",
809                                 resp[0]);
810                 return -1;
811         }
812
813         /* check for correct parameter version */
814         if ((resp[1] & 0xf) != 0x1) {
815                 pb_log("platform: unexpected version (0x%x) in "
816                                 "boot options response\n", resp[0]);
817                 return -1;
818         }
819
820         /* check for valid paramters */
821         if (resp[2] & 0x80) {
822                 pb_debug("platform: boot options are invalid/locked\n");
823                 return -1;
824         }
825
826         *persistent = false;
827
828         /* check for valid flags */
829         if (!(resp[3] & 0x80)) {
830                 pb_debug("platform: boot flags are invalid, ignoring\n");
831                 return 0;
832         }
833
834         *persistent = resp[3] & 0x40;
835         *bootdev = (resp[4] >> 2) & 0x0f;
836         return 0;
837 }
838
839 static int set_ipmi_os_boot_sensor(struct platform_powerpc *platform)
840 {
841         int sensor_number;
842         uint16_t resp_len;
843         uint8_t resp[1];
844         uint8_t req[] = {
845                 0x00, /* sensor number: os boot */
846                 0xA9, /* operation: set everything */
847                 0x00, /* sensor reading: none */
848                 0x40, /* assertion mask lsb: set state 6 */
849                 0x00, /* assertion mask msb: none */
850                 0x00, /* deassertion mask lsb: none */
851                 0x00, /* deassertion mask msb: none */
852                 0x00, /* event data 1: none */
853                 0x00, /* event data 2: none */
854                 0x00, /* event data 3: none */
855         };
856
857         sensor_number = get_ipmi_sensor(platform, IPMI_SENSOR_ID_OS_BOOT);
858         if (sensor_number < 0) {
859                 pb_log("Couldn't find OS boot sensor in device tree\n");
860                 return -1;
861         }
862
863         req[0] = sensor_number;
864
865         resp_len = sizeof(resp);
866
867         ipmi_transaction(platform->ipmi, IPMI_NETFN_SE,
868                         IPMI_CMD_SENSOR_SET,
869                         req, sizeof(req),
870                         resp, &resp_len,
871                         ipmi_timeout); return 0;
872
873         return 0;
874 }
875
876 static int load_config(struct platform *p, struct config *config)
877 {
878         struct platform_powerpc *platform = to_platform_powerpc(p);
879         int rc;
880
881         rc = parse_nvram(platform);
882         if (rc)
883                 return rc;
884
885         populate_config(platform, config);
886
887         if (platform->get_ipmi_bootdev) {
888                 bool bootdev_persistent;
889                 uint8_t bootdev;
890                 rc = platform->get_ipmi_bootdev(platform, &bootdev,
891                                 &bootdev_persistent);
892                 if (!rc && ipmi_bootdev_is_valid(bootdev)) {
893                         set_ipmi_bootdev(config, bootdev, bootdev_persistent);
894                 }
895         }
896
897         return 0;
898 }
899
900 static int save_config(struct platform *p, struct config *config)
901 {
902         struct platform_powerpc *platform = to_platform_powerpc(p);
903         struct config *defaults;
904         int rc;
905
906         defaults = talloc_zero(platform, struct config);
907         config_set_defaults(defaults);
908
909         rc = update_config(platform, config, defaults);
910
911         talloc_free(defaults);
912         return rc;
913 }
914
915 static void pre_boot(struct platform *p, const struct config *config)
916 {
917         struct platform_powerpc *platform = to_platform_powerpc(p);
918
919         if (!config->ipmi_bootdev_persistent && platform->clear_ipmi_bootdev)
920                 platform->clear_ipmi_bootdev(platform);
921
922         if (platform->set_os_boot_sensor)
923                 platform->set_os_boot_sensor(platform);
924 }
925
926 static int get_sysinfo(struct platform *p, struct system_info *sysinfo)
927 {
928         struct platform_powerpc *platform = p->platform_data;
929         char *buf, *filename;
930         int len, rc;
931
932         filename = talloc_asprintf(platform, "%smodel", devtree_dir);
933         rc = read_file(platform, filename, &buf, &len);
934         if (rc == 0)
935                 sysinfo->type = talloc_steal(sysinfo, buf);
936         talloc_free(filename);
937
938         filename = talloc_asprintf(platform, "%ssystem-id", devtree_dir);
939         rc = read_file(platform, filename, &buf, &len);
940         if (rc == 0)
941                 sysinfo->identifier = talloc_steal(sysinfo, buf);
942         talloc_free(filename);
943
944         return 0;
945 }
946
947 static bool probe(struct platform *p, void *ctx)
948 {
949         struct platform_powerpc *platform;
950         struct stat statbuf;
951         int rc;
952
953         /* we need a device tree */
954         rc = stat("/proc/device-tree", &statbuf);
955         if (rc)
956                 return false;
957
958         if (!S_ISDIR(statbuf.st_mode))
959                 return false;
960
961         platform = talloc_zero(ctx, struct platform_powerpc);
962         list_init(&platform->params);
963
964         p->platform_data = platform;
965
966         if (ipmi_present()) {
967                 pb_debug("platform: using direct IPMI for IPMI paramters\n");
968                 platform->ipmi = ipmi_open(platform);
969                 platform->get_ipmi_bootdev = get_ipmi_bootdev_ipmi;
970                 platform->clear_ipmi_bootdev = clear_ipmi_bootdev_ipmi;
971                 platform->set_os_boot_sensor = set_ipmi_os_boot_sensor;
972
973         } else if (!stat(sysparams_dir, &statbuf)) {
974                 pb_debug("platform: using sysparams for IPMI paramters\n");
975                 platform->get_ipmi_bootdev = get_ipmi_bootdev_sysparams;
976                 platform->clear_ipmi_bootdev = clear_ipmi_bootdev_sysparams;
977
978         } else {
979                 pb_log("platform: no IPMI parameter support\n");
980         }
981
982         return true;
983 }
984
985
986 static struct platform platform_powerpc = {
987         .name                   = "powerpc",
988         .dhcp_arch_id           = 0x000e,
989         .probe                  = probe,
990         .load_config            = load_config,
991         .save_config            = save_config,
992         .pre_boot               = pre_boot,
993         .get_sysinfo            = get_sysinfo,
994 };
995
996 register_platform(platform_powerpc);