pcmcia: add locking to set_mem_map()
[safe/jmp/linux-2.6] / drivers / pcmcia / pcmcia_resource.c
1 /*
2  * PCMCIA 16-bit resource management functions
3  *
4  * The initial developer of the original code is David A. Hinds
5  * <dahinds@users.sourceforge.net>.  Portions created by David A. Hinds
6  * are Copyright (C) 1999 David A. Hinds.  All Rights Reserved.
7  *
8  * Copyright (C) 1999        David A. Hinds
9  * Copyright (C) 2004-2005   Dominik Brodowski
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License version 2 as
13  * published by the Free Software Foundation.
14  *
15  */
16
17 #include <linux/module.h>
18 #include <linux/kernel.h>
19 #include <linux/interrupt.h>
20 #include <linux/delay.h>
21 #include <linux/pci.h>
22 #include <linux/device.h>
23 #include <linux/netdevice.h>
24
25 #include <pcmcia/cs_types.h>
26 #include <pcmcia/ss.h>
27 #include <pcmcia/cs.h>
28 #include <pcmcia/cistpl.h>
29 #include <pcmcia/cisreg.h>
30 #include <pcmcia/ds.h>
31
32 #include "cs_internal.h"
33
34
35 /* Access speed for IO windows */
36 static int io_speed;
37 module_param(io_speed, int, 0444);
38
39
40 #ifdef CONFIG_PCMCIA_PROBE
41 #include <asm/irq.h>
42 /* mask of IRQs already reserved by other cards, we should avoid using them */
43 static u8 pcmcia_used_irq[NR_IRQS];
44 #endif
45
46 static int pcmcia_adjust_io_region(struct resource *res, unsigned long start,
47                                    unsigned long end, struct pcmcia_socket *s)
48 {
49         if (s->resource_ops->adjust_io_region)
50                 return s->resource_ops->adjust_io_region(res, start, end, s);
51         return -ENOMEM;
52 }
53
54 static struct resource *pcmcia_find_io_region(unsigned long base, int num,
55                                               unsigned long align,
56                                               struct pcmcia_socket *s)
57 {
58         if (s->resource_ops->find_io)
59                 return s->resource_ops->find_io(base, num, align, s);
60         return NULL;
61 }
62
63 int pcmcia_validate_mem(struct pcmcia_socket *s)
64 {
65         if (s->resource_ops->validate_mem)
66                 return s->resource_ops->validate_mem(s);
67         /* if there is no callback, we can assume that everything is OK */
68         return 0;
69 }
70
71 struct resource *pcmcia_find_mem_region(u_long base, u_long num, u_long align,
72                                  int low, struct pcmcia_socket *s)
73 {
74         if (s->resource_ops->find_mem)
75                 return s->resource_ops->find_mem(base, num, align, low, s);
76         return NULL;
77 }
78
79
80 /** alloc_io_space
81  *
82  * Special stuff for managing IO windows, because they are scarce
83  */
84
85 static int alloc_io_space(struct pcmcia_socket *s, u_int attr,
86                           unsigned int *base, unsigned int num, u_int lines)
87 {
88         int i;
89         unsigned int try, align;
90
91         align = (*base) ? (lines ? 1<<lines : 0) : 1;
92         if (align && (align < num)) {
93                 if (*base) {
94                         dev_dbg(&s->dev, "odd IO request: num %#x align %#x\n",
95                                num, align);
96                         align = 0;
97                 } else
98                         while (align && (align < num))
99                                 align <<= 1;
100         }
101         if (*base & ~(align-1)) {
102                 dev_dbg(&s->dev, "odd IO request: base %#x align %#x\n",
103                        *base, align);
104                 align = 0;
105         }
106         if ((s->features & SS_CAP_STATIC_MAP) && s->io_offset) {
107                 *base = s->io_offset | (*base & 0x0fff);
108                 return 0;
109         }
110         /* Check for an already-allocated window that must conflict with
111          * what was asked for.  It is a hack because it does not catch all
112          * potential conflicts, just the most obvious ones.
113          */
114         for (i = 0; i < MAX_IO_WIN; i++)
115                 if ((s->io[i].res) && *base &&
116                     ((s->io[i].res->start & (align-1)) == *base))
117                         return 1;
118         for (i = 0; i < MAX_IO_WIN; i++) {
119                 if (!s->io[i].res) {
120                         s->io[i].res = pcmcia_find_io_region(*base, num, align, s);
121                         if (s->io[i].res) {
122                                 *base = s->io[i].res->start;
123                                 s->io[i].res->flags = (s->io[i].res->flags & ~IORESOURCE_BITS) | (attr & IORESOURCE_BITS);
124                                 s->io[i].InUse = num;
125                                 break;
126                         } else
127                                 return 1;
128                 } else if ((s->io[i].res->flags & IORESOURCE_BITS) != (attr & IORESOURCE_BITS))
129                         continue;
130                 /* Try to extend top of window */
131                 try = s->io[i].res->end + 1;
132                 if ((*base == 0) || (*base == try))
133                         if (pcmcia_adjust_io_region(s->io[i].res, s->io[i].res->start,
134                                                     s->io[i].res->end + num, s) == 0) {
135                                 *base = try;
136                                 s->io[i].InUse += num;
137                                 break;
138                         }
139                 /* Try to extend bottom of window */
140                 try = s->io[i].res->start - num;
141                 if ((*base == 0) || (*base == try))
142                         if (pcmcia_adjust_io_region(s->io[i].res, s->io[i].res->start - num,
143                                                     s->io[i].res->end, s) == 0) {
144                                 *base = try;
145                                 s->io[i].InUse += num;
146                                 break;
147                         }
148         }
149         return (i == MAX_IO_WIN);
150 } /* alloc_io_space */
151
152
153 static void release_io_space(struct pcmcia_socket *s, unsigned int base,
154                              unsigned int num)
155 {
156         int i;
157
158         for (i = 0; i < MAX_IO_WIN; i++) {
159                 if (!s->io[i].res)
160                         continue;
161                 if ((s->io[i].res->start <= base) &&
162                     (s->io[i].res->end >= base+num-1)) {
163                         s->io[i].InUse -= num;
164                         /* Free the window if no one else is using it */
165                         if (s->io[i].InUse == 0) {
166                                 release_resource(s->io[i].res);
167                                 kfree(s->io[i].res);
168                                 s->io[i].res = NULL;
169                         }
170                 }
171         }
172 } /* release_io_space */
173
174
175 /** pccard_access_configuration_register
176  *
177  * Access_configuration_register() reads and writes configuration
178  * registers in attribute memory.  Memory window 0 is reserved for
179  * this and the tuple reading services.
180  */
181
182 int pcmcia_access_configuration_register(struct pcmcia_device *p_dev,
183                                          conf_reg_t *reg)
184 {
185         struct pcmcia_socket *s;
186         config_t *c;
187         int addr;
188         u_char val;
189
190         if (!p_dev || !p_dev->function_config)
191                 return -EINVAL;
192
193         s = p_dev->socket;
194         c = p_dev->function_config;
195
196         if (!(c->state & CONFIG_LOCKED)) {
197                 dev_dbg(&s->dev, "Configuration isnt't locked\n");
198                 return -EACCES;
199         }
200
201         addr = (c->ConfigBase + reg->Offset) >> 1;
202
203         switch (reg->Action) {
204         case CS_READ:
205                 pcmcia_read_cis_mem(s, 1, addr, 1, &val);
206                 reg->Value = val;
207                 break;
208         case CS_WRITE:
209                 val = reg->Value;
210                 pcmcia_write_cis_mem(s, 1, addr, 1, &val);
211                 break;
212         default:
213                 dev_dbg(&s->dev, "Invalid conf register request\n");
214                 return -EINVAL;
215                 break;
216         }
217         return 0;
218 } /* pcmcia_access_configuration_register */
219 EXPORT_SYMBOL(pcmcia_access_configuration_register);
220
221
222 int pcmcia_map_mem_page(struct pcmcia_device *p_dev, window_handle_t wh,
223                         memreq_t *req)
224 {
225         struct pcmcia_socket *s = p_dev->socket;
226         int ret;
227
228         wh--;
229         if (wh >= MAX_WIN)
230                 return -EINVAL;
231         if (req->Page != 0) {
232                 dev_dbg(&s->dev, "failure: requested page is zero\n");
233                 return -EINVAL;
234         }
235         mutex_lock(&s->ops_mutex);
236         s->win[wh].card_start = req->CardOffset;
237         ret = s->ops->set_mem_map(s, &s->win[wh]);
238         if (ret)
239                 dev_warn(&s->dev, "failed to set_mem_map\n");
240         mutex_unlock(&s->ops_mutex);
241         return ret;
242 } /* pcmcia_map_mem_page */
243 EXPORT_SYMBOL(pcmcia_map_mem_page);
244
245
246 /** pcmcia_modify_configuration
247  *
248  * Modify a locked socket configuration
249  */
250 int pcmcia_modify_configuration(struct pcmcia_device *p_dev,
251                                 modconf_t *mod)
252 {
253         struct pcmcia_socket *s;
254         config_t *c;
255
256         s = p_dev->socket;
257         c = p_dev->function_config;
258
259         if (!(s->state & SOCKET_PRESENT)) {
260                 dev_dbg(&s->dev, "No card present\n");
261                 return -ENODEV;
262         }
263         if (!(c->state & CONFIG_LOCKED)) {
264                 dev_dbg(&s->dev, "Configuration isnt't locked\n");
265                 return -EACCES;
266         }
267
268         if (mod->Attributes & CONF_IRQ_CHANGE_VALID) {
269                 if (mod->Attributes & CONF_ENABLE_IRQ) {
270                         c->Attributes |= CONF_ENABLE_IRQ;
271                         s->socket.io_irq = s->irq.AssignedIRQ;
272                 } else {
273                         c->Attributes &= ~CONF_ENABLE_IRQ;
274                         s->socket.io_irq = 0;
275                 }
276                 s->ops->set_socket(s, &s->socket);
277         }
278
279         if (mod->Attributes & CONF_VCC_CHANGE_VALID) {
280                 dev_dbg(&s->dev, "changing Vcc is not allowed at this time\n");
281                 return -EINVAL;
282         }
283
284         /* We only allow changing Vpp1 and Vpp2 to the same value */
285         if ((mod->Attributes & CONF_VPP1_CHANGE_VALID) &&
286             (mod->Attributes & CONF_VPP2_CHANGE_VALID)) {
287                 if (mod->Vpp1 != mod->Vpp2) {
288                         dev_dbg(&s->dev, "Vpp1 and Vpp2 must be the same\n");
289                         return -EINVAL;
290                 }
291                 s->socket.Vpp = mod->Vpp1;
292                 if (s->ops->set_socket(s, &s->socket)) {
293                         dev_printk(KERN_WARNING, &s->dev,
294                                    "Unable to set VPP\n");
295                         return -EIO;
296                 }
297         } else if ((mod->Attributes & CONF_VPP1_CHANGE_VALID) ||
298                    (mod->Attributes & CONF_VPP2_CHANGE_VALID)) {
299                 dev_dbg(&s->dev, "changing Vcc is not allowed at this time\n");
300                 return -EINVAL;
301         }
302
303         if (mod->Attributes & CONF_IO_CHANGE_WIDTH) {
304                 pccard_io_map io_off = { 0, 0, 0, 0, 1 };
305                 pccard_io_map io_on;
306                 int i;
307
308                 io_on.speed = io_speed;
309                 for (i = 0; i < MAX_IO_WIN; i++) {
310                         if (!s->io[i].res)
311                                 continue;
312                         io_off.map = i;
313                         io_on.map = i;
314
315                         io_on.flags = MAP_ACTIVE | IO_DATA_PATH_WIDTH_8;
316                         io_on.start = s->io[i].res->start;
317                         io_on.stop = s->io[i].res->end;
318
319                         s->ops->set_io_map(s, &io_off);
320                         mdelay(40);
321                         s->ops->set_io_map(s, &io_on);
322                 }
323         }
324
325         return 0;
326 } /* modify_configuration */
327 EXPORT_SYMBOL(pcmcia_modify_configuration);
328
329
330 int pcmcia_release_configuration(struct pcmcia_device *p_dev)
331 {
332         pccard_io_map io = { 0, 0, 0, 0, 1 };
333         struct pcmcia_socket *s = p_dev->socket;
334         config_t *c = p_dev->function_config;
335         int i;
336
337         if (p_dev->_locked) {
338                 p_dev->_locked = 0;
339                 if (--(s->lock_count) == 0) {
340                         s->socket.flags = SS_OUTPUT_ENA;   /* Is this correct? */
341                         s->socket.Vpp = 0;
342                         s->socket.io_irq = 0;
343                         s->ops->set_socket(s, &s->socket);
344                 }
345         }
346         if (c->state & CONFIG_LOCKED) {
347                 c->state &= ~CONFIG_LOCKED;
348                 if (c->state & CONFIG_IO_REQ)
349                         for (i = 0; i < MAX_IO_WIN; i++) {
350                                 if (!s->io[i].res)
351                                         continue;
352                                 s->io[i].Config--;
353                                 if (s->io[i].Config != 0)
354                                         continue;
355                                 io.map = i;
356                                 s->ops->set_io_map(s, &io);
357                         }
358         }
359
360         return 0;
361 } /* pcmcia_release_configuration */
362
363
364 /** pcmcia_release_io
365  *
366  * Release_io() releases the I/O ranges allocated by a client.  This
367  * may be invoked some time after a card ejection has already dumped
368  * the actual socket configuration, so if the client is "stale", we
369  * don't bother checking the port ranges against the current socket
370  * values.
371  */
372 static int pcmcia_release_io(struct pcmcia_device *p_dev, io_req_t *req)
373 {
374         struct pcmcia_socket *s = p_dev->socket;
375         config_t *c = p_dev->function_config;
376
377         if (!p_dev->_io)
378                 return -EINVAL;
379
380         p_dev->_io = 0;
381
382         if ((c->io.BasePort1 != req->BasePort1) ||
383             (c->io.NumPorts1 != req->NumPorts1) ||
384             (c->io.BasePort2 != req->BasePort2) ||
385             (c->io.NumPorts2 != req->NumPorts2))
386                 return -EINVAL;
387
388         c->state &= ~CONFIG_IO_REQ;
389
390         release_io_space(s, req->BasePort1, req->NumPorts1);
391         if (req->NumPorts2)
392                 release_io_space(s, req->BasePort2, req->NumPorts2);
393
394         return 0;
395 } /* pcmcia_release_io */
396
397
398 static int pcmcia_release_irq(struct pcmcia_device *p_dev, irq_req_t *req)
399 {
400         struct pcmcia_socket *s = p_dev->socket;
401         config_t *c = p_dev->function_config;
402
403         if (!p_dev->_irq)
404                 return -EINVAL;
405         p_dev->_irq = 0;
406
407         if (c->state & CONFIG_LOCKED)
408                 return -EACCES;
409         if (c->irq.Attributes != req->Attributes) {
410                 dev_dbg(&s->dev, "IRQ attributes must match assigned ones\n");
411                 return -EINVAL;
412         }
413         if (s->irq.AssignedIRQ != req->AssignedIRQ) {
414                 dev_dbg(&s->dev, "IRQ must match assigned one\n");
415                 return -EINVAL;
416         }
417         if (--s->irq.Config == 0) {
418                 c->state &= ~CONFIG_IRQ_REQ;
419                 s->irq.AssignedIRQ = 0;
420         }
421
422         if (req->Handler)
423                 free_irq(req->AssignedIRQ, p_dev->priv);
424
425 #ifdef CONFIG_PCMCIA_PROBE
426         pcmcia_used_irq[req->AssignedIRQ]--;
427 #endif
428
429         return 0;
430 } /* pcmcia_release_irq */
431
432
433 int pcmcia_release_window(struct pcmcia_device *p_dev, window_handle_t wh)
434 {
435         struct pcmcia_socket *s = p_dev->socket;
436         pccard_mem_map *win;
437
438         wh--;
439         if (wh >= MAX_WIN)
440                 return -EINVAL;
441
442         mutex_lock(&s->ops_mutex);
443         win = &s->win[wh];
444
445         if (!(p_dev->_win & CLIENT_WIN_REQ(wh))) {
446                 dev_dbg(&s->dev, "not releasing unknown window\n");
447                 mutex_unlock(&s->ops_mutex);
448                 return -EINVAL;
449         }
450
451         /* Shut down memory window */
452         win->flags &= ~MAP_ACTIVE;
453         s->ops->set_mem_map(s, win);
454         s->state &= ~SOCKET_WIN_REQ(wh);
455
456         /* Release system memory */
457         if (win->res) {
458                 release_resource(win->res);
459                 kfree(win->res);
460                 win->res = NULL;
461         }
462         p_dev->_win &= ~CLIENT_WIN_REQ(wh);
463         mutex_unlock(&s->ops_mutex);
464
465         return 0;
466 } /* pcmcia_release_window */
467 EXPORT_SYMBOL(pcmcia_release_window);
468
469
470 int pcmcia_request_configuration(struct pcmcia_device *p_dev,
471                                  config_req_t *req)
472 {
473         int i;
474         u_int base;
475         struct pcmcia_socket *s = p_dev->socket;
476         config_t *c;
477         pccard_io_map iomap;
478
479         if (!(s->state & SOCKET_PRESENT))
480                 return -ENODEV;
481
482         if (req->IntType & INT_CARDBUS) {
483                 dev_dbg(&s->dev, "IntType may not be INT_CARDBUS\n");
484                 return -EINVAL;
485         }
486         c = p_dev->function_config;
487         if (c->state & CONFIG_LOCKED) {
488                 dev_dbg(&s->dev, "Configuration is locked\n");
489                 return -EACCES;
490         }
491
492         /* Do power control.  We don't allow changes in Vcc. */
493         s->socket.Vpp = req->Vpp;
494         if (s->ops->set_socket(s, &s->socket)) {
495                 dev_printk(KERN_WARNING, &s->dev,
496                            "Unable to set socket state\n");
497                 return -EINVAL;
498         }
499
500         /* Pick memory or I/O card, DMA mode, interrupt */
501         c->IntType = req->IntType;
502         c->Attributes = req->Attributes;
503         if (req->IntType & INT_MEMORY_AND_IO)
504                 s->socket.flags |= SS_IOCARD;
505         if (req->IntType & INT_ZOOMED_VIDEO)
506                 s->socket.flags |= SS_ZVCARD | SS_IOCARD;
507         if (req->Attributes & CONF_ENABLE_DMA)
508                 s->socket.flags |= SS_DMA_MODE;
509         if (req->Attributes & CONF_ENABLE_SPKR)
510                 s->socket.flags |= SS_SPKR_ENA;
511         if (req->Attributes & CONF_ENABLE_IRQ)
512                 s->socket.io_irq = s->irq.AssignedIRQ;
513         else
514                 s->socket.io_irq = 0;
515         s->ops->set_socket(s, &s->socket);
516         s->lock_count++;
517
518         /* Set up CIS configuration registers */
519         base = c->ConfigBase = req->ConfigBase;
520         c->CardValues = req->Present;
521         if (req->Present & PRESENT_COPY) {
522                 c->Copy = req->Copy;
523                 pcmcia_write_cis_mem(s, 1, (base + CISREG_SCR)>>1, 1, &c->Copy);
524         }
525         if (req->Present & PRESENT_OPTION) {
526                 if (s->functions == 1) {
527                         c->Option = req->ConfigIndex & COR_CONFIG_MASK;
528                 } else {
529                         c->Option = req->ConfigIndex & COR_MFC_CONFIG_MASK;
530                         c->Option |= COR_FUNC_ENA|COR_IREQ_ENA;
531                         if (req->Present & PRESENT_IOBASE_0)
532                                 c->Option |= COR_ADDR_DECODE;
533                 }
534                 if (c->state & CONFIG_IRQ_REQ)
535                         if (!(c->irq.Attributes & IRQ_FORCED_PULSE))
536                                 c->Option |= COR_LEVEL_REQ;
537                 pcmcia_write_cis_mem(s, 1, (base + CISREG_COR)>>1, 1, &c->Option);
538                 mdelay(40);
539         }
540         if (req->Present & PRESENT_STATUS) {
541                 c->Status = req->Status;
542                 pcmcia_write_cis_mem(s, 1, (base + CISREG_CCSR)>>1, 1, &c->Status);
543         }
544         if (req->Present & PRESENT_PIN_REPLACE) {
545                 c->Pin = req->Pin;
546                 pcmcia_write_cis_mem(s, 1, (base + CISREG_PRR)>>1, 1, &c->Pin);
547         }
548         if (req->Present & PRESENT_EXT_STATUS) {
549                 c->ExtStatus = req->ExtStatus;
550                 pcmcia_write_cis_mem(s, 1, (base + CISREG_ESR)>>1, 1, &c->ExtStatus);
551         }
552         if (req->Present & PRESENT_IOBASE_0) {
553                 u_char b = c->io.BasePort1 & 0xff;
554                 pcmcia_write_cis_mem(s, 1, (base + CISREG_IOBASE_0)>>1, 1, &b);
555                 b = (c->io.BasePort1 >> 8) & 0xff;
556                 pcmcia_write_cis_mem(s, 1, (base + CISREG_IOBASE_1)>>1, 1, &b);
557         }
558         if (req->Present & PRESENT_IOSIZE) {
559                 u_char b = c->io.NumPorts1 + c->io.NumPorts2 - 1;
560                 pcmcia_write_cis_mem(s, 1, (base + CISREG_IOSIZE)>>1, 1, &b);
561         }
562
563         /* Configure I/O windows */
564         if (c->state & CONFIG_IO_REQ) {
565                 iomap.speed = io_speed;
566                 for (i = 0; i < MAX_IO_WIN; i++)
567                         if (s->io[i].res) {
568                                 iomap.map = i;
569                                 iomap.flags = MAP_ACTIVE;
570                                 switch (s->io[i].res->flags & IO_DATA_PATH_WIDTH) {
571                                 case IO_DATA_PATH_WIDTH_16:
572                                         iomap.flags |= MAP_16BIT; break;
573                                 case IO_DATA_PATH_WIDTH_AUTO:
574                                         iomap.flags |= MAP_AUTOSZ; break;
575                                 default:
576                                         break;
577                                 }
578                                 iomap.start = s->io[i].res->start;
579                                 iomap.stop = s->io[i].res->end;
580                                 s->ops->set_io_map(s, &iomap);
581                                 s->io[i].Config++;
582                         }
583         }
584
585         c->state |= CONFIG_LOCKED;
586         p_dev->_locked = 1;
587         return 0;
588 } /* pcmcia_request_configuration */
589 EXPORT_SYMBOL(pcmcia_request_configuration);
590
591
592 /** pcmcia_request_io
593  *
594  * Request_io() reserves ranges of port addresses for a socket.
595  * I have not implemented range sharing or alias addressing.
596  */
597 int pcmcia_request_io(struct pcmcia_device *p_dev, io_req_t *req)
598 {
599         struct pcmcia_socket *s = p_dev->socket;
600         config_t *c;
601
602         if (!(s->state & SOCKET_PRESENT)) {
603                 dev_dbg(&s->dev, "No card present\n");
604                 return -ENODEV;
605         }
606
607         if (!req)
608                 return -EINVAL;
609         c = p_dev->function_config;
610         if (c->state & CONFIG_LOCKED) {
611                 dev_dbg(&s->dev, "Configuration is locked\n");
612                 return -EACCES;
613         }
614         if (c->state & CONFIG_IO_REQ) {
615                 dev_dbg(&s->dev, "IO already configured\n");
616                 return -EBUSY;
617         }
618         if (req->Attributes1 & (IO_SHARED | IO_FORCE_ALIAS_ACCESS)) {
619                 dev_dbg(&s->dev, "bad attribute setting for IO region 1\n");
620                 return -EINVAL;
621         }
622         if ((req->NumPorts2 > 0) &&
623             (req->Attributes2 & (IO_SHARED | IO_FORCE_ALIAS_ACCESS))) {
624                 dev_dbg(&s->dev, "bad attribute setting for IO region 2\n");
625                 return -EINVAL;
626         }
627
628         dev_dbg(&s->dev, "trying to allocate resource 1\n");
629         if (alloc_io_space(s, req->Attributes1, &req->BasePort1,
630                            req->NumPorts1, req->IOAddrLines)) {
631                 dev_dbg(&s->dev, "allocation of resource 1 failed\n");
632                 return -EBUSY;
633         }
634
635         if (req->NumPorts2) {
636                 dev_dbg(&s->dev, "trying to allocate resource 2\n");
637                 if (alloc_io_space(s, req->Attributes2, &req->BasePort2,
638                                    req->NumPorts2, req->IOAddrLines)) {
639                         dev_dbg(&s->dev, "allocation of resource 2 failed\n");
640                         release_io_space(s, req->BasePort1, req->NumPorts1);
641                         return -EBUSY;
642                 }
643         }
644
645         c->io = *req;
646         c->state |= CONFIG_IO_REQ;
647         p_dev->_io = 1;
648         return 0;
649 } /* pcmcia_request_io */
650 EXPORT_SYMBOL(pcmcia_request_io);
651
652
653 /** pcmcia_request_irq
654  *
655  * Request_irq() reserves an irq for this client.
656  *
657  * Also, since Linux only reserves irq's when they are actually
658  * hooked, we don't guarantee that an irq will still be available
659  * when the configuration is locked.  Now that I think about it,
660  * there might be a way to fix this using a dummy handler.
661  */
662
663 #ifdef CONFIG_PCMCIA_PROBE
664 static irqreturn_t test_action(int cpl, void *dev_id)
665 {
666         return IRQ_NONE;
667 }
668 #endif
669
670 int pcmcia_request_irq(struct pcmcia_device *p_dev, irq_req_t *req)
671 {
672         struct pcmcia_socket *s = p_dev->socket;
673         config_t *c;
674         int ret = -EINVAL, irq = 0;
675         int type;
676
677         if (!(s->state & SOCKET_PRESENT)) {
678                 dev_dbg(&s->dev, "No card present\n");
679                 return -ENODEV;
680         }
681         c = p_dev->function_config;
682         if (c->state & CONFIG_LOCKED) {
683                 dev_dbg(&s->dev, "Configuration is locked\n");
684                 return -EACCES;
685         }
686         if (c->state & CONFIG_IRQ_REQ) {
687                 dev_dbg(&s->dev, "IRQ already configured\n");
688                 return -EBUSY;
689         }
690
691         /* Decide what type of interrupt we are registering */
692         type = 0;
693         if (s->functions > 1)           /* All of this ought to be handled higher up */
694                 type = IRQF_SHARED;
695         else if (req->Attributes & IRQ_TYPE_DYNAMIC_SHARING)
696                 type = IRQF_SHARED;
697         else
698                 printk(KERN_WARNING "pcmcia: Driver needs updating to support IRQ sharing.\n");
699
700 #ifdef CONFIG_PCMCIA_PROBE
701
702 #ifdef IRQ_NOAUTOEN
703         /* if the underlying IRQ infrastructure allows for it, only allocate
704          * the IRQ, but do not enable it
705          */
706         if (!(req->Handler))
707                 type |= IRQ_NOAUTOEN;
708 #endif /* IRQ_NOAUTOEN */
709
710         if (s->irq.AssignedIRQ != 0) {
711                 /* If the interrupt is already assigned, it must be the same */
712                 irq = s->irq.AssignedIRQ;
713         } else {
714                 int try;
715                 u32 mask = s->irq_mask;
716                 void *data = p_dev; /* something unique to this device */
717
718                 for (try = 0; try < 64; try++) {
719                         irq = try % 32;
720
721                         /* marked as available by driver, and not blocked by userspace? */
722                         if (!((mask >> irq) & 1))
723                                 continue;
724
725                         /* avoid an IRQ which is already used by a PCMCIA card */
726                         if ((try < 32) && pcmcia_used_irq[irq])
727                                 continue;
728
729                         /* register the correct driver, if possible, of check whether
730                          * registering a dummy handle works, i.e. if the IRQ isn't
731                          * marked as used by the kernel resource management core */
732                         ret = request_irq(irq,
733                                           (req->Handler) ? req->Handler : test_action,
734                                           type,
735                                           p_dev->devname,
736                                           (req->Handler) ? p_dev->priv : data);
737                         if (!ret) {
738                                 if (!req->Handler)
739                                         free_irq(irq, data);
740                                 break;
741                         }
742                 }
743         }
744 #endif
745         /* only assign PCI irq if no IRQ already assigned */
746         if (ret && !s->irq.AssignedIRQ) {
747                 if (!s->pci_irq) {
748                         dev_printk(KERN_INFO, &s->dev, "no IRQ found\n");
749                         return ret;
750                 }
751                 type = IRQF_SHARED;
752                 irq = s->pci_irq;
753         }
754
755         if (ret && req->Handler) {
756                 ret = request_irq(irq, req->Handler, type,
757                                   p_dev->devname, p_dev->priv);
758                 if (ret) {
759                         dev_printk(KERN_INFO, &s->dev,
760                                 "request_irq() failed\n");
761                         return ret;
762                 }
763         }
764
765         /* Make sure the fact the request type was overridden is passed back */
766         if (type == IRQF_SHARED && !(req->Attributes & IRQ_TYPE_DYNAMIC_SHARING)) {
767                 req->Attributes |= IRQ_TYPE_DYNAMIC_SHARING;
768                 dev_printk(KERN_WARNING, &p_dev->dev, "pcmcia: "
769                         "request for exclusive IRQ could not be fulfilled.\n");
770                 dev_printk(KERN_WARNING, &p_dev->dev, "pcmcia: the driver "
771                         "needs updating to supported shared IRQ lines.\n");
772         }
773         c->irq.Attributes = req->Attributes;
774         s->irq.AssignedIRQ = req->AssignedIRQ = irq;
775         s->irq.Config++;
776
777         c->state |= CONFIG_IRQ_REQ;
778         p_dev->_irq = 1;
779
780 #ifdef CONFIG_PCMCIA_PROBE
781         pcmcia_used_irq[irq]++;
782 #endif
783
784         return 0;
785 } /* pcmcia_request_irq */
786 EXPORT_SYMBOL(pcmcia_request_irq);
787
788
789 /** pcmcia_request_window
790  *
791  * Request_window() establishes a mapping between card memory space
792  * and system memory space.
793  */
794 int pcmcia_request_window(struct pcmcia_device *p_dev, win_req_t *req, window_handle_t *wh)
795 {
796         struct pcmcia_socket *s = p_dev->socket;
797         pccard_mem_map *win;
798         u_long align;
799         int w;
800
801         if (!(s->state & SOCKET_PRESENT)) {
802                 dev_dbg(&s->dev, "No card present\n");
803                 return -ENODEV;
804         }
805         if (req->Attributes & (WIN_PAGED | WIN_SHARED)) {
806                 dev_dbg(&s->dev, "bad attribute setting for iomem region\n");
807                 return -EINVAL;
808         }
809
810         /* Window size defaults to smallest available */
811         if (req->Size == 0)
812                 req->Size = s->map_size;
813         align = (((s->features & SS_CAP_MEM_ALIGN) ||
814                   (req->Attributes & WIN_STRICT_ALIGN)) ?
815                  req->Size : s->map_size);
816         if (req->Size & (s->map_size-1)) {
817                 dev_dbg(&s->dev, "invalid map size\n");
818                 return -EINVAL;
819         }
820         if ((req->Base && (s->features & SS_CAP_STATIC_MAP)) ||
821             (req->Base & (align-1))) {
822                 dev_dbg(&s->dev, "invalid base address\n");
823                 return -EINVAL;
824         }
825         if (req->Base)
826                 align = 0;
827
828         /* Allocate system memory window */
829         for (w = 0; w < MAX_WIN; w++)
830                 if (!(s->state & SOCKET_WIN_REQ(w)))
831                         break;
832         if (w == MAX_WIN) {
833                 dev_dbg(&s->dev, "all windows are used already\n");
834                 return -EINVAL;
835         }
836
837         mutex_lock(&s->ops_mutex);
838         win = &s->win[w];
839
840         if (!(s->features & SS_CAP_STATIC_MAP)) {
841                 win->res = pcmcia_find_mem_region(req->Base, req->Size, align,
842                                                       (req->Attributes & WIN_MAP_BELOW_1MB), s);
843                 if (!win->res) {
844                         dev_dbg(&s->dev, "allocating mem region failed\n");
845                         mutex_unlock(&s->ops_mutex);
846                         return -EINVAL;
847                 }
848         }
849         p_dev->_win |= CLIENT_WIN_REQ(w);
850
851         /* Configure the socket controller */
852         win->map = w+1;
853         win->flags = 0;
854         win->speed = req->AccessSpeed;
855         if (req->Attributes & WIN_MEMORY_TYPE)
856                 win->flags |= MAP_ATTRIB;
857         if (req->Attributes & WIN_ENABLE)
858                 win->flags |= MAP_ACTIVE;
859         if (req->Attributes & WIN_DATA_WIDTH_16)
860                 win->flags |= MAP_16BIT;
861         if (req->Attributes & WIN_USE_WAIT)
862                 win->flags |= MAP_USE_WAIT;
863         win->card_start = 0;
864
865         if (s->ops->set_mem_map(s, win) != 0) {
866                 dev_dbg(&s->dev, "failed to set memory mapping\n");
867                 mutex_unlock(&s->ops_mutex);
868                 return -EIO;
869         }
870         s->state |= SOCKET_WIN_REQ(w);
871
872         /* Return window handle */
873         if (s->features & SS_CAP_STATIC_MAP)
874                 req->Base = win->static_start;
875         else
876                 req->Base = win->res->start;
877
878         mutex_unlock(&s->ops_mutex);
879         *wh = w + 1;
880
881         return 0;
882 } /* pcmcia_request_window */
883 EXPORT_SYMBOL(pcmcia_request_window);
884
885 void pcmcia_disable_device(struct pcmcia_device *p_dev)
886 {
887         pcmcia_release_configuration(p_dev);
888         pcmcia_release_io(p_dev, &p_dev->io);
889         pcmcia_release_irq(p_dev, &p_dev->irq);
890         if (p_dev->win)
891                 pcmcia_release_window(p_dev, p_dev->win);
892 }
893 EXPORT_SYMBOL(pcmcia_disable_device);
894
895
896 struct pcmcia_cfg_mem {
897         struct pcmcia_device *p_dev;
898         void *priv_data;
899         int (*conf_check) (struct pcmcia_device *p_dev,
900                            cistpl_cftable_entry_t *cfg,
901                            cistpl_cftable_entry_t *dflt,
902                            unsigned int vcc,
903                            void *priv_data);
904         cisparse_t parse;
905         cistpl_cftable_entry_t dflt;
906 };
907
908 /**
909  * pcmcia_do_loop_config() - internal helper for pcmcia_loop_config()
910  *
911  * pcmcia_do_loop_config() is the internal callback for the call from
912  * pcmcia_loop_config() to pccard_loop_tuple(). Data is transferred
913  * by a struct pcmcia_cfg_mem.
914  */
915 static int pcmcia_do_loop_config(tuple_t *tuple, cisparse_t *parse, void *priv)
916 {
917         cistpl_cftable_entry_t *cfg = &parse->cftable_entry;
918         struct pcmcia_cfg_mem *cfg_mem = priv;
919
920         /* default values */
921         cfg_mem->p_dev->conf.ConfigIndex = cfg->index;
922         if (cfg->flags & CISTPL_CFTABLE_DEFAULT)
923                 cfg_mem->dflt = *cfg;
924
925         return cfg_mem->conf_check(cfg_mem->p_dev, cfg, &cfg_mem->dflt,
926                                    cfg_mem->p_dev->socket->socket.Vcc,
927                                    cfg_mem->priv_data);
928 }
929
930 /**
931  * pcmcia_loop_config() - loop over configuration options
932  * @p_dev:      the struct pcmcia_device which we need to loop for.
933  * @conf_check: function to call for each configuration option.
934  *              It gets passed the struct pcmcia_device, the CIS data
935  *              describing the configuration option, and private data
936  *              being passed to pcmcia_loop_config()
937  * @priv_data:  private data to be passed to the conf_check function.
938  *
939  * pcmcia_loop_config() loops over all configuration options, and calls
940  * the driver-specific conf_check() for each one, checking whether
941  * it is a valid one. Returns 0 on success or errorcode otherwise.
942  */
943 int pcmcia_loop_config(struct pcmcia_device *p_dev,
944                        int      (*conf_check)   (struct pcmcia_device *p_dev,
945                                                  cistpl_cftable_entry_t *cfg,
946                                                  cistpl_cftable_entry_t *dflt,
947                                                  unsigned int vcc,
948                                                  void *priv_data),
949                        void *priv_data)
950 {
951         struct pcmcia_cfg_mem *cfg_mem;
952         int ret;
953
954         cfg_mem = kzalloc(sizeof(struct pcmcia_cfg_mem), GFP_KERNEL);
955         if (cfg_mem == NULL)
956                 return -ENOMEM;
957
958         cfg_mem->p_dev = p_dev;
959         cfg_mem->conf_check = conf_check;
960         cfg_mem->priv_data = priv_data;
961
962         ret = pccard_loop_tuple(p_dev->socket, p_dev->func,
963                                 CISTPL_CFTABLE_ENTRY, &cfg_mem->parse,
964                                 cfg_mem, pcmcia_do_loop_config);
965
966         kfree(cfg_mem);
967         return ret;
968 }
969 EXPORT_SYMBOL(pcmcia_loop_config);
970
971
972 struct pcmcia_loop_mem {
973         struct pcmcia_device *p_dev;
974         void *priv_data;
975         int (*loop_tuple) (struct pcmcia_device *p_dev,
976                            tuple_t *tuple,
977                            void *priv_data);
978 };
979
980 /**
981  * pcmcia_do_loop_tuple() - internal helper for pcmcia_loop_config()
982  *
983  * pcmcia_do_loop_tuple() is the internal callback for the call from
984  * pcmcia_loop_tuple() to pccard_loop_tuple(). Data is transferred
985  * by a struct pcmcia_cfg_mem.
986  */
987 static int pcmcia_do_loop_tuple(tuple_t *tuple, cisparse_t *parse, void *priv)
988 {
989         struct pcmcia_loop_mem *loop = priv;
990
991         return loop->loop_tuple(loop->p_dev, tuple, loop->priv_data);
992 };
993
994 /**
995  * pcmcia_loop_tuple() - loop over tuples in the CIS
996  * @p_dev:      the struct pcmcia_device which we need to loop for.
997  * @code:       which CIS code shall we look for?
998  * @priv_data:  private data to be passed to the loop_tuple function.
999  * @loop_tuple: function to call for each CIS entry of type @function. IT
1000  *              gets passed the raw tuple and @priv_data.
1001  *
1002  * pcmcia_loop_tuple() loops over all CIS entries of type @function, and
1003  * calls the @loop_tuple function for each entry. If the call to @loop_tuple
1004  * returns 0, the loop exits. Returns 0 on success or errorcode otherwise.
1005  */
1006 int pcmcia_loop_tuple(struct pcmcia_device *p_dev, cisdata_t code,
1007                       int (*loop_tuple) (struct pcmcia_device *p_dev,
1008                                          tuple_t *tuple,
1009                                          void *priv_data),
1010                       void *priv_data)
1011 {
1012         struct pcmcia_loop_mem loop = {
1013                 .p_dev = p_dev,
1014                 .loop_tuple = loop_tuple,
1015                 .priv_data = priv_data};
1016
1017         return pccard_loop_tuple(p_dev->socket, p_dev->func, code, NULL,
1018                                  &loop, pcmcia_do_loop_tuple);
1019 }
1020 EXPORT_SYMBOL(pcmcia_loop_tuple);
1021
1022
1023 struct pcmcia_loop_get {
1024         size_t len;
1025         cisdata_t **buf;
1026 };
1027
1028 /**
1029  * pcmcia_do_get_tuple() - internal helper for pcmcia_get_tuple()
1030  *
1031  * pcmcia_do_get_tuple() is the internal callback for the call from
1032  * pcmcia_get_tuple() to pcmcia_loop_tuple(). As we're only interested in
1033  * the first tuple, return 0 unconditionally. Create a memory buffer large
1034  * enough to hold the content of the tuple, and fill it with the tuple data.
1035  * The caller is responsible to free the buffer.
1036  */
1037 static int pcmcia_do_get_tuple(struct pcmcia_device *p_dev, tuple_t *tuple,
1038                                void *priv)
1039 {
1040         struct pcmcia_loop_get *get = priv;
1041
1042         *get->buf = kzalloc(tuple->TupleDataLen, GFP_KERNEL);
1043         if (*get->buf) {
1044                 get->len = tuple->TupleDataLen;
1045                 memcpy(*get->buf, tuple->TupleData, tuple->TupleDataLen);
1046         } else
1047                 dev_dbg(&p_dev->dev, "do_get_tuple: out of memory\n");
1048         return 0;
1049 }
1050
1051 /**
1052  * pcmcia_get_tuple() - get first tuple from CIS
1053  * @p_dev:      the struct pcmcia_device which we need to loop for.
1054  * @code:       which CIS code shall we look for?
1055  * @buf:        pointer to store the buffer to.
1056  *
1057  * pcmcia_get_tuple() gets the content of the first CIS entry of type @code.
1058  * It returns the buffer length (or zero). The caller is responsible to free
1059  * the buffer passed in @buf.
1060  */
1061 size_t pcmcia_get_tuple(struct pcmcia_device *p_dev, cisdata_t code,
1062                         unsigned char **buf)
1063 {
1064         struct pcmcia_loop_get get = {
1065                 .len = 0,
1066                 .buf = buf,
1067         };
1068
1069         *get.buf = NULL;
1070         pcmcia_loop_tuple(p_dev, code, pcmcia_do_get_tuple, &get);
1071
1072         return get.len;
1073 }
1074 EXPORT_SYMBOL(pcmcia_get_tuple);
1075
1076
1077 /**
1078  * pcmcia_do_get_mac() - internal helper for pcmcia_get_mac_from_cis()
1079  *
1080  * pcmcia_do_get_mac() is the internal callback for the call from
1081  * pcmcia_get_mac_from_cis() to pcmcia_loop_tuple(). We check whether the
1082  * tuple contains a proper LAN_NODE_ID of length 6, and copy the data
1083  * to struct net_device->dev_addr[i].
1084  */
1085 static int pcmcia_do_get_mac(struct pcmcia_device *p_dev, tuple_t *tuple,
1086                              void *priv)
1087 {
1088         struct net_device *dev = priv;
1089         int i;
1090
1091         if (tuple->TupleData[0] != CISTPL_FUNCE_LAN_NODE_ID)
1092                 return -EINVAL;
1093         if (tuple->TupleDataLen < ETH_ALEN + 2) {
1094                 dev_warn(&p_dev->dev, "Invalid CIS tuple length for "
1095                         "LAN_NODE_ID\n");
1096                 return -EINVAL;
1097         }
1098
1099         if (tuple->TupleData[1] != ETH_ALEN) {
1100                 dev_warn(&p_dev->dev, "Invalid header for LAN_NODE_ID\n");
1101                 return -EINVAL;
1102         }
1103         for (i = 0; i < 6; i++)
1104                 dev->dev_addr[i] = tuple->TupleData[i+2];
1105         return 0;
1106 }
1107
1108 /**
1109  * pcmcia_get_mac_from_cis() - read out MAC address from CISTPL_FUNCE
1110  * @p_dev:      the struct pcmcia_device for which we want the address.
1111  * @dev:        a properly prepared struct net_device to store the info to.
1112  *
1113  * pcmcia_get_mac_from_cis() reads out the hardware MAC address from
1114  * CISTPL_FUNCE and stores it into struct net_device *dev->dev_addr which
1115  * must be set up properly by the driver (see examples!).
1116  */
1117 int pcmcia_get_mac_from_cis(struct pcmcia_device *p_dev, struct net_device *dev)
1118 {
1119         return pcmcia_loop_tuple(p_dev, CISTPL_FUNCE, pcmcia_do_get_mac, dev);
1120 }
1121 EXPORT_SYMBOL(pcmcia_get_mac_from_cis);
1122