PNP: fix up after Lindent
[linux-2.6.git] / drivers / pnp / pnpbios / bioscalls.c
1 /*
2  * bioscalls.c - the lowlevel layer of the PnPBIOS driver
3  */
4
5 #include <linux/types.h>
6 #include <linux/module.h>
7 #include <linux/init.h>
8 #include <linux/linkage.h>
9 #include <linux/kernel.h>
10 #include <linux/pnpbios.h>
11 #include <linux/device.h>
12 #include <linux/pnp.h>
13 #include <linux/mm.h>
14 #include <linux/smp.h>
15 #include <linux/slab.h>
16 #include <linux/kmod.h>
17 #include <linux/completion.h>
18 #include <linux/spinlock.h>
19
20 #include <asm/page.h>
21 #include <asm/desc.h>
22 #include <asm/system.h>
23 #include <asm/byteorder.h>
24
25 #include "pnpbios.h"
26
27 static struct {
28         u16 offset;
29         u16 segment;
30 } pnp_bios_callpoint;
31
32 /*
33  * These are some opcodes for a "static asmlinkage"
34  * As this code is *not* executed inside the linux kernel segment, but in a
35  * alias at offset 0, we need a far return that can not be compiled by
36  * default (please, prove me wrong! this is *really* ugly!)
37  * This is the only way to get the bios to return into the kernel code,
38  * because the bios code runs in 16 bit protected mode and therefore can only
39  * return to the caller if the call is within the first 64kB, and the linux
40  * kernel begins at offset 3GB...
41  */
42
43 asmlinkage void pnp_bios_callfunc(void);
44
45 __asm__(".text                  \n"
46         __ALIGN_STR "\n"
47         "pnp_bios_callfunc:\n"
48         "       pushl %edx      \n"
49         "       pushl %ecx      \n"
50         "       pushl %ebx      \n"
51         "       pushl %eax      \n"
52         "       lcallw *pnp_bios_callpoint\n"
53         "       addl $16, %esp  \n"
54         "       lret            \n"
55         ".previous              \n");
56
57 #define Q2_SET_SEL(cpu, selname, address, size) \
58 do { \
59 struct desc_struct *gdt = get_cpu_gdt_table((cpu)); \
60 set_base(gdt[(selname) >> 3], (u32)(address)); \
61 set_limit(gdt[(selname) >> 3], size); \
62 } while(0)
63
64 static struct desc_struct bad_bios_desc = { 0, 0x00409200 };
65
66 /*
67  * At some point we want to use this stack frame pointer to unwind
68  * after PnP BIOS oopses.
69  */
70
71 u32 pnp_bios_fault_esp;
72 u32 pnp_bios_fault_eip;
73 u32 pnp_bios_is_utter_crap = 0;
74
75 static spinlock_t pnp_bios_lock;
76
77 /*
78  * Support Functions
79  */
80
81 static inline u16 call_pnp_bios(u16 func, u16 arg1, u16 arg2, u16 arg3,
82                                 u16 arg4, u16 arg5, u16 arg6, u16 arg7,
83                                 void *ts1_base, u32 ts1_size,
84                                 void *ts2_base, u32 ts2_size)
85 {
86         unsigned long flags;
87         u16 status;
88         struct desc_struct save_desc_40;
89         int cpu;
90
91         /*
92          * PnP BIOSes are generally not terribly re-entrant.
93          * Also, don't rely on them to save everything correctly.
94          */
95         if (pnp_bios_is_utter_crap)
96                 return PNP_FUNCTION_NOT_SUPPORTED;
97
98         cpu = get_cpu();
99         save_desc_40 = get_cpu_gdt_table(cpu)[0x40 / 8];
100         get_cpu_gdt_table(cpu)[0x40 / 8] = bad_bios_desc;
101
102         /* On some boxes IRQ's during PnP BIOS calls are deadly.  */
103         spin_lock_irqsave(&pnp_bios_lock, flags);
104
105         /* The lock prevents us bouncing CPU here */
106         if (ts1_size)
107                 Q2_SET_SEL(smp_processor_id(), PNP_TS1, ts1_base, ts1_size);
108         if (ts2_size)
109                 Q2_SET_SEL(smp_processor_id(), PNP_TS2, ts2_base, ts2_size);
110
111         __asm__ __volatile__("pushl %%ebp\n\t"
112                              "pushl %%edi\n\t"
113                              "pushl %%esi\n\t"
114                              "pushl %%ds\n\t"
115                              "pushl %%es\n\t"
116                              "pushl %%fs\n\t"
117                              "pushl %%gs\n\t"
118                              "pushfl\n\t"
119                              "movl %%esp, pnp_bios_fault_esp\n\t"
120                              "movl $1f, pnp_bios_fault_eip\n\t"
121                              "lcall %5,%6\n\t"
122                              "1:popfl\n\t"
123                              "popl %%gs\n\t"
124                              "popl %%fs\n\t"
125                              "popl %%es\n\t"
126                              "popl %%ds\n\t"
127                              "popl %%esi\n\t"
128                              "popl %%edi\n\t"
129                              "popl %%ebp\n\t":"=a"(status)
130                              :"0"((func) | (((u32) arg1) << 16)),
131                              "b"((arg2) | (((u32) arg3) << 16)),
132                              "c"((arg4) | (((u32) arg5) << 16)),
133                              "d"((arg6) | (((u32) arg7) << 16)),
134                              "i"(PNP_CS32), "i"(0)
135                              :"memory");
136         spin_unlock_irqrestore(&pnp_bios_lock, flags);
137
138         get_cpu_gdt_table(cpu)[0x40 / 8] = save_desc_40;
139         put_cpu();
140
141         /* If we get here and this is set then the PnP BIOS faulted on us. */
142         if (pnp_bios_is_utter_crap) {
143                 printk(KERN_ERR
144                        "PnPBIOS: Warning! Your PnP BIOS caused a fatal error. Attempting to continue\n");
145                 printk(KERN_ERR
146                        "PnPBIOS: You may need to reboot with the \"pnpbios=off\" option to operate stably\n");
147                 printk(KERN_ERR
148                        "PnPBIOS: Check with your vendor for an updated BIOS\n");
149         }
150
151         return status;
152 }
153
154 void pnpbios_print_status(const char *module, u16 status)
155 {
156         switch (status) {
157         case PNP_SUCCESS:
158                 printk(KERN_ERR "PnPBIOS: %s: function successful\n", module);
159                 break;
160         case PNP_NOT_SET_STATICALLY:
161                 printk(KERN_ERR "PnPBIOS: %s: unable to set static resources\n",
162                        module);
163                 break;
164         case PNP_UNKNOWN_FUNCTION:
165                 printk(KERN_ERR "PnPBIOS: %s: invalid function number passed\n",
166                        module);
167                 break;
168         case PNP_FUNCTION_NOT_SUPPORTED:
169                 printk(KERN_ERR
170                        "PnPBIOS: %s: function not supported on this system\n",
171                        module);
172                 break;
173         case PNP_INVALID_HANDLE:
174                 printk(KERN_ERR "PnPBIOS: %s: invalid handle\n", module);
175                 break;
176         case PNP_BAD_PARAMETER:
177                 printk(KERN_ERR "PnPBIOS: %s: invalid parameters were passed\n",
178                        module);
179                 break;
180         case PNP_SET_FAILED:
181                 printk(KERN_ERR "PnPBIOS: %s: unable to set resources\n",
182                        module);
183                 break;
184         case PNP_EVENTS_NOT_PENDING:
185                 printk(KERN_ERR "PnPBIOS: %s: no events are pending\n", module);
186                 break;
187         case PNP_SYSTEM_NOT_DOCKED:
188                 printk(KERN_ERR "PnPBIOS: %s: the system is not docked\n",
189                        module);
190                 break;
191         case PNP_NO_ISA_PNP_CARDS:
192                 printk(KERN_ERR
193                        "PnPBIOS: %s: no isapnp cards are installed on this system\n",
194                        module);
195                 break;
196         case PNP_UNABLE_TO_DETERMINE_DOCK_CAPABILITIES:
197                 printk(KERN_ERR
198                        "PnPBIOS: %s: cannot determine the capabilities of the docking station\n",
199                        module);
200                 break;
201         case PNP_CONFIG_CHANGE_FAILED_NO_BATTERY:
202                 printk(KERN_ERR
203                        "PnPBIOS: %s: unable to undock, the system does not have a battery\n",
204                        module);
205                 break;
206         case PNP_CONFIG_CHANGE_FAILED_RESOURCE_CONFLICT:
207                 printk(KERN_ERR
208                        "PnPBIOS: %s: could not dock due to resource conflicts\n",
209                        module);
210                 break;
211         case PNP_BUFFER_TOO_SMALL:
212                 printk(KERN_ERR "PnPBIOS: %s: the buffer passed is too small\n",
213                        module);
214                 break;
215         case PNP_USE_ESCD_SUPPORT:
216                 printk(KERN_ERR "PnPBIOS: %s: use ESCD instead\n", module);
217                 break;
218         case PNP_MESSAGE_NOT_SUPPORTED:
219                 printk(KERN_ERR "PnPBIOS: %s: the message is unsupported\n",
220                        module);
221                 break;
222         case PNP_HARDWARE_ERROR:
223                 printk(KERN_ERR "PnPBIOS: %s: a hardware failure has occured\n",
224                        module);
225                 break;
226         default:
227                 printk(KERN_ERR "PnPBIOS: %s: unexpected status 0x%x\n", module,
228                        status);
229                 break;
230         }
231 }
232
233 /*
234  * PnP BIOS Low Level Calls
235  */
236
237 #define PNP_GET_NUM_SYS_DEV_NODES               0x00
238 #define PNP_GET_SYS_DEV_NODE                    0x01
239 #define PNP_SET_SYS_DEV_NODE                    0x02
240 #define PNP_GET_EVENT                           0x03
241 #define PNP_SEND_MESSAGE                        0x04
242 #define PNP_GET_DOCKING_STATION_INFORMATION     0x05
243 #define PNP_SET_STATIC_ALLOCED_RES_INFO         0x09
244 #define PNP_GET_STATIC_ALLOCED_RES_INFO         0x0a
245 #define PNP_GET_APM_ID_TABLE                    0x0b
246 #define PNP_GET_PNP_ISA_CONFIG_STRUC            0x40
247 #define PNP_GET_ESCD_INFO                       0x41
248 #define PNP_READ_ESCD                           0x42
249 #define PNP_WRITE_ESCD                          0x43
250
251 /*
252  * Call PnP BIOS with function 0x00, "get number of system device nodes"
253  */
254 static int __pnp_bios_dev_node_info(struct pnp_dev_node_info *data)
255 {
256         u16 status;
257
258         if (!pnp_bios_present())
259                 return PNP_FUNCTION_NOT_SUPPORTED;
260         status = call_pnp_bios(PNP_GET_NUM_SYS_DEV_NODES, 0, PNP_TS1, 2,
261                                PNP_TS1, PNP_DS, 0, 0, data,
262                                sizeof(struct pnp_dev_node_info), NULL, 0);
263         data->no_nodes &= 0xff;
264         return status;
265 }
266
267 int pnp_bios_dev_node_info(struct pnp_dev_node_info *data)
268 {
269         int status = __pnp_bios_dev_node_info(data);
270
271         if (status)
272                 pnpbios_print_status("dev_node_info", status);
273         return status;
274 }
275
276 /*
277  * Note that some PnP BIOSes (e.g., on Sony Vaio laptops) die a horrible
278  * death if they are asked to access the "current" configuration.
279  * Therefore, if it's a matter of indifference, it's better to call
280  * get_dev_node() and set_dev_node() with boot=1 rather than with boot=0.
281  */
282
283 /* 
284  * Call PnP BIOS with function 0x01, "get system device node"
285  * Input: *nodenum = desired node,
286  *        boot = whether to get nonvolatile boot (!=0)
287  *               or volatile current (0) config
288  * Output: *nodenum=next node or 0xff if no more nodes
289  */
290 static int __pnp_bios_get_dev_node(u8 *nodenum, char boot,
291                                    struct pnp_bios_node *data)
292 {
293         u16 status;
294         u16 tmp_nodenum;
295
296         if (!pnp_bios_present())
297                 return PNP_FUNCTION_NOT_SUPPORTED;
298         if (!boot && pnpbios_dont_use_current_config)
299                 return PNP_FUNCTION_NOT_SUPPORTED;
300         tmp_nodenum = *nodenum;
301         status = call_pnp_bios(PNP_GET_SYS_DEV_NODE, 0, PNP_TS1, 0, PNP_TS2,
302                                boot ? 2 : 1, PNP_DS, 0, &tmp_nodenum,
303                                sizeof(tmp_nodenum), data, 65536);
304         *nodenum = tmp_nodenum;
305         return status;
306 }
307
308 int pnp_bios_get_dev_node(u8 *nodenum, char boot, struct pnp_bios_node *data)
309 {
310         int status;
311
312         status = __pnp_bios_get_dev_node(nodenum, boot, data);
313         if (status)
314                 pnpbios_print_status("get_dev_node", status);
315         return status;
316 }
317
318 /*
319  * Call PnP BIOS with function 0x02, "set system device node"
320  * Input: *nodenum = desired node, 
321  *        boot = whether to set nonvolatile boot (!=0)
322  *               or volatile current (0) config
323  */
324 static int __pnp_bios_set_dev_node(u8 nodenum, char boot,
325                                    struct pnp_bios_node *data)
326 {
327         u16 status;
328
329         if (!pnp_bios_present())
330                 return PNP_FUNCTION_NOT_SUPPORTED;
331         if (!boot && pnpbios_dont_use_current_config)
332                 return PNP_FUNCTION_NOT_SUPPORTED;
333         status = call_pnp_bios(PNP_SET_SYS_DEV_NODE, nodenum, 0, PNP_TS1,
334                                boot ? 2 : 1, PNP_DS, 0, 0, data, 65536, NULL,
335                                0);
336         return status;
337 }
338
339 int pnp_bios_set_dev_node(u8 nodenum, char boot, struct pnp_bios_node *data)
340 {
341         int status;
342
343         status = __pnp_bios_set_dev_node(nodenum, boot, data);
344         if (status) {
345                 pnpbios_print_status("set_dev_node", status);
346                 return status;
347         }
348         if (!boot) {            /* Update devlist */
349                 status = pnp_bios_get_dev_node(&nodenum, boot, data);
350                 if (status)
351                         return status;
352         }
353         return status;
354 }
355
356 /*
357  * Call PnP BIOS with function 0x05, "get docking station information"
358  */
359 int pnp_bios_dock_station_info(struct pnp_docking_station_info *data)
360 {
361         u16 status;
362
363         if (!pnp_bios_present())
364                 return PNP_FUNCTION_NOT_SUPPORTED;
365         status = call_pnp_bios(PNP_GET_DOCKING_STATION_INFORMATION, 0, PNP_TS1,
366                                PNP_DS, 0, 0, 0, 0, data,
367                                sizeof(struct pnp_docking_station_info), NULL,
368                                0);
369         return status;
370 }
371
372 /*
373  * Call PnP BIOS with function 0x0a, "get statically allocated resource
374  * information"
375  */
376 static int __pnp_bios_get_stat_res(char *info)
377 {
378         u16 status;
379
380         if (!pnp_bios_present())
381                 return PNP_FUNCTION_NOT_SUPPORTED;
382         status = call_pnp_bios(PNP_GET_STATIC_ALLOCED_RES_INFO, 0, PNP_TS1,
383                                PNP_DS, 0, 0, 0, 0, info, 65536, NULL, 0);
384         return status;
385 }
386
387 int pnp_bios_get_stat_res(char *info)
388 {
389         int status;
390
391         status = __pnp_bios_get_stat_res(info);
392         if (status)
393                 pnpbios_print_status("get_stat_res", status);
394         return status;
395 }
396
397 /*
398  * Call PnP BIOS with function 0x40, "get isa pnp configuration structure"
399  */
400 static int __pnp_bios_isapnp_config(struct pnp_isa_config_struc *data)
401 {
402         u16 status;
403
404         if (!pnp_bios_present())
405                 return PNP_FUNCTION_NOT_SUPPORTED;
406         status = call_pnp_bios(PNP_GET_PNP_ISA_CONFIG_STRUC, 0, PNP_TS1, PNP_DS,
407                                0, 0, 0, 0, data,
408                                sizeof(struct pnp_isa_config_struc), NULL, 0);
409         return status;
410 }
411
412 int pnp_bios_isapnp_config(struct pnp_isa_config_struc *data)
413 {
414         int status;
415
416         status = __pnp_bios_isapnp_config(data);
417         if (status)
418                 pnpbios_print_status("isapnp_config", status);
419         return status;
420 }
421
422 /*
423  * Call PnP BIOS with function 0x41, "get ESCD info"
424  */
425 static int __pnp_bios_escd_info(struct escd_info_struc *data)
426 {
427         u16 status;
428
429         if (!pnp_bios_present())
430                 return ESCD_FUNCTION_NOT_SUPPORTED;
431         status = call_pnp_bios(PNP_GET_ESCD_INFO, 0, PNP_TS1, 2, PNP_TS1, 4,
432                                PNP_TS1, PNP_DS, data,
433                                sizeof(struct escd_info_struc), NULL, 0);
434         return status;
435 }
436
437 int pnp_bios_escd_info(struct escd_info_struc *data)
438 {
439         int status;
440
441         status = __pnp_bios_escd_info(data);
442         if (status)
443                 pnpbios_print_status("escd_info", status);
444         return status;
445 }
446
447 /*
448  * Call PnP BIOS function 0x42, "read ESCD"
449  * nvram_base is determined by calling escd_info
450  */
451 static int __pnp_bios_read_escd(char *data, u32 nvram_base)
452 {
453         u16 status;
454
455         if (!pnp_bios_present())
456                 return ESCD_FUNCTION_NOT_SUPPORTED;
457         status = call_pnp_bios(PNP_READ_ESCD, 0, PNP_TS1, PNP_TS2, PNP_DS, 0, 0,
458                                0, data, 65536, __va(nvram_base), 65536);
459         return status;
460 }
461
462 int pnp_bios_read_escd(char *data, u32 nvram_base)
463 {
464         int status;
465
466         status = __pnp_bios_read_escd(data, nvram_base);
467         if (status)
468                 pnpbios_print_status("read_escd", status);
469         return status;
470 }
471
472 void pnpbios_calls_init(union pnp_bios_install_struct *header)
473 {
474         int i;
475
476         spin_lock_init(&pnp_bios_lock);
477         pnp_bios_callpoint.offset = header->fields.pm16offset;
478         pnp_bios_callpoint.segment = PNP_CS16;
479
480         set_base(bad_bios_desc, __va((unsigned long)0x40 << 4));
481         _set_limit((char *)&bad_bios_desc, 4095 - (0x40 << 4));
482         for (i = 0; i < NR_CPUS; i++) {
483                 struct desc_struct *gdt = get_cpu_gdt_table(i);
484                 if (!gdt)
485                         continue;
486                 set_base(gdt[GDT_ENTRY_PNPBIOS_CS32], &pnp_bios_callfunc);
487                 set_base(gdt[GDT_ENTRY_PNPBIOS_CS16],
488                          __va(header->fields.pm16cseg));
489                 set_base(gdt[GDT_ENTRY_PNPBIOS_DS],
490                          __va(header->fields.pm16dseg));
491         }
492 }