linux/drivers/pcmcia/tcic.c
<<
>>
Prefs
   1/*======================================================================
   2
   3    Device driver for Databook TCIC-2 PCMCIA controller
   4
   5    tcic.c 1.111 2000/02/15 04:13:12
   6
   7    The contents of this file are subject to the Mozilla Public
   8    License Version 1.1 (the "License"); you may not use this file
   9    except in compliance with the License. You may obtain a copy of
  10    the License at http://www.mozilla.org/MPL/
  11
  12    Software distributed under the License is distributed on an "AS
  13    IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
  14    implied. See the License for the specific language governing
  15    rights and limitations under the License.
  16
  17    The initial developer of the original code is David A. Hinds
  18    <dahinds@users.sourceforge.net>.  Portions created by David A. Hinds
  19    are Copyright (C) 1999 David A. Hinds.  All Rights Reserved.
  20
  21    Alternatively, the contents of this file may be used under the
  22    terms of the GNU General Public License version 2 (the "GPL"), in which
  23    case the provisions of the GPL are applicable instead of the
  24    above.  If you wish to allow the use of your version of this file
  25    only under the terms of the GPL and not to allow others to use
  26    your version of this file under the MPL, indicate your decision
  27    by deleting the provisions above and replace them with the notice
  28    and other provisions required by the GPL.  If you do not delete
  29    the provisions above, a recipient may use your version of this
  30    file under either the MPL or the GPL.
  31    
  32======================================================================*/
  33
  34#include <linux/module.h>
  35#include <linux/moduleparam.h>
  36#include <linux/init.h>
  37#include <linux/types.h>
  38#include <linux/fcntl.h>
  39#include <linux/string.h>
  40#include <linux/errno.h>
  41#include <linux/interrupt.h>
  42#include <linux/timer.h>
  43#include <linux/ioport.h>
  44#include <linux/delay.h>
  45#include <linux/workqueue.h>
  46#include <linux/platform_device.h>
  47#include <linux/bitops.h>
  48
  49#include <asm/io.h>
  50
  51#include <pcmcia/ss.h>
  52#include "tcic.h"
  53
  54MODULE_AUTHOR("David Hinds <dahinds@users.sourceforge.net>");
  55MODULE_DESCRIPTION("Databook TCIC-2 PCMCIA socket driver");
  56MODULE_LICENSE("Dual MPL/GPL");
  57
  58/*====================================================================*/
  59
  60/* Parameters that can be set with 'insmod' */
  61
  62/* The base port address of the TCIC-2 chip */
  63static unsigned long tcic_base = TCIC_BASE;
  64
  65/* Specify a socket number to ignore */
  66static int ignore = -1;
  67
  68/* Probe for safe interrupts? */
  69static int do_scan = 1;
  70
  71/* Bit map of interrupts to choose from */
  72static u_int irq_mask = 0xffff;
  73static int irq_list[16];
  74static unsigned int irq_list_count;
  75
  76/* The card status change interrupt -- 0 means autoselect */
  77static int cs_irq;
  78
  79/* Poll status interval -- 0 means default to interrupt */
  80static int poll_interval;
  81
  82/* Delay for card status double-checking */
  83static int poll_quick = HZ/20;
  84
  85/* CCLK external clock time, in nanoseconds.  70 ns = 14.31818 MHz */
  86static int cycle_time = 70;
  87
  88module_param_hw(tcic_base, ulong, ioport, 0444);
  89module_param(ignore, int, 0444);
  90module_param(do_scan, int, 0444);
  91module_param_hw(irq_mask, int, other, 0444);
  92module_param_hw_array(irq_list, int, irq, &irq_list_count, 0444);
  93module_param_hw(cs_irq, int, irq, 0444);
  94module_param(poll_interval, int, 0444);
  95module_param(poll_quick, int, 0444);
  96module_param(cycle_time, int, 0444);
  97
  98/*====================================================================*/
  99
 100static irqreturn_t tcic_interrupt(int irq, void *dev);
 101static void tcic_timer(struct timer_list *unused);
 102static struct pccard_operations tcic_operations;
 103
 104struct tcic_socket {
 105    u_short     psock;
 106    u_char      last_sstat;
 107    u_char      id;
 108    struct pcmcia_socket        socket;
 109};
 110
 111static struct timer_list poll_timer;
 112static int tcic_timer_pending;
 113
 114static int sockets;
 115static struct tcic_socket socket_table[2];
 116
 117/*====================================================================*/
 118
 119/* Trick when selecting interrupts: the TCIC sktirq pin is supposed
 120   to map to irq 11, but is coded as 0 or 1 in the irq registers. */
 121#define TCIC_IRQ(x) ((x) ? (((x) == 11) ? 1 : (x)) : 15)
 122
 123#ifdef DEBUG_X
 124static u_char tcic_getb(u_char reg)
 125{
 126    u_char val = inb(tcic_base+reg);
 127    printk(KERN_DEBUG "tcic_getb(%#lx) = %#x\n", tcic_base+reg, val);
 128    return val;
 129}
 130
 131static u_short tcic_getw(u_char reg)
 132{
 133    u_short val = inw(tcic_base+reg);
 134    printk(KERN_DEBUG "tcic_getw(%#lx) = %#x\n", tcic_base+reg, val);
 135    return val;
 136}
 137
 138static void tcic_setb(u_char reg, u_char data)
 139{
 140    printk(KERN_DEBUG "tcic_setb(%#lx, %#x)\n", tcic_base+reg, data);
 141    outb(data, tcic_base+reg);
 142}
 143
 144static void tcic_setw(u_char reg, u_short data)
 145{
 146    printk(KERN_DEBUG "tcic_setw(%#lx, %#x)\n", tcic_base+reg, data);
 147    outw(data, tcic_base+reg);
 148}
 149#else
 150#define tcic_getb(reg) inb(tcic_base+reg)
 151#define tcic_getw(reg) inw(tcic_base+reg)
 152#define tcic_setb(reg, data) outb(data, tcic_base+reg)
 153#define tcic_setw(reg, data) outw(data, tcic_base+reg)
 154#endif
 155
 156static void tcic_setl(u_char reg, u_int data)
 157{
 158#ifdef DEBUG_X
 159    printk(KERN_DEBUG "tcic_setl(%#x, %#lx)\n", tcic_base+reg, data);
 160#endif
 161    outw(data & 0xffff, tcic_base+reg);
 162    outw(data >> 16, tcic_base+reg+2);
 163}
 164
 165static void tcic_aux_setb(u_short reg, u_char data)
 166{
 167    u_char mode = (tcic_getb(TCIC_MODE) & TCIC_MODE_PGMMASK) | reg;
 168    tcic_setb(TCIC_MODE, mode);
 169    tcic_setb(TCIC_AUX, data);
 170}
 171
 172static u_short tcic_aux_getw(u_short reg)
 173{
 174    u_char mode = (tcic_getb(TCIC_MODE) & TCIC_MODE_PGMMASK) | reg;
 175    tcic_setb(TCIC_MODE, mode);
 176    return tcic_getw(TCIC_AUX);
 177}
 178
 179static void tcic_aux_setw(u_short reg, u_short data)
 180{
 181    u_char mode = (tcic_getb(TCIC_MODE) & TCIC_MODE_PGMMASK) | reg;
 182    tcic_setb(TCIC_MODE, mode);
 183    tcic_setw(TCIC_AUX, data);
 184}
 185
 186/*====================================================================*/
 187
 188/* Time conversion functions */
 189
 190static int to_cycles(int ns)
 191{
 192    if (ns < 14)
 193        return 0;
 194    else
 195        return 2*(ns-14)/cycle_time;
 196}
 197
 198/*====================================================================*/
 199
 200static volatile u_int irq_hits;
 201
 202static irqreturn_t __init tcic_irq_count(int irq, void *dev)
 203{
 204    irq_hits++;
 205    return IRQ_HANDLED;
 206}
 207
 208static u_int __init try_irq(int irq)
 209{
 210    u_short cfg;
 211
 212    irq_hits = 0;
 213    if (request_irq(irq, tcic_irq_count, 0, "irq scan", tcic_irq_count) != 0)
 214        return -1;
 215    mdelay(10);
 216    if (irq_hits) {
 217        free_irq(irq, tcic_irq_count);
 218        return -1;
 219    }
 220
 221    /* Generate one interrupt */
 222    cfg = TCIC_SYSCFG_AUTOBUSY | 0x0a00;
 223    tcic_aux_setw(TCIC_AUX_SYSCFG, cfg | TCIC_IRQ(irq));
 224    tcic_setb(TCIC_IENA, TCIC_IENA_ERR | TCIC_IENA_CFG_HIGH);
 225    tcic_setb(TCIC_ICSR, TCIC_ICSR_ERR | TCIC_ICSR_JAM);
 226
 227    udelay(1000);
 228    free_irq(irq, tcic_irq_count);
 229
 230    /* Turn off interrupts */
 231    tcic_setb(TCIC_IENA, TCIC_IENA_CFG_OFF);
 232    while (tcic_getb(TCIC_ICSR))
 233        tcic_setb(TCIC_ICSR, TCIC_ICSR_JAM);
 234    tcic_aux_setw(TCIC_AUX_SYSCFG, cfg);
 235    
 236    return (irq_hits != 1);
 237}
 238
 239static u_int __init irq_scan(u_int mask0)
 240{
 241    u_int mask1;
 242    int i;
 243
 244#ifdef __alpha__
 245#define PIC 0x4d0
 246    /* Don't probe level-triggered interrupts -- reserved for PCI */
 247    int level_mask = inb_p(PIC) | (inb_p(PIC+1) << 8);
 248    if (level_mask)
 249        mask0 &= ~level_mask;
 250#endif
 251
 252    mask1 = 0;
 253    if (do_scan) {
 254        for (i = 0; i < 16; i++)
 255            if ((mask0 & (1 << i)) && (try_irq(i) == 0))
 256                mask1 |= (1 << i);
 257        for (i = 0; i < 16; i++)
 258            if ((mask1 & (1 << i)) && (try_irq(i) != 0)) {
 259                mask1 ^= (1 << i);
 260            }
 261    }
 262    
 263    if (mask1) {
 264        printk("scanned");
 265    } else {
 266        /* Fallback: just find interrupts that aren't in use */
 267        for (i = 0; i < 16; i++)
 268            if ((mask0 & (1 << i)) &&
 269                (request_irq(i, tcic_irq_count, 0, "x", tcic_irq_count) == 0)) {
 270                mask1 |= (1 << i);
 271                free_irq(i, tcic_irq_count);
 272            }
 273        printk("default");
 274    }
 275    
 276    printk(") = ");
 277    for (i = 0; i < 16; i++)
 278        if (mask1 & (1<<i))
 279            printk("%s%d", ((mask1 & ((1<<i)-1)) ? "," : ""), i);
 280    printk(" ");
 281    
 282    return mask1;
 283}
 284
 285/*======================================================================
 286
 287    See if a card is present, powered up, in IO mode, and already
 288    bound to a (non-PCMCIA) Linux driver.
 289
 290    We make an exception for cards that look like serial devices.
 291    
 292======================================================================*/
 293
 294static int __init is_active(int s)
 295{
 296    u_short scf1, ioctl, base, num;
 297    u_char pwr, sstat;
 298    u_int addr;
 299    
 300    tcic_setl(TCIC_ADDR, (s << TCIC_ADDR_SS_SHFT)
 301              | TCIC_ADDR_INDREG | TCIC_SCF1(s));
 302    scf1 = tcic_getw(TCIC_DATA);
 303    pwr = tcic_getb(TCIC_PWR);
 304    sstat = tcic_getb(TCIC_SSTAT);
 305    addr = TCIC_IWIN(s, 0);
 306    tcic_setw(TCIC_ADDR, addr + TCIC_IBASE_X);
 307    base = tcic_getw(TCIC_DATA);
 308    tcic_setw(TCIC_ADDR, addr + TCIC_ICTL_X);
 309    ioctl = tcic_getw(TCIC_DATA);
 310
 311    if (ioctl & TCIC_ICTL_TINY)
 312        num = 1;
 313    else {
 314        num = (base ^ (base-1));
 315        base = base & (base-1);
 316    }
 317
 318    if ((sstat & TCIC_SSTAT_CD) && (pwr & TCIC_PWR_VCC(s)) &&
 319        (scf1 & TCIC_SCF1_IOSTS) && (ioctl & TCIC_ICTL_ENA) &&
 320        ((base & 0xfeef) != 0x02e8)) {
 321        struct resource *res = request_region(base, num, "tcic-2");
 322        if (!res) /* region is busy */
 323            return 1;
 324        release_region(base, num);
 325    }
 326
 327    return 0;
 328}
 329
 330/*======================================================================
 331
 332    This returns the revision code for the specified socket.
 333    
 334======================================================================*/
 335
 336static int __init get_tcic_id(void)
 337{
 338    u_short id;
 339    
 340    tcic_aux_setw(TCIC_AUX_TEST, TCIC_TEST_DIAG);
 341    id = tcic_aux_getw(TCIC_AUX_ILOCK);
 342    id = (id & TCIC_ILOCKTEST_ID_MASK) >> TCIC_ILOCKTEST_ID_SH;
 343    tcic_aux_setw(TCIC_AUX_TEST, 0);
 344    return id;
 345}
 346
 347/*====================================================================*/
 348
 349static struct platform_driver tcic_driver = {
 350        .driver = {
 351                .name = "tcic-pcmcia",
 352        },
 353};
 354
 355static struct platform_device tcic_device = {
 356        .name = "tcic-pcmcia",
 357        .id = 0,
 358};
 359
 360
 361static int __init init_tcic(void)
 362{
 363    int i, sock, ret = 0;
 364    u_int mask, scan;
 365
 366    if (platform_driver_register(&tcic_driver))
 367        return -1;
 368    
 369    printk(KERN_INFO "Databook TCIC-2 PCMCIA probe: ");
 370    sock = 0;
 371
 372    if (!request_region(tcic_base, 16, "tcic-2")) {
 373        printk("could not allocate ports,\n ");
 374        platform_driver_unregister(&tcic_driver);
 375        return -ENODEV;
 376    }
 377    else {
 378        tcic_setw(TCIC_ADDR, 0);
 379        if (tcic_getw(TCIC_ADDR) == 0) {
 380            tcic_setw(TCIC_ADDR, 0xc3a5);
 381            if (tcic_getw(TCIC_ADDR) == 0xc3a5) sock = 2;
 382        }
 383        if (sock == 0) {
 384            /* See if resetting the controller does any good */
 385            tcic_setb(TCIC_SCTRL, TCIC_SCTRL_RESET);
 386            tcic_setb(TCIC_SCTRL, 0);
 387            tcic_setw(TCIC_ADDR, 0);
 388            if (tcic_getw(TCIC_ADDR) == 0) {
 389                tcic_setw(TCIC_ADDR, 0xc3a5);
 390                if (tcic_getw(TCIC_ADDR) == 0xc3a5) sock = 2;
 391            }
 392        }
 393    }
 394    if (sock == 0) {
 395        printk("not found.\n");
 396        release_region(tcic_base, 16);
 397        platform_driver_unregister(&tcic_driver);
 398        return -ENODEV;
 399    }
 400
 401    sockets = 0;
 402    for (i = 0; i < sock; i++) {
 403        if ((i == ignore) || is_active(i)) continue;
 404        socket_table[sockets].psock = i;
 405        socket_table[sockets].id = get_tcic_id();
 406
 407        socket_table[sockets].socket.owner = THIS_MODULE;
 408        /* only 16-bit cards, memory windows must be size-aligned */
 409        /* No PCI or CardBus support */
 410        socket_table[sockets].socket.features = SS_CAP_PCCARD | SS_CAP_MEM_ALIGN;
 411        /* irq 14, 11, 10, 7, 6, 5, 4, 3 */
 412        socket_table[sockets].socket.irq_mask = 0x4cf8;
 413        /* 4K minimum window size */
 414        socket_table[sockets].socket.map_size = 0x1000;         
 415        sockets++;
 416    }
 417
 418    switch (socket_table[0].id) {
 419    case TCIC_ID_DB86082:
 420        printk("DB86082"); break;
 421    case TCIC_ID_DB86082A:
 422        printk("DB86082A"); break;
 423    case TCIC_ID_DB86084:
 424        printk("DB86084"); break;
 425    case TCIC_ID_DB86084A:
 426        printk("DB86084A"); break;
 427    case TCIC_ID_DB86072:
 428        printk("DB86072"); break;
 429    case TCIC_ID_DB86184:
 430        printk("DB86184"); break;
 431    case TCIC_ID_DB86082B:
 432        printk("DB86082B"); break;
 433    default:
 434        printk("Unknown ID 0x%02x", socket_table[0].id);
 435    }
 436    
 437    /* Set up polling */
 438    timer_setup(&poll_timer, &tcic_timer, 0);
 439
 440    /* Build interrupt mask */
 441    printk(KERN_CONT ", %d sockets\n", sockets);
 442    printk(KERN_INFO "  irq list (");
 443    if (irq_list_count == 0)
 444        mask = irq_mask;
 445    else
 446        for (i = mask = 0; i < irq_list_count; i++)
 447            mask |= (1<<irq_list[i]);
 448
 449    /* irq 14, 11, 10, 7, 6, 5, 4, 3 */
 450    mask &= 0x4cf8;
 451    /* Scan interrupts */
 452    mask = irq_scan(mask);
 453    for (i=0;i<sockets;i++)
 454            socket_table[i].socket.irq_mask = mask;
 455    
 456    /* Check for only two interrupts available */
 457    scan = (mask & (mask-1));
 458    if (((scan & (scan-1)) == 0) && (poll_interval == 0))
 459        poll_interval = HZ;
 460    
 461    if (poll_interval == 0) {
 462        /* Avoid irq 12 unless it is explicitly requested */
 463        u_int cs_mask = mask & ((cs_irq) ? (1<<cs_irq) : ~(1<<12));
 464        for (i = 15; i > 0; i--)
 465            if ((cs_mask & (1 << i)) &&
 466                (request_irq(i, tcic_interrupt, 0, "tcic",
 467                             tcic_interrupt) == 0))
 468                break;
 469        cs_irq = i;
 470        if (cs_irq == 0) poll_interval = HZ;
 471    }
 472    
 473    if (socket_table[0].socket.irq_mask & (1 << 11))
 474        printk("sktirq is irq 11, ");
 475    if (cs_irq != 0)
 476        printk("status change on irq %d\n", cs_irq);
 477    else
 478        printk("polled status, interval = %d ms\n",
 479               poll_interval * 1000 / HZ);
 480    
 481    for (i = 0; i < sockets; i++) {
 482        tcic_setw(TCIC_ADDR+2, socket_table[i].psock << TCIC_SS_SHFT);
 483        socket_table[i].last_sstat = tcic_getb(TCIC_SSTAT);
 484    }
 485    
 486    /* jump start interrupt handler, if needed */
 487    tcic_interrupt(0, NULL);
 488
 489    platform_device_register(&tcic_device);
 490
 491    for (i = 0; i < sockets; i++) {
 492            socket_table[i].socket.ops = &tcic_operations;
 493            socket_table[i].socket.resource_ops = &pccard_nonstatic_ops;
 494            socket_table[i].socket.dev.parent = &tcic_device.dev;
 495            ret = pcmcia_register_socket(&socket_table[i].socket);
 496            if (ret && i)
 497                    pcmcia_unregister_socket(&socket_table[0].socket);
 498    }
 499    
 500    return ret;
 501
 502    return 0;
 503    
 504} /* init_tcic */
 505
 506/*====================================================================*/
 507
 508static void __exit exit_tcic(void)
 509{
 510    int i;
 511
 512    del_timer_sync(&poll_timer);
 513    if (cs_irq != 0) {
 514        tcic_aux_setw(TCIC_AUX_SYSCFG, TCIC_SYSCFG_AUTOBUSY|0x0a00);
 515        free_irq(cs_irq, tcic_interrupt);
 516    }
 517    release_region(tcic_base, 16);
 518
 519    for (i = 0; i < sockets; i++) {
 520            pcmcia_unregister_socket(&socket_table[i].socket);      
 521    }
 522
 523    platform_device_unregister(&tcic_device);
 524    platform_driver_unregister(&tcic_driver);
 525} /* exit_tcic */
 526
 527/*====================================================================*/
 528
 529static irqreturn_t tcic_interrupt(int irq, void *dev)
 530{
 531    int i, quick = 0;
 532    u_char latch, sstat;
 533    u_short psock;
 534    u_int events;
 535    static volatile int active = 0;
 536
 537    if (active) {
 538        printk(KERN_NOTICE "tcic: reentered interrupt handler!\n");
 539        return IRQ_NONE;
 540    } else
 541        active = 1;
 542
 543    pr_debug("tcic_interrupt()\n");
 544    
 545    for (i = 0; i < sockets; i++) {
 546        psock = socket_table[i].psock;
 547        tcic_setl(TCIC_ADDR, (psock << TCIC_ADDR_SS_SHFT)
 548                  | TCIC_ADDR_INDREG | TCIC_SCF1(psock));
 549        sstat = tcic_getb(TCIC_SSTAT);
 550        latch = sstat ^ socket_table[psock].last_sstat;
 551        socket_table[i].last_sstat = sstat;
 552        if (tcic_getb(TCIC_ICSR) & TCIC_ICSR_CDCHG) {
 553            tcic_setb(TCIC_ICSR, TCIC_ICSR_CLEAR);
 554            quick = 1;
 555        }
 556        if (latch == 0)
 557            continue;
 558        events = (latch & TCIC_SSTAT_CD) ? SS_DETECT : 0;
 559        events |= (latch & TCIC_SSTAT_WP) ? SS_WRPROT : 0;
 560        if (tcic_getw(TCIC_DATA) & TCIC_SCF1_IOSTS) {
 561            events |= (latch & TCIC_SSTAT_LBAT1) ? SS_STSCHG : 0;
 562        } else {
 563            events |= (latch & TCIC_SSTAT_RDY) ? SS_READY : 0;
 564            events |= (latch & TCIC_SSTAT_LBAT1) ? SS_BATDEAD : 0;
 565            events |= (latch & TCIC_SSTAT_LBAT2) ? SS_BATWARN : 0;
 566        }
 567        if (events) {
 568                pcmcia_parse_events(&socket_table[i].socket, events);
 569        }
 570    }
 571
 572    /* Schedule next poll, if needed */
 573    if (((cs_irq == 0) || quick) && (!tcic_timer_pending)) {
 574        poll_timer.expires = jiffies + (quick ? poll_quick : poll_interval);
 575        add_timer(&poll_timer);
 576        tcic_timer_pending = 1;
 577    }
 578    active = 0;
 579    
 580    pr_debug("interrupt done\n");
 581    return IRQ_HANDLED;
 582} /* tcic_interrupt */
 583
 584static void tcic_timer(struct timer_list *unused)
 585{
 586    pr_debug("tcic_timer()\n");
 587    tcic_timer_pending = 0;
 588    tcic_interrupt(0, NULL);
 589} /* tcic_timer */
 590
 591/*====================================================================*/
 592
 593static int tcic_get_status(struct pcmcia_socket *sock, u_int *value)
 594{
 595    u_short psock = container_of(sock, struct tcic_socket, socket)->psock;
 596    u_char reg;
 597
 598    tcic_setl(TCIC_ADDR, (psock << TCIC_ADDR_SS_SHFT)
 599              | TCIC_ADDR_INDREG | TCIC_SCF1(psock));
 600    reg = tcic_getb(TCIC_SSTAT);
 601    *value  = (reg & TCIC_SSTAT_CD) ? SS_DETECT : 0;
 602    *value |= (reg & TCIC_SSTAT_WP) ? SS_WRPROT : 0;
 603    if (tcic_getw(TCIC_DATA) & TCIC_SCF1_IOSTS) {
 604        *value |= (reg & TCIC_SSTAT_LBAT1) ? SS_STSCHG : 0;
 605    } else {
 606        *value |= (reg & TCIC_SSTAT_RDY) ? SS_READY : 0;
 607        *value |= (reg & TCIC_SSTAT_LBAT1) ? SS_BATDEAD : 0;
 608        *value |= (reg & TCIC_SSTAT_LBAT2) ? SS_BATWARN : 0;
 609    }
 610    reg = tcic_getb(TCIC_PWR);
 611    if (reg & (TCIC_PWR_VCC(psock)|TCIC_PWR_VPP(psock)))
 612        *value |= SS_POWERON;
 613    dev_dbg(&sock->dev, "GetStatus(%d) = %#2.2x\n", psock, *value);
 614    return 0;
 615} /* tcic_get_status */
 616
 617/*====================================================================*/
 618
 619static int tcic_set_socket(struct pcmcia_socket *sock, socket_state_t *state)
 620{
 621    u_short psock = container_of(sock, struct tcic_socket, socket)->psock;
 622    u_char reg;
 623    u_short scf1, scf2;
 624
 625    dev_dbg(&sock->dev, "SetSocket(%d, flags %#3.3x, Vcc %d, Vpp %d, "
 626          "io_irq %d, csc_mask %#2.2x)\n", psock, state->flags,
 627          state->Vcc, state->Vpp, state->io_irq, state->csc_mask);
 628    tcic_setw(TCIC_ADDR+2, (psock << TCIC_SS_SHFT) | TCIC_ADR2_INDREG);
 629
 630    reg = tcic_getb(TCIC_PWR);
 631    reg &= ~(TCIC_PWR_VCC(psock) | TCIC_PWR_VPP(psock));
 632
 633    if (state->Vcc == 50) {
 634        switch (state->Vpp) {
 635        case 0:   reg |= TCIC_PWR_VCC(psock) | TCIC_PWR_VPP(psock); break;
 636        case 50:  reg |= TCIC_PWR_VCC(psock); break;
 637        case 120: reg |= TCIC_PWR_VPP(psock); break;
 638        default:  return -EINVAL;
 639        }
 640    } else if (state->Vcc != 0)
 641        return -EINVAL;
 642
 643    if (reg != tcic_getb(TCIC_PWR))
 644        tcic_setb(TCIC_PWR, reg);
 645
 646    reg = TCIC_ILOCK_HOLD_CCLK | TCIC_ILOCK_CWAIT;
 647    if (state->flags & SS_OUTPUT_ENA) {
 648        tcic_setb(TCIC_SCTRL, TCIC_SCTRL_ENA);
 649        reg |= TCIC_ILOCK_CRESENA;
 650    } else
 651        tcic_setb(TCIC_SCTRL, 0);
 652    if (state->flags & SS_RESET)
 653        reg |= TCIC_ILOCK_CRESET;
 654    tcic_aux_setb(TCIC_AUX_ILOCK, reg);
 655    
 656    tcic_setw(TCIC_ADDR, TCIC_SCF1(psock));
 657    scf1 = TCIC_SCF1_FINPACK;
 658    scf1 |= TCIC_IRQ(state->io_irq);
 659    if (state->flags & SS_IOCARD) {
 660        scf1 |= TCIC_SCF1_IOSTS;
 661        if (state->flags & SS_SPKR_ENA)
 662            scf1 |= TCIC_SCF1_SPKR;
 663        if (state->flags & SS_DMA_MODE)
 664            scf1 |= TCIC_SCF1_DREQ2 << TCIC_SCF1_DMA_SHIFT;
 665    }
 666    tcic_setw(TCIC_DATA, scf1);
 667
 668    /* Some general setup stuff, and configure status interrupt */
 669    reg = TCIC_WAIT_ASYNC | TCIC_WAIT_SENSE | to_cycles(250);
 670    tcic_aux_setb(TCIC_AUX_WCTL, reg);
 671    tcic_aux_setw(TCIC_AUX_SYSCFG, TCIC_SYSCFG_AUTOBUSY|0x0a00|
 672                  TCIC_IRQ(cs_irq));
 673    
 674    /* Card status change interrupt mask */
 675    tcic_setw(TCIC_ADDR, TCIC_SCF2(psock));
 676    scf2 = TCIC_SCF2_MALL;
 677    if (state->csc_mask & SS_DETECT) scf2 &= ~TCIC_SCF2_MCD;
 678    if (state->flags & SS_IOCARD) {
 679        if (state->csc_mask & SS_STSCHG) reg &= ~TCIC_SCF2_MLBAT1;
 680    } else {
 681        if (state->csc_mask & SS_BATDEAD) reg &= ~TCIC_SCF2_MLBAT1;
 682        if (state->csc_mask & SS_BATWARN) reg &= ~TCIC_SCF2_MLBAT2;
 683        if (state->csc_mask & SS_READY) reg &= ~TCIC_SCF2_MRDY;
 684    }
 685    tcic_setw(TCIC_DATA, scf2);
 686    /* For the ISA bus, the irq should be active-high totem-pole */
 687    tcic_setb(TCIC_IENA, TCIC_IENA_CDCHG | TCIC_IENA_CFG_HIGH);
 688
 689    return 0;
 690} /* tcic_set_socket */
 691  
 692/*====================================================================*/
 693
 694static int tcic_set_io_map(struct pcmcia_socket *sock, struct pccard_io_map *io)
 695{
 696    u_short psock = container_of(sock, struct tcic_socket, socket)->psock;
 697    u_int addr;
 698    u_short base, len, ioctl;
 699    
 700    dev_dbg(&sock->dev, "SetIOMap(%d, %d, %#2.2x, %d ns, "
 701          "%#llx-%#llx)\n", psock, io->map, io->flags, io->speed,
 702          (unsigned long long)io->start, (unsigned long long)io->stop);
 703    if ((io->map > 1) || (io->start > 0xffff) || (io->stop > 0xffff) ||
 704        (io->stop < io->start)) return -EINVAL;
 705    tcic_setw(TCIC_ADDR+2, TCIC_ADR2_INDREG | (psock << TCIC_SS_SHFT));
 706    addr = TCIC_IWIN(psock, io->map);
 707
 708    base = io->start; len = io->stop - io->start;
 709    /* Check to see that len+1 is power of two, etc */
 710    if ((len & (len+1)) || (base & len)) return -EINVAL;
 711    base |= (len+1)>>1;
 712    tcic_setw(TCIC_ADDR, addr + TCIC_IBASE_X);
 713    tcic_setw(TCIC_DATA, base);
 714    
 715    ioctl  = (psock << TCIC_ICTL_SS_SHFT);
 716    ioctl |= (len == 0) ? TCIC_ICTL_TINY : 0;
 717    ioctl |= (io->flags & MAP_ACTIVE) ? TCIC_ICTL_ENA : 0;
 718    ioctl |= to_cycles(io->speed) & TCIC_ICTL_WSCNT_MASK;
 719    if (!(io->flags & MAP_AUTOSZ)) {
 720        ioctl |= TCIC_ICTL_QUIET;
 721        ioctl |= (io->flags & MAP_16BIT) ? TCIC_ICTL_BW_16 : TCIC_ICTL_BW_8;
 722    }
 723    tcic_setw(TCIC_ADDR, addr + TCIC_ICTL_X);
 724    tcic_setw(TCIC_DATA, ioctl);
 725    
 726    return 0;
 727} /* tcic_set_io_map */
 728
 729/*====================================================================*/
 730
 731static int tcic_set_mem_map(struct pcmcia_socket *sock, struct pccard_mem_map *mem)
 732{
 733    u_short psock = container_of(sock, struct tcic_socket, socket)->psock;
 734    u_short addr, ctl;
 735    u_long base, len, mmap;
 736
 737    dev_dbg(&sock->dev, "SetMemMap(%d, %d, %#2.2x, %d ns, "
 738          "%#llx-%#llx, %#x)\n", psock, mem->map, mem->flags,
 739          mem->speed, (unsigned long long)mem->res->start,
 740          (unsigned long long)mem->res->end, mem->card_start);
 741    if ((mem->map > 3) || (mem->card_start > 0x3ffffff) ||
 742        (mem->res->start > 0xffffff) || (mem->res->end > 0xffffff) ||
 743        (mem->res->start > mem->res->end) || (mem->speed > 1000))
 744        return -EINVAL;
 745    tcic_setw(TCIC_ADDR+2, TCIC_ADR2_INDREG | (psock << TCIC_SS_SHFT));
 746    addr = TCIC_MWIN(psock, mem->map);
 747
 748    base = mem->res->start; len = mem->res->end - mem->res->start;
 749    if ((len & (len+1)) || (base & len)) return -EINVAL;
 750    if (len == 0x0fff)
 751        base = (base >> TCIC_MBASE_HA_SHFT) | TCIC_MBASE_4K_BIT;
 752    else
 753        base = (base | (len+1)>>1) >> TCIC_MBASE_HA_SHFT;
 754    tcic_setw(TCIC_ADDR, addr + TCIC_MBASE_X);
 755    tcic_setw(TCIC_DATA, base);
 756    
 757    mmap = mem->card_start - mem->res->start;
 758    mmap = (mmap >> TCIC_MMAP_CA_SHFT) & TCIC_MMAP_CA_MASK;
 759    if (mem->flags & MAP_ATTRIB) mmap |= TCIC_MMAP_REG;
 760    tcic_setw(TCIC_ADDR, addr + TCIC_MMAP_X);
 761    tcic_setw(TCIC_DATA, mmap);
 762
 763    ctl  = TCIC_MCTL_QUIET | (psock << TCIC_MCTL_SS_SHFT);
 764    ctl |= to_cycles(mem->speed) & TCIC_MCTL_WSCNT_MASK;
 765    ctl |= (mem->flags & MAP_16BIT) ? 0 : TCIC_MCTL_B8;
 766    ctl |= (mem->flags & MAP_WRPROT) ? TCIC_MCTL_WP : 0;
 767    ctl |= (mem->flags & MAP_ACTIVE) ? TCIC_MCTL_ENA : 0;
 768    tcic_setw(TCIC_ADDR, addr + TCIC_MCTL_X);
 769    tcic_setw(TCIC_DATA, ctl);
 770    
 771    return 0;
 772} /* tcic_set_mem_map */
 773
 774/*====================================================================*/
 775
 776static int tcic_init(struct pcmcia_socket *s)
 777{
 778        int i;
 779        struct resource res = { .start = 0, .end = 0x1000 };
 780        pccard_io_map io = { 0, 0, 0, 0, 1 };
 781        pccard_mem_map mem = { .res = &res, };
 782
 783        for (i = 0; i < 2; i++) {
 784                io.map = i;
 785                tcic_set_io_map(s, &io);
 786        }
 787        for (i = 0; i < 5; i++) {
 788                mem.map = i;
 789                tcic_set_mem_map(s, &mem);
 790        }
 791        return 0;
 792}
 793
 794static struct pccard_operations tcic_operations = {
 795        .init              = tcic_init,
 796        .get_status        = tcic_get_status,
 797        .set_socket        = tcic_set_socket,
 798        .set_io_map        = tcic_set_io_map,
 799        .set_mem_map       = tcic_set_mem_map,
 800};
 801
 802/*====================================================================*/
 803
 804module_init(init_tcic);
 805module_exit(exit_tcic);
 806