2 comedi/drivers/serial2002.c
3 Skeleton code for a Comedi driver
5 COMEDI - Linux Control and Measurement Device Interface
6 Copyright (C) 2002 Anders Blomdell <anders.blomdell@control.lth.se>
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 Description: Driver for serial connected hardware
28 Author: Anders Blomdell
29 Updated: Fri, 7 Jun 2002 12:56:45 -0700
30 Status: in development
34 #include "../comedidev.h"
36 #include <linux/delay.h>
37 #include <linux/ioport.h>
39 #include <asm/termios.h>
40 #include <asm/ioctls.h>
41 #include <linux/serial.h>
42 #include <linux/poll.h>
45 * Board descriptions for two imaginary boards. Describing the
46 * boards in this way is optional, and completely driver-dependent.
47 * Some drivers use arrays such as this, other do not.
49 struct serial2002_board
{
53 static const struct serial2002_board serial2002_boards
[] = {
59 * Useful for shorthand access to the particular board structure
61 #define thisboard ((const struct serial2002_board *)dev->board_ptr)
63 struct serial2002_range_table_t
{
67 struct comedi_krange range
;
71 struct serial2002_private
{
73 int port
; /* /dev/ttyS<port> */
74 int speed
; /* baudrate */
76 unsigned int ao_readback
[32];
77 unsigned char digital_in_mapping
[32];
78 unsigned char digital_out_mapping
[32];
79 unsigned char analog_in_mapping
[32];
80 unsigned char analog_out_mapping
[32];
81 unsigned char encoder_in_mapping
[32];
82 struct serial2002_range_table_t in_range
[32], out_range
[32];
87 * most drivers define the following macro to make it easy to
88 * access the private structure.
90 #define devpriv ((struct serial2002_private *)dev->private)
92 static int serial2002_attach(struct comedi_device
*dev
, struct comedi_devconfig
*it
);
93 static int serial2002_detach(struct comedi_device
*dev
);
94 struct comedi_driver driver_serial2002
= {
95 .driver_name
= "serial2002",
96 .module
= THIS_MODULE
,
97 .attach
= serial2002_attach
,
98 .detach
= serial2002_detach
,
99 .board_name
= &serial2002_boards
[0].name
,
100 .offset
= sizeof(struct serial2002_board
),
101 .num_names
= ARRAY_SIZE(serial2002_boards
),
104 static int serial2002_di_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
105 struct comedi_insn
*insn
, unsigned int *data
);
106 static int serial2002_do_winsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
107 struct comedi_insn
*insn
, unsigned int *data
);
108 static int serial2002_ai_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
109 struct comedi_insn
*insn
, unsigned int *data
);
110 static int serial2002_ao_winsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
111 struct comedi_insn
*insn
, unsigned int *data
);
112 static int serial2002_ao_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
113 struct comedi_insn
*insn
, unsigned int *data
);
116 enum { is_invalid
, is_digital
, is_channel
} kind
;
121 static long tty_ioctl(struct file
*f
, unsigned op
, unsigned long param
)
123 #ifdef HAVE_UNLOCKED_IOCTL
124 if (f
->f_op
->unlocked_ioctl
) {
125 return f
->f_op
->unlocked_ioctl(f
, op
, param
);
128 if (f
->f_op
->ioctl
) {
129 return f
->f_op
->ioctl(f
->f_dentry
->d_inode
, f
, op
, param
);
134 static int tty_write(struct file
*f
, unsigned char *buf
, int count
)
142 result
= f
->f_op
->write(f
, buf
, count
, &f
->f_pos
);
149 * On 2.6.26.3 this occaisonally gave me page faults, worked around by
150 * settings.c_cc[VMIN] = 0; settings.c_cc[VTIME] = 0
152 static int tty_available(struct file
*f
)
159 tty_ioctl(f
, FIONREAD
, (unsigned long)&result
);
165 static int tty_read(struct file
*f
, int timeout
)
176 struct poll_wqueues table
;
177 struct timeval start
, now
;
179 do_gettimeofday(&start
);
180 poll_initwait(&table
);
185 mask
= f
->f_op
->poll(f
, &table
.pt
);
186 if (mask
& (POLLRDNORM
| POLLRDBAND
| POLLIN
|
187 POLLHUP
| POLLERR
)) {
190 do_gettimeofday(&now
);
192 (1000000 * (now
.tv_sec
- start
.tv_sec
) +
193 now
.tv_usec
- start
.tv_usec
);
194 if (elapsed
> timeout
) {
197 set_current_state(TASK_INTERRUPTIBLE
);
198 schedule_timeout(((timeout
-
199 elapsed
) * HZ
) / 10000);
201 poll_freewait(&table
);
206 if (f
->f_op
->read(f
, &ch
, 1, &f
->f_pos
) == 1) {
211 /* Device does not support poll, busy wait */
217 if (retries
>= timeout
) {
222 if (f
->f_op
->read(f
, &ch
, 1, &f
->f_pos
) == 1) {
234 static void tty_setspeed(struct file
*f
, int speed
)
242 struct termios settings
;
244 tty_ioctl(f
, TCGETS
, (unsigned long)&settings
);
245 /* printk("Speed: %d\n", settings.c_cflag & (CBAUD | CBAUDEX)); */
246 settings
.c_iflag
= 0;
247 settings
.c_oflag
= 0;
248 settings
.c_lflag
= 0;
249 settings
.c_cflag
= CLOCAL
| CS8
| CREAD
;
250 settings
.c_cc
[VMIN
] = 0;
251 settings
.c_cc
[VTIME
] = 0;
254 settings
.c_cflag
|= B2400
;
258 settings
.c_cflag
|= B4800
;
262 settings
.c_cflag
|= B9600
;
266 settings
.c_cflag
|= B19200
;
270 settings
.c_cflag
|= B38400
;
274 settings
.c_cflag
|= B57600
;
278 settings
.c_cflag
|= B115200
;
282 settings
.c_cflag
|= B9600
;
286 tty_ioctl(f
, TCSETS
, (unsigned long)&settings
);
287 /* printk("Speed: %d\n", settings.c_cflag & (CBAUD | CBAUDEX)); */
290 /* Set low latency */
291 struct serial_struct settings
;
293 tty_ioctl(f
, TIOCGSERIAL
, (unsigned long)&settings
);
294 settings
.flags
|= ASYNC_LOW_LATENCY
;
295 tty_ioctl(f
, TIOCSSERIAL
, (unsigned long)&settings
);
301 static void poll_digital(struct file
*f
, int channel
)
305 cmd
= 0x40 | (channel
& 0x1f);
306 tty_write(f
, &cmd
, 1);
309 static void poll_channel(struct file
*f
, int channel
)
313 cmd
= 0x60 | (channel
& 0x1f);
314 tty_write(f
, &cmd
, 1);
317 static struct serial_data
serial_read(struct file
*f
, int timeout
)
319 struct serial_data result
;
322 result
.kind
= is_invalid
;
327 int data
= tty_read(f
, timeout
);
331 printk("serial2002 error\n");
333 } else if (data
& 0x80) {
334 result
.value
= (result
.value
<< 7) | (data
& 0x7f);
337 switch ((data
>> 5) & 0x03) {
340 result
.kind
= is_digital
;
345 result
.kind
= is_digital
;
352 value
<< 2) | ((data
& 0x60) >> 5);
353 result
.kind
= is_channel
;
355 result
.index
= data
& 0x1f;
363 static void serial_write(struct file
*f
, struct serial_data data
)
365 if (data
.kind
== is_digital
) {
367 ((data
.value
<< 5) & 0x20) | (data
.index
& 0x1f);
368 tty_write(f
, &ch
, 1);
372 if (data
.value
>= (1L << 30)) {
373 ch
[i
] = 0x80 | ((data
.value
>> 30) & 0x03);
376 if (data
.value
>= (1L << 23)) {
377 ch
[i
] = 0x80 | ((data
.value
>> 23) & 0x7f);
380 if (data
.value
>= (1L << 16)) {
381 ch
[i
] = 0x80 | ((data
.value
>> 16) & 0x7f);
384 if (data
.value
>= (1L << 9)) {
385 ch
[i
] = 0x80 | ((data
.value
>> 9) & 0x7f);
388 ch
[i
] = 0x80 | ((data
.value
>> 2) & 0x7f);
390 ch
[i
] = ((data
.value
<< 5) & 0x60) | (data
.index
& 0x1f);
396 static void serial_2002_open(struct comedi_device
*dev
)
400 sprintf(port
, "/dev/ttyS%d", devpriv
->port
);
401 devpriv
->tty
= filp_open(port
, 0, O_RDWR
);
402 if (IS_ERR(devpriv
->tty
)) {
403 printk("serial_2002: file open error = %ld\n",
404 PTR_ERR(devpriv
->tty
));
414 struct config_t dig_in_config
[32];
415 struct config_t dig_out_config
[32];
416 struct config_t chan_in_config
[32];
417 struct config_t chan_out_config
[32];
420 for (i
= 0; i
< 32; i
++) {
421 dig_in_config
[i
].kind
= 0;
422 dig_in_config
[i
].bits
= 0;
423 dig_in_config
[i
].min
= 0;
424 dig_in_config
[i
].max
= 0;
425 dig_out_config
[i
].kind
= 0;
426 dig_out_config
[i
].bits
= 0;
427 dig_out_config
[i
].min
= 0;
428 dig_out_config
[i
].max
= 0;
429 chan_in_config
[i
].kind
= 0;
430 chan_in_config
[i
].bits
= 0;
431 chan_in_config
[i
].min
= 0;
432 chan_in_config
[i
].max
= 0;
433 chan_out_config
[i
].kind
= 0;
434 chan_out_config
[i
].bits
= 0;
435 chan_out_config
[i
].min
= 0;
436 chan_out_config
[i
].max
= 0;
439 tty_setspeed(devpriv
->tty
, devpriv
->speed
);
440 poll_channel(devpriv
->tty
, 31); /* Start reading configuration */
442 struct serial_data data
;
444 data
= serial_read(devpriv
->tty
, 1000);
445 if (data
.kind
!= is_channel
|| data
.index
!= 31
446 || !(data
.value
& 0xe0)) {
449 int command
, channel
, kind
;
450 struct config_t
*cur_config
= 0;
452 channel
= data
.value
& 0x1f;
453 kind
= (data
.value
>> 5) & 0x7;
454 command
= (data
.value
>> 8) & 0x3;
457 cur_config
= dig_in_config
;
461 cur_config
= dig_out_config
;
465 cur_config
= chan_in_config
;
469 cur_config
= chan_out_config
;
473 cur_config
= chan_in_config
;
479 cur_config
[channel
].kind
= kind
;
559 for (i
= 0; i
<= 4; i
++) {
560 /* Fill in subdev data */
562 unsigned char *mapping
= 0;
563 struct serial2002_range_table_t
*range
= 0;
569 mapping
= devpriv
->digital_in_mapping
;
575 mapping
= devpriv
->digital_out_mapping
;
581 mapping
= devpriv
->analog_in_mapping
;
582 range
= devpriv
->in_range
;
588 mapping
= devpriv
->analog_out_mapping
;
589 range
= devpriv
->out_range
;
595 mapping
= devpriv
->encoder_in_mapping
;
596 range
= devpriv
->in_range
;
606 struct comedi_subdevice
*s
;
607 const struct comedi_lrange
**range_table_list
= NULL
;
608 unsigned int *maxdata_list
;
611 for (chan
= 0, j
= 0; j
< 32; j
++) {
612 if (c
[j
].kind
== kind
) {
616 s
= &dev
->subdevices
[i
];
619 if (s
->maxdata_list
) {
620 kfree(s
->maxdata_list
);
622 s
->maxdata_list
= maxdata_list
=
623 kmalloc(sizeof(unsigned int) * s
->n_chan
,
625 if (s
->range_table_list
) {
626 kfree(s
->range_table_list
);
630 s
->range_table_list
= range_table_list
=
632 (struct serial2002_range_table_t
) *
633 s
->n_chan
, GFP_KERNEL
);
635 for (chan
= 0, j
= 0; j
< 32; j
++) {
636 if (c
[j
].kind
== kind
) {
646 range_table_list
[chan
] =
652 ((long long)1 << c
[j
].
662 static void serial_2002_close(struct comedi_device
*dev
)
664 if (!IS_ERR(devpriv
->tty
) && (devpriv
->tty
!= 0)) {
665 filp_close(devpriv
->tty
, 0);
669 static int serial2002_di_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
670 struct comedi_insn
*insn
, unsigned int *data
)
675 chan
= devpriv
->digital_in_mapping
[CR_CHAN(insn
->chanspec
)];
676 for (n
= 0; n
< insn
->n
; n
++) {
677 struct serial_data read
;
679 poll_digital(devpriv
->tty
, chan
);
681 read
= serial_read(devpriv
->tty
, 1000);
682 if (read
.kind
!= is_digital
|| read
.index
== chan
) {
686 data
[n
] = read
.value
;
691 static int serial2002_do_winsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
692 struct comedi_insn
*insn
, unsigned int *data
)
697 chan
= devpriv
->digital_out_mapping
[CR_CHAN(insn
->chanspec
)];
698 for (n
= 0; n
< insn
->n
; n
++) {
699 struct serial_data write
;
701 write
.kind
= is_digital
;
703 write
.value
= data
[n
];
704 serial_write(devpriv
->tty
, write
);
709 static int serial2002_ai_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
710 struct comedi_insn
*insn
, unsigned int *data
)
715 chan
= devpriv
->analog_in_mapping
[CR_CHAN(insn
->chanspec
)];
716 for (n
= 0; n
< insn
->n
; n
++) {
717 struct serial_data read
;
719 poll_channel(devpriv
->tty
, chan
);
721 read
= serial_read(devpriv
->tty
, 1000);
722 if (read
.kind
!= is_channel
|| read
.index
== chan
) {
726 data
[n
] = read
.value
;
731 static int serial2002_ao_winsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
732 struct comedi_insn
*insn
, unsigned int *data
)
737 chan
= devpriv
->analog_out_mapping
[CR_CHAN(insn
->chanspec
)];
738 for (n
= 0; n
< insn
->n
; n
++) {
739 struct serial_data write
;
741 write
.kind
= is_channel
;
743 write
.value
= data
[n
];
744 serial_write(devpriv
->tty
, write
);
745 devpriv
->ao_readback
[chan
] = data
[n
];
750 static int serial2002_ao_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
751 struct comedi_insn
*insn
, unsigned int *data
)
754 int chan
= CR_CHAN(insn
->chanspec
);
756 for (n
= 0; n
< insn
->n
; n
++) {
757 data
[n
] = devpriv
->ao_readback
[chan
];
763 static int serial2002_ei_rinsn(struct comedi_device
*dev
, struct comedi_subdevice
*s
,
764 struct comedi_insn
*insn
, unsigned int *data
)
769 chan
= devpriv
->encoder_in_mapping
[CR_CHAN(insn
->chanspec
)];
770 for (n
= 0; n
< insn
->n
; n
++) {
771 struct serial_data read
;
773 poll_channel(devpriv
->tty
, chan
);
775 read
= serial_read(devpriv
->tty
, 1000);
776 if (read
.kind
!= is_channel
|| read
.index
== chan
) {
780 data
[n
] = read
.value
;
785 static int serial2002_attach(struct comedi_device
*dev
, struct comedi_devconfig
*it
)
787 struct comedi_subdevice
*s
;
789 printk("comedi%d: serial2002: ", dev
->minor
);
790 dev
->board_name
= thisboard
->name
;
791 if (alloc_private(dev
, sizeof(struct serial2002_private
)) < 0) {
794 dev
->open
= serial_2002_open
;
795 dev
->close
= serial_2002_close
;
796 devpriv
->port
= it
->options
[0];
797 devpriv
->speed
= it
->options
[1];
798 printk("/dev/ttyS%d @ %d\n", devpriv
->port
, devpriv
->speed
);
800 if (alloc_subdevices(dev
, 5) < 0)
803 /* digital input subdevice */
804 s
= dev
->subdevices
+ 0;
805 s
->type
= COMEDI_SUBD_DI
;
806 s
->subdev_flags
= SDF_READABLE
;
809 s
->range_table
= &range_digital
;
810 s
->insn_read
= &serial2002_di_rinsn
;
812 /* digital output subdevice */
813 s
= dev
->subdevices
+ 1;
814 s
->type
= COMEDI_SUBD_DO
;
815 s
->subdev_flags
= SDF_WRITEABLE
;
818 s
->range_table
= &range_digital
;
819 s
->insn_write
= &serial2002_do_winsn
;
821 /* analog input subdevice */
822 s
= dev
->subdevices
+ 2;
823 s
->type
= COMEDI_SUBD_AI
;
824 s
->subdev_flags
= SDF_READABLE
| SDF_GROUND
;
828 s
->insn_read
= &serial2002_ai_rinsn
;
830 /* analog output subdevice */
831 s
= dev
->subdevices
+ 3;
832 s
->type
= COMEDI_SUBD_AO
;
833 s
->subdev_flags
= SDF_WRITEABLE
;
837 s
->insn_write
= &serial2002_ao_winsn
;
838 s
->insn_read
= &serial2002_ao_rinsn
;
840 /* encoder input subdevice */
841 s
= dev
->subdevices
+ 4;
842 s
->type
= COMEDI_SUBD_COUNTER
;
843 s
->subdev_flags
= SDF_READABLE
| SDF_LSAMPL
;
847 s
->insn_read
= &serial2002_ei_rinsn
;
852 static int serial2002_detach(struct comedi_device
*dev
)
854 struct comedi_subdevice
*s
;
857 printk("comedi%d: serial2002: remove\n", dev
->minor
);
858 for (i
= 0; i
< 4; i
++) {
859 s
= &dev
->subdevices
[i
];
860 if (s
->maxdata_list
) {
861 kfree(s
->maxdata_list
);
863 if (s
->range_table_list
) {
864 kfree(s
->range_table_list
);
870 COMEDI_INITCLEANUP(driver_serial2002
);