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