main.c 16.2 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10
/*
 * kernel/power/main.c - PM subsystem core functionality.
 *
 * Copyright (c) 2003 Patrick Mochel
 * Copyright (c) 2003 Open Source Development Lab
 * 
 * This file is released under the GPLv2
 *
 */

11
#include <linux/module.h>
L
Linus Torvalds 已提交
12 13 14 15 16
#include <linux/suspend.h>
#include <linux/kobject.h>
#include <linux/string.h>
#include <linux/delay.h>
#include <linux/errno.h>
17
#include <linux/kmod.h>
L
Linus Torvalds 已提交
18
#include <linux/init.h>
19
#include <linux/console.h>
20
#include <linux/cpu.h>
21
#include <linux/resume-trace.h>
22
#include <linux/freezer.h>
C
Christoph Lameter 已提交
23
#include <linux/vmstat.h>
24
#include <linux/syscalls.h>
25
#include <linux/ftrace.h>
L
Linus Torvalds 已提交
26 27 28

#include "power.h"

29
DEFINE_MUTEX(pm_mutex);
L
Linus Torvalds 已提交
30

31 32 33
unsigned int pm_flags;
EXPORT_SYMBOL(pm_flags);

34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57
#ifdef CONFIG_PM_SLEEP

/* Routines for PM-transition notifications */

static BLOCKING_NOTIFIER_HEAD(pm_chain_head);

int register_pm_notifier(struct notifier_block *nb)
{
	return blocking_notifier_chain_register(&pm_chain_head, nb);
}
EXPORT_SYMBOL_GPL(register_pm_notifier);

int unregister_pm_notifier(struct notifier_block *nb)
{
	return blocking_notifier_chain_unregister(&pm_chain_head, nb);
}
EXPORT_SYMBOL_GPL(unregister_pm_notifier);

int pm_notifier_call_chain(unsigned long val)
{
	return (blocking_notifier_call_chain(&pm_chain_head, val, NULL)
			== NOTIFY_BAD) ? -EINVAL : 0;
}

58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79
#ifdef CONFIG_PM_DEBUG
int pm_test_level = TEST_NONE;

static int suspend_test(int level)
{
	if (pm_test_level == level) {
		printk(KERN_INFO "suspend debug: Waiting for 5 seconds.\n");
		mdelay(5000);
		return 1;
	}
	return 0;
}

static const char * const pm_tests[__TEST_AFTER_LAST] = {
	[TEST_NONE] = "none",
	[TEST_CORE] = "core",
	[TEST_CPUS] = "processors",
	[TEST_PLATFORM] = "platform",
	[TEST_DEVICES] = "devices",
	[TEST_FREEZER] = "freezer",
};

80 81
static ssize_t pm_test_show(struct kobject *kobj, struct kobj_attribute *attr,
				char *buf)
82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100
{
	char *s = buf;
	int level;

	for (level = TEST_FIRST; level <= TEST_MAX; level++)
		if (pm_tests[level]) {
			if (level == pm_test_level)
				s += sprintf(s, "[%s] ", pm_tests[level]);
			else
				s += sprintf(s, "%s ", pm_tests[level]);
		}

	if (s != buf)
		/* convert the last space to a newline */
		*(s-1) = '\n';

	return (s - buf);
}

101 102
static ssize_t pm_test_store(struct kobject *kobj, struct kobj_attribute *attr,
				const char *buf, size_t n)
103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132
{
	const char * const *s;
	int level;
	char *p;
	int len;
	int error = -EINVAL;

	p = memchr(buf, '\n', n);
	len = p ? p - buf : n;

	mutex_lock(&pm_mutex);

	level = TEST_FIRST;
	for (s = &pm_tests[level]; level <= TEST_MAX; s++, level++)
		if (*s && len == strlen(*s) && !strncmp(buf, *s, len)) {
			pm_test_level = level;
			error = 0;
			break;
		}

	mutex_unlock(&pm_mutex);

	return error ? error : n;
}

power_attr(pm_test);
#else /* !CONFIG_PM_DEBUG */
static inline int suspend_test(int level) { return 0; }
#endif /* !CONFIG_PM_DEBUG */

133
#endif /* CONFIG_PM_SLEEP */
134

135 136
#ifdef CONFIG_SUSPEND

D
David Brownell 已提交
137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191
#ifdef CONFIG_PM_TEST_SUSPEND

/*
 * We test the system suspend code by setting an RTC wakealarm a short
 * time in the future, then suspending.  Suspending the devices won't
 * normally take long ... some systems only need a few milliseconds.
 *
 * The time it takes is system-specific though, so when we test this
 * during system bootup we allow a LOT of time.
 */
#define TEST_SUSPEND_SECONDS	5

static unsigned long suspend_test_start_time;

static void suspend_test_start(void)
{
	/* FIXME Use better timebase than "jiffies", ideally a clocksource.
	 * What we want is a hardware counter that will work correctly even
	 * during the irqs-are-off stages of the suspend/resume cycle...
	 */
	suspend_test_start_time = jiffies;
}

static void suspend_test_finish(const char *label)
{
	long nj = jiffies - suspend_test_start_time;
	unsigned msec;

	msec = jiffies_to_msecs(abs(nj));
	pr_info("PM: %s took %d.%03d seconds\n", label,
			msec / 1000, msec % 1000);

	/* Warning on suspend means the RTC alarm period needs to be
	 * larger -- the system was sooo slooowwww to suspend that the
	 * alarm (should have) fired before the system went to sleep!
	 *
	 * Warning on either suspend or resume also means the system
	 * has some performance issues.  The stack dump of a WARN_ON
	 * is more likely to get the right attention than a printk...
	 */
	WARN_ON(msec > (TEST_SUSPEND_SECONDS * 1000));
}

#else

static void suspend_test_start(void)
{
}

static void suspend_test_finish(const char *label)
{
}

#endif

192 193 194
/* This is just an arbitrary number */
#define FREE_PAGE_NUMBER (100)

R
Rafael J. Wysocki 已提交
195
static struct platform_suspend_ops *suspend_ops;
L
Linus Torvalds 已提交
196 197

/**
198
 *	suspend_set_ops - Set the global suspend method table.
L
Linus Torvalds 已提交
199 200 201
 *	@ops:	Pointer to ops structure.
 */

202
void suspend_set_ops(struct platform_suspend_ops *ops)
L
Linus Torvalds 已提交
203
{
204
	mutex_lock(&pm_mutex);
205
	suspend_ops = ops;
206
	mutex_unlock(&pm_mutex);
L
Linus Torvalds 已提交
207 208
}

209
/**
210
 * suspend_valid_only_mem - generic memory-only valid callback
211
 *
212
 * Platform drivers that implement mem suspend only and only need
213 214 215
 * to check for that in their .valid callback can use this instead
 * of rolling their own .valid callback.
 */
216
int suspend_valid_only_mem(suspend_state_t state)
217 218 219 220
{
	return state == PM_SUSPEND_MEM;
}

L
Linus Torvalds 已提交
221 222 223
/**
 *	suspend_prepare - Do prep work before entering low-power state.
 *
224 225
 *	This is common code that is called for each state that we're entering.
 *	Run suspend notifiers, allocate a console and stop all processes.
L
Linus Torvalds 已提交
226
 */
227
static int suspend_prepare(void)
L
Linus Torvalds 已提交
228
{
229
	int error;
D
David Shaohua Li 已提交
230
	unsigned int free_pages;
L
Linus Torvalds 已提交
231

232
	if (!suspend_ops || !suspend_ops->enter)
L
Linus Torvalds 已提交
233 234
		return -EPERM;

235 236
	pm_prepare_console();

237 238 239 240
	error = pm_notifier_call_chain(PM_SUSPEND_PREPARE);
	if (error)
		goto Finish;

241 242 243 244
	error = usermodehelper_disable();
	if (error)
		goto Finish;

245
	if (suspend_freeze_processes()) {
L
Linus Torvalds 已提交
246 247 248 249
		error = -EAGAIN;
		goto Thaw;
	}

250 251
	free_pages = global_page_state(NR_FREE_PAGES);
	if (free_pages < FREE_PAGE_NUMBER) {
D
David Shaohua Li 已提交
252 253 254 255 256 257 258
		pr_debug("PM: free some memory\n");
		shrink_all_memory(FREE_PAGE_NUMBER - free_pages);
		if (nr_free_pages() < FREE_PAGE_NUMBER) {
			error = -ENOMEM;
			printk(KERN_ERR "PM: No enough memory\n");
		}
	}
259 260 261
	if (!error)
		return 0;

L
Linus Torvalds 已提交
262
 Thaw:
263
	suspend_thaw_processes();
264
	usermodehelper_enable();
265 266
 Finish:
	pm_notifier_call_chain(PM_POST_SUSPEND);
267
	pm_restore_console();
L
Linus Torvalds 已提交
268 269 270
	return error;
}

271 272 273 274 275 276 277 278 279 280 281
/* default implementation */
void __attribute__ ((weak)) arch_suspend_disable_irqs(void)
{
	local_irq_disable();
}

/* default implementation */
void __attribute__ ((weak)) arch_suspend_enable_irqs(void)
{
	local_irq_enable();
}
L
Linus Torvalds 已提交
282

283 284 285 286 287 288
/**
 *	suspend_enter - enter the desired system sleep state.
 *	@state:		state to enter
 *
 *	This function should be called after devices have been suspended.
 */
289
static int suspend_enter(suspend_state_t state)
L
Linus Torvalds 已提交
290 291 292
{
	int error = 0;

293
	device_pm_lock();
294 295
	arch_suspend_disable_irqs();
	BUG_ON(!irqs_disabled());
L
Linus Torvalds 已提交
296 297

	if ((error = device_power_down(PMSG_SUSPEND))) {
298
		printk(KERN_ERR "PM: Some devices failed to power down\n");
L
Linus Torvalds 已提交
299 300
		goto Done;
	}
301 302 303 304

	if (!suspend_test(TEST_CORE))
		error = suspend_ops->enter(state);

305
	device_power_up(PMSG_RESUME);
L
Linus Torvalds 已提交
306
 Done:
307 308
	arch_suspend_enable_irqs();
	BUG_ON(irqs_disabled());
309
	device_pm_unlock();
L
Linus Torvalds 已提交
310 311 312
	return error;
}

313
/**
314 315
 *	suspend_devices_and_enter - suspend devices and enter the desired system
 *				    sleep state.
316 317 318 319
 *	@state:		  state to enter
 */
int suspend_devices_and_enter(suspend_state_t state)
{
320
	int error, ftrace_save;
321

322
	if (!suspend_ops)
323 324
		return -ENOSYS;

325 326
	if (suspend_ops->begin) {
		error = suspend_ops->begin(state);
327
		if (error)
328
			goto Close;
329 330
	}
	suspend_console();
331
	ftrace_save = __ftrace_enabled_save();
D
David Brownell 已提交
332
	suspend_test_start();
333 334
	error = device_suspend(PMSG_SUSPEND);
	if (error) {
335
		printk(KERN_ERR "PM: Some devices failed to suspend\n");
336
		goto Recover_platform;
337
	}
D
David Brownell 已提交
338
	suspend_test_finish("suspend devices");
339
	if (suspend_test(TEST_DEVICES))
340
		goto Recover_platform;
341

342
	if (suspend_ops->prepare) {
343
		error = suspend_ops->prepare();
344 345 346
		if (error)
			goto Resume_devices;
	}
347 348 349 350

	if (suspend_test(TEST_PLATFORM))
		goto Finish;

351
	error = disable_nonboot_cpus();
352
	if (!error && !suspend_test(TEST_CPUS))
353 354 355
		suspend_enter(state);

	enable_nonboot_cpus();
356
 Finish:
357 358
	if (suspend_ops->finish)
		suspend_ops->finish();
359
 Resume_devices:
D
David Brownell 已提交
360
	suspend_test_start();
361
	device_resume(PMSG_RESUME);
D
David Brownell 已提交
362
	suspend_test_finish("resume devices");
363
	__ftrace_enabled_restore(ftrace_save);
364
	resume_console();
365 366 367
 Close:
	if (suspend_ops->end)
		suspend_ops->end();
368
	return error;
369 370 371 372 373

 Recover_platform:
	if (suspend_ops->recover)
		suspend_ops->recover();
	goto Resume_devices;
374
}
L
Linus Torvalds 已提交
375 376 377 378 379 380 381

/**
 *	suspend_finish - Do final work before exiting suspend sequence.
 *
 *	Call platform code to clean up, restart processes, and free the 
 *	console that we've allocated. This is not called for suspend-to-disk.
 */
382
static void suspend_finish(void)
L
Linus Torvalds 已提交
383
{
384
	suspend_thaw_processes();
385
	usermodehelper_enable();
386
	pm_notifier_call_chain(PM_POST_SUSPEND);
387
	pm_restore_console();
L
Linus Torvalds 已提交
388 389 390 391 392
}




393
static const char * const pm_states[PM_SUSPEND_MAX] = {
L
Linus Torvalds 已提交
394 395 396 397
	[PM_SUSPEND_STANDBY]	= "standby",
	[PM_SUSPEND_MEM]	= "mem",
};

398 399
static inline int valid_state(suspend_state_t state)
{
400 401
	/* All states need lowlevel support and need to be valid
	 * to the lowlevel implementation, no valid callback
402
	 * implies that none are valid. */
403
	if (!suspend_ops || !suspend_ops->valid || !suspend_ops->valid(state))
404 405 406 407
		return 0;
	return 1;
}

L
Linus Torvalds 已提交
408 409 410 411 412 413 414 415 416 417 418 419 420 421 422

/**
 *	enter_state - Do common work of entering low-power state.
 *	@state:		pm_state structure for state we're entering.
 *
 *	Make sure we're the only ones trying to enter a sleep state. Fail
 *	if someone has beat us to it, since we don't want anything weird to
 *	happen when we wake up.
 *	Then, do the setup for suspend, enter the state, and cleaup (after
 *	we've woken up).
 */
static int enter_state(suspend_state_t state)
{
	int error;

423
	if (!valid_state(state))
424
		return -ENODEV;
425

426
	if (!mutex_trylock(&pm_mutex))
L
Linus Torvalds 已提交
427 428
		return -EBUSY;

429
	printk(KERN_INFO "PM: Syncing filesystems ... ");
430 431 432
	sys_sync();
	printk("done.\n");

433
	pr_debug("PM: Preparing system for %s sleep\n", pm_states[state]);
434 435
	error = suspend_prepare();
	if (error)
L
Linus Torvalds 已提交
436 437
		goto Unlock;

438 439 440
	if (suspend_test(TEST_FREEZER))
		goto Finish;

441
	pr_debug("PM: Entering %s sleep\n", pm_states[state]);
442
	error = suspend_devices_and_enter(state);
L
Linus Torvalds 已提交
443

444
 Finish:
445
	pr_debug("PM: Finishing wakeup.\n");
446
	suspend_finish();
L
Linus Torvalds 已提交
447
 Unlock:
448
	mutex_unlock(&pm_mutex);
L
Linus Torvalds 已提交
449 450 451 452 453 454
	return error;
}


/**
 *	pm_suspend - Externally visible function for suspending system.
455
 *	@state:		Enumerated value of state to enter.
L
Linus Torvalds 已提交
456 457 458 459 460 461 462
 *
 *	Determine whether or not value is within range, get state 
 *	structure, and enter (above).
 */

int pm_suspend(suspend_state_t state)
{
A
Alexey Starikovskiy 已提交
463
	if (state > PM_SUSPEND_ON && state <= PM_SUSPEND_MAX)
L
Linus Torvalds 已提交
464 465 466 467
		return enter_state(state);
	return -EINVAL;
}

468
EXPORT_SYMBOL(pm_suspend);
L
Linus Torvalds 已提交
469

470 471
#endif /* CONFIG_SUSPEND */

472
struct kobject *power_kobj;
L
Linus Torvalds 已提交
473 474 475 476 477 478 479 480 481 482 483 484

/**
 *	state - control system power state.
 *
 *	show() returns what states are supported, which is hard-coded to
 *	'standby' (Power-On Suspend), 'mem' (Suspend-to-RAM), and
 *	'disk' (Suspend-to-Disk).
 *
 *	store() accepts one of those strings, translates it into the 
 *	proper enumerated value, and initiates a suspend transition.
 */

485 486
static ssize_t state_show(struct kobject *kobj, struct kobj_attribute *attr,
			  char *buf)
L
Linus Torvalds 已提交
487
{
488 489
	char *s = buf;
#ifdef CONFIG_SUSPEND
L
Linus Torvalds 已提交
490 491 492
	int i;

	for (i = 0; i < PM_SUSPEND_MAX; i++) {
493 494
		if (pm_states[i] && valid_state(i))
			s += sprintf(s,"%s ", pm_states[i]);
L
Linus Torvalds 已提交
495
	}
496
#endif
497
#ifdef CONFIG_HIBERNATION
498 499 500 501 502 503
	s += sprintf(s, "%s\n", "disk");
#else
	if (s != buf)
		/* convert the last space to a newline */
		*(s-1) = '\n';
#endif
L
Linus Torvalds 已提交
504 505 506
	return (s - buf);
}

507 508
static ssize_t state_store(struct kobject *kobj, struct kobj_attribute *attr,
			   const char *buf, size_t n)
L
Linus Torvalds 已提交
509
{
510
#ifdef CONFIG_SUSPEND
L
Linus Torvalds 已提交
511
	suspend_state_t state = PM_SUSPEND_STANDBY;
512
	const char * const *s;
513
#endif
L
Linus Torvalds 已提交
514 515
	char *p;
	int len;
516
	int error = -EINVAL;
L
Linus Torvalds 已提交
517 518 519 520

	p = memchr(buf, '\n', n);
	len = p ? p - buf : n;

521
	/* First, check if we are requested to hibernate */
R
Rafael J. Wysocki 已提交
522
	if (len == 4 && !strncmp(buf, "disk", len)) {
523
		error = hibernate();
524
  goto Exit;
525 526
	}

527
#ifdef CONFIG_SUSPEND
L
Linus Torvalds 已提交
528
	for (s = &pm_states[state]; state < PM_SUSPEND_MAX; s++, state++) {
R
Rafael J. Wysocki 已提交
529
		if (*s && len == strlen(*s) && !strncmp(buf, *s, len))
L
Linus Torvalds 已提交
530 531
			break;
	}
532
	if (state < PM_SUSPEND_MAX && *s)
L
Linus Torvalds 已提交
533
		error = enter_state(state);
534 535 536
#endif

 Exit:
L
Linus Torvalds 已提交
537 538 539 540 541
	return error ? error : n;
}

power_attr(state);

542 543 544
#ifdef CONFIG_PM_TRACE
int pm_trace_enabled;

545 546
static ssize_t pm_trace_show(struct kobject *kobj, struct kobj_attribute *attr,
			     char *buf)
547 548 549 550 551
{
	return sprintf(buf, "%d\n", pm_trace_enabled);
}

static ssize_t
552 553
pm_trace_store(struct kobject *kobj, struct kobj_attribute *attr,
	       const char *buf, size_t n)
554 555 556 557 558 559 560 561 562 563 564
{
	int val;

	if (sscanf(buf, "%d", &val) == 1) {
		pm_trace_enabled = !!val;
		return n;
	}
	return -EINVAL;
}

power_attr(pm_trace);
565
#endif /* CONFIG_PM_TRACE */
566 567 568

static struct attribute * g[] = {
	&state_attr.attr,
569
#ifdef CONFIG_PM_TRACE
570
	&pm_trace_attr.attr,
571
#endif
572
#if defined(CONFIG_PM_SLEEP) && defined(CONFIG_PM_DEBUG)
573 574
	&pm_test_attr.attr,
#endif
575 576
	NULL,
};
L
Linus Torvalds 已提交
577 578 579 580 581 582 583 584

static struct attribute_group attr_group = {
	.attrs = g,
};


static int __init pm_init(void)
{
585 586
	power_kobj = kobject_create_and_add("power", NULL);
	if (!power_kobj)
587
		return -ENOMEM;
588
	return sysfs_create_group(power_kobj, &attr_group);
L
Linus Torvalds 已提交
589 590 591
}

core_initcall(pm_init);
D
David Brownell 已提交
592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647


#ifdef CONFIG_PM_TEST_SUSPEND

#include <linux/rtc.h>

/*
 * To test system suspend, we need a hands-off mechanism to resume the
 * system.  RTCs wake alarms are a common self-contained mechanism.
 */

static void __init test_wakealarm(struct rtc_device *rtc, suspend_state_t state)
{
	static char err_readtime[] __initdata =
		KERN_ERR "PM: can't read %s time, err %d\n";
	static char err_wakealarm [] __initdata =
		KERN_ERR "PM: can't set %s wakealarm, err %d\n";
	static char err_suspend[] __initdata =
		KERN_ERR "PM: suspend test failed, error %d\n";
	static char info_test[] __initdata =
		KERN_INFO "PM: test RTC wakeup from '%s' suspend\n";

	unsigned long		now;
	struct rtc_wkalrm	alm;
	int			status;

	/* this may fail if the RTC hasn't been initialized */
	status = rtc_read_time(rtc, &alm.time);
	if (status < 0) {
		printk(err_readtime, rtc->dev.bus_id, status);
		return;
	}
	rtc_tm_to_time(&alm.time, &now);

	memset(&alm, 0, sizeof alm);
	rtc_time_to_tm(now + TEST_SUSPEND_SECONDS, &alm.time);
	alm.enabled = true;

	status = rtc_set_alarm(rtc, &alm);
	if (status < 0) {
		printk(err_wakealarm, rtc->dev.bus_id, status);
		return;
	}

	if (state == PM_SUSPEND_MEM) {
		printk(info_test, pm_states[state]);
		status = pm_suspend(state);
		if (status == -ENODEV)
			state = PM_SUSPEND_STANDBY;
	}
	if (state == PM_SUSPEND_STANDBY) {
		printk(info_test, pm_states[state]);
		status = pm_suspend(state);
	}
	if (status < 0)
		printk(err_suspend, status);
D
David Brownell 已提交
648 649 650 651 652 653 654

	/* Some platforms can't detect that the alarm triggered the
	 * wakeup, or (accordingly) disable it after it afterwards.
	 * It's supposed to give oneshot behavior; cope.
	 */
	alm.enabled = false;
	rtc_set_alarm(rtc, &alm);
D
David Brownell 已提交
655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732
}

static int __init has_wakealarm(struct device *dev, void *name_ptr)
{
	struct rtc_device *candidate = to_rtc_device(dev);

	if (!candidate->ops->set_alarm)
		return 0;
	if (!device_may_wakeup(candidate->dev.parent))
		return 0;

	*(char **)name_ptr = dev->bus_id;
	return 1;
}

/*
 * Kernel options like "test_suspend=mem" force suspend/resume sanity tests
 * at startup time.  They're normally disabled, for faster boot and because
 * we can't know which states really work on this particular system.
 */
static suspend_state_t test_state __initdata = PM_SUSPEND_ON;

static char warn_bad_state[] __initdata =
	KERN_WARNING "PM: can't test '%s' suspend state\n";

static int __init setup_test_suspend(char *value)
{
	unsigned i;

	/* "=mem" ==> "mem" */
	value++;
	for (i = 0; i < PM_SUSPEND_MAX; i++) {
		if (!pm_states[i])
			continue;
		if (strcmp(pm_states[i], value) != 0)
			continue;
		test_state = (__force suspend_state_t) i;
		return 0;
	}
	printk(warn_bad_state, value);
	return 0;
}
__setup("test_suspend", setup_test_suspend);

static int __init test_suspend(void)
{
	static char		warn_no_rtc[] __initdata =
		KERN_WARNING "PM: no wakealarm-capable RTC driver is ready\n";

	char			*pony = NULL;
	struct rtc_device	*rtc = NULL;

	/* PM is initialized by now; is that state testable? */
	if (test_state == PM_SUSPEND_ON)
		goto done;
	if (!valid_state(test_state)) {
		printk(warn_bad_state, pm_states[test_state]);
		goto done;
	}

	/* RTCs have initialized by now too ... can we use one? */
	class_find_device(rtc_class, NULL, &pony, has_wakealarm);
	if (pony)
		rtc = rtc_class_open(pony);
	if (!rtc) {
		printk(warn_no_rtc);
		goto done;
	}

	/* go for it */
	test_wakealarm(rtc, test_state);
	rtc_class_close(rtc);
done:
	return 0;
}
late_initcall(test_suspend);

#endif /* CONFIG_PM_TEST_SUSPEND */