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