Add PS3 reset default option
[petitboot] / ui / common / ui-system.c
1 /*
2  *  Copyright (C) 2009 Sony Computer Entertainment Inc.
3  *  Copyright 2009 Sony Corp.
4  *
5  *  This program is free software; you can redistribute it and/or modify
6  *  it under the terms of the GNU General Public License as published by
7  *  the Free Software Foundation; version 2 of the License.
8  *
9  *  This program is distributed in the hope that it will be useful,
10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  *  GNU General Public License for more details.
13  *
14  *  You should have received a copy of the GNU General Public License
15  *  along with this program; if not, write to the Free Software
16  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
17  */
18
19 #define _GNU_SOURCE
20
21 #include <assert.h>
22 #include <errno.h>
23 #include <signal.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <sys/types.h>
27 #include <sys/wait.h>
28
29 #include "log/log.h"
30 #include <system/system.h>
31 #include "talloc/talloc.h"
32 #include "loader.h"
33 #include "ui-system.h"
34
35 /**
36  * run_kexec_local - Final kexec helper.
37  * @l_image: The local image file for kexec to execute.
38  * @l_initrd: Optional local initrd file for kexec --initrd, can be NULL.
39  * @args: Optional command line args for kexec --append, can be NULL.
40  */
41
42 static int run_kexec_local(const char *l_image, const char *l_initrd,
43         const char *args)
44 {
45         int result;
46         const char *argv[6];
47         const char **p;
48         char *s_initrd = NULL;
49         char *s_args = NULL;
50
51         p = argv;
52         *p++ = pb_system_apps.kexec;            /* 1 */
53
54         if (l_initrd) {
55                 s_initrd = talloc_asprintf(NULL, "--initrd=%s", l_initrd);
56                 assert(s_initrd);
57                 *p++ = s_initrd;                 /* 2 */
58         }
59
60         if (args) {
61                 s_args = talloc_asprintf(NULL, "--append=%s", args);
62                 assert(s_args);
63                 *p++ = s_args;                   /* 3 */
64         }
65
66         /* First try by telling kexec to run shutdown */
67
68         *(p + 0) = l_image;
69         *(p + 1) = NULL;
70
71         result = pb_run_cmd(argv);
72
73         /* kexec will return zero on success */
74         /* On error, force a kexec with the -f option */
75
76         if (result) {
77                 *(p + 0) = "-f";                /* 4 */
78                 *(p + 1) = l_image;             /* 5 */
79                 *(p + 2) = NULL;                /* 6 */
80
81                 result = pb_run_cmd(argv);
82         }
83
84         if (result)
85                 pb_log("%s: failed: (%d)\n", __func__, result);
86
87         talloc_free(s_initrd);
88         talloc_free(s_args);
89
90         return result;
91 }
92
93 /**
94  * pb_run_kexec - Run kexec with the supplied boot options.
95  */
96
97 int pb_run_kexec(const struct pb_kexec_data *kd)
98 {
99         int result;
100         char *l_image = NULL;
101         char *l_initrd = NULL;
102
103         pb_log("%s: image:  '%s'\n", __func__, kd->image);
104         pb_log("%s: initrd: '%s'\n", __func__, kd->initrd);
105         pb_log("%s: args:   '%s'\n", __func__, kd->args);
106
107         if (kd->image) {
108                 l_image = pb_load_file(NULL, kd->image);
109                 if (!l_image)
110                         return -1;
111         }
112
113         if (kd->initrd) {
114                 l_initrd = pb_load_file(NULL, kd->initrd);
115                 if (!l_initrd)
116                         return -1;
117         }
118
119         if (!l_image && !l_initrd)
120                 return -1;
121
122         result = run_kexec_local(l_image, l_initrd, kd->args);
123
124         talloc_free(l_image);
125         talloc_free(l_initrd);
126
127         return result;
128 }
129
130 /**
131  * pb_elf_hash - Standard elf hash routine.
132  */
133
134 unsigned int pb_elf_hash(const char *str)
135 {
136         unsigned int h = 0, g;
137
138         while (*str) {
139                 h = (h << 4) + *str++;
140                 g = h & 0xf0000000;
141                 if (g)
142                         h ^= g >> 24;
143                 h &= ~g;
144         }
145         pb_log("%s: %x\n", __func__, h);
146         return h;
147 }
148
149 /**
150  * pb_cat_hash - Hashes concatenation of two strings.
151  */
152
153 unsigned int pb_cat_hash(const char *a, const char *b)
154 {
155         unsigned int h;
156         char *s;
157
158         s = talloc_asprintf(NULL, "%s%s", a, b);
159         h = pb_elf_hash(s);
160         talloc_free(s);
161
162         return h;
163 }