xref: /openbmc/linux/drivers/macintosh/via-pmu.c (revision 513b046c96cc2fbce730a3474f6f7ff0c4fdd05c)
1 /*
2  * Device driver for the via-pmu on Apple Powermacs.
3  *
4  * The VIA (versatile interface adapter) interfaces to the PMU,
5  * a 6805 microprocessor core whose primary function is to control
6  * battery charging and system power on the PowerBook 3400 and 2400.
7  * The PMU also controls the ADB (Apple Desktop Bus) which connects
8  * to the keyboard and mouse, as well as the non-volatile RAM
9  * and the RTC (real time clock) chip.
10  *
11  * Copyright (C) 1998 Paul Mackerras and Fabio Riccardi.
12  * Copyright (C) 2001-2002 Benjamin Herrenschmidt
13  *
14  * THIS DRIVER IS BECOMING A TOTAL MESS !
15  *  - Cleanup atomically disabling reply to PMU events after
16  *    a sleep or a freq. switch
17  *  - Move sleep code out of here to pmac_pm, merge into new
18  *    common PM infrastructure
19  *  - Save/Restore PCI space properly
20  *
21  */
22 #include <stdarg.h>
23 #include <linux/types.h>
24 #include <linux/errno.h>
25 #include <linux/kernel.h>
26 #include <linux/delay.h>
27 #include <linux/sched.h>
28 #include <linux/miscdevice.h>
29 #include <linux/blkdev.h>
30 #include <linux/pci.h>
31 #include <linux/slab.h>
32 #include <linux/poll.h>
33 #include <linux/adb.h>
34 #include <linux/pmu.h>
35 #include <linux/cuda.h>
36 #include <linux/smp_lock.h>
37 #include <linux/module.h>
38 #include <linux/spinlock.h>
39 #include <linux/pm.h>
40 #include <linux/proc_fs.h>
41 #include <linux/init.h>
42 #include <linux/interrupt.h>
43 #include <linux/device.h>
44 #include <linux/sysdev.h>
45 #include <linux/suspend.h>
46 #include <linux/syscalls.h>
47 #include <linux/cpu.h>
48 #include <asm/prom.h>
49 #include <asm/machdep.h>
50 #include <asm/io.h>
51 #include <asm/pgtable.h>
52 #include <asm/system.h>
53 #include <asm/sections.h>
54 #include <asm/irq.h>
55 #include <asm/pmac_feature.h>
56 #include <asm/pmac_pfunc.h>
57 #include <asm/pmac_low_i2c.h>
58 #include <asm/uaccess.h>
59 #include <asm/mmu_context.h>
60 #include <asm/cputable.h>
61 #include <asm/time.h>
62 #include <asm/backlight.h>
63 
64 #include "via-pmu-event.h"
65 
66 /* Some compile options */
67 #undef SUSPEND_USES_PMU
68 #define DEBUG_SLEEP
69 #undef HACKED_PCI_SAVE
70 
71 /* Misc minor number allocated for /dev/pmu */
72 #define PMU_MINOR		154
73 
74 /* How many iterations between battery polls */
75 #define BATTERY_POLLING_COUNT	2
76 
77 static volatile unsigned char __iomem *via;
78 
79 /* VIA registers - spaced 0x200 bytes apart */
80 #define RS		0x200		/* skip between registers */
81 #define B		0		/* B-side data */
82 #define A		RS		/* A-side data */
83 #define DIRB		(2*RS)		/* B-side direction (1=output) */
84 #define DIRA		(3*RS)		/* A-side direction (1=output) */
85 #define T1CL		(4*RS)		/* Timer 1 ctr/latch (low 8 bits) */
86 #define T1CH		(5*RS)		/* Timer 1 counter (high 8 bits) */
87 #define T1LL		(6*RS)		/* Timer 1 latch (low 8 bits) */
88 #define T1LH		(7*RS)		/* Timer 1 latch (high 8 bits) */
89 #define T2CL		(8*RS)		/* Timer 2 ctr/latch (low 8 bits) */
90 #define T2CH		(9*RS)		/* Timer 2 counter (high 8 bits) */
91 #define SR		(10*RS)		/* Shift register */
92 #define ACR		(11*RS)		/* Auxiliary control register */
93 #define PCR		(12*RS)		/* Peripheral control register */
94 #define IFR		(13*RS)		/* Interrupt flag register */
95 #define IER		(14*RS)		/* Interrupt enable register */
96 #define ANH		(15*RS)		/* A-side data, no handshake */
97 
98 /* Bits in B data register: both active low */
99 #define TACK		0x08		/* Transfer acknowledge (input) */
100 #define TREQ		0x10		/* Transfer request (output) */
101 
102 /* Bits in ACR */
103 #define SR_CTRL		0x1c		/* Shift register control bits */
104 #define SR_EXT		0x0c		/* Shift on external clock */
105 #define SR_OUT		0x10		/* Shift out if 1 */
106 
107 /* Bits in IFR and IER */
108 #define IER_SET		0x80		/* set bits in IER */
109 #define IER_CLR		0		/* clear bits in IER */
110 #define SR_INT		0x04		/* Shift register full/empty */
111 #define CB2_INT		0x08
112 #define CB1_INT		0x10		/* transition on CB1 input */
113 
114 static volatile enum pmu_state {
115 	idle,
116 	sending,
117 	intack,
118 	reading,
119 	reading_intr,
120 	locked,
121 } pmu_state;
122 
123 static volatile enum int_data_state {
124 	int_data_empty,
125 	int_data_fill,
126 	int_data_ready,
127 	int_data_flush
128 } int_data_state[2] = { int_data_empty, int_data_empty };
129 
130 static struct adb_request *current_req;
131 static struct adb_request *last_req;
132 static struct adb_request *req_awaiting_reply;
133 static unsigned char interrupt_data[2][32];
134 static int interrupt_data_len[2];
135 static int int_data_last;
136 static unsigned char *reply_ptr;
137 static int data_index;
138 static int data_len;
139 static volatile int adb_int_pending;
140 static volatile int disable_poll;
141 static struct device_node *vias;
142 static int pmu_kind = PMU_UNKNOWN;
143 static int pmu_fully_inited = 0;
144 static int pmu_has_adb;
145 static struct device_node *gpio_node;
146 static unsigned char __iomem *gpio_reg = NULL;
147 static int gpio_irq = NO_IRQ;
148 static int gpio_irq_enabled = -1;
149 static volatile int pmu_suspended = 0;
150 static spinlock_t pmu_lock;
151 static u8 pmu_intr_mask;
152 static int pmu_version;
153 static int drop_interrupts;
154 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
155 static int option_lid_wakeup = 1;
156 #endif /* CONFIG_PM && CONFIG_PPC32 */
157 #if (defined(CONFIG_PM)&&defined(CONFIG_PPC32))||defined(CONFIG_PMAC_BACKLIGHT_LEGACY)
158 static int sleep_in_progress;
159 #endif
160 static unsigned long async_req_locks;
161 static unsigned int pmu_irq_stats[11];
162 
163 static struct proc_dir_entry *proc_pmu_root;
164 static struct proc_dir_entry *proc_pmu_info;
165 static struct proc_dir_entry *proc_pmu_irqstats;
166 static struct proc_dir_entry *proc_pmu_options;
167 static int option_server_mode;
168 
169 int pmu_battery_count;
170 int pmu_cur_battery;
171 unsigned int pmu_power_flags;
172 struct pmu_battery_info pmu_batteries[PMU_MAX_BATTERIES];
173 static int query_batt_timer = BATTERY_POLLING_COUNT;
174 static struct adb_request batt_req;
175 static struct proc_dir_entry *proc_pmu_batt[PMU_MAX_BATTERIES];
176 
177 int __fake_sleep;
178 int asleep;
179 BLOCKING_NOTIFIER_HEAD(sleep_notifier_list);
180 
181 #ifdef CONFIG_ADB
182 static int adb_dev_map = 0;
183 static int pmu_adb_flags;
184 
185 static int pmu_probe(void);
186 static int pmu_init(void);
187 static int pmu_send_request(struct adb_request *req, int sync);
188 static int pmu_adb_autopoll(int devs);
189 static int pmu_adb_reset_bus(void);
190 #endif /* CONFIG_ADB */
191 
192 static int init_pmu(void);
193 static void pmu_start(void);
194 static irqreturn_t via_pmu_interrupt(int irq, void *arg);
195 static irqreturn_t gpio1_interrupt(int irq, void *arg);
196 static int proc_get_info(char *page, char **start, off_t off,
197 			  int count, int *eof, void *data);
198 static int proc_get_irqstats(char *page, char **start, off_t off,
199 			  int count, int *eof, void *data);
200 static void pmu_pass_intr(unsigned char *data, int len);
201 static int proc_get_batt(char *page, char **start, off_t off,
202 			int count, int *eof, void *data);
203 static int proc_read_options(char *page, char **start, off_t off,
204 			int count, int *eof, void *data);
205 static int proc_write_options(struct file *file, const char __user *buffer,
206 			unsigned long count, void *data);
207 
208 #ifdef CONFIG_ADB
209 struct adb_driver via_pmu_driver = {
210 	"PMU",
211 	pmu_probe,
212 	pmu_init,
213 	pmu_send_request,
214 	pmu_adb_autopoll,
215 	pmu_poll_adb,
216 	pmu_adb_reset_bus
217 };
218 #endif /* CONFIG_ADB */
219 
220 extern void low_sleep_handler(void);
221 extern void enable_kernel_altivec(void);
222 extern void enable_kernel_fp(void);
223 
224 #ifdef DEBUG_SLEEP
225 int pmu_polled_request(struct adb_request *req);
226 int pmu_wink(struct adb_request *req);
227 #endif
228 
229 /*
230  * This table indicates for each PMU opcode:
231  * - the number of data bytes to be sent with the command, or -1
232  *   if a length byte should be sent,
233  * - the number of response bytes which the PMU will return, or
234  *   -1 if it will send a length byte.
235  */
236 static const s8 pmu_data_len[256][2] = {
237 /*	   0	   1	   2	   3	   4	   5	   6	   7  */
238 /*00*/	{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
239 /*08*/	{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
240 /*10*/	{ 1, 0},{ 1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
241 /*18*/	{ 0, 1},{ 0, 1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{ 0, 0},
242 /*20*/	{-1, 0},{ 0, 0},{ 2, 0},{ 1, 0},{ 1, 0},{-1, 0},{-1, 0},{-1, 0},
243 /*28*/	{ 0,-1},{ 0,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{ 0,-1},
244 /*30*/	{ 4, 0},{20, 0},{-1, 0},{ 3, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
245 /*38*/	{ 0, 4},{ 0,20},{ 2,-1},{ 2, 1},{ 3,-1},{-1,-1},{-1,-1},{ 4, 0},
246 /*40*/	{ 1, 0},{ 1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
247 /*48*/	{ 0, 1},{ 0, 1},{-1,-1},{ 1, 0},{ 1, 0},{-1,-1},{-1,-1},{-1,-1},
248 /*50*/	{ 1, 0},{ 0, 0},{ 2, 0},{ 2, 0},{-1, 0},{ 1, 0},{ 3, 0},{ 1, 0},
249 /*58*/	{ 0, 1},{ 1, 0},{ 0, 2},{ 0, 2},{ 0,-1},{-1,-1},{-1,-1},{-1,-1},
250 /*60*/	{ 2, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
251 /*68*/	{ 0, 3},{ 0, 3},{ 0, 2},{ 0, 8},{ 0,-1},{ 0,-1},{-1,-1},{-1,-1},
252 /*70*/	{ 1, 0},{ 1, 0},{ 1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
253 /*78*/	{ 0,-1},{ 0,-1},{-1,-1},{-1,-1},{-1,-1},{ 5, 1},{ 4, 1},{ 4, 1},
254 /*80*/	{ 4, 0},{-1, 0},{ 0, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
255 /*88*/	{ 0, 5},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
256 /*90*/	{ 1, 0},{ 2, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
257 /*98*/	{ 0, 1},{ 0, 1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
258 /*a0*/	{ 2, 0},{ 2, 0},{ 2, 0},{ 4, 0},{-1, 0},{ 0, 0},{-1, 0},{-1, 0},
259 /*a8*/	{ 1, 1},{ 1, 0},{ 3, 0},{ 2, 0},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
260 /*b0*/	{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
261 /*b8*/	{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
262 /*c0*/	{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
263 /*c8*/	{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
264 /*d0*/	{ 0, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
265 /*d8*/	{ 1, 1},{ 1, 1},{-1,-1},{-1,-1},{ 0, 1},{ 0,-1},{-1,-1},{-1,-1},
266 /*e0*/	{-1, 0},{ 4, 0},{ 0, 1},{-1, 0},{-1, 0},{ 4, 0},{-1, 0},{-1, 0},
267 /*e8*/	{ 3,-1},{-1,-1},{ 0, 1},{-1,-1},{ 0,-1},{-1,-1},{-1,-1},{ 0, 0},
268 /*f0*/	{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},{-1, 0},
269 /*f8*/	{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},{-1,-1},
270 };
271 
272 static char *pbook_type[] = {
273 	"Unknown PowerBook",
274 	"PowerBook 2400/3400/3500(G3)",
275 	"PowerBook G3 Series",
276 	"1999 PowerBook G3",
277 	"Core99"
278 };
279 
280 int __init find_via_pmu(void)
281 {
282 	u64 taddr;
283 	const u32 *reg;
284 
285 	if (via != 0)
286 		return 1;
287 	vias = of_find_node_by_name(NULL, "via-pmu");
288 	if (vias == NULL)
289 		return 0;
290 
291 	reg = get_property(vias, "reg", NULL);
292 	if (reg == NULL) {
293 		printk(KERN_ERR "via-pmu: No \"reg\" property !\n");
294 		goto fail;
295 	}
296 	taddr = of_translate_address(vias, reg);
297 	if (taddr == OF_BAD_ADDR) {
298 		printk(KERN_ERR "via-pmu: Can't translate address !\n");
299 		goto fail;
300 	}
301 
302 	spin_lock_init(&pmu_lock);
303 
304 	pmu_has_adb = 1;
305 
306 	pmu_intr_mask =	PMU_INT_PCEJECT |
307 			PMU_INT_SNDBRT |
308 			PMU_INT_ADB |
309 			PMU_INT_TICK;
310 
311 	if (vias->parent->name && ((strcmp(vias->parent->name, "ohare") == 0)
312 	    || device_is_compatible(vias->parent, "ohare")))
313 		pmu_kind = PMU_OHARE_BASED;
314 	else if (device_is_compatible(vias->parent, "paddington"))
315 		pmu_kind = PMU_PADDINGTON_BASED;
316 	else if (device_is_compatible(vias->parent, "heathrow"))
317 		pmu_kind = PMU_HEATHROW_BASED;
318 	else if (device_is_compatible(vias->parent, "Keylargo")
319 		 || device_is_compatible(vias->parent, "K2-Keylargo")) {
320 		struct device_node *gpiop;
321 		u64 gaddr = OF_BAD_ADDR;
322 
323 		pmu_kind = PMU_KEYLARGO_BASED;
324 		pmu_has_adb = (find_type_devices("adb") != NULL);
325 		pmu_intr_mask =	PMU_INT_PCEJECT |
326 				PMU_INT_SNDBRT |
327 				PMU_INT_ADB |
328 				PMU_INT_TICK |
329 				PMU_INT_ENVIRONMENT;
330 
331 		gpiop = of_find_node_by_name(NULL, "gpio");
332 		if (gpiop) {
333 			reg = get_property(gpiop, "reg", NULL);
334 			if (reg)
335 				gaddr = of_translate_address(gpiop, reg);
336 			if (gaddr != OF_BAD_ADDR)
337 				gpio_reg = ioremap(gaddr, 0x10);
338 		}
339 		if (gpio_reg == NULL) {
340 			printk(KERN_ERR "via-pmu: Can't find GPIO reg !\n");
341 			goto fail_gpio;
342 		}
343 	} else
344 		pmu_kind = PMU_UNKNOWN;
345 
346 	via = ioremap(taddr, 0x2000);
347 	if (via == NULL) {
348 		printk(KERN_ERR "via-pmu: Can't map address !\n");
349 		goto fail;
350 	}
351 
352 	out_8(&via[IER], IER_CLR | 0x7f);	/* disable all intrs */
353 	out_8(&via[IFR], 0x7f);			/* clear IFR */
354 
355 	pmu_state = idle;
356 
357 	if (!init_pmu()) {
358 		via = NULL;
359 		return 0;
360 	}
361 
362 	printk(KERN_INFO "PMU driver v%d initialized for %s, firmware: %02x\n",
363 	       PMU_DRIVER_VERSION, pbook_type[pmu_kind], pmu_version);
364 
365 	sys_ctrler = SYS_CTRLER_PMU;
366 
367 	return 1;
368  fail:
369 	of_node_put(vias);
370 	iounmap(gpio_reg);
371 	gpio_reg = NULL;
372  fail_gpio:
373 	vias = NULL;
374 	return 0;
375 }
376 
377 #ifdef CONFIG_ADB
378 static int pmu_probe(void)
379 {
380 	return vias == NULL? -ENODEV: 0;
381 }
382 
383 static int __init pmu_init(void)
384 {
385 	if (vias == NULL)
386 		return -ENODEV;
387 	return 0;
388 }
389 #endif /* CONFIG_ADB */
390 
391 /*
392  * We can't wait until pmu_init gets called, that happens too late.
393  * It happens after IDE and SCSI initialization, which can take a few
394  * seconds, and by that time the PMU could have given up on us and
395  * turned us off.
396  * Thus this is called with arch_initcall rather than device_initcall.
397  */
398 static int __init via_pmu_start(void)
399 {
400 	unsigned int irq;
401 
402 	if (vias == NULL)
403 		return -ENODEV;
404 
405 	batt_req.complete = 1;
406 
407 	irq = irq_of_parse_and_map(vias, 0);
408 	if (irq == NO_IRQ) {
409 		printk(KERN_ERR "via-pmu: can't map interruptn");
410 		return -ENODEV;
411 	}
412 	if (request_irq(irq, via_pmu_interrupt, 0, "VIA-PMU", (void *)0)) {
413 		printk(KERN_ERR "via-pmu: can't request irq %d\n", irq);
414 		return -ENODEV;
415 	}
416 
417 	if (pmu_kind == PMU_KEYLARGO_BASED) {
418 		gpio_node = of_find_node_by_name(NULL, "extint-gpio1");
419 		if (gpio_node == NULL)
420 			gpio_node = of_find_node_by_name(NULL,
421 							 "pmu-interrupt");
422 		if (gpio_node)
423 			gpio_irq = irq_of_parse_and_map(gpio_node, 0);
424 
425 		if (gpio_irq != NO_IRQ) {
426 			if (request_irq(gpio_irq, gpio1_interrupt, 0,
427 					"GPIO1 ADB", (void *)0))
428 				printk(KERN_ERR "pmu: can't get irq %d"
429 				       " (GPIO1)\n", gpio_irq);
430 			else
431 				gpio_irq_enabled = 1;
432 		}
433 	}
434 
435 	/* Enable interrupts */
436 	out_8(&via[IER], IER_SET | SR_INT | CB1_INT);
437 
438 	pmu_fully_inited = 1;
439 
440 	/* Make sure PMU settle down before continuing. This is _very_ important
441 	 * since the IDE probe may shut interrupts down for quite a bit of time. If
442 	 * a PMU communication is pending while this happens, the PMU may timeout
443 	 * Not that on Core99 machines, the PMU keeps sending us environement
444 	 * messages, we should find a way to either fix IDE or make it call
445 	 * pmu_suspend() before masking interrupts. This can also happens while
446 	 * scolling with some fbdevs.
447 	 */
448 	do {
449 		pmu_poll();
450 	} while (pmu_state != idle);
451 
452 	return 0;
453 }
454 
455 arch_initcall(via_pmu_start);
456 
457 /*
458  * This has to be done after pci_init, which is a subsys_initcall.
459  */
460 static int __init via_pmu_dev_init(void)
461 {
462 	if (vias == NULL)
463 		return -ENODEV;
464 
465 #ifdef CONFIG_PMAC_BACKLIGHT
466 	/* Initialize backlight */
467 	pmu_backlight_init();
468 #endif
469 
470 #ifdef CONFIG_PPC32
471   	if (machine_is_compatible("AAPL,3400/2400") ||
472   		machine_is_compatible("AAPL,3500")) {
473 		int mb = pmac_call_feature(PMAC_FTR_GET_MB_INFO,
474 			NULL, PMAC_MB_INFO_MODEL, 0);
475 		pmu_battery_count = 1;
476 		if (mb == PMAC_TYPE_COMET)
477 			pmu_batteries[0].flags |= PMU_BATT_TYPE_COMET;
478 		else
479 			pmu_batteries[0].flags |= PMU_BATT_TYPE_HOOPER;
480 	} else if (machine_is_compatible("AAPL,PowerBook1998") ||
481 		machine_is_compatible("PowerBook1,1")) {
482 		pmu_battery_count = 2;
483 		pmu_batteries[0].flags |= PMU_BATT_TYPE_SMART;
484 		pmu_batteries[1].flags |= PMU_BATT_TYPE_SMART;
485 	} else {
486 		struct device_node* prim = find_devices("power-mgt");
487 		const u32 *prim_info = NULL;
488 		if (prim)
489 			prim_info = get_property(prim, "prim-info", NULL);
490 		if (prim_info) {
491 			/* Other stuffs here yet unknown */
492 			pmu_battery_count = (prim_info[6] >> 16) & 0xff;
493 			pmu_batteries[0].flags |= PMU_BATT_TYPE_SMART;
494 			if (pmu_battery_count > 1)
495 				pmu_batteries[1].flags |= PMU_BATT_TYPE_SMART;
496 		}
497 	}
498 #endif /* CONFIG_PPC32 */
499 
500 	/* Create /proc/pmu */
501 	proc_pmu_root = proc_mkdir("pmu", NULL);
502 	if (proc_pmu_root) {
503 		long i;
504 
505 		for (i=0; i<pmu_battery_count; i++) {
506 			char title[16];
507 			sprintf(title, "battery_%ld", i);
508 			proc_pmu_batt[i] = create_proc_read_entry(title, 0, proc_pmu_root,
509 						proc_get_batt, (void *)i);
510 		}
511 
512 		proc_pmu_info = create_proc_read_entry("info", 0, proc_pmu_root,
513 					proc_get_info, NULL);
514 		proc_pmu_irqstats = create_proc_read_entry("interrupts", 0, proc_pmu_root,
515 					proc_get_irqstats, NULL);
516 		proc_pmu_options = create_proc_entry("options", 0600, proc_pmu_root);
517 		if (proc_pmu_options) {
518 			proc_pmu_options->nlink = 1;
519 			proc_pmu_options->read_proc = proc_read_options;
520 			proc_pmu_options->write_proc = proc_write_options;
521 		}
522 	}
523 	return 0;
524 }
525 
526 device_initcall(via_pmu_dev_init);
527 
528 static int
529 init_pmu(void)
530 {
531 	int timeout;
532 	struct adb_request req;
533 
534 	out_8(&via[B], via[B] | TREQ);			/* negate TREQ */
535 	out_8(&via[DIRB], (via[DIRB] | TREQ) & ~TACK);	/* TACK in, TREQ out */
536 
537 	pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, pmu_intr_mask);
538 	timeout =  100000;
539 	while (!req.complete) {
540 		if (--timeout < 0) {
541 			printk(KERN_ERR "init_pmu: no response from PMU\n");
542 			return 0;
543 		}
544 		udelay(10);
545 		pmu_poll();
546 	}
547 
548 	/* ack all pending interrupts */
549 	timeout = 100000;
550 	interrupt_data[0][0] = 1;
551 	while (interrupt_data[0][0] || pmu_state != idle) {
552 		if (--timeout < 0) {
553 			printk(KERN_ERR "init_pmu: timed out acking intrs\n");
554 			return 0;
555 		}
556 		if (pmu_state == idle)
557 			adb_int_pending = 1;
558 		via_pmu_interrupt(0, NULL);
559 		udelay(10);
560 	}
561 
562 	/* Tell PMU we are ready.  */
563 	if (pmu_kind == PMU_KEYLARGO_BASED) {
564 		pmu_request(&req, NULL, 2, PMU_SYSTEM_READY, 2);
565 		while (!req.complete)
566 			pmu_poll();
567 	}
568 
569 	/* Read PMU version */
570 	pmu_request(&req, NULL, 1, PMU_GET_VERSION);
571 	pmu_wait_complete(&req);
572 	if (req.reply_len > 0)
573 		pmu_version = req.reply[0];
574 
575 	/* Read server mode setting */
576 	if (pmu_kind == PMU_KEYLARGO_BASED) {
577 		pmu_request(&req, NULL, 2, PMU_POWER_EVENTS,
578 			    PMU_PWR_GET_POWERUP_EVENTS);
579 		pmu_wait_complete(&req);
580 		if (req.reply_len == 2) {
581 			if (req.reply[1] & PMU_PWR_WAKEUP_AC_INSERT)
582 				option_server_mode = 1;
583 			printk(KERN_INFO "via-pmu: Server Mode is %s\n",
584 			       option_server_mode ? "enabled" : "disabled");
585 		}
586 	}
587 	return 1;
588 }
589 
590 int
591 pmu_get_model(void)
592 {
593 	return pmu_kind;
594 }
595 
596 static void pmu_set_server_mode(int server_mode)
597 {
598 	struct adb_request req;
599 
600 	if (pmu_kind != PMU_KEYLARGO_BASED)
601 		return;
602 
603 	option_server_mode = server_mode;
604 	pmu_request(&req, NULL, 2, PMU_POWER_EVENTS, PMU_PWR_GET_POWERUP_EVENTS);
605 	pmu_wait_complete(&req);
606 	if (req.reply_len < 2)
607 		return;
608 	if (server_mode)
609 		pmu_request(&req, NULL, 4, PMU_POWER_EVENTS,
610 			    PMU_PWR_SET_POWERUP_EVENTS,
611 			    req.reply[0], PMU_PWR_WAKEUP_AC_INSERT);
612 	else
613 		pmu_request(&req, NULL, 4, PMU_POWER_EVENTS,
614 			    PMU_PWR_CLR_POWERUP_EVENTS,
615 			    req.reply[0], PMU_PWR_WAKEUP_AC_INSERT);
616 	pmu_wait_complete(&req);
617 }
618 
619 /* This new version of the code for 2400/3400/3500 powerbooks
620  * is inspired from the implementation in gkrellm-pmu
621  */
622 static void
623 done_battery_state_ohare(struct adb_request* req)
624 {
625 	/* format:
626 	 *  [0]    :  flags
627 	 *    0x01 :  AC indicator
628 	 *    0x02 :  charging
629 	 *    0x04 :  battery exist
630 	 *    0x08 :
631 	 *    0x10 :
632 	 *    0x20 :  full charged
633 	 *    0x40 :  pcharge reset
634 	 *    0x80 :  battery exist
635 	 *
636 	 *  [1][2] :  battery voltage
637 	 *  [3]    :  CPU temperature
638 	 *  [4]    :  battery temperature
639 	 *  [5]    :  current
640 	 *  [6][7] :  pcharge
641 	 *              --tkoba
642 	 */
643 	unsigned int bat_flags = PMU_BATT_TYPE_HOOPER;
644 	long pcharge, charge, vb, vmax, lmax;
645 	long vmax_charging, vmax_charged;
646 	long amperage, voltage, time, max;
647 	int mb = pmac_call_feature(PMAC_FTR_GET_MB_INFO,
648 			NULL, PMAC_MB_INFO_MODEL, 0);
649 
650 	if (req->reply[0] & 0x01)
651 		pmu_power_flags |= PMU_PWR_AC_PRESENT;
652 	else
653 		pmu_power_flags &= ~PMU_PWR_AC_PRESENT;
654 
655 	if (mb == PMAC_TYPE_COMET) {
656 		vmax_charged = 189;
657 		vmax_charging = 213;
658 		lmax = 6500;
659 	} else {
660 		vmax_charged = 330;
661 		vmax_charging = 330;
662 		lmax = 6500;
663 	}
664 	vmax = vmax_charged;
665 
666 	/* If battery installed */
667 	if (req->reply[0] & 0x04) {
668 		bat_flags |= PMU_BATT_PRESENT;
669 		if (req->reply[0] & 0x02)
670 			bat_flags |= PMU_BATT_CHARGING;
671 		vb = (req->reply[1] << 8) | req->reply[2];
672 		voltage = (vb * 265 + 72665) / 10;
673 		amperage = req->reply[5];
674 		if ((req->reply[0] & 0x01) == 0) {
675 			if (amperage > 200)
676 				vb += ((amperage - 200) * 15)/100;
677 		} else if (req->reply[0] & 0x02) {
678 			vb = (vb * 97) / 100;
679 			vmax = vmax_charging;
680 		}
681 		charge = (100 * vb) / vmax;
682 		if (req->reply[0] & 0x40) {
683 			pcharge = (req->reply[6] << 8) + req->reply[7];
684 			if (pcharge > lmax)
685 				pcharge = lmax;
686 			pcharge *= 100;
687 			pcharge = 100 - pcharge / lmax;
688 			if (pcharge < charge)
689 				charge = pcharge;
690 		}
691 		if (amperage > 0)
692 			time = (charge * 16440) / amperage;
693 		else
694 			time = 0;
695 		max = 100;
696 		amperage = -amperage;
697 	} else
698 		charge = max = amperage = voltage = time = 0;
699 
700 	pmu_batteries[pmu_cur_battery].flags = bat_flags;
701 	pmu_batteries[pmu_cur_battery].charge = charge;
702 	pmu_batteries[pmu_cur_battery].max_charge = max;
703 	pmu_batteries[pmu_cur_battery].amperage = amperage;
704 	pmu_batteries[pmu_cur_battery].voltage = voltage;
705 	pmu_batteries[pmu_cur_battery].time_remaining = time;
706 
707 	clear_bit(0, &async_req_locks);
708 }
709 
710 static void
711 done_battery_state_smart(struct adb_request* req)
712 {
713 	/* format:
714 	 *  [0] : format of this structure (known: 3,4,5)
715 	 *  [1] : flags
716 	 *
717 	 *  format 3 & 4:
718 	 *
719 	 *  [2] : charge
720 	 *  [3] : max charge
721 	 *  [4] : current
722 	 *  [5] : voltage
723 	 *
724 	 *  format 5:
725 	 *
726 	 *  [2][3] : charge
727 	 *  [4][5] : max charge
728 	 *  [6][7] : current
729 	 *  [8][9] : voltage
730 	 */
731 
732 	unsigned int bat_flags = PMU_BATT_TYPE_SMART;
733 	int amperage;
734 	unsigned int capa, max, voltage;
735 
736 	if (req->reply[1] & 0x01)
737 		pmu_power_flags |= PMU_PWR_AC_PRESENT;
738 	else
739 		pmu_power_flags &= ~PMU_PWR_AC_PRESENT;
740 
741 
742 	capa = max = amperage = voltage = 0;
743 
744 	if (req->reply[1] & 0x04) {
745 		bat_flags |= PMU_BATT_PRESENT;
746 		switch(req->reply[0]) {
747 			case 3:
748 			case 4: capa = req->reply[2];
749 				max = req->reply[3];
750 				amperage = *((signed char *)&req->reply[4]);
751 				voltage = req->reply[5];
752 				break;
753 			case 5: capa = (req->reply[2] << 8) | req->reply[3];
754 				max = (req->reply[4] << 8) | req->reply[5];
755 				amperage = *((signed short *)&req->reply[6]);
756 				voltage = (req->reply[8] << 8) | req->reply[9];
757 				break;
758 			default:
759 				printk(KERN_WARNING "pmu.c : unrecognized battery info, len: %d, %02x %02x %02x %02x\n",
760 					req->reply_len, req->reply[0], req->reply[1], req->reply[2], req->reply[3]);
761 				break;
762 		}
763 	}
764 
765 	if ((req->reply[1] & 0x01) && (amperage > 0))
766 		bat_flags |= PMU_BATT_CHARGING;
767 
768 	pmu_batteries[pmu_cur_battery].flags = bat_flags;
769 	pmu_batteries[pmu_cur_battery].charge = capa;
770 	pmu_batteries[pmu_cur_battery].max_charge = max;
771 	pmu_batteries[pmu_cur_battery].amperage = amperage;
772 	pmu_batteries[pmu_cur_battery].voltage = voltage;
773 	if (amperage) {
774 		if ((req->reply[1] & 0x01) && (amperage > 0))
775 			pmu_batteries[pmu_cur_battery].time_remaining
776 				= ((max-capa) * 3600) / amperage;
777 		else
778 			pmu_batteries[pmu_cur_battery].time_remaining
779 				= (capa * 3600) / (-amperage);
780 	} else
781 		pmu_batteries[pmu_cur_battery].time_remaining = 0;
782 
783 	pmu_cur_battery = (pmu_cur_battery + 1) % pmu_battery_count;
784 
785 	clear_bit(0, &async_req_locks);
786 }
787 
788 static void
789 query_battery_state(void)
790 {
791 	if (test_and_set_bit(0, &async_req_locks))
792 		return;
793 	if (pmu_kind == PMU_OHARE_BASED)
794 		pmu_request(&batt_req, done_battery_state_ohare,
795 			1, PMU_BATTERY_STATE);
796 	else
797 		pmu_request(&batt_req, done_battery_state_smart,
798 			2, PMU_SMART_BATTERY_STATE, pmu_cur_battery+1);
799 }
800 
801 static int
802 proc_get_info(char *page, char **start, off_t off,
803 		int count, int *eof, void *data)
804 {
805 	char* p = page;
806 
807 	p += sprintf(p, "PMU driver version     : %d\n", PMU_DRIVER_VERSION);
808 	p += sprintf(p, "PMU firmware version   : %02x\n", pmu_version);
809 	p += sprintf(p, "AC Power               : %d\n",
810 		((pmu_power_flags & PMU_PWR_AC_PRESENT) != 0) || pmu_battery_count == 0);
811 	p += sprintf(p, "Battery count          : %d\n", pmu_battery_count);
812 
813 	return p - page;
814 }
815 
816 static int
817 proc_get_irqstats(char *page, char **start, off_t off,
818 		  int count, int *eof, void *data)
819 {
820 	int i;
821 	char* p = page;
822 	static const char *irq_names[] = {
823 		"Total CB1 triggered events",
824 		"Total GPIO1 triggered events",
825 		"PC-Card eject button",
826 		"Sound/Brightness button",
827 		"ADB message",
828 		"Battery state change",
829 		"Environment interrupt",
830 		"Tick timer",
831 		"Ghost interrupt (zero len)",
832 		"Empty interrupt (empty mask)",
833 		"Max irqs in a row"
834         };
835 
836 	for (i=0; i<11; i++) {
837 		p += sprintf(p, " %2u: %10u (%s)\n",
838 			     i, pmu_irq_stats[i], irq_names[i]);
839 	}
840 	return p - page;
841 }
842 
843 static int
844 proc_get_batt(char *page, char **start, off_t off,
845 		int count, int *eof, void *data)
846 {
847 	long batnum = (long)data;
848 	char *p = page;
849 
850 	p += sprintf(p, "\n");
851 	p += sprintf(p, "flags      : %08x\n",
852 		pmu_batteries[batnum].flags);
853 	p += sprintf(p, "charge     : %d\n",
854 		pmu_batteries[batnum].charge);
855 	p += sprintf(p, "max_charge : %d\n",
856 		pmu_batteries[batnum].max_charge);
857 	p += sprintf(p, "current    : %d\n",
858 		pmu_batteries[batnum].amperage);
859 	p += sprintf(p, "voltage    : %d\n",
860 		pmu_batteries[batnum].voltage);
861 	p += sprintf(p, "time rem.  : %d\n",
862 		pmu_batteries[batnum].time_remaining);
863 
864 	return p - page;
865 }
866 
867 static int
868 proc_read_options(char *page, char **start, off_t off,
869 			int count, int *eof, void *data)
870 {
871 	char *p = page;
872 
873 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
874 	if (pmu_kind == PMU_KEYLARGO_BASED &&
875 	    pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,-1) >= 0)
876 		p += sprintf(p, "lid_wakeup=%d\n", option_lid_wakeup);
877 #endif
878 	if (pmu_kind == PMU_KEYLARGO_BASED)
879 		p += sprintf(p, "server_mode=%d\n", option_server_mode);
880 
881 	return p - page;
882 }
883 
884 static int
885 proc_write_options(struct file *file, const char __user *buffer,
886 			unsigned long count, void *data)
887 {
888 	char tmp[33];
889 	char *label, *val;
890 	unsigned long fcount = count;
891 
892 	if (!count)
893 		return -EINVAL;
894 	if (count > 32)
895 		count = 32;
896 	if (copy_from_user(tmp, buffer, count))
897 		return -EFAULT;
898 	tmp[count] = 0;
899 
900 	label = tmp;
901 	while(*label == ' ')
902 		label++;
903 	val = label;
904 	while(*val && (*val != '=')) {
905 		if (*val == ' ')
906 			*val = 0;
907 		val++;
908 	}
909 	if ((*val) == 0)
910 		return -EINVAL;
911 	*(val++) = 0;
912 	while(*val == ' ')
913 		val++;
914 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
915 	if (pmu_kind == PMU_KEYLARGO_BASED &&
916 	    pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,-1) >= 0)
917 		if (!strcmp(label, "lid_wakeup"))
918 			option_lid_wakeup = ((*val) == '1');
919 #endif
920 	if (pmu_kind == PMU_KEYLARGO_BASED && !strcmp(label, "server_mode")) {
921 		int new_value;
922 		new_value = ((*val) == '1');
923 		if (new_value != option_server_mode)
924 			pmu_set_server_mode(new_value);
925 	}
926 	return fcount;
927 }
928 
929 #ifdef CONFIG_ADB
930 /* Send an ADB command */
931 static int
932 pmu_send_request(struct adb_request *req, int sync)
933 {
934 	int i, ret;
935 
936 	if ((vias == NULL) || (!pmu_fully_inited)) {
937 		req->complete = 1;
938 		return -ENXIO;
939 	}
940 
941 	ret = -EINVAL;
942 
943 	switch (req->data[0]) {
944 	case PMU_PACKET:
945 		for (i = 0; i < req->nbytes - 1; ++i)
946 			req->data[i] = req->data[i+1];
947 		--req->nbytes;
948 		if (pmu_data_len[req->data[0]][1] != 0) {
949 			req->reply[0] = ADB_RET_OK;
950 			req->reply_len = 1;
951 		} else
952 			req->reply_len = 0;
953 		ret = pmu_queue_request(req);
954 		break;
955 	case CUDA_PACKET:
956 		switch (req->data[1]) {
957 		case CUDA_GET_TIME:
958 			if (req->nbytes != 2)
959 				break;
960 			req->data[0] = PMU_READ_RTC;
961 			req->nbytes = 1;
962 			req->reply_len = 3;
963 			req->reply[0] = CUDA_PACKET;
964 			req->reply[1] = 0;
965 			req->reply[2] = CUDA_GET_TIME;
966 			ret = pmu_queue_request(req);
967 			break;
968 		case CUDA_SET_TIME:
969 			if (req->nbytes != 6)
970 				break;
971 			req->data[0] = PMU_SET_RTC;
972 			req->nbytes = 5;
973 			for (i = 1; i <= 4; ++i)
974 				req->data[i] = req->data[i+1];
975 			req->reply_len = 3;
976 			req->reply[0] = CUDA_PACKET;
977 			req->reply[1] = 0;
978 			req->reply[2] = CUDA_SET_TIME;
979 			ret = pmu_queue_request(req);
980 			break;
981 		}
982 		break;
983 	case ADB_PACKET:
984 	    	if (!pmu_has_adb)
985     			return -ENXIO;
986 		for (i = req->nbytes - 1; i > 1; --i)
987 			req->data[i+2] = req->data[i];
988 		req->data[3] = req->nbytes - 2;
989 		req->data[2] = pmu_adb_flags;
990 		/*req->data[1] = req->data[1];*/
991 		req->data[0] = PMU_ADB_CMD;
992 		req->nbytes += 2;
993 		req->reply_expected = 1;
994 		req->reply_len = 0;
995 		ret = pmu_queue_request(req);
996 		break;
997 	}
998 	if (ret) {
999 		req->complete = 1;
1000 		return ret;
1001 	}
1002 
1003 	if (sync)
1004 		while (!req->complete)
1005 			pmu_poll();
1006 
1007 	return 0;
1008 }
1009 
1010 /* Enable/disable autopolling */
1011 static int
1012 pmu_adb_autopoll(int devs)
1013 {
1014 	struct adb_request req;
1015 
1016 	if ((vias == NULL) || (!pmu_fully_inited) || !pmu_has_adb)
1017 		return -ENXIO;
1018 
1019 	if (devs) {
1020 		adb_dev_map = devs;
1021 		pmu_request(&req, NULL, 5, PMU_ADB_CMD, 0, 0x86,
1022 			    adb_dev_map >> 8, adb_dev_map);
1023 		pmu_adb_flags = 2;
1024 	} else {
1025 		pmu_request(&req, NULL, 1, PMU_ADB_POLL_OFF);
1026 		pmu_adb_flags = 0;
1027 	}
1028 	while (!req.complete)
1029 		pmu_poll();
1030 	return 0;
1031 }
1032 
1033 /* Reset the ADB bus */
1034 static int
1035 pmu_adb_reset_bus(void)
1036 {
1037 	struct adb_request req;
1038 	int save_autopoll = adb_dev_map;
1039 
1040 	if ((vias == NULL) || (!pmu_fully_inited) || !pmu_has_adb)
1041 		return -ENXIO;
1042 
1043 	/* anyone got a better idea?? */
1044 	pmu_adb_autopoll(0);
1045 
1046 	req.nbytes = 5;
1047 	req.done = NULL;
1048 	req.data[0] = PMU_ADB_CMD;
1049 	req.data[1] = 0;
1050 	req.data[2] = ADB_BUSRESET;
1051 	req.data[3] = 0;
1052 	req.data[4] = 0;
1053 	req.reply_len = 0;
1054 	req.reply_expected = 1;
1055 	if (pmu_queue_request(&req) != 0) {
1056 		printk(KERN_ERR "pmu_adb_reset_bus: pmu_queue_request failed\n");
1057 		return -EIO;
1058 	}
1059 	pmu_wait_complete(&req);
1060 
1061 	if (save_autopoll != 0)
1062 		pmu_adb_autopoll(save_autopoll);
1063 
1064 	return 0;
1065 }
1066 #endif /* CONFIG_ADB */
1067 
1068 /* Construct and send a pmu request */
1069 int
1070 pmu_request(struct adb_request *req, void (*done)(struct adb_request *),
1071 	    int nbytes, ...)
1072 {
1073 	va_list list;
1074 	int i;
1075 
1076 	if (vias == NULL)
1077 		return -ENXIO;
1078 
1079 	if (nbytes < 0 || nbytes > 32) {
1080 		printk(KERN_ERR "pmu_request: bad nbytes (%d)\n", nbytes);
1081 		req->complete = 1;
1082 		return -EINVAL;
1083 	}
1084 	req->nbytes = nbytes;
1085 	req->done = done;
1086 	va_start(list, nbytes);
1087 	for (i = 0; i < nbytes; ++i)
1088 		req->data[i] = va_arg(list, int);
1089 	va_end(list);
1090 	req->reply_len = 0;
1091 	req->reply_expected = 0;
1092 	return pmu_queue_request(req);
1093 }
1094 
1095 int
1096 pmu_queue_request(struct adb_request *req)
1097 {
1098 	unsigned long flags;
1099 	int nsend;
1100 
1101 	if (via == NULL) {
1102 		req->complete = 1;
1103 		return -ENXIO;
1104 	}
1105 	if (req->nbytes <= 0) {
1106 		req->complete = 1;
1107 		return 0;
1108 	}
1109 	nsend = pmu_data_len[req->data[0]][0];
1110 	if (nsend >= 0 && req->nbytes != nsend + 1) {
1111 		req->complete = 1;
1112 		return -EINVAL;
1113 	}
1114 
1115 	req->next = NULL;
1116 	req->sent = 0;
1117 	req->complete = 0;
1118 
1119 	spin_lock_irqsave(&pmu_lock, flags);
1120 	if (current_req != 0) {
1121 		last_req->next = req;
1122 		last_req = req;
1123 	} else {
1124 		current_req = req;
1125 		last_req = req;
1126 		if (pmu_state == idle)
1127 			pmu_start();
1128 	}
1129 	spin_unlock_irqrestore(&pmu_lock, flags);
1130 
1131 	return 0;
1132 }
1133 
1134 static inline void
1135 wait_for_ack(void)
1136 {
1137 	/* Sightly increased the delay, I had one occurrence of the message
1138 	 * reported
1139 	 */
1140 	int timeout = 4000;
1141 	while ((in_8(&via[B]) & TACK) == 0) {
1142 		if (--timeout < 0) {
1143 			printk(KERN_ERR "PMU not responding (!ack)\n");
1144 			return;
1145 		}
1146 		udelay(10);
1147 	}
1148 }
1149 
1150 /* New PMU seems to be very sensitive to those timings, so we make sure
1151  * PCI is flushed immediately */
1152 static inline void
1153 send_byte(int x)
1154 {
1155 	volatile unsigned char __iomem *v = via;
1156 
1157 	out_8(&v[ACR], in_8(&v[ACR]) | SR_OUT | SR_EXT);
1158 	out_8(&v[SR], x);
1159 	out_8(&v[B], in_8(&v[B]) & ~TREQ);		/* assert TREQ */
1160 	(void)in_8(&v[B]);
1161 }
1162 
1163 static inline void
1164 recv_byte(void)
1165 {
1166 	volatile unsigned char __iomem *v = via;
1167 
1168 	out_8(&v[ACR], (in_8(&v[ACR]) & ~SR_OUT) | SR_EXT);
1169 	in_8(&v[SR]);		/* resets SR */
1170 	out_8(&v[B], in_8(&v[B]) & ~TREQ);
1171 	(void)in_8(&v[B]);
1172 }
1173 
1174 static inline void
1175 pmu_done(struct adb_request *req)
1176 {
1177 	void (*done)(struct adb_request *) = req->done;
1178 	mb();
1179 	req->complete = 1;
1180     	/* Here, we assume that if the request has a done member, the
1181     	 * struct request will survive to setting req->complete to 1
1182     	 */
1183 	if (done)
1184 		(*done)(req);
1185 }
1186 
1187 static void
1188 pmu_start(void)
1189 {
1190 	struct adb_request *req;
1191 
1192 	/* assert pmu_state == idle */
1193 	/* get the packet to send */
1194 	req = current_req;
1195 	if (req == 0 || pmu_state != idle
1196 	    || (/*req->reply_expected && */req_awaiting_reply))
1197 		return;
1198 
1199 	pmu_state = sending;
1200 	data_index = 1;
1201 	data_len = pmu_data_len[req->data[0]][0];
1202 
1203 	/* Sounds safer to make sure ACK is high before writing. This helped
1204 	 * kill a problem with ADB and some iBooks
1205 	 */
1206 	wait_for_ack();
1207 	/* set the shift register to shift out and send a byte */
1208 	send_byte(req->data[0]);
1209 }
1210 
1211 void
1212 pmu_poll(void)
1213 {
1214 	if (!via)
1215 		return;
1216 	if (disable_poll)
1217 		return;
1218 	via_pmu_interrupt(0, NULL);
1219 }
1220 
1221 void
1222 pmu_poll_adb(void)
1223 {
1224 	if (!via)
1225 		return;
1226 	if (disable_poll)
1227 		return;
1228 	/* Kicks ADB read when PMU is suspended */
1229 	adb_int_pending = 1;
1230 	do {
1231 		via_pmu_interrupt(0, NULL);
1232 	} while (pmu_suspended && (adb_int_pending || pmu_state != idle
1233 		|| req_awaiting_reply));
1234 }
1235 
1236 void
1237 pmu_wait_complete(struct adb_request *req)
1238 {
1239 	if (!via)
1240 		return;
1241 	while((pmu_state != idle && pmu_state != locked) || !req->complete)
1242 		via_pmu_interrupt(0, NULL);
1243 }
1244 
1245 /* This function loops until the PMU is idle and prevents it from
1246  * anwsering to ADB interrupts. pmu_request can still be called.
1247  * This is done to avoid spurrious shutdowns when we know we'll have
1248  * interrupts switched off for a long time
1249  */
1250 void
1251 pmu_suspend(void)
1252 {
1253 	unsigned long flags;
1254 #ifdef SUSPEND_USES_PMU
1255 	struct adb_request *req;
1256 #endif
1257 	if (!via)
1258 		return;
1259 
1260 	spin_lock_irqsave(&pmu_lock, flags);
1261 	pmu_suspended++;
1262 	if (pmu_suspended > 1) {
1263 		spin_unlock_irqrestore(&pmu_lock, flags);
1264 		return;
1265 	}
1266 
1267 	do {
1268 		spin_unlock_irqrestore(&pmu_lock, flags);
1269 		if (req_awaiting_reply)
1270 			adb_int_pending = 1;
1271 		via_pmu_interrupt(0, NULL);
1272 		spin_lock_irqsave(&pmu_lock, flags);
1273 		if (!adb_int_pending && pmu_state == idle && !req_awaiting_reply) {
1274 #ifdef SUSPEND_USES_PMU
1275 			pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, 0);
1276 			spin_unlock_irqrestore(&pmu_lock, flags);
1277 			while(!req.complete)
1278 				pmu_poll();
1279 #else /* SUSPEND_USES_PMU */
1280 			if (gpio_irq >= 0)
1281 				disable_irq_nosync(gpio_irq);
1282 			out_8(&via[IER], CB1_INT | IER_CLR);
1283 			spin_unlock_irqrestore(&pmu_lock, flags);
1284 #endif /* SUSPEND_USES_PMU */
1285 			break;
1286 		}
1287 	} while (1);
1288 }
1289 
1290 void
1291 pmu_resume(void)
1292 {
1293 	unsigned long flags;
1294 
1295 	if (!via || (pmu_suspended < 1))
1296 		return;
1297 
1298 	spin_lock_irqsave(&pmu_lock, flags);
1299 	pmu_suspended--;
1300 	if (pmu_suspended > 0) {
1301 		spin_unlock_irqrestore(&pmu_lock, flags);
1302 		return;
1303 	}
1304 	adb_int_pending = 1;
1305 #ifdef SUSPEND_USES_PMU
1306 	pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, pmu_intr_mask);
1307 	spin_unlock_irqrestore(&pmu_lock, flags);
1308 	while(!req.complete)
1309 		pmu_poll();
1310 #else /* SUSPEND_USES_PMU */
1311 	if (gpio_irq >= 0)
1312 		enable_irq(gpio_irq);
1313 	out_8(&via[IER], CB1_INT | IER_SET);
1314 	spin_unlock_irqrestore(&pmu_lock, flags);
1315 	pmu_poll();
1316 #endif /* SUSPEND_USES_PMU */
1317 }
1318 
1319 /* Interrupt data could be the result data from an ADB cmd */
1320 static void
1321 pmu_handle_data(unsigned char *data, int len)
1322 {
1323 	unsigned char ints, pirq;
1324 	int i = 0;
1325 
1326 	asleep = 0;
1327 	if (drop_interrupts || len < 1) {
1328 		adb_int_pending = 0;
1329 		pmu_irq_stats[8]++;
1330 		return;
1331 	}
1332 
1333 	/* Get PMU interrupt mask */
1334 	ints = data[0];
1335 
1336 	/* Record zero interrupts for stats */
1337 	if (ints == 0)
1338 		pmu_irq_stats[9]++;
1339 
1340 	/* Hack to deal with ADB autopoll flag */
1341 	if (ints & PMU_INT_ADB)
1342 		ints &= ~(PMU_INT_ADB_AUTO | PMU_INT_AUTO_SRQ_POLL);
1343 
1344 next:
1345 
1346 	if (ints == 0) {
1347 		if (i > pmu_irq_stats[10])
1348 			pmu_irq_stats[10] = i;
1349 		return;
1350 	}
1351 
1352 	for (pirq = 0; pirq < 8; pirq++)
1353 		if (ints & (1 << pirq))
1354 			break;
1355 	pmu_irq_stats[pirq]++;
1356 	i++;
1357 	ints &= ~(1 << pirq);
1358 
1359 	/* Note: for some reason, we get an interrupt with len=1,
1360 	 * data[0]==0 after each normal ADB interrupt, at least
1361 	 * on the Pismo. Still investigating...  --BenH
1362 	 */
1363 	if ((1 << pirq) & PMU_INT_ADB) {
1364 		if ((data[0] & PMU_INT_ADB_AUTO) == 0) {
1365 			struct adb_request *req = req_awaiting_reply;
1366 			if (req == 0) {
1367 				printk(KERN_ERR "PMU: extra ADB reply\n");
1368 				return;
1369 			}
1370 			req_awaiting_reply = NULL;
1371 			if (len <= 2)
1372 				req->reply_len = 0;
1373 			else {
1374 				memcpy(req->reply, data + 1, len - 1);
1375 				req->reply_len = len - 1;
1376 			}
1377 			pmu_done(req);
1378 		} else {
1379 			if (len == 4 && data[1] == 0x2c) {
1380 				extern int xmon_wants_key, xmon_adb_keycode;
1381 				if (xmon_wants_key) {
1382 					xmon_adb_keycode = data[2];
1383 					return;
1384 				}
1385 			}
1386 #ifdef CONFIG_ADB
1387 			/*
1388 			 * XXX On the [23]400 the PMU gives us an up
1389 			 * event for keycodes 0x74 or 0x75 when the PC
1390 			 * card eject buttons are released, so we
1391 			 * ignore those events.
1392 			 */
1393 			if (!(pmu_kind == PMU_OHARE_BASED && len == 4
1394 			      && data[1] == 0x2c && data[3] == 0xff
1395 			      && (data[2] & ~1) == 0xf4))
1396 				adb_input(data+1, len-1, 1);
1397 #endif /* CONFIG_ADB */
1398 		}
1399 	}
1400 	/* Sound/brightness button pressed */
1401 	else if ((1 << pirq) & PMU_INT_SNDBRT) {
1402 #ifdef CONFIG_PMAC_BACKLIGHT
1403 		if (len == 3)
1404 			pmac_backlight_set_legacy_brightness_pmu(data[1] >> 4);
1405 #endif
1406 	}
1407 	/* Tick interrupt */
1408 	else if ((1 << pirq) & PMU_INT_TICK) {
1409 		/* Environement or tick interrupt, query batteries */
1410 		if (pmu_battery_count) {
1411 			if ((--query_batt_timer) == 0) {
1412 				query_battery_state();
1413 				query_batt_timer = BATTERY_POLLING_COUNT;
1414 			}
1415 		}
1416         }
1417 	else if ((1 << pirq) & PMU_INT_ENVIRONMENT) {
1418 		if (pmu_battery_count)
1419 			query_battery_state();
1420 		pmu_pass_intr(data, len);
1421 		/* len == 6 is probably a bad check. But how do I
1422 		 * know what PMU versions send what events here? */
1423 		if (len == 6) {
1424 			via_pmu_event(PMU_EVT_POWER, !!(data[1]&8));
1425 			via_pmu_event(PMU_EVT_LID, data[1]&1);
1426 		}
1427 	} else {
1428 	       pmu_pass_intr(data, len);
1429 	}
1430 	goto next;
1431 }
1432 
1433 static struct adb_request*
1434 pmu_sr_intr(void)
1435 {
1436 	struct adb_request *req;
1437 	int bite = 0;
1438 
1439 	if (via[B] & TREQ) {
1440 		printk(KERN_ERR "PMU: spurious SR intr (%x)\n", via[B]);
1441 		out_8(&via[IFR], SR_INT);
1442 		return NULL;
1443 	}
1444 	/* The ack may not yet be low when we get the interrupt */
1445 	while ((in_8(&via[B]) & TACK) != 0)
1446 			;
1447 
1448 	/* if reading grab the byte, and reset the interrupt */
1449 	if (pmu_state == reading || pmu_state == reading_intr)
1450 		bite = in_8(&via[SR]);
1451 
1452 	/* reset TREQ and wait for TACK to go high */
1453 	out_8(&via[B], in_8(&via[B]) | TREQ);
1454 	wait_for_ack();
1455 
1456 	switch (pmu_state) {
1457 	case sending:
1458 		req = current_req;
1459 		if (data_len < 0) {
1460 			data_len = req->nbytes - 1;
1461 			send_byte(data_len);
1462 			break;
1463 		}
1464 		if (data_index <= data_len) {
1465 			send_byte(req->data[data_index++]);
1466 			break;
1467 		}
1468 		req->sent = 1;
1469 		data_len = pmu_data_len[req->data[0]][1];
1470 		if (data_len == 0) {
1471 			pmu_state = idle;
1472 			current_req = req->next;
1473 			if (req->reply_expected)
1474 				req_awaiting_reply = req;
1475 			else
1476 				return req;
1477 		} else {
1478 			pmu_state = reading;
1479 			data_index = 0;
1480 			reply_ptr = req->reply + req->reply_len;
1481 			recv_byte();
1482 		}
1483 		break;
1484 
1485 	case intack:
1486 		data_index = 0;
1487 		data_len = -1;
1488 		pmu_state = reading_intr;
1489 		reply_ptr = interrupt_data[int_data_last];
1490 		recv_byte();
1491 		if (gpio_irq >= 0 && !gpio_irq_enabled) {
1492 			enable_irq(gpio_irq);
1493 			gpio_irq_enabled = 1;
1494 		}
1495 		break;
1496 
1497 	case reading:
1498 	case reading_intr:
1499 		if (data_len == -1) {
1500 			data_len = bite;
1501 			if (bite > 32)
1502 				printk(KERN_ERR "PMU: bad reply len %d\n", bite);
1503 		} else if (data_index < 32) {
1504 			reply_ptr[data_index++] = bite;
1505 		}
1506 		if (data_index < data_len) {
1507 			recv_byte();
1508 			break;
1509 		}
1510 
1511 		if (pmu_state == reading_intr) {
1512 			pmu_state = idle;
1513 			int_data_state[int_data_last] = int_data_ready;
1514 			interrupt_data_len[int_data_last] = data_len;
1515 		} else {
1516 			req = current_req;
1517 			/*
1518 			 * For PMU sleep and freq change requests, we lock the
1519 			 * PMU until it's explicitely unlocked. This avoids any
1520 			 * spurrious event polling getting in
1521 			 */
1522 			current_req = req->next;
1523 			req->reply_len += data_index;
1524 			if (req->data[0] == PMU_SLEEP || req->data[0] == PMU_CPU_SPEED)
1525 				pmu_state = locked;
1526 			else
1527 				pmu_state = idle;
1528 			return req;
1529 		}
1530 		break;
1531 
1532 	default:
1533 		printk(KERN_ERR "via_pmu_interrupt: unknown state %d?\n",
1534 		       pmu_state);
1535 	}
1536 	return NULL;
1537 }
1538 
1539 static irqreturn_t
1540 via_pmu_interrupt(int irq, void *arg)
1541 {
1542 	unsigned long flags;
1543 	int intr;
1544 	int nloop = 0;
1545 	int int_data = -1;
1546 	struct adb_request *req = NULL;
1547 	int handled = 0;
1548 
1549 	/* This is a bit brutal, we can probably do better */
1550 	spin_lock_irqsave(&pmu_lock, flags);
1551 	++disable_poll;
1552 
1553 	for (;;) {
1554 		intr = in_8(&via[IFR]) & (SR_INT | CB1_INT);
1555 		if (intr == 0)
1556 			break;
1557 		handled = 1;
1558 		if (++nloop > 1000) {
1559 			printk(KERN_DEBUG "PMU: stuck in intr loop, "
1560 			       "intr=%x, ier=%x pmu_state=%d\n",
1561 			       intr, in_8(&via[IER]), pmu_state);
1562 			break;
1563 		}
1564 		out_8(&via[IFR], intr);
1565 		if (intr & CB1_INT) {
1566 			adb_int_pending = 1;
1567 			pmu_irq_stats[0]++;
1568 		}
1569 		if (intr & SR_INT) {
1570 			req = pmu_sr_intr();
1571 			if (req)
1572 				break;
1573 		}
1574 	}
1575 
1576 recheck:
1577 	if (pmu_state == idle) {
1578 		if (adb_int_pending) {
1579 			if (int_data_state[0] == int_data_empty)
1580 				int_data_last = 0;
1581 			else if (int_data_state[1] == int_data_empty)
1582 				int_data_last = 1;
1583 			else
1584 				goto no_free_slot;
1585 			pmu_state = intack;
1586 			int_data_state[int_data_last] = int_data_fill;
1587 			/* Sounds safer to make sure ACK is high before writing.
1588 			 * This helped kill a problem with ADB and some iBooks
1589 			 */
1590 			wait_for_ack();
1591 			send_byte(PMU_INT_ACK);
1592 			adb_int_pending = 0;
1593 		} else if (current_req)
1594 			pmu_start();
1595 	}
1596 no_free_slot:
1597 	/* Mark the oldest buffer for flushing */
1598 	if (int_data_state[!int_data_last] == int_data_ready) {
1599 		int_data_state[!int_data_last] = int_data_flush;
1600 		int_data = !int_data_last;
1601 	} else if (int_data_state[int_data_last] == int_data_ready) {
1602 		int_data_state[int_data_last] = int_data_flush;
1603 		int_data = int_data_last;
1604 	}
1605 	--disable_poll;
1606 	spin_unlock_irqrestore(&pmu_lock, flags);
1607 
1608 	/* Deal with completed PMU requests outside of the lock */
1609 	if (req) {
1610 		pmu_done(req);
1611 		req = NULL;
1612 	}
1613 
1614 	/* Deal with interrupt datas outside of the lock */
1615 	if (int_data >= 0) {
1616 		pmu_handle_data(interrupt_data[int_data], interrupt_data_len[int_data]);
1617 		spin_lock_irqsave(&pmu_lock, flags);
1618 		++disable_poll;
1619 		int_data_state[int_data] = int_data_empty;
1620 		int_data = -1;
1621 		goto recheck;
1622 	}
1623 
1624 	return IRQ_RETVAL(handled);
1625 }
1626 
1627 void
1628 pmu_unlock(void)
1629 {
1630 	unsigned long flags;
1631 
1632 	spin_lock_irqsave(&pmu_lock, flags);
1633 	if (pmu_state == locked)
1634 		pmu_state = idle;
1635 	adb_int_pending = 1;
1636 	spin_unlock_irqrestore(&pmu_lock, flags);
1637 }
1638 
1639 
1640 static irqreturn_t
1641 gpio1_interrupt(int irq, void *arg)
1642 {
1643 	unsigned long flags;
1644 
1645 	if ((in_8(gpio_reg + 0x9) & 0x02) == 0) {
1646 		spin_lock_irqsave(&pmu_lock, flags);
1647 		if (gpio_irq_enabled > 0) {
1648 			disable_irq_nosync(gpio_irq);
1649 			gpio_irq_enabled = 0;
1650 		}
1651 		pmu_irq_stats[1]++;
1652 		adb_int_pending = 1;
1653 		spin_unlock_irqrestore(&pmu_lock, flags);
1654 		via_pmu_interrupt(0, NULL);
1655 		return IRQ_HANDLED;
1656 	}
1657 	return IRQ_NONE;
1658 }
1659 
1660 void
1661 pmu_enable_irled(int on)
1662 {
1663 	struct adb_request req;
1664 
1665 	if (vias == NULL)
1666 		return ;
1667 	if (pmu_kind == PMU_KEYLARGO_BASED)
1668 		return ;
1669 
1670 	pmu_request(&req, NULL, 2, PMU_POWER_CTRL, PMU_POW_IRLED |
1671 	    (on ? PMU_POW_ON : PMU_POW_OFF));
1672 	pmu_wait_complete(&req);
1673 }
1674 
1675 void
1676 pmu_restart(void)
1677 {
1678 	struct adb_request req;
1679 
1680 	if (via == NULL)
1681 		return;
1682 
1683 	local_irq_disable();
1684 
1685 	drop_interrupts = 1;
1686 
1687 	if (pmu_kind != PMU_KEYLARGO_BASED) {
1688 		pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, PMU_INT_ADB |
1689 						PMU_INT_TICK );
1690 		while(!req.complete)
1691 			pmu_poll();
1692 	}
1693 
1694 	pmu_request(&req, NULL, 1, PMU_RESET);
1695 	pmu_wait_complete(&req);
1696 	for (;;)
1697 		;
1698 }
1699 
1700 void
1701 pmu_shutdown(void)
1702 {
1703 	struct adb_request req;
1704 
1705 	if (via == NULL)
1706 		return;
1707 
1708 	local_irq_disable();
1709 
1710 	drop_interrupts = 1;
1711 
1712 	if (pmu_kind != PMU_KEYLARGO_BASED) {
1713 		pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, PMU_INT_ADB |
1714 						PMU_INT_TICK );
1715 		pmu_wait_complete(&req);
1716 	} else {
1717 		/* Disable server mode on shutdown or we'll just
1718 		 * wake up again
1719 		 */
1720 		pmu_set_server_mode(0);
1721 	}
1722 
1723 	pmu_request(&req, NULL, 5, PMU_SHUTDOWN,
1724 		    'M', 'A', 'T', 'T');
1725 	pmu_wait_complete(&req);
1726 	for (;;)
1727 		;
1728 }
1729 
1730 int
1731 pmu_present(void)
1732 {
1733 	return via != 0;
1734 }
1735 
1736 #ifdef CONFIG_PM
1737 
1738 static LIST_HEAD(sleep_notifiers);
1739 
1740 int
1741 pmu_register_sleep_notifier(struct pmu_sleep_notifier *n)
1742 {
1743 	struct list_head *list;
1744 	struct pmu_sleep_notifier *notifier;
1745 
1746 	for (list = sleep_notifiers.next; list != &sleep_notifiers;
1747 	     list = list->next) {
1748 		notifier = list_entry(list, struct pmu_sleep_notifier, list);
1749 		if (n->priority > notifier->priority)
1750 			break;
1751 	}
1752 	__list_add(&n->list, list->prev, list);
1753 	return 0;
1754 }
1755 EXPORT_SYMBOL(pmu_register_sleep_notifier);
1756 
1757 int
1758 pmu_unregister_sleep_notifier(struct pmu_sleep_notifier* n)
1759 {
1760 	if (n->list.next == 0)
1761 		return -ENOENT;
1762 	list_del(&n->list);
1763 	n->list.next = NULL;
1764 	return 0;
1765 }
1766 EXPORT_SYMBOL(pmu_unregister_sleep_notifier);
1767 #endif /* CONFIG_PM */
1768 
1769 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
1770 
1771 /* Sleep is broadcast last-to-first */
1772 static int
1773 broadcast_sleep(int when, int fallback)
1774 {
1775 	int ret = PBOOK_SLEEP_OK;
1776 	struct list_head *list;
1777 	struct pmu_sleep_notifier *notifier;
1778 
1779 	for (list = sleep_notifiers.prev; list != &sleep_notifiers;
1780 	     list = list->prev) {
1781 		notifier = list_entry(list, struct pmu_sleep_notifier, list);
1782 		ret = notifier->notifier_call(notifier, when);
1783 		if (ret != PBOOK_SLEEP_OK) {
1784 			printk(KERN_DEBUG "sleep %d rejected by %p (%p)\n",
1785 			       when, notifier, notifier->notifier_call);
1786 			for (; list != &sleep_notifiers; list = list->next) {
1787 				notifier = list_entry(list, struct pmu_sleep_notifier, list);
1788 				notifier->notifier_call(notifier, fallback);
1789 			}
1790 			return ret;
1791 		}
1792 	}
1793 	return ret;
1794 }
1795 
1796 /* Wake is broadcast first-to-last */
1797 static int
1798 broadcast_wake(void)
1799 {
1800 	int ret = PBOOK_SLEEP_OK;
1801 	struct list_head *list;
1802 	struct pmu_sleep_notifier *notifier;
1803 
1804 	for (list = sleep_notifiers.next; list != &sleep_notifiers;
1805 	     list = list->next) {
1806 		notifier = list_entry(list, struct pmu_sleep_notifier, list);
1807 		notifier->notifier_call(notifier, PBOOK_WAKE);
1808 	}
1809 	return ret;
1810 }
1811 
1812 /*
1813  * This struct is used to store config register values for
1814  * PCI devices which may get powered off when we sleep.
1815  */
1816 static struct pci_save {
1817 #ifndef HACKED_PCI_SAVE
1818 	u16	command;
1819 	u16	cache_lat;
1820 	u16	intr;
1821 	u32	rom_address;
1822 #else
1823 	u32	config[16];
1824 #endif
1825 } *pbook_pci_saves;
1826 static int pbook_npci_saves;
1827 
1828 static void
1829 pbook_alloc_pci_save(void)
1830 {
1831 	int npci;
1832 	struct pci_dev *pd = NULL;
1833 
1834 	npci = 0;
1835 	while ((pd = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, pd)) != NULL) {
1836 		++npci;
1837 	}
1838 	if (npci == 0)
1839 		return;
1840 	pbook_pci_saves = (struct pci_save *)
1841 		kmalloc(npci * sizeof(struct pci_save), GFP_KERNEL);
1842 	pbook_npci_saves = npci;
1843 }
1844 
1845 static void
1846 pbook_free_pci_save(void)
1847 {
1848 	if (pbook_pci_saves == NULL)
1849 		return;
1850 	kfree(pbook_pci_saves);
1851 	pbook_pci_saves = NULL;
1852 	pbook_npci_saves = 0;
1853 }
1854 
1855 static void
1856 pbook_pci_save(void)
1857 {
1858 	struct pci_save *ps = pbook_pci_saves;
1859 	struct pci_dev *pd = NULL;
1860 	int npci = pbook_npci_saves;
1861 
1862 	if (ps == NULL)
1863 		return;
1864 
1865 	while ((pd = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, pd)) != NULL) {
1866 		if (npci-- == 0) {
1867 			pci_dev_put(pd);
1868 			return;
1869 		}
1870 #ifndef HACKED_PCI_SAVE
1871 		pci_read_config_word(pd, PCI_COMMAND, &ps->command);
1872 		pci_read_config_word(pd, PCI_CACHE_LINE_SIZE, &ps->cache_lat);
1873 		pci_read_config_word(pd, PCI_INTERRUPT_LINE, &ps->intr);
1874 		pci_read_config_dword(pd, PCI_ROM_ADDRESS, &ps->rom_address);
1875 #else
1876 		int i;
1877 		for (i=1;i<16;i++)
1878 			pci_read_config_dword(pd, i<<4, &ps->config[i]);
1879 #endif
1880 		++ps;
1881 	}
1882 }
1883 
1884 /* For this to work, we must take care of a few things: If gmac was enabled
1885  * during boot, it will be in the pci dev list. If it's disabled at this point
1886  * (and it will probably be), then you can't access it's config space.
1887  */
1888 static void
1889 pbook_pci_restore(void)
1890 {
1891 	u16 cmd;
1892 	struct pci_save *ps = pbook_pci_saves - 1;
1893 	struct pci_dev *pd = NULL;
1894 	int npci = pbook_npci_saves;
1895 	int j;
1896 
1897 	while ((pd = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, pd)) != NULL) {
1898 #ifdef HACKED_PCI_SAVE
1899 		int i;
1900 		if (npci-- == 0) {
1901 			pci_dev_put(pd);
1902 			return;
1903 		}
1904 		ps++;
1905 		for (i=2;i<16;i++)
1906 			pci_write_config_dword(pd, i<<4, ps->config[i]);
1907 		pci_write_config_dword(pd, 4, ps->config[1]);
1908 #else
1909 		if (npci-- == 0)
1910 			return;
1911 		ps++;
1912 		if (ps->command == 0)
1913 			continue;
1914 		pci_read_config_word(pd, PCI_COMMAND, &cmd);
1915 		if ((ps->command & ~cmd) == 0)
1916 			continue;
1917 		switch (pd->hdr_type) {
1918 		case PCI_HEADER_TYPE_NORMAL:
1919 			for (j = 0; j < 6; ++j)
1920 				pci_write_config_dword(pd,
1921 					PCI_BASE_ADDRESS_0 + j*4,
1922 					pd->resource[j].start);
1923 			pci_write_config_dword(pd, PCI_ROM_ADDRESS,
1924 				ps->rom_address);
1925 			pci_write_config_word(pd, PCI_CACHE_LINE_SIZE,
1926 				ps->cache_lat);
1927 			pci_write_config_word(pd, PCI_INTERRUPT_LINE,
1928 				ps->intr);
1929 			pci_write_config_word(pd, PCI_COMMAND, ps->command);
1930 			break;
1931 		}
1932 #endif
1933 	}
1934 }
1935 
1936 #ifdef DEBUG_SLEEP
1937 /* N.B. This doesn't work on the 3400 */
1938 void
1939 pmu_blink(int n)
1940 {
1941 	struct adb_request req;
1942 
1943 	memset(&req, 0, sizeof(req));
1944 
1945 	for (; n > 0; --n) {
1946 		req.nbytes = 4;
1947 		req.done = NULL;
1948 		req.data[0] = 0xee;
1949 		req.data[1] = 4;
1950 		req.data[2] = 0;
1951 		req.data[3] = 1;
1952 		req.reply[0] = ADB_RET_OK;
1953 		req.reply_len = 1;
1954 		req.reply_expected = 0;
1955 		pmu_polled_request(&req);
1956 		mdelay(50);
1957 		req.nbytes = 4;
1958 		req.done = NULL;
1959 		req.data[0] = 0xee;
1960 		req.data[1] = 4;
1961 		req.data[2] = 0;
1962 		req.data[3] = 0;
1963 		req.reply[0] = ADB_RET_OK;
1964 		req.reply_len = 1;
1965 		req.reply_expected = 0;
1966 		pmu_polled_request(&req);
1967 		mdelay(50);
1968 	}
1969 	mdelay(50);
1970 }
1971 #endif
1972 
1973 /*
1974  * Put the powerbook to sleep.
1975  */
1976 
1977 static u32 save_via[8];
1978 
1979 static void
1980 save_via_state(void)
1981 {
1982 	save_via[0] = in_8(&via[ANH]);
1983 	save_via[1] = in_8(&via[DIRA]);
1984 	save_via[2] = in_8(&via[B]);
1985 	save_via[3] = in_8(&via[DIRB]);
1986 	save_via[4] = in_8(&via[PCR]);
1987 	save_via[5] = in_8(&via[ACR]);
1988 	save_via[6] = in_8(&via[T1CL]);
1989 	save_via[7] = in_8(&via[T1CH]);
1990 }
1991 static void
1992 restore_via_state(void)
1993 {
1994 	out_8(&via[ANH], save_via[0]);
1995 	out_8(&via[DIRA], save_via[1]);
1996 	out_8(&via[B], save_via[2]);
1997 	out_8(&via[DIRB], save_via[3]);
1998 	out_8(&via[PCR], save_via[4]);
1999 	out_8(&via[ACR], save_via[5]);
2000 	out_8(&via[T1CL], save_via[6]);
2001 	out_8(&via[T1CH], save_via[7]);
2002 	out_8(&via[IER], IER_CLR | 0x7f);	/* disable all intrs */
2003 	out_8(&via[IFR], 0x7f);				/* clear IFR */
2004 	out_8(&via[IER], IER_SET | SR_INT | CB1_INT);
2005 }
2006 
2007 extern void pmu_backlight_set_sleep(int sleep);
2008 
2009 static int
2010 pmac_suspend_devices(void)
2011 {
2012 	int ret;
2013 
2014 	pm_prepare_console();
2015 
2016 	/* Notify old-style device drivers & userland */
2017 	ret = broadcast_sleep(PBOOK_SLEEP_REQUEST, PBOOK_SLEEP_REJECT);
2018 	if (ret != PBOOK_SLEEP_OK) {
2019 		printk(KERN_ERR "Sleep rejected by drivers\n");
2020 		return -EBUSY;
2021 	}
2022 
2023 	/* Sync the disks. */
2024 	/* XXX It would be nice to have some way to ensure that
2025 	 * nobody is dirtying any new buffers while we wait. That
2026 	 * could be achieved using the refrigerator for processes
2027 	 * that swsusp uses
2028 	 */
2029 	sys_sync();
2030 
2031 	/* Sleep can fail now. May not be very robust but useful for debugging */
2032 	ret = broadcast_sleep(PBOOK_SLEEP_NOW, PBOOK_WAKE);
2033 	if (ret != PBOOK_SLEEP_OK) {
2034 		printk(KERN_ERR "Driver sleep failed\n");
2035 		return -EBUSY;
2036 	}
2037 
2038 	/* Send suspend call to devices, hold the device core's dpm_sem */
2039 	ret = device_suspend(PMSG_SUSPEND);
2040 	if (ret) {
2041 		broadcast_wake();
2042 		printk(KERN_ERR "Driver sleep failed\n");
2043 		return -EBUSY;
2044 	}
2045 
2046 #ifdef CONFIG_PMAC_BACKLIGHT
2047 	/* Tell backlight code not to muck around with the chip anymore */
2048 	pmu_backlight_set_sleep(1);
2049 #endif
2050 
2051 	/* Call platform functions marked "on sleep" */
2052 	pmac_pfunc_i2c_suspend();
2053 	pmac_pfunc_base_suspend();
2054 
2055 	/* Stop preemption */
2056 	preempt_disable();
2057 
2058 	/* Make sure the decrementer won't interrupt us */
2059 	asm volatile("mtdec %0" : : "r" (0x7fffffff));
2060 	/* Make sure any pending DEC interrupt occurring while we did
2061 	 * the above didn't re-enable the DEC */
2062 	mb();
2063 	asm volatile("mtdec %0" : : "r" (0x7fffffff));
2064 
2065 	/* We can now disable MSR_EE. This code of course works properly only
2066 	 * on UP machines... For SMP, if we ever implement sleep, we'll have to
2067 	 * stop the "other" CPUs way before we do all that stuff.
2068 	 */
2069 	local_irq_disable();
2070 
2071 	/* Broadcast power down irq
2072 	 * This isn't that useful in most cases (only directly wired devices can
2073 	 * use this but still... This will take care of sysdev's as well, so
2074 	 * we exit from here with local irqs disabled and PIC off.
2075 	 */
2076 	ret = device_power_down(PMSG_SUSPEND);
2077 	if (ret) {
2078 		wakeup_decrementer();
2079 		local_irq_enable();
2080 		preempt_enable();
2081 		device_resume();
2082 		broadcast_wake();
2083 		printk(KERN_ERR "Driver powerdown failed\n");
2084 		return -EBUSY;
2085 	}
2086 
2087 	/* Wait for completion of async requests */
2088 	while (!batt_req.complete)
2089 		pmu_poll();
2090 
2091 	/* Giveup the lazy FPU & vec so we don't have to back them
2092 	 * up from the low level code
2093 	 */
2094 	enable_kernel_fp();
2095 
2096 #ifdef CONFIG_ALTIVEC
2097 	if (cpu_has_feature(CPU_FTR_ALTIVEC))
2098 		enable_kernel_altivec();
2099 #endif /* CONFIG_ALTIVEC */
2100 
2101 	return 0;
2102 }
2103 
2104 static int
2105 pmac_wakeup_devices(void)
2106 {
2107 	mdelay(100);
2108 
2109 #ifdef CONFIG_PMAC_BACKLIGHT
2110 	/* Tell backlight code it can use the chip again */
2111 	pmu_backlight_set_sleep(0);
2112 #endif
2113 
2114 	/* Power back up system devices (including the PIC) */
2115 	device_power_up();
2116 
2117 	/* Force a poll of ADB interrupts */
2118 	adb_int_pending = 1;
2119 	via_pmu_interrupt(0, NULL);
2120 
2121 	/* Restart jiffies & scheduling */
2122 	wakeup_decrementer();
2123 
2124 	/* Re-enable local CPU interrupts */
2125 	local_irq_enable();
2126 	mdelay(10);
2127 	preempt_enable();
2128 
2129 	/* Call platform functions marked "on wake" */
2130 	pmac_pfunc_base_resume();
2131 	pmac_pfunc_i2c_resume();
2132 
2133 	/* Resume devices */
2134 	device_resume();
2135 
2136 	/* Notify old style drivers */
2137 	broadcast_wake();
2138 
2139 	pm_restore_console();
2140 
2141 	return 0;
2142 }
2143 
2144 #define	GRACKLE_PM	(1<<7)
2145 #define GRACKLE_DOZE	(1<<5)
2146 #define	GRACKLE_NAP	(1<<4)
2147 #define	GRACKLE_SLEEP	(1<<3)
2148 
2149 static int powerbook_sleep_grackle(void)
2150 {
2151 	unsigned long save_l2cr;
2152 	unsigned short pmcr1;
2153 	struct adb_request req;
2154 	int ret;
2155 	struct pci_dev *grackle;
2156 
2157 	grackle = pci_find_slot(0, 0);
2158 	if (!grackle)
2159 		return -ENODEV;
2160 
2161 	ret = pmac_suspend_devices();
2162 	if (ret) {
2163 		printk(KERN_ERR "Sleep rejected by devices\n");
2164 		return ret;
2165 	}
2166 
2167 	/* Turn off various things. Darwin does some retry tests here... */
2168 	pmu_request(&req, NULL, 2, PMU_POWER_CTRL0, PMU_POW0_OFF|PMU_POW0_HARD_DRIVE);
2169 	pmu_wait_complete(&req);
2170 	pmu_request(&req, NULL, 2, PMU_POWER_CTRL,
2171 		PMU_POW_OFF|PMU_POW_BACKLIGHT|PMU_POW_IRLED|PMU_POW_MEDIABAY);
2172 	pmu_wait_complete(&req);
2173 
2174 	/* For 750, save backside cache setting and disable it */
2175 	save_l2cr = _get_L2CR();	/* (returns -1 if not available) */
2176 
2177 	if (!__fake_sleep) {
2178 		/* Ask the PMU to put us to sleep */
2179 		pmu_request(&req, NULL, 5, PMU_SLEEP, 'M', 'A', 'T', 'T');
2180 		pmu_wait_complete(&req);
2181 	}
2182 
2183 	/* The VIA is supposed not to be restored correctly*/
2184 	save_via_state();
2185 	/* We shut down some HW */
2186 	pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,1);
2187 
2188 	pci_read_config_word(grackle, 0x70, &pmcr1);
2189 	/* Apparently, MacOS uses NAP mode for Grackle ??? */
2190 	pmcr1 &= ~(GRACKLE_DOZE|GRACKLE_SLEEP);
2191 	pmcr1 |= GRACKLE_PM|GRACKLE_NAP;
2192 	pci_write_config_word(grackle, 0x70, pmcr1);
2193 
2194 	/* Call low-level ASM sleep handler */
2195 	if (__fake_sleep)
2196 		mdelay(5000);
2197 	else
2198 		low_sleep_handler();
2199 
2200 	/* We're awake again, stop grackle PM */
2201 	pci_read_config_word(grackle, 0x70, &pmcr1);
2202 	pmcr1 &= ~(GRACKLE_PM|GRACKLE_DOZE|GRACKLE_SLEEP|GRACKLE_NAP);
2203 	pci_write_config_word(grackle, 0x70, pmcr1);
2204 
2205 	/* Make sure the PMU is idle */
2206 	pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,0);
2207 	restore_via_state();
2208 
2209 	/* Restore L2 cache */
2210 	if (save_l2cr != 0xffffffff && (save_l2cr & L2CR_L2E) != 0)
2211  		_set_L2CR(save_l2cr);
2212 
2213 	/* Restore userland MMU context */
2214 	set_context(current->active_mm->context.id, current->active_mm->pgd);
2215 
2216 	/* Power things up */
2217 	pmu_unlock();
2218 	pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, pmu_intr_mask);
2219 	pmu_wait_complete(&req);
2220 	pmu_request(&req, NULL, 2, PMU_POWER_CTRL0,
2221 			PMU_POW0_ON|PMU_POW0_HARD_DRIVE);
2222 	pmu_wait_complete(&req);
2223 	pmu_request(&req, NULL, 2, PMU_POWER_CTRL,
2224 			PMU_POW_ON|PMU_POW_BACKLIGHT|PMU_POW_CHARGER|PMU_POW_IRLED|PMU_POW_MEDIABAY);
2225 	pmu_wait_complete(&req);
2226 
2227 	pmac_wakeup_devices();
2228 
2229 	return 0;
2230 }
2231 
2232 static int
2233 powerbook_sleep_Core99(void)
2234 {
2235 	unsigned long save_l2cr;
2236 	unsigned long save_l3cr;
2237 	struct adb_request req;
2238 	int ret;
2239 
2240 	if (pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,-1) < 0) {
2241 		printk(KERN_ERR "Sleep mode not supported on this machine\n");
2242 		return -ENOSYS;
2243 	}
2244 
2245 	if (num_online_cpus() > 1 || cpu_is_offline(0))
2246 		return -EAGAIN;
2247 
2248 	ret = pmac_suspend_devices();
2249 	if (ret) {
2250 		printk(KERN_ERR "Sleep rejected by devices\n");
2251 		return ret;
2252 	}
2253 
2254 	/* Stop environment and ADB interrupts */
2255 	pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, 0);
2256 	pmu_wait_complete(&req);
2257 
2258 	/* Tell PMU what events will wake us up */
2259 	pmu_request(&req, NULL, 4, PMU_POWER_EVENTS, PMU_PWR_CLR_WAKEUP_EVENTS,
2260 		0xff, 0xff);
2261 	pmu_wait_complete(&req);
2262 	pmu_request(&req, NULL, 4, PMU_POWER_EVENTS, PMU_PWR_SET_WAKEUP_EVENTS,
2263 		0, PMU_PWR_WAKEUP_KEY |
2264 		(option_lid_wakeup ? PMU_PWR_WAKEUP_LID_OPEN : 0));
2265 	pmu_wait_complete(&req);
2266 
2267 	/* Save the state of the L2 and L3 caches */
2268 	save_l3cr = _get_L3CR();	/* (returns -1 if not available) */
2269 	save_l2cr = _get_L2CR();	/* (returns -1 if not available) */
2270 
2271 	if (!__fake_sleep) {
2272 		/* Ask the PMU to put us to sleep */
2273 		pmu_request(&req, NULL, 5, PMU_SLEEP, 'M', 'A', 'T', 'T');
2274 		pmu_wait_complete(&req);
2275 	}
2276 
2277 	/* The VIA is supposed not to be restored correctly*/
2278 	save_via_state();
2279 
2280 	/* Shut down various ASICs. There's a chance that we can no longer
2281 	 * talk to the PMU after this, so I moved it to _after_ sending the
2282 	 * sleep command to it. Still need to be checked.
2283 	 */
2284 	pmac_call_feature(PMAC_FTR_SLEEP_STATE, NULL, 0, 1);
2285 
2286 	/* Call low-level ASM sleep handler */
2287 	if (__fake_sleep)
2288 		mdelay(5000);
2289 	else
2290 		low_sleep_handler();
2291 
2292 	/* Restore Apple core ASICs state */
2293 	pmac_call_feature(PMAC_FTR_SLEEP_STATE, NULL, 0, 0);
2294 
2295 	/* Restore VIA */
2296 	restore_via_state();
2297 
2298 	/* tweak LPJ before cpufreq is there */
2299 	loops_per_jiffy *= 2;
2300 
2301 	/* Restore video */
2302 	pmac_call_early_video_resume();
2303 
2304 	/* Restore L2 cache */
2305 	if (save_l2cr != 0xffffffff && (save_l2cr & L2CR_L2E) != 0)
2306  		_set_L2CR(save_l2cr);
2307 	/* Restore L3 cache */
2308 	if (save_l3cr != 0xffffffff && (save_l3cr & L3CR_L3E) != 0)
2309  		_set_L3CR(save_l3cr);
2310 
2311 	/* Restore userland MMU context */
2312 	set_context(current->active_mm->context.id, current->active_mm->pgd);
2313 
2314 	/* Tell PMU we are ready */
2315 	pmu_unlock();
2316 	pmu_request(&req, NULL, 2, PMU_SYSTEM_READY, 2);
2317 	pmu_wait_complete(&req);
2318 	pmu_request(&req, NULL, 2, PMU_SET_INTR_MASK, pmu_intr_mask);
2319 	pmu_wait_complete(&req);
2320 
2321 	/* Restore LPJ, cpufreq will adjust the cpu frequency */
2322 	loops_per_jiffy /= 2;
2323 
2324 	pmac_wakeup_devices();
2325 
2326 	return 0;
2327 }
2328 
2329 #define PB3400_MEM_CTRL		0xf8000000
2330 #define PB3400_MEM_CTRL_SLEEP	0x70
2331 
2332 static int
2333 powerbook_sleep_3400(void)
2334 {
2335 	int ret, i, x;
2336 	unsigned int hid0;
2337 	unsigned long p;
2338 	struct adb_request sleep_req;
2339 	void __iomem *mem_ctrl;
2340 	unsigned int __iomem *mem_ctrl_sleep;
2341 
2342 	/* first map in the memory controller registers */
2343 	mem_ctrl = ioremap(PB3400_MEM_CTRL, 0x100);
2344 	if (mem_ctrl == NULL) {
2345 		printk("powerbook_sleep_3400: ioremap failed\n");
2346 		return -ENOMEM;
2347 	}
2348 	mem_ctrl_sleep = mem_ctrl + PB3400_MEM_CTRL_SLEEP;
2349 
2350 	/* Allocate room for PCI save */
2351 	pbook_alloc_pci_save();
2352 
2353 	ret = pmac_suspend_devices();
2354 	if (ret) {
2355 		pbook_free_pci_save();
2356 		printk(KERN_ERR "Sleep rejected by devices\n");
2357 		return ret;
2358 	}
2359 
2360 	/* Save the state of PCI config space for some slots */
2361 	pbook_pci_save();
2362 
2363 	/* Set the memory controller to keep the memory refreshed
2364 	   while we're asleep */
2365 	for (i = 0x403f; i >= 0x4000; --i) {
2366 		out_be32(mem_ctrl_sleep, i);
2367 		do {
2368 			x = (in_be32(mem_ctrl_sleep) >> 16) & 0x3ff;
2369 		} while (x == 0);
2370 		if (x >= 0x100)
2371 			break;
2372 	}
2373 
2374 	/* Ask the PMU to put us to sleep */
2375 	pmu_request(&sleep_req, NULL, 5, PMU_SLEEP, 'M', 'A', 'T', 'T');
2376 	while (!sleep_req.complete)
2377 		mb();
2378 
2379 	pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,1);
2380 
2381 	/* displacement-flush the L2 cache - necessary? */
2382 	for (p = KERNELBASE; p < KERNELBASE + 0x100000; p += 0x1000)
2383 		i = *(volatile int *)p;
2384 	asleep = 1;
2385 
2386 	/* Put the CPU into sleep mode */
2387 	hid0 = mfspr(SPRN_HID0);
2388 	hid0 = (hid0 & ~(HID0_NAP | HID0_DOZE)) | HID0_SLEEP;
2389 	mtspr(SPRN_HID0, hid0);
2390 	mtmsr(mfmsr() | MSR_POW | MSR_EE);
2391 	udelay(10);
2392 
2393 	/* OK, we're awake again, start restoring things */
2394 	out_be32(mem_ctrl_sleep, 0x3f);
2395 	pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,0);
2396 	pbook_pci_restore();
2397 	pmu_unlock();
2398 
2399 	/* wait for the PMU interrupt sequence to complete */
2400 	while (asleep)
2401 		mb();
2402 
2403 	pmac_wakeup_devices();
2404 	pbook_free_pci_save();
2405 	iounmap(mem_ctrl);
2406 
2407 	return 0;
2408 }
2409 
2410 #endif /* CONFIG_PM && CONFIG_PPC32 */
2411 
2412 /*
2413  * Support for /dev/pmu device
2414  */
2415 #define RB_SIZE		0x10
2416 struct pmu_private {
2417 	struct list_head list;
2418 	int	rb_get;
2419 	int	rb_put;
2420 	struct rb_entry {
2421 		unsigned short len;
2422 		unsigned char data[16];
2423 	}	rb_buf[RB_SIZE];
2424 	wait_queue_head_t wait;
2425 	spinlock_t lock;
2426 #if defined(CONFIG_INPUT_ADBHID) && defined(CONFIG_PMAC_BACKLIGHT)
2427 	int	backlight_locker;
2428 #endif
2429 };
2430 
2431 static LIST_HEAD(all_pmu_pvt);
2432 static DEFINE_SPINLOCK(all_pvt_lock);
2433 
2434 static void
2435 pmu_pass_intr(unsigned char *data, int len)
2436 {
2437 	struct pmu_private *pp;
2438 	struct list_head *list;
2439 	int i;
2440 	unsigned long flags;
2441 
2442 	if (len > sizeof(pp->rb_buf[0].data))
2443 		len = sizeof(pp->rb_buf[0].data);
2444 	spin_lock_irqsave(&all_pvt_lock, flags);
2445 	for (list = &all_pmu_pvt; (list = list->next) != &all_pmu_pvt; ) {
2446 		pp = list_entry(list, struct pmu_private, list);
2447 		spin_lock(&pp->lock);
2448 		i = pp->rb_put + 1;
2449 		if (i >= RB_SIZE)
2450 			i = 0;
2451 		if (i != pp->rb_get) {
2452 			struct rb_entry *rp = &pp->rb_buf[pp->rb_put];
2453 			rp->len = len;
2454 			memcpy(rp->data, data, len);
2455 			pp->rb_put = i;
2456 			wake_up_interruptible(&pp->wait);
2457 		}
2458 		spin_unlock(&pp->lock);
2459 	}
2460 	spin_unlock_irqrestore(&all_pvt_lock, flags);
2461 }
2462 
2463 static int
2464 pmu_open(struct inode *inode, struct file *file)
2465 {
2466 	struct pmu_private *pp;
2467 	unsigned long flags;
2468 
2469 	pp = kmalloc(sizeof(struct pmu_private), GFP_KERNEL);
2470 	if (pp == 0)
2471 		return -ENOMEM;
2472 	pp->rb_get = pp->rb_put = 0;
2473 	spin_lock_init(&pp->lock);
2474 	init_waitqueue_head(&pp->wait);
2475 	spin_lock_irqsave(&all_pvt_lock, flags);
2476 #if defined(CONFIG_INPUT_ADBHID) && defined(CONFIG_PMAC_BACKLIGHT)
2477 	pp->backlight_locker = 0;
2478 #endif
2479 	list_add(&pp->list, &all_pmu_pvt);
2480 	spin_unlock_irqrestore(&all_pvt_lock, flags);
2481 	file->private_data = pp;
2482 	return 0;
2483 }
2484 
2485 static ssize_t
2486 pmu_read(struct file *file, char __user *buf,
2487 			size_t count, loff_t *ppos)
2488 {
2489 	struct pmu_private *pp = file->private_data;
2490 	DECLARE_WAITQUEUE(wait, current);
2491 	unsigned long flags;
2492 	int ret = 0;
2493 
2494 	if (count < 1 || pp == 0)
2495 		return -EINVAL;
2496 	if (!access_ok(VERIFY_WRITE, buf, count))
2497 		return -EFAULT;
2498 
2499 	spin_lock_irqsave(&pp->lock, flags);
2500 	add_wait_queue(&pp->wait, &wait);
2501 	current->state = TASK_INTERRUPTIBLE;
2502 
2503 	for (;;) {
2504 		ret = -EAGAIN;
2505 		if (pp->rb_get != pp->rb_put) {
2506 			int i = pp->rb_get;
2507 			struct rb_entry *rp = &pp->rb_buf[i];
2508 			ret = rp->len;
2509 			spin_unlock_irqrestore(&pp->lock, flags);
2510 			if (ret > count)
2511 				ret = count;
2512 			if (ret > 0 && copy_to_user(buf, rp->data, ret))
2513 				ret = -EFAULT;
2514 			if (++i >= RB_SIZE)
2515 				i = 0;
2516 			spin_lock_irqsave(&pp->lock, flags);
2517 			pp->rb_get = i;
2518 		}
2519 		if (ret >= 0)
2520 			break;
2521 		if (file->f_flags & O_NONBLOCK)
2522 			break;
2523 		ret = -ERESTARTSYS;
2524 		if (signal_pending(current))
2525 			break;
2526 		spin_unlock_irqrestore(&pp->lock, flags);
2527 		schedule();
2528 		spin_lock_irqsave(&pp->lock, flags);
2529 	}
2530 	current->state = TASK_RUNNING;
2531 	remove_wait_queue(&pp->wait, &wait);
2532 	spin_unlock_irqrestore(&pp->lock, flags);
2533 
2534 	return ret;
2535 }
2536 
2537 static ssize_t
2538 pmu_write(struct file *file, const char __user *buf,
2539 			 size_t count, loff_t *ppos)
2540 {
2541 	return 0;
2542 }
2543 
2544 static unsigned int
2545 pmu_fpoll(struct file *filp, poll_table *wait)
2546 {
2547 	struct pmu_private *pp = filp->private_data;
2548 	unsigned int mask = 0;
2549 	unsigned long flags;
2550 
2551 	if (pp == 0)
2552 		return 0;
2553 	poll_wait(filp, &pp->wait, wait);
2554 	spin_lock_irqsave(&pp->lock, flags);
2555 	if (pp->rb_get != pp->rb_put)
2556 		mask |= POLLIN;
2557 	spin_unlock_irqrestore(&pp->lock, flags);
2558 	return mask;
2559 }
2560 
2561 static int
2562 pmu_release(struct inode *inode, struct file *file)
2563 {
2564 	struct pmu_private *pp = file->private_data;
2565 	unsigned long flags;
2566 
2567 	lock_kernel();
2568 	if (pp != 0) {
2569 		file->private_data = NULL;
2570 		spin_lock_irqsave(&all_pvt_lock, flags);
2571 		list_del(&pp->list);
2572 		spin_unlock_irqrestore(&all_pvt_lock, flags);
2573 
2574 #if defined(CONFIG_INPUT_ADBHID) && defined(CONFIG_PMAC_BACKLIGHT)
2575 		if (pp->backlight_locker)
2576 			pmac_backlight_enable();
2577 #endif
2578 
2579 		kfree(pp);
2580 	}
2581 	unlock_kernel();
2582 	return 0;
2583 }
2584 
2585 static int
2586 pmu_ioctl(struct inode * inode, struct file *filp,
2587 		     u_int cmd, u_long arg)
2588 {
2589 	__u32 __user *argp = (__u32 __user *)arg;
2590 	int error = -EINVAL;
2591 
2592 	switch (cmd) {
2593 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
2594 	case PMU_IOC_SLEEP:
2595 		if (!capable(CAP_SYS_ADMIN))
2596 			return -EACCES;
2597 		if (sleep_in_progress)
2598 			return -EBUSY;
2599 		sleep_in_progress = 1;
2600 		switch (pmu_kind) {
2601 		case PMU_OHARE_BASED:
2602 			error = powerbook_sleep_3400();
2603 			break;
2604 		case PMU_HEATHROW_BASED:
2605 		case PMU_PADDINGTON_BASED:
2606 			error = powerbook_sleep_grackle();
2607 			break;
2608 		case PMU_KEYLARGO_BASED:
2609 			error = powerbook_sleep_Core99();
2610 			break;
2611 		default:
2612 			error = -ENOSYS;
2613 		}
2614 		sleep_in_progress = 0;
2615 		break;
2616 	case PMU_IOC_CAN_SLEEP:
2617 		if (pmac_call_feature(PMAC_FTR_SLEEP_STATE,NULL,0,-1) < 0)
2618 			return put_user(0, argp);
2619 		else
2620 			return put_user(1, argp);
2621 #endif /* CONFIG_PM && CONFIG_PPC32 */
2622 
2623 #ifdef CONFIG_PMAC_BACKLIGHT_LEGACY
2624 	/* Compatibility ioctl's for backlight */
2625 	case PMU_IOC_GET_BACKLIGHT:
2626 	{
2627 		int brightness;
2628 
2629 		if (sleep_in_progress)
2630 			return -EBUSY;
2631 
2632 		brightness = pmac_backlight_get_legacy_brightness();
2633 		if (brightness < 0)
2634 			return brightness;
2635 		else
2636 			return put_user(brightness, argp);
2637 
2638 	}
2639 	case PMU_IOC_SET_BACKLIGHT:
2640 	{
2641 		int brightness;
2642 
2643 		if (sleep_in_progress)
2644 			return -EBUSY;
2645 
2646 		error = get_user(brightness, argp);
2647 		if (error)
2648 			return error;
2649 
2650 		return pmac_backlight_set_legacy_brightness(brightness);
2651 	}
2652 #ifdef CONFIG_INPUT_ADBHID
2653 	case PMU_IOC_GRAB_BACKLIGHT: {
2654 		struct pmu_private *pp = filp->private_data;
2655 
2656 		if (pp->backlight_locker)
2657 			return 0;
2658 
2659 		pp->backlight_locker = 1;
2660 		pmac_backlight_disable();
2661 
2662 		return 0;
2663 	}
2664 #endif /* CONFIG_INPUT_ADBHID */
2665 #endif /* CONFIG_PMAC_BACKLIGHT_LEGACY */
2666 
2667 	case PMU_IOC_GET_MODEL:
2668 	    	return put_user(pmu_kind, argp);
2669 	case PMU_IOC_HAS_ADB:
2670 		return put_user(pmu_has_adb, argp);
2671 	}
2672 	return error;
2673 }
2674 
2675 static struct file_operations pmu_device_fops = {
2676 	.read		= pmu_read,
2677 	.write		= pmu_write,
2678 	.poll		= pmu_fpoll,
2679 	.ioctl		= pmu_ioctl,
2680 	.open		= pmu_open,
2681 	.release	= pmu_release,
2682 };
2683 
2684 static struct miscdevice pmu_device = {
2685 	PMU_MINOR, "pmu", &pmu_device_fops
2686 };
2687 
2688 static int pmu_device_init(void)
2689 {
2690 	if (!via)
2691 		return 0;
2692 	if (misc_register(&pmu_device) < 0)
2693 		printk(KERN_ERR "via-pmu: cannot register misc device.\n");
2694 	return 0;
2695 }
2696 device_initcall(pmu_device_init);
2697 
2698 
2699 #ifdef DEBUG_SLEEP
2700 static inline void
2701 polled_handshake(volatile unsigned char __iomem *via)
2702 {
2703 	via[B] &= ~TREQ; eieio();
2704 	while ((via[B] & TACK) != 0)
2705 		;
2706 	via[B] |= TREQ; eieio();
2707 	while ((via[B] & TACK) == 0)
2708 		;
2709 }
2710 
2711 static inline void
2712 polled_send_byte(volatile unsigned char __iomem *via, int x)
2713 {
2714 	via[ACR] |= SR_OUT | SR_EXT; eieio();
2715 	via[SR] = x; eieio();
2716 	polled_handshake(via);
2717 }
2718 
2719 static inline int
2720 polled_recv_byte(volatile unsigned char __iomem *via)
2721 {
2722 	int x;
2723 
2724 	via[ACR] = (via[ACR] & ~SR_OUT) | SR_EXT; eieio();
2725 	x = via[SR]; eieio();
2726 	polled_handshake(via);
2727 	x = via[SR]; eieio();
2728 	return x;
2729 }
2730 
2731 int
2732 pmu_polled_request(struct adb_request *req)
2733 {
2734 	unsigned long flags;
2735 	int i, l, c;
2736 	volatile unsigned char __iomem *v = via;
2737 
2738 	req->complete = 1;
2739 	c = req->data[0];
2740 	l = pmu_data_len[c][0];
2741 	if (l >= 0 && req->nbytes != l + 1)
2742 		return -EINVAL;
2743 
2744 	local_irq_save(flags);
2745 	while (pmu_state != idle)
2746 		pmu_poll();
2747 
2748 	while ((via[B] & TACK) == 0)
2749 		;
2750 	polled_send_byte(v, c);
2751 	if (l < 0) {
2752 		l = req->nbytes - 1;
2753 		polled_send_byte(v, l);
2754 	}
2755 	for (i = 1; i <= l; ++i)
2756 		polled_send_byte(v, req->data[i]);
2757 
2758 	l = pmu_data_len[c][1];
2759 	if (l < 0)
2760 		l = polled_recv_byte(v);
2761 	for (i = 0; i < l; ++i)
2762 		req->reply[i + req->reply_len] = polled_recv_byte(v);
2763 
2764 	if (req->done)
2765 		(*req->done)(req);
2766 
2767 	local_irq_restore(flags);
2768 	return 0;
2769 }
2770 #endif /* DEBUG_SLEEP */
2771 
2772 
2773 /* FIXME: This is a temporary set of callbacks to enable us
2774  * to do suspend-to-disk.
2775  */
2776 
2777 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
2778 
2779 static int pmu_sys_suspended = 0;
2780 
2781 static int pmu_sys_suspend(struct sys_device *sysdev, pm_message_t state)
2782 {
2783 	if (state.event != PM_EVENT_SUSPEND || pmu_sys_suspended)
2784 		return 0;
2785 
2786 	/* Suspend PMU event interrupts */
2787 	pmu_suspend();
2788 
2789 	pmu_sys_suspended = 1;
2790 	return 0;
2791 }
2792 
2793 static int pmu_sys_resume(struct sys_device *sysdev)
2794 {
2795 	struct adb_request req;
2796 
2797 	if (!pmu_sys_suspended)
2798 		return 0;
2799 
2800 	/* Tell PMU we are ready */
2801 	pmu_request(&req, NULL, 2, PMU_SYSTEM_READY, 2);
2802 	pmu_wait_complete(&req);
2803 
2804 	/* Resume PMU event interrupts */
2805 	pmu_resume();
2806 
2807 	pmu_sys_suspended = 0;
2808 
2809 	return 0;
2810 }
2811 
2812 #endif /* CONFIG_PM && CONFIG_PPC32 */
2813 
2814 static struct sysdev_class pmu_sysclass = {
2815 	set_kset_name("pmu"),
2816 };
2817 
2818 static struct sys_device device_pmu = {
2819 	.id		= 0,
2820 	.cls		= &pmu_sysclass,
2821 };
2822 
2823 static struct sysdev_driver driver_pmu = {
2824 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
2825 	.suspend	= &pmu_sys_suspend,
2826 	.resume		= &pmu_sys_resume,
2827 #endif /* CONFIG_PM && CONFIG_PPC32 */
2828 };
2829 
2830 static int __init init_pmu_sysfs(void)
2831 {
2832 	int rc;
2833 
2834 	rc = sysdev_class_register(&pmu_sysclass);
2835 	if (rc) {
2836 		printk(KERN_ERR "Failed registering PMU sys class\n");
2837 		return -ENODEV;
2838 	}
2839 	rc = sysdev_register(&device_pmu);
2840 	if (rc) {
2841 		printk(KERN_ERR "Failed registering PMU sys device\n");
2842 		return -ENODEV;
2843 	}
2844 	rc = sysdev_driver_register(&pmu_sysclass, &driver_pmu);
2845 	if (rc) {
2846 		printk(KERN_ERR "Failed registering PMU sys driver\n");
2847 		return -ENODEV;
2848 	}
2849 	return 0;
2850 }
2851 
2852 subsys_initcall(init_pmu_sysfs);
2853 
2854 EXPORT_SYMBOL(pmu_request);
2855 EXPORT_SYMBOL(pmu_queue_request);
2856 EXPORT_SYMBOL(pmu_poll);
2857 EXPORT_SYMBOL(pmu_poll_adb);
2858 EXPORT_SYMBOL(pmu_wait_complete);
2859 EXPORT_SYMBOL(pmu_suspend);
2860 EXPORT_SYMBOL(pmu_resume);
2861 EXPORT_SYMBOL(pmu_unlock);
2862 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
2863 EXPORT_SYMBOL(pmu_enable_irled);
2864 EXPORT_SYMBOL(pmu_battery_count);
2865 EXPORT_SYMBOL(pmu_batteries);
2866 EXPORT_SYMBOL(pmu_power_flags);
2867 #endif /* CONFIG_PM && CONFIG_PPC32 */
2868 
2869