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