Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * drivers/base/power/trace.c
4 *
5 * Copyright (C) 2006 Linus Torvalds
6 *
7 * Trace facility for suspend/resume problems, when none of the
8 * devices may be working.
9 */
10#define pr_fmt(fmt) "PM: " fmt
11
12#include <linux/pm-trace.h>
13#include <linux/export.h>
14#include <linux/rtc.h>
15#include <linux/suspend.h>
16#include <linux/init.h>
17
18#include <linux/mc146818rtc.h>
19
20#include "power.h"
21
22/*
23 * Horrid, horrid, horrid.
24 *
25 * It turns out that the _only_ piece of hardware that actually
26 * keeps its value across a hard boot (and, more importantly, the
27 * POST init sequence) is literally the realtime clock.
28 *
29 * Never mind that an RTC chip has 114 bytes (and often a whole
30 * other bank of an additional 128 bytes) of nice SRAM that is
31 * _designed_ to keep data - the POST will clear it. So we literally
32 * can just use the few bytes of actual time data, which means that
33 * we're really limited.
34 *
35 * It means, for example, that we can't use the seconds at all
36 * (since the time between the hang and the boot might be more
37 * than a minute), and we'd better not depend on the low bits of
38 * the minutes either.
39 *
40 * There are the wday fields etc, but I wouldn't guarantee those
41 * are dependable either. And if the date isn't valid, either the
42 * hw or POST will do strange things.
43 *
44 * So we're left with:
45 * - year: 0-99
46 * - month: 0-11
47 * - day-of-month: 1-28
48 * - hour: 0-23
49 * - min: (0-30)*2
50 *
51 * Giving us a total range of 0-16128000 (0xf61800), ie less
52 * than 24 bits of actual data we can save across reboots.
53 *
54 * And if your box can't boot in less than three minutes,
55 * you're screwed.
56 *
57 * Now, almost 24 bits of data is pitifully small, so we need
58 * to be pretty dense if we want to use it for anything nice.
59 * What we do is that instead of saving off nice readable info,
60 * we save off _hashes_ of information that we can hopefully
61 * regenerate after the reboot.
62 *
63 * In particular, this means that we might be unlucky, and hit
64 * a case where we have a hash collision, and we end up not
65 * being able to tell for certain exactly which case happened.
66 * But that's hopefully unlikely.
67 *
68 * What we do is to take the bits we can fit, and split them
69 * into three parts (16*997*1009 = 16095568), and use the values
70 * for:
71 * - 0-15: user-settable
72 * - 0-996: file + line number
73 * - 0-1008: device
74 */
75#define USERHASH (16)
76#define FILEHASH (997)
77#define DEVHASH (1009)
78
79#define DEVSEED (7919)
80
81bool pm_trace_rtc_abused __read_mostly;
82EXPORT_SYMBOL_GPL(pm_trace_rtc_abused);
83
84static unsigned int dev_hash_value;
85
86static int set_magic_time(unsigned int user, unsigned int file, unsigned int device)
87{
88 unsigned int n = user + USERHASH*(file + FILEHASH*device);
89
90 // June 7th, 2006
91 static struct rtc_time time = {
92 .tm_sec = 0,
93 .tm_min = 0,
94 .tm_hour = 0,
95 .tm_mday = 7,
96 .tm_mon = 5, // June - counting from zero
97 .tm_year = 106,
98 .tm_wday = 3,
99 .tm_yday = 160,
100 .tm_isdst = 1
101 };
102
103 time.tm_year = (n % 100);
104 n /= 100;
105 time.tm_mon = (n % 12);
106 n /= 12;
107 time.tm_mday = (n % 28) + 1;
108 n /= 28;
109 time.tm_hour = (n % 24);
110 n /= 24;
111 time.tm_min = (n % 20) * 3;
112 n /= 20;
113 mc146818_set_time(&time);
114 pm_trace_rtc_abused = true;
115 return n ? -1 : 0;
116}
117
118static unsigned int read_magic_time(void)
119{
120 struct rtc_time time;
121 unsigned int val;
122
123 if (mc146818_get_time(&time, 1000) < 0) {
124 pr_err("Unable to read current time from RTC\n");
125 return 0;
126 }
127
128 pr_info("RTC time: %ptRt, date: %ptRd\n", &time, &time);
129 val = time.tm_year; /* 100 years */
130 if (val > 100)
131 val -= 100;
132 val += time.tm_mon * 100; /* 12 months */
133 val += (time.tm_mday-1) * 100 * 12; /* 28 month-days */
134 val += time.tm_hour * 100 * 12 * 28; /* 24 hours */
135 val += (time.tm_min / 3) * 100 * 12 * 28 * 24; /* 20 3-minute intervals */
136 return val;
137}
138
139/*
140 * This is just the sdbm hash function with a user-supplied
141 * seed and final size parameter.
142 */
143static unsigned int hash_string(unsigned int seed, const char *data, unsigned int mod)
144{
145 unsigned char c;
146 while ((c = *data++) != 0) {
147 seed = (seed << 16) + (seed << 6) - seed + c;
148 }
149 return seed % mod;
150}
151
152void set_trace_device(struct device *dev)
153{
154 dev_hash_value = hash_string(DEVSEED, dev_name(dev), DEVHASH);
155}
156EXPORT_SYMBOL(set_trace_device);
157
158/*
159 * We could just take the "tracedata" index into the .tracedata
160 * section instead. Generating a hash of the data gives us a
161 * chance to work across kernel versions, and perhaps more
162 * importantly it also gives us valid/invalid check (ie we will
163 * likely not give totally bogus reports - if the hash matches,
164 * it's not any guarantee, but it's a high _likelihood_ that
165 * the match is valid).
166 */
167void generate_pm_trace(const void *tracedata, unsigned int user)
168{
169 unsigned short lineno = *(unsigned short *)tracedata;
170 const char *file = *(const char **)(tracedata + 2);
171 unsigned int user_hash_value, file_hash_value;
172
173 if (!x86_platform.legacy.rtc)
174 return;
175
176 user_hash_value = user % USERHASH;
177 file_hash_value = hash_string(lineno, file, FILEHASH);
178 set_magic_time(user_hash_value, file_hash_value, dev_hash_value);
179}
180EXPORT_SYMBOL(generate_pm_trace);
181
182extern char __tracedata_start[], __tracedata_end[];
183static int show_file_hash(unsigned int value)
184{
185 int match;
186 char *tracedata;
187
188 match = 0;
189 for (tracedata = __tracedata_start ; tracedata < __tracedata_end ;
190 tracedata += 2 + sizeof(unsigned long)) {
191 unsigned short lineno = *(unsigned short *)tracedata;
192 const char *file = *(const char **)(tracedata + 2);
193 unsigned int hash = hash_string(lineno, file, FILEHASH);
194 if (hash != value)
195 continue;
196 pr_info(" hash matches %s:%u\n", file, lineno);
197 match++;
198 }
199 return match;
200}
201
202static int show_dev_hash(unsigned int value)
203{
204 int match = 0;
205 struct list_head *entry;
206
207 device_pm_lock();
208 entry = dpm_list.prev;
209 while (entry != &dpm_list) {
210 struct device * dev = to_device(entry);
211 unsigned int hash = hash_string(DEVSEED, dev_name(dev), DEVHASH);
212 if (hash == value) {
213 dev_info(dev, "hash matches\n");
214 match++;
215 }
216 entry = entry->prev;
217 }
218 device_pm_unlock();
219 return match;
220}
221
222static unsigned int hash_value_early_read;
223
224int show_trace_dev_match(char *buf, size_t size)
225{
226 unsigned int value = hash_value_early_read / (USERHASH * FILEHASH);
227 int ret = 0;
228 struct list_head *entry;
229
230 /*
231 * It's possible that multiple devices will match the hash and we can't
232 * tell which is the culprit, so it's best to output them all.
233 */
234 device_pm_lock();
235 entry = dpm_list.prev;
236 while (size && entry != &dpm_list) {
237 struct device *dev = to_device(entry);
238 unsigned int hash = hash_string(DEVSEED, dev_name(dev),
239 DEVHASH);
240 if (hash == value) {
241 int len = snprintf(buf, size, "%s\n",
242 dev_driver_string(dev));
243 if (len > size)
244 len = size;
245 buf += len;
246 ret += len;
247 size -= len;
248 }
249 entry = entry->prev;
250 }
251 device_pm_unlock();
252 return ret;
253}
254
255static int
256pm_trace_notify(struct notifier_block *nb, unsigned long mode, void *_unused)
257{
258 switch (mode) {
259 case PM_POST_HIBERNATION:
260 case PM_POST_SUSPEND:
261 if (pm_trace_rtc_abused) {
262 pm_trace_rtc_abused = false;
263 pr_warn("Possible incorrect RTC due to pm_trace, please use 'ntpdate' or 'rdate' to reset it.\n");
264 }
265 break;
266 default:
267 break;
268 }
269 return 0;
270}
271
272static struct notifier_block pm_trace_nb = {
273 .notifier_call = pm_trace_notify,
274};
275
276static int __init early_resume_init(void)
277{
278 if (!x86_platform.legacy.rtc)
279 return 0;
280
281 hash_value_early_read = read_magic_time();
282 register_pm_notifier(&pm_trace_nb);
283 return 0;
284}
285
286static int __init late_resume_init(void)
287{
288 unsigned int val = hash_value_early_read;
289 unsigned int user, file, dev;
290
291 if (!x86_platform.legacy.rtc)
292 return 0;
293
294 user = val % USERHASH;
295 val = val / USERHASH;
296 file = val % FILEHASH;
297 val = val / FILEHASH;
298 dev = val /* % DEVHASH */;
299
300 pr_info(" Magic number: %d:%d:%d\n", user, file, dev);
301 show_file_hash(file);
302 show_dev_hash(dev);
303 return 0;
304}
305
306core_initcall(early_resume_init);
307late_initcall(late_resume_init);
1/*
2 * drivers/base/power/trace.c
3 *
4 * Copyright (C) 2006 Linus Torvalds
5 *
6 * Trace facility for suspend/resume problems, when none of the
7 * devices may be working.
8 */
9
10#include <linux/resume-trace.h>
11#include <linux/export.h>
12#include <linux/rtc.h>
13
14#include <asm/rtc.h>
15
16#include "power.h"
17
18/*
19 * Horrid, horrid, horrid.
20 *
21 * It turns out that the _only_ piece of hardware that actually
22 * keeps its value across a hard boot (and, more importantly, the
23 * POST init sequence) is literally the realtime clock.
24 *
25 * Never mind that an RTC chip has 114 bytes (and often a whole
26 * other bank of an additional 128 bytes) of nice SRAM that is
27 * _designed_ to keep data - the POST will clear it. So we literally
28 * can just use the few bytes of actual time data, which means that
29 * we're really limited.
30 *
31 * It means, for example, that we can't use the seconds at all
32 * (since the time between the hang and the boot might be more
33 * than a minute), and we'd better not depend on the low bits of
34 * the minutes either.
35 *
36 * There are the wday fields etc, but I wouldn't guarantee those
37 * are dependable either. And if the date isn't valid, either the
38 * hw or POST will do strange things.
39 *
40 * So we're left with:
41 * - year: 0-99
42 * - month: 0-11
43 * - day-of-month: 1-28
44 * - hour: 0-23
45 * - min: (0-30)*2
46 *
47 * Giving us a total range of 0-16128000 (0xf61800), ie less
48 * than 24 bits of actual data we can save across reboots.
49 *
50 * And if your box can't boot in less than three minutes,
51 * you're screwed.
52 *
53 * Now, almost 24 bits of data is pitifully small, so we need
54 * to be pretty dense if we want to use it for anything nice.
55 * What we do is that instead of saving off nice readable info,
56 * we save off _hashes_ of information that we can hopefully
57 * regenerate after the reboot.
58 *
59 * In particular, this means that we might be unlucky, and hit
60 * a case where we have a hash collision, and we end up not
61 * being able to tell for certain exactly which case happened.
62 * But that's hopefully unlikely.
63 *
64 * What we do is to take the bits we can fit, and split them
65 * into three parts (16*997*1009 = 16095568), and use the values
66 * for:
67 * - 0-15: user-settable
68 * - 0-996: file + line number
69 * - 0-1008: device
70 */
71#define USERHASH (16)
72#define FILEHASH (997)
73#define DEVHASH (1009)
74
75#define DEVSEED (7919)
76
77static unsigned int dev_hash_value;
78
79static int set_magic_time(unsigned int user, unsigned int file, unsigned int device)
80{
81 unsigned int n = user + USERHASH*(file + FILEHASH*device);
82
83 // June 7th, 2006
84 static struct rtc_time time = {
85 .tm_sec = 0,
86 .tm_min = 0,
87 .tm_hour = 0,
88 .tm_mday = 7,
89 .tm_mon = 5, // June - counting from zero
90 .tm_year = 106,
91 .tm_wday = 3,
92 .tm_yday = 160,
93 .tm_isdst = 1
94 };
95
96 time.tm_year = (n % 100);
97 n /= 100;
98 time.tm_mon = (n % 12);
99 n /= 12;
100 time.tm_mday = (n % 28) + 1;
101 n /= 28;
102 time.tm_hour = (n % 24);
103 n /= 24;
104 time.tm_min = (n % 20) * 3;
105 n /= 20;
106 set_rtc_time(&time);
107 return n ? -1 : 0;
108}
109
110static unsigned int read_magic_time(void)
111{
112 struct rtc_time time;
113 unsigned int val;
114
115 get_rtc_time(&time);
116 pr_info("RTC time: %2d:%02d:%02d, date: %02d/%02d/%02d\n",
117 time.tm_hour, time.tm_min, time.tm_sec,
118 time.tm_mon + 1, time.tm_mday, time.tm_year % 100);
119 val = time.tm_year; /* 100 years */
120 if (val > 100)
121 val -= 100;
122 val += time.tm_mon * 100; /* 12 months */
123 val += (time.tm_mday-1) * 100 * 12; /* 28 month-days */
124 val += time.tm_hour * 100 * 12 * 28; /* 24 hours */
125 val += (time.tm_min / 3) * 100 * 12 * 28 * 24; /* 20 3-minute intervals */
126 return val;
127}
128
129/*
130 * This is just the sdbm hash function with a user-supplied
131 * seed and final size parameter.
132 */
133static unsigned int hash_string(unsigned int seed, const char *data, unsigned int mod)
134{
135 unsigned char c;
136 while ((c = *data++) != 0) {
137 seed = (seed << 16) + (seed << 6) - seed + c;
138 }
139 return seed % mod;
140}
141
142void set_trace_device(struct device *dev)
143{
144 dev_hash_value = hash_string(DEVSEED, dev_name(dev), DEVHASH);
145}
146EXPORT_SYMBOL(set_trace_device);
147
148/*
149 * We could just take the "tracedata" index into the .tracedata
150 * section instead. Generating a hash of the data gives us a
151 * chance to work across kernel versions, and perhaps more
152 * importantly it also gives us valid/invalid check (ie we will
153 * likely not give totally bogus reports - if the hash matches,
154 * it's not any guarantee, but it's a high _likelihood_ that
155 * the match is valid).
156 */
157void generate_resume_trace(const void *tracedata, unsigned int user)
158{
159 unsigned short lineno = *(unsigned short *)tracedata;
160 const char *file = *(const char **)(tracedata + 2);
161 unsigned int user_hash_value, file_hash_value;
162
163 user_hash_value = user % USERHASH;
164 file_hash_value = hash_string(lineno, file, FILEHASH);
165 set_magic_time(user_hash_value, file_hash_value, dev_hash_value);
166}
167EXPORT_SYMBOL(generate_resume_trace);
168
169extern char __tracedata_start, __tracedata_end;
170static int show_file_hash(unsigned int value)
171{
172 int match;
173 char *tracedata;
174
175 match = 0;
176 for (tracedata = &__tracedata_start ; tracedata < &__tracedata_end ;
177 tracedata += 2 + sizeof(unsigned long)) {
178 unsigned short lineno = *(unsigned short *)tracedata;
179 const char *file = *(const char **)(tracedata + 2);
180 unsigned int hash = hash_string(lineno, file, FILEHASH);
181 if (hash != value)
182 continue;
183 pr_info(" hash matches %s:%u\n", file, lineno);
184 match++;
185 }
186 return match;
187}
188
189static int show_dev_hash(unsigned int value)
190{
191 int match = 0;
192 struct list_head *entry;
193
194 device_pm_lock();
195 entry = dpm_list.prev;
196 while (entry != &dpm_list) {
197 struct device * dev = to_device(entry);
198 unsigned int hash = hash_string(DEVSEED, dev_name(dev), DEVHASH);
199 if (hash == value) {
200 dev_info(dev, "hash matches\n");
201 match++;
202 }
203 entry = entry->prev;
204 }
205 device_pm_unlock();
206 return match;
207}
208
209static unsigned int hash_value_early_read;
210
211int show_trace_dev_match(char *buf, size_t size)
212{
213 unsigned int value = hash_value_early_read / (USERHASH * FILEHASH);
214 int ret = 0;
215 struct list_head *entry;
216
217 /*
218 * It's possible that multiple devices will match the hash and we can't
219 * tell which is the culprit, so it's best to output them all.
220 */
221 device_pm_lock();
222 entry = dpm_list.prev;
223 while (size && entry != &dpm_list) {
224 struct device *dev = to_device(entry);
225 unsigned int hash = hash_string(DEVSEED, dev_name(dev),
226 DEVHASH);
227 if (hash == value) {
228 int len = snprintf(buf, size, "%s\n",
229 dev_driver_string(dev));
230 if (len > size)
231 len = size;
232 buf += len;
233 ret += len;
234 size -= len;
235 }
236 entry = entry->prev;
237 }
238 device_pm_unlock();
239 return ret;
240}
241
242static int early_resume_init(void)
243{
244 hash_value_early_read = read_magic_time();
245 return 0;
246}
247
248static int late_resume_init(void)
249{
250 unsigned int val = hash_value_early_read;
251 unsigned int user, file, dev;
252
253 user = val % USERHASH;
254 val = val / USERHASH;
255 file = val % FILEHASH;
256 val = val / FILEHASH;
257 dev = val /* % DEVHASH */;
258
259 pr_info(" Magic number: %d:%d:%d\n", user, file, dev);
260 show_file_hash(file);
261 show_dev_hash(dev);
262 return 0;
263}
264
265core_initcall(early_resume_init);
266late_initcall(late_resume_init);