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