pcmcia/staging: update comedi drivers
[safe/jmp/linux-2.6] / drivers / staging / comedi / drivers / ni_labpc_cs.c
1 /*
2     comedi/drivers/ni_labpc_cs.c
3     Driver for National Instruments daqcard-1200 boards
4     Copyright (C) 2001, 2002, 2003 Frank Mori Hess <fmhess@users.sourceforge.net>
5
6     PCMCIA crap is adapted from dummy_cs.c 1.31 2001/08/24 12:13:13
7     from the pcmcia package.
8     The initial developer of the pcmcia dummy_cs.c code is David A. Hinds
9     <dahinds@users.sourceforge.net>.  Portions created by David A. Hinds
10     are Copyright (C) 1999 David A. Hinds.
11
12     This program is free software; you can redistribute it and/or modify
13     it under the terms of the GNU General Public License as published by
14     the Free Software Foundation; either version 2 of the License, or
15     (at your option) any later version.
16
17     This program is distributed in the hope that it will be useful,
18     but WITHOUT ANY WARRANTY; without even the implied warranty of
19     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20     GNU General Public License for more details.
21
22     You should have received a copy of the GNU General Public License
23     along with this program; if not, write to the Free Software
24     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25
26 ************************************************************************
27 */
28 /*
29 Driver: ni_labpc_cs
30 Description: National Instruments Lab-PC (& compatibles)
31 Author: Frank Mori Hess <fmhess@users.sourceforge.net>
32 Devices: [National Instruments] DAQCard-1200 (daqcard-1200)
33 Status: works
34
35 Thanks go to Fredrik Lingvall for much testing and perseverance in
36 helping to debug daqcard-1200 support.
37
38 The 1200 series boards have onboard calibration dacs for correcting
39 analog input/output offsets and gains.  The proper settings for these
40 caldacs are stored on the board's eeprom.  To read the caldac values
41 from the eeprom and store them into a file that can be then be used by
42 comedilib, use the comedi_calibrate program.
43
44 Configuration options:
45   none
46
47 The daqcard-1200 has quirky chanlist requirements
48 when scanning multiple channels.  Multiple channel scan
49 sequence must start at highest channel, then decrement down to
50 channel 0.  Chanlists consisting of all one channel
51 are also legal, and allow you to pace conversions in bursts.
52
53 */
54
55 /*
56
57 NI manuals:
58 340988a (daqcard-1200)
59
60 */
61
62 #undef LABPC_DEBUG
63                             /* #define LABPC_DEBUG *//*  enable debugging messages */
64
65 #include "../comedidev.h"
66
67 #include <linux/delay.h>
68
69 #include "8253.h"
70 #include "8255.h"
71 #include "comedi_fc.h"
72 #include "ni_labpc.h"
73
74 #include <pcmcia/cs_types.h>
75 #include <pcmcia/cs.h>
76 #include <pcmcia/cistpl.h>
77 #include <pcmcia/cisreg.h>
78 #include <pcmcia/ds.h>
79
80 static struct pcmcia_device *pcmcia_cur_dev = NULL;
81
82 static int labpc_attach(struct comedi_device *dev, struct comedi_devconfig *it);
83
84 static const struct labpc_board_struct labpc_cs_boards[] = {
85         {
86          .name = "daqcard-1200",
87          .device_id = 0x103,    /*  0x10b is manufacturer id, 0x103 is device id */
88          .ai_speed = 10000,
89          .bustype = pcmcia_bustype,
90          .register_layout = labpc_1200_layout,
91          .has_ao = 1,
92          .ai_range_table = &range_labpc_1200_ai,
93          .ai_range_code = labpc_1200_ai_gain_bits,
94          .ai_range_is_unipolar = labpc_1200_is_unipolar,
95          .ai_scan_up = 0,
96          .memory_mapped_io = 0,
97          },
98         /* duplicate entry, to support using alternate name */
99         {
100          .name = "ni_labpc_cs",
101          .device_id = 0x103,
102          .ai_speed = 10000,
103          .bustype = pcmcia_bustype,
104          .register_layout = labpc_1200_layout,
105          .has_ao = 1,
106          .ai_range_table = &range_labpc_1200_ai,
107          .ai_range_code = labpc_1200_ai_gain_bits,
108          .ai_range_is_unipolar = labpc_1200_is_unipolar,
109          .ai_scan_up = 0,
110          .memory_mapped_io = 0,
111          },
112 };
113
114 /*
115  * Useful for shorthand access to the particular board structure
116  */
117 #define thisboard ((const struct labpc_board_struct *)dev->board_ptr)
118
119 static struct comedi_driver driver_labpc_cs = {
120         .driver_name = "ni_labpc_cs",
121         .module = THIS_MODULE,
122         .attach = &labpc_attach,
123         .detach = &labpc_common_detach,
124         .num_names = ARRAY_SIZE(labpc_cs_boards),
125         .board_name = &labpc_cs_boards[0].name,
126         .offset = sizeof(struct labpc_board_struct),
127 };
128
129 static int labpc_attach(struct comedi_device *dev, struct comedi_devconfig *it)
130 {
131         unsigned long iobase = 0;
132         unsigned int irq = 0;
133         struct pcmcia_device *link;
134
135         /* allocate and initialize dev->private */
136         if (alloc_private(dev, sizeof(struct labpc_private)) < 0)
137                 return -ENOMEM;
138
139         /*  get base address, irq etc. based on bustype */
140         switch (thisboard->bustype) {
141         case pcmcia_bustype:
142                 link = pcmcia_cur_dev;  /* XXX hack */
143                 if (!link)
144                         return -EIO;
145                 iobase = link->io.BasePort1;
146                 irq = link->irq.AssignedIRQ;
147                 break;
148         default:
149                 printk("bug! couldn't determine board type\n");
150                 return -EINVAL;
151                 break;
152         }
153         return labpc_common_attach(dev, iobase, irq, 0);
154 }
155
156 /*====================================================================*/
157
158 /*
159    The event() function is this driver's Card Services event handler.
160    It will be called by Card Services when an appropriate card status
161    event is received.  The config() and release() entry points are
162    used to configure or release a socket, in response to card
163    insertion and ejection events.  They are invoked from the dummy
164    event handler.
165
166    Kernel version 2.6.16 upwards uses suspend() and resume() functions
167    instead of an event() function.
168 */
169
170 static void labpc_config(struct pcmcia_device *link);
171 static void labpc_release(struct pcmcia_device *link);
172 static int labpc_cs_suspend(struct pcmcia_device *p_dev);
173 static int labpc_cs_resume(struct pcmcia_device *p_dev);
174
175 /*
176    The attach() and detach() entry points are used to create and destroy
177    "instances" of the driver, where each instance represents everything
178    needed to manage one actual PCMCIA card.
179 */
180
181 static int labpc_cs_attach(struct pcmcia_device *);
182 static void labpc_cs_detach(struct pcmcia_device *);
183
184 /*
185    You'll also need to prototype all the functions that will actually
186    be used to talk to your device.  See 'memory_cs' for a good example
187    of a fully self-sufficient driver; the other drivers rely more or
188    less on other parts of the kernel.
189 */
190
191 /*
192    The dev_info variable is the "key" that is used to match up this
193    device driver with appropriate cards, through the card configuration
194    database.
195 */
196
197 static const dev_info_t dev_info = "daqcard-1200";
198
199 struct local_info_t {
200         struct pcmcia_device *link;
201         dev_node_t node;
202         int stop;
203         struct bus_operations *bus;
204 };
205
206 /*======================================================================
207
208     labpc_cs_attach() creates an "instance" of the driver, allocating
209     local data structures for one device.  The device is registered
210     with Card Services.
211
212     The dev_link structure is initialized, but we don't actually
213     configure the card at this point -- we wait until we receive a
214     card insertion event.
215
216 ======================================================================*/
217
218 static int labpc_cs_attach(struct pcmcia_device *link)
219 {
220         struct local_info_t *local;
221
222         dev_dbg(&link->dev, "labpc_cs_attach()\n");
223
224         /* Allocate space for private device-specific data */
225         local = kzalloc(sizeof(struct local_info_t), GFP_KERNEL);
226         if (!local)
227                 return -ENOMEM;
228         local->link = link;
229         link->priv = local;
230
231         /* Interrupt setup */
232         link->irq.Attributes = IRQ_TYPE_DYNAMIC_SHARING | IRQ_FORCED_PULSE;
233         link->irq.IRQInfo1 = IRQ_INFO2_VALID | IRQ_PULSE_ID;
234         link->irq.Handler = NULL;
235
236         /*
237            General socket configuration defaults can go here.  In this
238            client, we assume very little, and rely on the CIS for almost
239            everything.  In most clients, many details (i.e., number, sizes,
240            and attributes of IO windows) are fixed by the nature of the
241            device, and can be hard-wired here.
242          */
243         link->conf.Attributes = 0;
244         link->conf.IntType = INT_MEMORY_AND_IO;
245
246         pcmcia_cur_dev = link;
247
248         labpc_config(link);
249
250         return 0;
251 }                               /* labpc_cs_attach */
252
253 /*======================================================================
254
255     This deletes a driver "instance".  The device is de-registered
256     with Card Services.  If it has been released, all local data
257     structures are freed.  Otherwise, the structures will be freed
258     when the device is released.
259
260 ======================================================================*/
261
262 static void labpc_cs_detach(struct pcmcia_device *link)
263 {
264         dev_dbg(&link->dev, "labpc_cs_detach\n");
265
266         /*
267            If the device is currently configured and active, we won't
268            actually delete it yet.  Instead, it is marked so that when
269            the release() function is called, that will trigger a proper
270            detach().
271          */
272         if (link->dev_node) {
273                 ((struct local_info_t *)link->priv)->stop = 1;
274                 labpc_release(link);
275         }
276
277         /* This points to the parent local_info_t struct */
278         if (link->priv)
279                 kfree(link->priv);
280
281 }                               /* labpc_cs_detach */
282
283 /*======================================================================
284
285     labpc_config() is scheduled to run after a CARD_INSERTION event
286     is received, to configure the PCMCIA socket, and to make the
287     device available to the system.
288
289 ======================================================================*/
290
291 static int labpc_pcmcia_config_loop(struct pcmcia_device *p_dev,
292                                 cistpl_cftable_entry_t *cfg,
293                                 cistpl_cftable_entry_t *dflt,
294                                 unsigned int vcc,
295                                 void *priv_data)
296 {
297         win_req_t *req = priv_data;
298         memreq_t map;
299
300         if (cfg->index == 0)
301                 return -ENODEV;
302
303         /* Does this card need audio output? */
304         if (cfg->flags & CISTPL_CFTABLE_AUDIO) {
305                 p_dev->conf.Attributes |= CONF_ENABLE_SPKR;
306                 p_dev->conf.Status = CCSR_AUDIO_ENA;
307         }
308
309         /* Do we need to allocate an interrupt? */
310         if (cfg->irq.IRQInfo1 || dflt->irq.IRQInfo1)
311                 p_dev->conf.Attributes |= CONF_ENABLE_IRQ;
312
313         /* IO window settings */
314         p_dev->io.NumPorts1 = p_dev->io.NumPorts2 = 0;
315         if ((cfg->io.nwin > 0) || (dflt->io.nwin > 0)) {
316                 cistpl_io_t *io = (cfg->io.nwin) ? &cfg->io : &dflt->io;
317                 p_dev->io.Attributes1 = IO_DATA_PATH_WIDTH_AUTO;
318                 if (!(io->flags & CISTPL_IO_8BIT))
319                         p_dev->io.Attributes1 = IO_DATA_PATH_WIDTH_16;
320                 if (!(io->flags & CISTPL_IO_16BIT))
321                         p_dev->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
322                 p_dev->io.IOAddrLines = io->flags & CISTPL_IO_LINES_MASK;
323                 p_dev->io.BasePort1 = io->win[0].base;
324                 p_dev->io.NumPorts1 = io->win[0].len;
325                 if (io->nwin > 1) {
326                         p_dev->io.Attributes2 = p_dev->io.Attributes1;
327                         p_dev->io.BasePort2 = io->win[1].base;
328                         p_dev->io.NumPorts2 = io->win[1].len;
329                 }
330                 /* This reserves IO space but doesn't actually enable it */
331                 if (pcmcia_request_io(p_dev, &p_dev->io) != 0)
332                         return -ENODEV;
333         }
334
335         if ((cfg->mem.nwin > 0) || (dflt->mem.nwin > 0)) {
336                 cistpl_mem_t *mem =
337                         (cfg->mem.nwin) ? &cfg->mem : &dflt->mem;
338                 req->Attributes = WIN_DATA_WIDTH_16 | WIN_MEMORY_TYPE_CM;
339                 req->Attributes |= WIN_ENABLE;
340                 req->Base = mem->win[0].host_addr;
341                 req->Size = mem->win[0].len;
342                 if (req->Size < 0x1000)
343                         req->Size = 0x1000;
344                 req->AccessSpeed = 0;
345                 if (pcmcia_request_window(&p_dev, req, &p_dev->win))
346                         return -ENODEV;
347                 map.Page = 0;
348                 map.CardOffset = mem->win[0].card_addr;
349                 if (pcmcia_map_mem_page(p_dev->win, &map))
350                         return -ENODEV;
351         }
352         /* If we got this far, we're cool! */
353         return 0;
354 }
355
356
357 static void labpc_config(struct pcmcia_device *link)
358 {
359         struct local_info_t *dev = link->priv;
360         int ret;
361         win_req_t req;
362
363         dev_dbg(&link->dev, "labpc_config\n");
364
365         ret = pcmcia_loop_config(link, labpc_pcmcia_config_loop, &req);
366         if (ret) {
367                 dev_warn(&link->dev, "no configuration found\n");
368                 goto failed;
369         }
370
371         /*
372            Allocate an interrupt line.  Note that this does not assign a
373            handler to the interrupt, unless the 'Handler' member of the
374            irq structure is initialized.
375          */
376         if (link->conf.Attributes & CONF_ENABLE_IRQ) {
377                 ret = pcmcia_request_irq(link, &link->irq);
378                 if (ret)
379                         goto failed;
380         }
381
382         /*
383            This actually configures the PCMCIA socket -- setting up
384            the I/O windows and the interrupt mapping, and putting the
385            card and host interface into "Memory and IO" mode.
386          */
387         ret = pcmcia_request_configuration(link, &link->conf);
388         if (ret)
389                 goto failed;
390
391         /*
392            At this point, the dev_node_t structure(s) need to be
393            initialized and arranged in a linked list at link->dev.
394          */
395         sprintf(dev->node.dev_name, "daqcard-1200");
396         dev->node.major = dev->node.minor = 0;
397         link->dev_node = &dev->node;
398
399         /* Finally, report what we've done */
400         printk(KERN_INFO "%s: index 0x%02x",
401                dev->node.dev_name, link->conf.ConfigIndex);
402         if (link->conf.Attributes & CONF_ENABLE_IRQ)
403                 printk(", irq %d", link->irq.AssignedIRQ);
404         if (link->io.NumPorts1)
405                 printk(", io 0x%04x-0x%04x", link->io.BasePort1,
406                        link->io.BasePort1 + link->io.NumPorts1 - 1);
407         if (link->io.NumPorts2)
408                 printk(" & 0x%04x-0x%04x", link->io.BasePort2,
409                        link->io.BasePort2 + link->io.NumPorts2 - 1);
410         if (link->win)
411                 printk(", mem 0x%06lx-0x%06lx", req.Base,
412                        req.Base + req.Size - 1);
413         printk("\n");
414
415         return;
416
417 failed:
418         labpc_release(link);
419
420 }                               /* labpc_config */
421
422 static void labpc_release(struct pcmcia_device *link)
423 {
424         dev_dbg(&link->dev, "labpc_release\n");
425
426         pcmcia_disable_device(link);
427 }                               /* labpc_release */
428
429 /*======================================================================
430
431     The card status event handler.  Mostly, this schedules other
432     stuff to run after an event is received.
433
434     When a CARD_REMOVAL event is received, we immediately set a
435     private flag to block future accesses to this device.  All the
436     functions that actually access the device should check this flag
437     to make sure the card is still present.
438
439 ======================================================================*/
440
441 static int labpc_cs_suspend(struct pcmcia_device *link)
442 {
443         struct local_info_t *local = link->priv;
444
445         /* Mark the device as stopped, to block IO until later */
446         local->stop = 1;
447         return 0;
448 }                               /* labpc_cs_suspend */
449
450 static int labpc_cs_resume(struct pcmcia_device *link)
451 {
452         struct local_info_t *local = link->priv;
453
454         local->stop = 0;
455         return 0;
456 }                               /* labpc_cs_resume */
457
458 /*====================================================================*/
459
460 static struct pcmcia_device_id labpc_cs_ids[] = {
461         /* N.B. These IDs should match those in labpc_cs_boards (ni_labpc.c) */
462         PCMCIA_DEVICE_MANF_CARD(0x010b, 0x0103),        /* daqcard-1200 */
463         PCMCIA_DEVICE_NULL
464 };
465
466 MODULE_DEVICE_TABLE(pcmcia, labpc_cs_ids);
467
468 struct pcmcia_driver labpc_cs_driver = {
469         .probe = labpc_cs_attach,
470         .remove = labpc_cs_detach,
471         .suspend = labpc_cs_suspend,
472         .resume = labpc_cs_resume,
473         .id_table = labpc_cs_ids,
474         .owner = THIS_MODULE,
475         .drv = {
476                 .name = dev_info,
477                 },
478 };
479
480 static int __init init_labpc_cs(void)
481 {
482         pcmcia_register_driver(&labpc_cs_driver);
483         return 0;
484 }
485
486 static void __exit exit_labpc_cs(void)
487 {
488         pcmcia_unregister_driver(&labpc_cs_driver);
489 }
490
491 int __init labpc_init_module(void)
492 {
493         int ret;
494
495         ret = init_labpc_cs();
496         if (ret < 0)
497                 return ret;
498
499         return comedi_driver_register(&driver_labpc_cs);
500 }
501
502 void __exit labpc_exit_module(void)
503 {
504         exit_labpc_cs();
505         comedi_driver_unregister(&driver_labpc_cs);
506 }
507
508 MODULE_LICENSE("GPL");
509 module_init(labpc_init_module);
510 module_exit(labpc_exit_module);