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