1 /*****************************************************************************/
4 * yam.c -- YAM radio modem driver.
6 * Copyright (C) 1998 Frederic Rible F1OAT (frible@teaser.fr)
7 * Adapted from baycom.c driver written by Thomas Sailer (sailer@ife.ee.ethz.ch)
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 * Please note that the GPL allows you to use the driver, NOT the radio.
24 * In order to use the radio, you need a license from the communications
25 * authority of your country.
29 * 0.0 F1OAT 06.06.98 Begin of work with baycom.c source code V 0.3
30 * 0.1 F1OAT 07.06.98 Add timer polling routine for channel arbitration
31 * 0.2 F6FBB 08.06.98 Added delay after FPGA programming
32 * 0.3 F6FBB 29.07.98 Delayed PTT implementation for dupmode=2
33 * 0.4 F6FBB 30.07.98 Added TxTail, Slottime and Persistance
34 * 0.5 F6FBB 01.08.98 Shared IRQs, /proc/net and network statistics
35 * 0.6 F6FBB 25.08.98 Added 1200Bds format
36 * 0.7 F6FBB 12.09.98 Added to the kernel configuration
37 * 0.8 F6FBB 14.10.98 Fixed slottime/persistence timing bug
38 * OK1ZIA 2.09.01 Fixed "kfree_skb on hard IRQ"
39 * using dev_kfree_skb_any(). (important in 2.4 kernel)
43 /*****************************************************************************/
45 #include <linux/config.h>
46 #include <linux/module.h>
47 #include <linux/types.h>
48 #include <linux/net.h>
51 #include <linux/slab.h>
52 #include <linux/errno.h>
53 #include <linux/bitops.h>
55 #include <asm/system.h>
56 #include <linux/interrupt.h>
57 #include <linux/ioport.h>
59 #include <linux/netdevice.h>
60 #include <linux/if_arp.h>
61 #include <linux/etherdevice.h>
62 #include <linux/skbuff.h>
63 #if defined(CONFIG_AX25) || defined(CONFIG_AX25_MODULE)
64 /* prototypes for ax25_encapsulate and ax25_rebuild_header */
66 #endif /* CONFIG_AX25 || CONFIG_AX25_MODULE */
68 /* make genksyms happy */
70 #include <linux/udp.h>
71 #include <linux/tcp.h>
73 #include <linux/kernel.h>
74 #include <linux/proc_fs.h>
75 #include <linux/seq_file.h>
77 #include <asm/uaccess.h>
78 #include <linux/init.h>
80 #include <linux/yam.h>
84 /* --------------------------------------------------------------------- */
86 static const char yam_drvname
[] = "yam";
87 static char yam_drvinfo
[] __initdata
= KERN_INFO
"YAM driver version 0.8 by F1OAT/F6FBB\n";
89 /* --------------------------------------------------------------------- */
95 #define YAM_MAGIC 0xF10A7654
97 /* Transmitter states */
106 #define YAM_MAX_FRAME 1024
108 #define DEFAULT_BITRATE 9600 /* bps */
109 #define DEFAULT_HOLDD 10 /* sec */
110 #define DEFAULT_TXD 300 /* ms */
111 #define DEFAULT_TXTAIL 10 /* ms */
112 #define DEFAULT_SLOT 100 /* ms */
113 #define DEFAULT_PERS 64 /* 0->255 */
123 struct net_device
*dev
;
127 struct net_device_stats stats
;
132 /* Parameters section */
134 int txd
; /* tx delay */
135 int holdd
; /* duplex ptt delay */
136 int txtail
; /* txtail delay */
137 int slot
; /* slottime */
138 int pers
; /* persistence */
145 unsigned char tx_buf
[YAM_MAX_FRAME
];
147 int tx_crcl
, tx_crch
;
148 struct sk_buff_head send_queue
; /* Packets awaiting transmission */
153 unsigned char rx_buf
[YAM_MAX_FRAME
];
155 int rx_crcl
, rx_crch
;
159 unsigned char bits
[YAM_FPGA_SIZE
];
161 struct yam_mcs
*next
;
164 static struct net_device
*yam_devs
[NR_PORTS
];
166 static struct yam_mcs
*yam_data
;
168 static char ax25_bcast
[7] =
169 {'Q' << 1, 'S' << 1, 'T' << 1, ' ' << 1, ' ' << 1, ' ' << 1, '0' << 1};
170 static char ax25_test
[7] =
171 {'L' << 1, 'I' << 1, 'N' << 1, 'U' << 1, 'X' << 1, ' ' << 1, '1' << 1};
173 static struct timer_list yam_timer
= TIMER_INITIALIZER(NULL
, 0, 0);
175 /* --------------------------------------------------------------------- */
177 #define RBR(iobase) (iobase+0)
178 #define THR(iobase) (iobase+0)
179 #define IER(iobase) (iobase+1)
180 #define IIR(iobase) (iobase+2)
181 #define FCR(iobase) (iobase+2)
182 #define LCR(iobase) (iobase+3)
183 #define MCR(iobase) (iobase+4)
184 #define LSR(iobase) (iobase+5)
185 #define MSR(iobase) (iobase+6)
186 #define SCR(iobase) (iobase+7)
187 #define DLL(iobase) (iobase+0)
188 #define DLM(iobase) (iobase+1)
192 /* Interrupt Identification Register Bit Masks */
198 #define IIR_TIMEOUT 12 /* Fifo mode only */
200 #define IIR_MASK 0x0F
202 /* Interrupt Enable Register Bit Masks */
203 #define IER_RX 1 /* enable rx interrupt */
204 #define IER_TX 2 /* enable tx interrupt */
205 #define IER_LSR 4 /* enable line status interrupts */
206 #define IER_MSR 8 /* enable modem status interrupts */
208 /* Modem Control Register Bit Masks */
209 #define MCR_DTR 0x01 /* DTR output */
210 #define MCR_RTS 0x02 /* RTS output */
211 #define MCR_OUT1 0x04 /* OUT1 output (not accessible in RS232) */
212 #define MCR_OUT2 0x08 /* Master Interrupt enable (must be set on PCs) */
213 #define MCR_LOOP 0x10 /* Loopback enable */
215 /* Modem Status Register Bit Masks */
216 #define MSR_DCTS 0x01 /* Delta CTS input */
217 #define MSR_DDSR 0x02 /* Delta DSR */
218 #define MSR_DRIN 0x04 /* Delta RI */
219 #define MSR_DDCD 0x08 /* Delta DCD */
220 #define MSR_CTS 0x10 /* CTS input */
221 #define MSR_DSR 0x20 /* DSR input */
222 #define MSR_RING 0x40 /* RI input */
223 #define MSR_DCD 0x80 /* DCD input */
225 /* line status register bit mask */
230 #define LSR_BREAK 0x10
231 #define LSR_THRE 0x20
232 #define LSR_TSRE 0x40
234 /* Line Control Register Bit Masks */
235 #define LCR_DLAB 0x80
236 #define LCR_BREAK 0x40
237 #define LCR_PZERO 0x28
238 #define LCR_PEVEN 0x18
239 #define LCR_PODD 0x08
240 #define LCR_STOP1 0x00
241 #define LCR_STOP2 0x04
242 #define LCR_BIT5 0x00
243 #define LCR_BIT6 0x02
244 #define LCR_BIT7 0x01
245 #define LCR_BIT8 0x03
247 /* YAM Modem <-> UART Port mapping */
249 #define TX_RDY MSR_DCTS /* transmitter ready to send */
250 #define RX_DCD MSR_DCD /* carrier detect */
251 #define RX_FLAG MSR_RING /* hdlc flag received */
252 #define FPGA_DONE MSR_DSR /* FPGA is configured */
253 #define PTT_ON (MCR_RTS|MCR_OUT2) /* activate PTT */
254 #define PTT_OFF (MCR_DTR|MCR_OUT2) /* release PTT */
256 #define ENABLE_RXINT IER_RX /* enable uart rx interrupt during rx */
257 #define ENABLE_TXINT IER_MSR /* enable uart ms interrupt during tx */
258 #define ENABLE_RTXINT (IER_RX|IER_MSR) /* full duplex operations */
261 /*************************************************************************
263 ************************************************************************/
265 static const unsigned char chktabl
[256] =
266 {0x00, 0x89, 0x12, 0x9b, 0x24, 0xad, 0x36, 0xbf, 0x48, 0xc1, 0x5a, 0xd3, 0x6c, 0xe5, 0x7e,
267 0xf7, 0x81, 0x08, 0x93, 0x1a, 0xa5, 0x2c, 0xb7, 0x3e, 0xc9, 0x40, 0xdb, 0x52, 0xed, 0x64,
268 0xff, 0x76, 0x02, 0x8b, 0x10, 0x99, 0x26, 0xaf, 0x34, 0xbd, 0x4a, 0xc3, 0x58, 0xd1, 0x6e,
269 0xe7, 0x7c, 0xf5, 0x83, 0x0a, 0x91, 0x18, 0xa7, 0x2e, 0xb5, 0x3c, 0xcb, 0x42, 0xd9, 0x50,
270 0xef, 0x66, 0xfd, 0x74, 0x04, 0x8d, 0x16, 0x9f, 0x20, 0xa9, 0x32, 0xbb, 0x4c, 0xc5, 0x5e,
271 0xd7, 0x68, 0xe1, 0x7a, 0xf3, 0x85, 0x0c, 0x97, 0x1e, 0xa1, 0x28, 0xb3, 0x3a, 0xcd, 0x44,
272 0xdf, 0x56, 0xe9, 0x60, 0xfb, 0x72, 0x06, 0x8f, 0x14, 0x9d, 0x22, 0xab, 0x30, 0xb9, 0x4e,
273 0xc7, 0x5c, 0xd5, 0x6a, 0xe3, 0x78, 0xf1, 0x87, 0x0e, 0x95, 0x1c, 0xa3, 0x2a, 0xb1, 0x38,
274 0xcf, 0x46, 0xdd, 0x54, 0xeb, 0x62, 0xf9, 0x70, 0x08, 0x81, 0x1a, 0x93, 0x2c, 0xa5, 0x3e,
275 0xb7, 0x40, 0xc9, 0x52, 0xdb, 0x64, 0xed, 0x76, 0xff, 0x89, 0x00, 0x9b, 0x12, 0xad, 0x24,
276 0xbf, 0x36, 0xc1, 0x48, 0xd3, 0x5a, 0xe5, 0x6c, 0xf7, 0x7e, 0x0a, 0x83, 0x18, 0x91, 0x2e,
277 0xa7, 0x3c, 0xb5, 0x42, 0xcb, 0x50, 0xd9, 0x66, 0xef, 0x74, 0xfd, 0x8b, 0x02, 0x99, 0x10,
278 0xaf, 0x26, 0xbd, 0x34, 0xc3, 0x4a, 0xd1, 0x58, 0xe7, 0x6e, 0xf5, 0x7c, 0x0c, 0x85, 0x1e,
279 0x97, 0x28, 0xa1, 0x3a, 0xb3, 0x44, 0xcd, 0x56, 0xdf, 0x60, 0xe9, 0x72, 0xfb, 0x8d, 0x04,
280 0x9f, 0x16, 0xa9, 0x20, 0xbb, 0x32, 0xc5, 0x4c, 0xd7, 0x5e, 0xe1, 0x68, 0xf3, 0x7a, 0x0e,
281 0x87, 0x1c, 0x95, 0x2a, 0xa3, 0x38, 0xb1, 0x46, 0xcf, 0x54, 0xdd, 0x62, 0xeb, 0x70, 0xf9,
282 0x8f, 0x06, 0x9d, 0x14, 0xab, 0x22, 0xb9, 0x30, 0xc7, 0x4e, 0xd5, 0x5c, 0xe3, 0x6a, 0xf1,
284 static const unsigned char chktabh
[256] =
285 {0x00, 0x11, 0x23, 0x32, 0x46, 0x57, 0x65, 0x74, 0x8c, 0x9d, 0xaf, 0xbe, 0xca, 0xdb, 0xe9,
286 0xf8, 0x10, 0x01, 0x33, 0x22, 0x56, 0x47, 0x75, 0x64, 0x9c, 0x8d, 0xbf, 0xae, 0xda, 0xcb,
287 0xf9, 0xe8, 0x21, 0x30, 0x02, 0x13, 0x67, 0x76, 0x44, 0x55, 0xad, 0xbc, 0x8e, 0x9f, 0xeb,
288 0xfa, 0xc8, 0xd9, 0x31, 0x20, 0x12, 0x03, 0x77, 0x66, 0x54, 0x45, 0xbd, 0xac, 0x9e, 0x8f,
289 0xfb, 0xea, 0xd8, 0xc9, 0x42, 0x53, 0x61, 0x70, 0x04, 0x15, 0x27, 0x36, 0xce, 0xdf, 0xed,
290 0xfc, 0x88, 0x99, 0xab, 0xba, 0x52, 0x43, 0x71, 0x60, 0x14, 0x05, 0x37, 0x26, 0xde, 0xcf,
291 0xfd, 0xec, 0x98, 0x89, 0xbb, 0xaa, 0x63, 0x72, 0x40, 0x51, 0x25, 0x34, 0x06, 0x17, 0xef,
292 0xfe, 0xcc, 0xdd, 0xa9, 0xb8, 0x8a, 0x9b, 0x73, 0x62, 0x50, 0x41, 0x35, 0x24, 0x16, 0x07,
293 0xff, 0xee, 0xdc, 0xcd, 0xb9, 0xa8, 0x9a, 0x8b, 0x84, 0x95, 0xa7, 0xb6, 0xc2, 0xd3, 0xe1,
294 0xf0, 0x08, 0x19, 0x2b, 0x3a, 0x4e, 0x5f, 0x6d, 0x7c, 0x94, 0x85, 0xb7, 0xa6, 0xd2, 0xc3,
295 0xf1, 0xe0, 0x18, 0x09, 0x3b, 0x2a, 0x5e, 0x4f, 0x7d, 0x6c, 0xa5, 0xb4, 0x86, 0x97, 0xe3,
296 0xf2, 0xc0, 0xd1, 0x29, 0x38, 0x0a, 0x1b, 0x6f, 0x7e, 0x4c, 0x5d, 0xb5, 0xa4, 0x96, 0x87,
297 0xf3, 0xe2, 0xd0, 0xc1, 0x39, 0x28, 0x1a, 0x0b, 0x7f, 0x6e, 0x5c, 0x4d, 0xc6, 0xd7, 0xe5,
298 0xf4, 0x80, 0x91, 0xa3, 0xb2, 0x4a, 0x5b, 0x69, 0x78, 0x0c, 0x1d, 0x2f, 0x3e, 0xd6, 0xc7,
299 0xf5, 0xe4, 0x90, 0x81, 0xb3, 0xa2, 0x5a, 0x4b, 0x79, 0x68, 0x1c, 0x0d, 0x3f, 0x2e, 0xe7,
300 0xf6, 0xc4, 0xd5, 0xa1, 0xb0, 0x82, 0x93, 0x6b, 0x7a, 0x48, 0x59, 0x2d, 0x3c, 0x0e, 0x1f,
301 0xf7, 0xe6, 0xd4, 0xc5, 0xb1, 0xa0, 0x92, 0x83, 0x7b, 0x6a, 0x58, 0x49, 0x3d, 0x2c, 0x1e,
304 /*************************************************************************
306 ************************************************************************/
308 static void delay(int ms
)
310 unsigned long timeout
= jiffies
+ ((ms
* HZ
) / 1000);
311 while (time_before(jiffies
, timeout
))
319 static void fpga_reset(int iobase
)
321 outb(0, IER(iobase
));
322 outb(LCR_DLAB
| LCR_BIT5
, LCR(iobase
));
323 outb(1, DLL(iobase
));
324 outb(0, DLM(iobase
));
326 outb(LCR_BIT5
, LCR(iobase
));
329 /* turn off FPGA supply voltage */
330 outb(MCR_OUT1
| MCR_OUT2
, MCR(iobase
));
332 /* turn on FPGA supply voltage again */
333 outb(MCR_DTR
| MCR_RTS
| MCR_OUT1
| MCR_OUT2
, MCR(iobase
));
338 * send one byte to FPGA
341 static int fpga_write(int iobase
, unsigned char wrd
)
345 unsigned long timeout
= jiffies
+ HZ
/ 10;
347 for (k
= 0; k
< 8; k
++) {
348 bit
= (wrd
& 0x80) ? (MCR_RTS
| MCR_DTR
) : MCR_DTR
;
349 outb(bit
| MCR_OUT1
| MCR_OUT2
, MCR(iobase
));
351 outb(0xfc, THR(iobase
));
352 while ((inb(LSR(iobase
)) & LSR_TSRE
) == 0)
353 if (time_after(jiffies
, timeout
))
360 static unsigned char *add_mcs(unsigned char *bits
, int bitrate
)
364 /* If it already exists, replace the bit data */
367 if (p
->bitrate
== bitrate
) {
368 memcpy(p
->bits
, bits
, YAM_FPGA_SIZE
);
374 /* Allocate a new mcs */
375 if ((p
= kmalloc(sizeof(struct yam_mcs
), GFP_KERNEL
)) == NULL
) {
376 printk(KERN_WARNING
"YAM: no memory to allocate mcs\n");
379 memcpy(p
->bits
, bits
, YAM_FPGA_SIZE
);
380 p
->bitrate
= bitrate
;
387 static unsigned char *get_mcs(int bitrate
)
393 if (p
->bitrate
== bitrate
)
398 /* Load predefined mcs data */
401 return add_mcs(bits_1200
, bitrate
);
403 return add_mcs(bits_9600
, bitrate
);
408 * download bitstream to FPGA
409 * data is contained in bits[] array in yam1200.h resp. yam9600.h
412 static int fpga_download(int iobase
, int bitrate
)
415 unsigned char *pbits
;
417 pbits
= get_mcs(bitrate
);
422 for (i
= 0; i
< YAM_FPGA_SIZE
; i
++) {
423 if (fpga_write(iobase
, pbits
[i
])) {
424 printk(KERN_ERR
"yam: error in write cycle\n");
425 return -1; /* write... */
429 fpga_write(iobase
, 0xFF);
430 rc
= inb(MSR(iobase
)); /* check DONE signal */
432 /* Needed for some hardwares */
435 return (rc
& MSR_DSR
) ? 0 : -1;
439 /************************************************************************
441 ************************************************************************/
443 static void yam_set_uart(struct net_device
*dev
)
445 struct yam_port
*yp
= netdev_priv(dev
);
446 int divisor
= 115200 / yp
->baudrate
;
448 outb(0, IER(dev
->base_addr
));
449 outb(LCR_DLAB
| LCR_BIT8
, LCR(dev
->base_addr
));
450 outb(divisor
, DLL(dev
->base_addr
));
451 outb(0, DLM(dev
->base_addr
));
452 outb(LCR_BIT8
, LCR(dev
->base_addr
));
453 outb(PTT_OFF
, MCR(dev
->base_addr
));
454 outb(0x00, FCR(dev
->base_addr
));
456 /* Flush pending irq */
458 inb(RBR(dev
->base_addr
));
459 inb(MSR(dev
->base_addr
));
463 outb(ENABLE_RTXINT
, IER(dev
->base_addr
));
467 /* --------------------------------------------------------------------- */
470 c_uart_unknown
, c_uart_8250
,
471 c_uart_16450
, c_uart_16550
, c_uart_16550A
474 static const char *uart_str
[] =
475 {"unknown", "8250", "16450", "16550", "16550A"};
477 static enum uart
yam_check_uart(unsigned int iobase
)
479 unsigned char b1
, b2
, b3
;
481 enum uart uart_tab
[] =
482 {c_uart_16450
, c_uart_unknown
, c_uart_16550
, c_uart_16550A
};
484 b1
= inb(MCR(iobase
));
485 outb(b1
| 0x10, MCR(iobase
)); /* loopback mode */
486 b2
= inb(MSR(iobase
));
487 outb(0x1a, MCR(iobase
));
488 b3
= inb(MSR(iobase
)) & 0xf0;
489 outb(b1
, MCR(iobase
)); /* restore old values */
490 outb(b2
, MSR(iobase
));
492 return c_uart_unknown
;
495 outb(0x01, FCR(iobase
)); /* enable FIFOs */
496 u
= uart_tab
[(inb(IIR(iobase
)) >> 6) & 3];
497 if (u
== c_uart_16450
) {
498 outb(0x5a, SCR(iobase
));
499 b1
= inb(SCR(iobase
));
500 outb(0xa5, SCR(iobase
));
501 b2
= inb(SCR(iobase
));
502 if ((b1
!= 0x5a) || (b2
!= 0xa5))
508 /******************************************************************************
510 ******************************************************************************/
511 static inline void yam_rx_flag(struct net_device
*dev
, struct yam_port
*yp
)
513 if (yp
->dcd
&& yp
->rx_len
>= 3 && yp
->rx_len
< YAM_MAX_FRAME
) {
514 int pkt_len
= yp
->rx_len
- 2 + 1; /* -CRC + kiss */
517 if ((yp
->rx_crch
& yp
->rx_crcl
) != 0xFF) {
520 if (!(skb
= dev_alloc_skb(pkt_len
))) {
521 printk(KERN_WARNING
"%s: memory squeeze, dropping packet\n", dev
->name
);
522 ++yp
->stats
.rx_dropped
;
525 cp
= skb_put(skb
, pkt_len
);
526 *cp
++ = 0; /* KISS kludge */
527 memcpy(cp
, yp
->rx_buf
, pkt_len
- 1);
528 skb
->protocol
= ax25_type_trans(skb
, dev
);
530 dev
->last_rx
= jiffies
;
531 ++yp
->stats
.rx_packets
;
540 static inline void yam_rx_byte(struct net_device
*dev
, struct yam_port
*yp
, unsigned char rxb
)
542 if (yp
->rx_len
< YAM_MAX_FRAME
) {
543 unsigned char c
= yp
->rx_crcl
;
544 yp
->rx_crcl
= (chktabl
[c
] ^ yp
->rx_crch
);
545 yp
->rx_crch
= (chktabh
[c
] ^ rxb
);
546 yp
->rx_buf
[yp
->rx_len
++] = rxb
;
550 /********************************************************************************
552 ********************************************************************************/
554 static void ptt_on(struct net_device
*dev
)
556 outb(PTT_ON
, MCR(dev
->base_addr
));
559 static void ptt_off(struct net_device
*dev
)
561 outb(PTT_OFF
, MCR(dev
->base_addr
));
564 static int yam_send_packet(struct sk_buff
*skb
, struct net_device
*dev
)
566 struct yam_port
*yp
= netdev_priv(dev
);
568 skb_queue_tail(&yp
->send_queue
, skb
);
569 dev
->trans_start
= jiffies
;
573 static void yam_start_tx(struct net_device
*dev
, struct yam_port
*yp
)
575 if ((yp
->tx_state
== TX_TAIL
) || (yp
->txd
== 0))
578 yp
->tx_count
= (yp
->bitrate
* yp
->txd
) / 8000;
579 yp
->tx_state
= TX_HEAD
;
583 static unsigned short random_seed
;
585 static inline unsigned short random_num(void)
587 random_seed
= 28629 * random_seed
+ 157;
591 static void yam_arbitrate(struct net_device
*dev
)
593 struct yam_port
*yp
= netdev_priv(dev
);
595 if (yp
->magic
!= YAM_MAGIC
|| yp
->tx_state
!= TX_OFF
||
596 skb_queue_empty(&yp
->send_queue
))
598 /* tx_state is TX_OFF and there is data to send */
601 /* Full duplex mode, don't wait */
602 yam_start_tx(dev
, yp
);
606 /* DCD on, wait slotime ... */
607 yp
->slotcnt
= yp
->slot
/ 10;
610 /* Is slottime passed ? */
611 if ((--yp
->slotcnt
) > 0)
614 yp
->slotcnt
= yp
->slot
/ 10;
616 /* is random > persist ? */
617 if ((random_num() % 256) > yp
->pers
)
620 yam_start_tx(dev
, yp
);
623 static void yam_dotimer(unsigned long dummy
)
627 for (i
= 0; i
< NR_PORTS
; i
++) {
628 struct net_device
*dev
= yam_devs
[i
];
629 if (dev
&& netif_running(dev
))
632 yam_timer
.expires
= jiffies
+ HZ
/ 100;
633 add_timer(&yam_timer
);
636 static void yam_tx_byte(struct net_device
*dev
, struct yam_port
*yp
)
639 unsigned char b
, temp
;
641 switch (yp
->tx_state
) {
645 if (--yp
->tx_count
<= 0) {
646 if (!(skb
= skb_dequeue(&yp
->send_queue
))) {
648 yp
->tx_state
= TX_OFF
;
651 yp
->tx_state
= TX_DATA
;
652 if (skb
->data
[0] != 0) {
653 /* do_kiss_params(s, skb->data, skb->len); */
654 dev_kfree_skb_any(skb
);
657 yp
->tx_len
= skb
->len
- 1; /* strip KISS byte */
658 if (yp
->tx_len
>= YAM_MAX_FRAME
|| yp
->tx_len
< 2) {
659 dev_kfree_skb_any(skb
);
662 memcpy(yp
->tx_buf
, skb
->data
+ 1, yp
->tx_len
);
663 dev_kfree_skb_any(skb
);
667 yp
->tx_state
= TX_DATA
;
671 b
= yp
->tx_buf
[yp
->tx_count
++];
672 outb(b
, THR(dev
->base_addr
));
674 yp
->tx_crcl
= chktabl
[temp
] ^ yp
->tx_crch
;
675 yp
->tx_crch
= chktabh
[temp
] ^ b
;
676 if (yp
->tx_count
>= yp
->tx_len
) {
677 yp
->tx_state
= TX_CRC1
;
681 yp
->tx_crch
= chktabl
[yp
->tx_crcl
] ^ yp
->tx_crch
;
682 yp
->tx_crcl
= chktabh
[yp
->tx_crcl
] ^ chktabl
[yp
->tx_crch
] ^ 0xff;
683 outb(yp
->tx_crcl
, THR(dev
->base_addr
));
684 yp
->tx_state
= TX_CRC2
;
687 outb(chktabh
[yp
->tx_crch
] ^ 0xFF, THR(dev
->base_addr
));
688 if (skb_queue_empty(&yp
->send_queue
)) {
689 yp
->tx_count
= (yp
->bitrate
* yp
->txtail
) / 8000;
690 if (yp
->dupmode
== 2)
691 yp
->tx_count
+= (yp
->bitrate
* yp
->holdd
) / 8;
692 if (yp
->tx_count
== 0)
694 yp
->tx_state
= TX_TAIL
;
697 yp
->tx_state
= TX_HEAD
;
699 ++yp
->stats
.tx_packets
;
702 if (--yp
->tx_count
<= 0) {
703 yp
->tx_state
= TX_OFF
;
710 /***********************************************************************************
712 ************************************************************************************/
714 static irqreturn_t
yam_interrupt(int irq
, void *dev_id
, struct pt_regs
*regs
)
716 struct net_device
*dev
;
723 for (i
= 0; i
< NR_PORTS
; i
++) {
725 yp
= netdev_priv(dev
);
727 if (!netif_running(dev
))
730 while ((iir
= IIR_MASK
& inb(IIR(dev
->base_addr
))) != IIR_NOPEND
) {
731 unsigned char msr
= inb(MSR(dev
->base_addr
));
732 unsigned char lsr
= inb(LSR(dev
->base_addr
));
738 ++yp
->stats
.rx_fifo_errors
;
740 yp
->dcd
= (msr
& RX_DCD
) ? 1 : 0;
742 if (--counter
<= 0) {
743 printk(KERN_ERR
"%s: too many irq iir=%d\n",
749 yam_tx_byte(dev
, yp
);
753 rxb
= inb(RBR(dev
->base_addr
));
755 yam_rx_flag(dev
, yp
);
757 yam_rx_byte(dev
, yp
, rxb
);
762 return IRQ_RETVAL(handled
);
765 #ifdef CONFIG_PROC_FS
767 static void *yam_seq_start(struct seq_file
*seq
, loff_t
*pos
)
769 return (*pos
< NR_PORTS
) ? yam_devs
[*pos
] : NULL
;
772 static void *yam_seq_next(struct seq_file
*seq
, void *v
, loff_t
*pos
)
775 return (*pos
< NR_PORTS
) ? yam_devs
[*pos
] : NULL
;
778 static void yam_seq_stop(struct seq_file
*seq
, void *v
)
782 static int yam_seq_show(struct seq_file
*seq
, void *v
)
784 struct net_device
*dev
= v
;
785 const struct yam_port
*yp
= netdev_priv(dev
);
787 seq_printf(seq
, "Device %s\n", dev
->name
);
788 seq_printf(seq
, " Up %d\n", netif_running(dev
));
789 seq_printf(seq
, " Speed %u\n", yp
->bitrate
);
790 seq_printf(seq
, " IoBase 0x%x\n", yp
->iobase
);
791 seq_printf(seq
, " BaudRate %u\n", yp
->baudrate
);
792 seq_printf(seq
, " IRQ %u\n", yp
->irq
);
793 seq_printf(seq
, " TxState %u\n", yp
->tx_state
);
794 seq_printf(seq
, " Duplex %u\n", yp
->dupmode
);
795 seq_printf(seq
, " HoldDly %u\n", yp
->holdd
);
796 seq_printf(seq
, " TxDelay %u\n", yp
->txd
);
797 seq_printf(seq
, " TxTail %u\n", yp
->txtail
);
798 seq_printf(seq
, " SlotTime %u\n", yp
->slot
);
799 seq_printf(seq
, " Persist %u\n", yp
->pers
);
800 seq_printf(seq
, " TxFrames %lu\n", yp
->stats
.tx_packets
);
801 seq_printf(seq
, " RxFrames %lu\n", yp
->stats
.rx_packets
);
802 seq_printf(seq
, " TxInt %u\n", yp
->nb_mdint
);
803 seq_printf(seq
, " RxInt %u\n", yp
->nb_rxint
);
804 seq_printf(seq
, " RxOver %lu\n", yp
->stats
.rx_fifo_errors
);
805 seq_printf(seq
, "\n");
809 static struct seq_operations yam_seqops
= {
810 .start
= yam_seq_start
,
811 .next
= yam_seq_next
,
812 .stop
= yam_seq_stop
,
813 .show
= yam_seq_show
,
816 static int yam_info_open(struct inode
*inode
, struct file
*file
)
818 return seq_open(file
, &yam_seqops
);
821 static struct file_operations yam_info_fops
= {
822 .owner
= THIS_MODULE
,
823 .open
= yam_info_open
,
826 .release
= seq_release
,
832 /* --------------------------------------------------------------------- */
834 static struct net_device_stats
*yam_get_stats(struct net_device
*dev
)
841 yp
= netdev_priv(dev
);
842 if (yp
->magic
!= YAM_MAGIC
)
846 * Get the current statistics. This may be called with the
847 * card open or closed.
852 /* --------------------------------------------------------------------- */
854 static int yam_open(struct net_device
*dev
)
856 struct yam_port
*yp
= netdev_priv(dev
);
861 printk(KERN_INFO
"Trying %s at iobase 0x%lx irq %u\n", dev
->name
, dev
->base_addr
, dev
->irq
);
863 if (!dev
|| !yp
->bitrate
)
865 if (!dev
->base_addr
|| dev
->base_addr
> 0x1000 - YAM_EXTENT
||
866 dev
->irq
< 2 || dev
->irq
> 15) {
869 if (!request_region(dev
->base_addr
, YAM_EXTENT
, dev
->name
))
871 printk(KERN_ERR
"%s: cannot 0x%lx busy\n", dev
->name
, dev
->base_addr
);
874 if ((u
= yam_check_uart(dev
->base_addr
)) == c_uart_unknown
) {
875 printk(KERN_ERR
"%s: cannot find uart type\n", dev
->name
);
877 goto out_release_base
;
879 if (fpga_download(dev
->base_addr
, yp
->bitrate
)) {
880 printk(KERN_ERR
"%s: cannot init FPGA\n", dev
->name
);
882 goto out_release_base
;
884 outb(0, IER(dev
->base_addr
));
885 if (request_irq(dev
->irq
, yam_interrupt
, SA_INTERRUPT
| SA_SHIRQ
, dev
->name
, dev
)) {
886 printk(KERN_ERR
"%s: irq %d busy\n", dev
->name
, dev
->irq
);
888 goto out_release_base
;
893 netif_start_queue(dev
);
895 yp
->slotcnt
= yp
->slot
/ 10;
897 /* Reset overruns for all ports - FPGA programming makes overruns */
898 for (i
= 0; i
< NR_PORTS
; i
++) {
899 struct net_device
*dev
= yam_devs
[i
];
900 struct yam_port
*yp
= netdev_priv(dev
);
901 inb(LSR(dev
->base_addr
));
902 yp
->stats
.rx_fifo_errors
= 0;
905 printk(KERN_INFO
"%s at iobase 0x%lx irq %u uart %s\n", dev
->name
, dev
->base_addr
, dev
->irq
,
910 release_region(dev
->base_addr
, YAM_EXTENT
);
914 /* --------------------------------------------------------------------- */
916 static int yam_close(struct net_device
*dev
)
919 struct yam_port
*yp
= netdev_priv(dev
);
927 outb(0, IER(dev
->base_addr
));
928 outb(1, MCR(dev
->base_addr
));
929 /* Remove IRQ handler if last */
930 free_irq(dev
->irq
,dev
);
931 release_region(dev
->base_addr
, YAM_EXTENT
);
932 netif_stop_queue(dev
);
933 while ((skb
= skb_dequeue(&yp
->send_queue
)))
936 printk(KERN_INFO
"%s: close yam at iobase 0x%lx irq %u\n",
937 yam_drvname
, dev
->base_addr
, dev
->irq
);
941 /* --------------------------------------------------------------------- */
943 static int yam_ioctl(struct net_device
*dev
, struct ifreq
*ifr
, int cmd
)
945 struct yam_port
*yp
= netdev_priv(dev
);
946 struct yamdrv_ioctl_cfg yi
;
947 struct yamdrv_ioctl_mcs
*ym
;
950 if (copy_from_user(&ioctl_cmd
, ifr
->ifr_data
, sizeof(int)))
953 if (yp
->magic
!= YAM_MAGIC
)
956 if (!capable(CAP_NET_ADMIN
))
959 if (cmd
!= SIOCDEVPRIVATE
)
964 case SIOCYAMRESERVED
:
965 return -EINVAL
; /* unused */
968 if (netif_running(dev
))
969 return -EINVAL
; /* Cannot change this parameter when up */
970 if ((ym
= kmalloc(sizeof(struct yamdrv_ioctl_mcs
), GFP_KERNEL
)) == NULL
)
973 if (copy_from_user(ym
, ifr
->ifr_data
, sizeof(struct yamdrv_ioctl_mcs
))) {
977 if (ym
->bitrate
> YAM_MAXBITRATE
) {
981 add_mcs(ym
->bits
, ym
->bitrate
);
986 if (!capable(CAP_SYS_RAWIO
))
988 if (copy_from_user(&yi
, ifr
->ifr_data
, sizeof(struct yamdrv_ioctl_cfg
)))
991 if ((yi
.cfg
.mask
& YAM_IOBASE
) && netif_running(dev
))
992 return -EINVAL
; /* Cannot change this parameter when up */
993 if ((yi
.cfg
.mask
& YAM_IRQ
) && netif_running(dev
))
994 return -EINVAL
; /* Cannot change this parameter when up */
995 if ((yi
.cfg
.mask
& YAM_BITRATE
) && netif_running(dev
))
996 return -EINVAL
; /* Cannot change this parameter when up */
997 if ((yi
.cfg
.mask
& YAM_BAUDRATE
) && netif_running(dev
))
998 return -EINVAL
; /* Cannot change this parameter when up */
1000 if (yi
.cfg
.mask
& YAM_IOBASE
) {
1001 yp
->iobase
= yi
.cfg
.iobase
;
1002 dev
->base_addr
= yi
.cfg
.iobase
;
1004 if (yi
.cfg
.mask
& YAM_IRQ
) {
1005 if (yi
.cfg
.irq
> 15)
1007 yp
->irq
= yi
.cfg
.irq
;
1008 dev
->irq
= yi
.cfg
.irq
;
1010 if (yi
.cfg
.mask
& YAM_BITRATE
) {
1011 if (yi
.cfg
.bitrate
> YAM_MAXBITRATE
)
1013 yp
->bitrate
= yi
.cfg
.bitrate
;
1015 if (yi
.cfg
.mask
& YAM_BAUDRATE
) {
1016 if (yi
.cfg
.baudrate
> YAM_MAXBAUDRATE
)
1018 yp
->baudrate
= yi
.cfg
.baudrate
;
1020 if (yi
.cfg
.mask
& YAM_MODE
) {
1021 if (yi
.cfg
.mode
> YAM_MAXMODE
)
1023 yp
->dupmode
= yi
.cfg
.mode
;
1025 if (yi
.cfg
.mask
& YAM_HOLDDLY
) {
1026 if (yi
.cfg
.holddly
> YAM_MAXHOLDDLY
)
1028 yp
->holdd
= yi
.cfg
.holddly
;
1030 if (yi
.cfg
.mask
& YAM_TXDELAY
) {
1031 if (yi
.cfg
.txdelay
> YAM_MAXTXDELAY
)
1033 yp
->txd
= yi
.cfg
.txdelay
;
1035 if (yi
.cfg
.mask
& YAM_TXTAIL
) {
1036 if (yi
.cfg
.txtail
> YAM_MAXTXTAIL
)
1038 yp
->txtail
= yi
.cfg
.txtail
;
1040 if (yi
.cfg
.mask
& YAM_PERSIST
) {
1041 if (yi
.cfg
.persist
> YAM_MAXPERSIST
)
1043 yp
->pers
= yi
.cfg
.persist
;
1045 if (yi
.cfg
.mask
& YAM_SLOTTIME
) {
1046 if (yi
.cfg
.slottime
> YAM_MAXSLOTTIME
)
1048 yp
->slot
= yi
.cfg
.slottime
;
1049 yp
->slotcnt
= yp
->slot
/ 10;
1054 yi
.cfg
.mask
= 0xffffffff;
1055 yi
.cfg
.iobase
= yp
->iobase
;
1056 yi
.cfg
.irq
= yp
->irq
;
1057 yi
.cfg
.bitrate
= yp
->bitrate
;
1058 yi
.cfg
.baudrate
= yp
->baudrate
;
1059 yi
.cfg
.mode
= yp
->dupmode
;
1060 yi
.cfg
.txdelay
= yp
->txd
;
1061 yi
.cfg
.holddly
= yp
->holdd
;
1062 yi
.cfg
.txtail
= yp
->txtail
;
1063 yi
.cfg
.persist
= yp
->pers
;
1064 yi
.cfg
.slottime
= yp
->slot
;
1065 if (copy_to_user(ifr
->ifr_data
, &yi
, sizeof(struct yamdrv_ioctl_cfg
)))
1077 /* --------------------------------------------------------------------- */
1079 static int yam_set_mac_address(struct net_device
*dev
, void *addr
)
1081 struct sockaddr
*sa
= (struct sockaddr
*) addr
;
1083 /* addr is an AX.25 shifted ASCII mac address */
1084 memcpy(dev
->dev_addr
, sa
->sa_data
, dev
->addr_len
);
1088 /* --------------------------------------------------------------------- */
1090 static void yam_setup(struct net_device
*dev
)
1092 struct yam_port
*yp
= netdev_priv(dev
);
1094 yp
->magic
= YAM_MAGIC
;
1095 yp
->bitrate
= DEFAULT_BITRATE
;
1096 yp
->baudrate
= DEFAULT_BITRATE
* 2;
1100 yp
->holdd
= DEFAULT_HOLDD
;
1101 yp
->txd
= DEFAULT_TXD
;
1102 yp
->txtail
= DEFAULT_TXTAIL
;
1103 yp
->slot
= DEFAULT_SLOT
;
1104 yp
->pers
= DEFAULT_PERS
;
1107 dev
->base_addr
= yp
->iobase
;
1109 SET_MODULE_OWNER(dev
);
1111 dev
->open
= yam_open
;
1112 dev
->stop
= yam_close
;
1113 dev
->do_ioctl
= yam_ioctl
;
1114 dev
->hard_start_xmit
= yam_send_packet
;
1115 dev
->get_stats
= yam_get_stats
;
1117 skb_queue_head_init(&yp
->send_queue
);
1119 #if defined(CONFIG_AX25) || defined(CONFIG_AX25_MODULE)
1120 dev
->hard_header
= ax25_encapsulate
;
1121 dev
->rebuild_header
= ax25_rebuild_header
;
1122 #else /* CONFIG_AX25 || CONFIG_AX25_MODULE */
1123 dev
->hard_header
= NULL
;
1124 dev
->rebuild_header
= NULL
;
1125 #endif /* CONFIG_AX25 || CONFIG_AX25_MODULE */
1127 dev
->set_mac_address
= yam_set_mac_address
;
1129 dev
->type
= ARPHRD_AX25
; /* AF_AX25 device */
1130 dev
->hard_header_len
= 73; /* We do digipeaters now */
1131 dev
->mtu
= 256; /* AX25 is the default */
1132 dev
->addr_len
= 7; /* sizeof an ax.25 address */
1133 memcpy(dev
->broadcast
, ax25_bcast
, 7);
1134 memcpy(dev
->dev_addr
, ax25_test
, 7);
1138 static int __init
yam_init_driver(void)
1140 struct net_device
*dev
;
1142 char name
[IFNAMSIZ
];
1144 printk(yam_drvinfo
);
1146 for (i
= 0; i
< NR_PORTS
; i
++) {
1147 sprintf(name
, "yam%d", i
);
1149 dev
= alloc_netdev(sizeof(struct yam_port
), name
,
1152 printk(KERN_ERR
"yam: cannot allocate net device %s\n",
1158 err
= register_netdev(dev
);
1160 printk(KERN_WARNING
"yam: cannot register net device %s\n", dev
->name
);
1167 yam_timer
.function
= yam_dotimer
;
1168 yam_timer
.expires
= jiffies
+ HZ
/ 100;
1169 add_timer(&yam_timer
);
1171 proc_net_fops_create("yam", S_IRUGO
, &yam_info_fops
);
1175 unregister_netdev(yam_devs
[i
]);
1176 free_netdev(yam_devs
[i
]);
1181 /* --------------------------------------------------------------------- */
1183 static void __exit
yam_cleanup_driver(void)
1188 del_timer(&yam_timer
);
1189 for (i
= 0; i
< NR_PORTS
; i
++) {
1190 struct net_device
*dev
= yam_devs
[i
];
1192 unregister_netdev(dev
);
1199 yam_data
= yam_data
->next
;
1203 proc_net_remove("yam");
1206 /* --------------------------------------------------------------------- */
1208 MODULE_AUTHOR("Frederic Rible F1OAT frible@teaser.fr");
1209 MODULE_DESCRIPTION("Yam amateur radio modem driver");
1210 MODULE_LICENSE("GPL");
1212 module_init(yam_init_driver
);
1213 module_exit(yam_cleanup_driver
);
1215 /* --------------------------------------------------------------------- */