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/module.h>
46 #include <linux/types.h>
47 #include <linux/net.h>
50 #include <linux/slab.h>
51 #include <linux/errno.h>
52 #include <linux/bitops.h>
54 #include <asm/system.h>
55 #include <linux/interrupt.h>
56 #include <linux/ioport.h>
58 #include <linux/netdevice.h>
59 #include <linux/if_arp.h>
60 #include <linux/etherdevice.h>
61 #include <linux/skbuff.h>
64 #include <linux/kernel.h>
65 #include <linux/proc_fs.h>
66 #include <linux/seq_file.h>
68 #include <asm/uaccess.h>
69 #include <linux/init.h>
71 #include <linux/yam.h>
75 /* --------------------------------------------------------------------- */
77 static const char yam_drvname[] = "yam";
78 static char yam_drvinfo[] __initdata = KERN_INFO "YAM driver version 0.8 by F1OAT/F6FBB\n";
80 /* --------------------------------------------------------------------- */
86 #define YAM_MAGIC 0xF10A7654
88 /* Transmitter states */
97 #define YAM_MAX_FRAME 1024
99 #define DEFAULT_BITRATE 9600 /* bps */
100 #define DEFAULT_HOLDD 10 /* sec */
101 #define DEFAULT_TXD 300 /* ms */
102 #define DEFAULT_TXTAIL 10 /* ms */
103 #define DEFAULT_SLOT 100 /* ms */
104 #define DEFAULT_PERS 64 /* 0->255 */
114 struct net_device *dev;
118 struct net_device_stats stats;
123 /* Parameters section */
125 int txd; /* tx delay */
126 int holdd; /* duplex ptt delay */
127 int txtail; /* txtail delay */
128 int slot; /* slottime */
129 int pers; /* persistence */
136 unsigned char tx_buf[YAM_MAX_FRAME];
138 int tx_crcl, tx_crch;
139 struct sk_buff_head send_queue; /* Packets awaiting transmission */
144 unsigned char rx_buf[YAM_MAX_FRAME];
146 int rx_crcl, rx_crch;
150 unsigned char bits[YAM_FPGA_SIZE];
152 struct yam_mcs *next;
155 static struct net_device *yam_devs[NR_PORTS];
157 static struct yam_mcs *yam_data;
159 static DEFINE_TIMER(yam_timer, NULL, 0, 0);
161 /* --------------------------------------------------------------------- */
163 #define RBR(iobase) (iobase+0)
164 #define THR(iobase) (iobase+0)
165 #define IER(iobase) (iobase+1)
166 #define IIR(iobase) (iobase+2)
167 #define FCR(iobase) (iobase+2)
168 #define LCR(iobase) (iobase+3)
169 #define MCR(iobase) (iobase+4)
170 #define LSR(iobase) (iobase+5)
171 #define MSR(iobase) (iobase+6)
172 #define SCR(iobase) (iobase+7)
173 #define DLL(iobase) (iobase+0)
174 #define DLM(iobase) (iobase+1)
178 /* Interrupt Identification Register Bit Masks */
184 #define IIR_TIMEOUT 12 /* Fifo mode only */
186 #define IIR_MASK 0x0F
188 /* Interrupt Enable Register Bit Masks */
189 #define IER_RX 1 /* enable rx interrupt */
190 #define IER_TX 2 /* enable tx interrupt */
191 #define IER_LSR 4 /* enable line status interrupts */
192 #define IER_MSR 8 /* enable modem status interrupts */
194 /* Modem Control Register Bit Masks */
195 #define MCR_DTR 0x01 /* DTR output */
196 #define MCR_RTS 0x02 /* RTS output */
197 #define MCR_OUT1 0x04 /* OUT1 output (not accessible in RS232) */
198 #define MCR_OUT2 0x08 /* Master Interrupt enable (must be set on PCs) */
199 #define MCR_LOOP 0x10 /* Loopback enable */
201 /* Modem Status Register Bit Masks */
202 #define MSR_DCTS 0x01 /* Delta CTS input */
203 #define MSR_DDSR 0x02 /* Delta DSR */
204 #define MSR_DRIN 0x04 /* Delta RI */
205 #define MSR_DDCD 0x08 /* Delta DCD */
206 #define MSR_CTS 0x10 /* CTS input */
207 #define MSR_DSR 0x20 /* DSR input */
208 #define MSR_RING 0x40 /* RI input */
209 #define MSR_DCD 0x80 /* DCD input */
211 /* line status register bit mask */
216 #define LSR_BREAK 0x10
217 #define LSR_THRE 0x20
218 #define LSR_TSRE 0x40
220 /* Line Control Register Bit Masks */
221 #define LCR_DLAB 0x80
222 #define LCR_BREAK 0x40
223 #define LCR_PZERO 0x28
224 #define LCR_PEVEN 0x18
225 #define LCR_PODD 0x08
226 #define LCR_STOP1 0x00
227 #define LCR_STOP2 0x04
228 #define LCR_BIT5 0x00
229 #define LCR_BIT6 0x02
230 #define LCR_BIT7 0x01
231 #define LCR_BIT8 0x03
233 /* YAM Modem <-> UART Port mapping */
235 #define TX_RDY MSR_DCTS /* transmitter ready to send */
236 #define RX_DCD MSR_DCD /* carrier detect */
237 #define RX_FLAG MSR_RING /* hdlc flag received */
238 #define FPGA_DONE MSR_DSR /* FPGA is configured */
239 #define PTT_ON (MCR_RTS|MCR_OUT2) /* activate PTT */
240 #define PTT_OFF (MCR_DTR|MCR_OUT2) /* release PTT */
242 #define ENABLE_RXINT IER_RX /* enable uart rx interrupt during rx */
243 #define ENABLE_TXINT IER_MSR /* enable uart ms interrupt during tx */
244 #define ENABLE_RTXINT (IER_RX|IER_MSR) /* full duplex operations */
247 /*************************************************************************
249 ************************************************************************/
251 static const unsigned char chktabl[256] =
252 {0x00, 0x89, 0x12, 0x9b, 0x24, 0xad, 0x36, 0xbf, 0x48, 0xc1, 0x5a, 0xd3, 0x6c, 0xe5, 0x7e,
253 0xf7, 0x81, 0x08, 0x93, 0x1a, 0xa5, 0x2c, 0xb7, 0x3e, 0xc9, 0x40, 0xdb, 0x52, 0xed, 0x64,
254 0xff, 0x76, 0x02, 0x8b, 0x10, 0x99, 0x26, 0xaf, 0x34, 0xbd, 0x4a, 0xc3, 0x58, 0xd1, 0x6e,
255 0xe7, 0x7c, 0xf5, 0x83, 0x0a, 0x91, 0x18, 0xa7, 0x2e, 0xb5, 0x3c, 0xcb, 0x42, 0xd9, 0x50,
256 0xef, 0x66, 0xfd, 0x74, 0x04, 0x8d, 0x16, 0x9f, 0x20, 0xa9, 0x32, 0xbb, 0x4c, 0xc5, 0x5e,
257 0xd7, 0x68, 0xe1, 0x7a, 0xf3, 0x85, 0x0c, 0x97, 0x1e, 0xa1, 0x28, 0xb3, 0x3a, 0xcd, 0x44,
258 0xdf, 0x56, 0xe9, 0x60, 0xfb, 0x72, 0x06, 0x8f, 0x14, 0x9d, 0x22, 0xab, 0x30, 0xb9, 0x4e,
259 0xc7, 0x5c, 0xd5, 0x6a, 0xe3, 0x78, 0xf1, 0x87, 0x0e, 0x95, 0x1c, 0xa3, 0x2a, 0xb1, 0x38,
260 0xcf, 0x46, 0xdd, 0x54, 0xeb, 0x62, 0xf9, 0x70, 0x08, 0x81, 0x1a, 0x93, 0x2c, 0xa5, 0x3e,
261 0xb7, 0x40, 0xc9, 0x52, 0xdb, 0x64, 0xed, 0x76, 0xff, 0x89, 0x00, 0x9b, 0x12, 0xad, 0x24,
262 0xbf, 0x36, 0xc1, 0x48, 0xd3, 0x5a, 0xe5, 0x6c, 0xf7, 0x7e, 0x0a, 0x83, 0x18, 0x91, 0x2e,
263 0xa7, 0x3c, 0xb5, 0x42, 0xcb, 0x50, 0xd9, 0x66, 0xef, 0x74, 0xfd, 0x8b, 0x02, 0x99, 0x10,
264 0xaf, 0x26, 0xbd, 0x34, 0xc3, 0x4a, 0xd1, 0x58, 0xe7, 0x6e, 0xf5, 0x7c, 0x0c, 0x85, 0x1e,
265 0x97, 0x28, 0xa1, 0x3a, 0xb3, 0x44, 0xcd, 0x56, 0xdf, 0x60, 0xe9, 0x72, 0xfb, 0x8d, 0x04,
266 0x9f, 0x16, 0xa9, 0x20, 0xbb, 0x32, 0xc5, 0x4c, 0xd7, 0x5e, 0xe1, 0x68, 0xf3, 0x7a, 0x0e,
267 0x87, 0x1c, 0x95, 0x2a, 0xa3, 0x38, 0xb1, 0x46, 0xcf, 0x54, 0xdd, 0x62, 0xeb, 0x70, 0xf9,
268 0x8f, 0x06, 0x9d, 0x14, 0xab, 0x22, 0xb9, 0x30, 0xc7, 0x4e, 0xd5, 0x5c, 0xe3, 0x6a, 0xf1,
270 static const unsigned char chktabh[256] =
271 {0x00, 0x11, 0x23, 0x32, 0x46, 0x57, 0x65, 0x74, 0x8c, 0x9d, 0xaf, 0xbe, 0xca, 0xdb, 0xe9,
272 0xf8, 0x10, 0x01, 0x33, 0x22, 0x56, 0x47, 0x75, 0x64, 0x9c, 0x8d, 0xbf, 0xae, 0xda, 0xcb,
273 0xf9, 0xe8, 0x21, 0x30, 0x02, 0x13, 0x67, 0x76, 0x44, 0x55, 0xad, 0xbc, 0x8e, 0x9f, 0xeb,
274 0xfa, 0xc8, 0xd9, 0x31, 0x20, 0x12, 0x03, 0x77, 0x66, 0x54, 0x45, 0xbd, 0xac, 0x9e, 0x8f,
275 0xfb, 0xea, 0xd8, 0xc9, 0x42, 0x53, 0x61, 0x70, 0x04, 0x15, 0x27, 0x36, 0xce, 0xdf, 0xed,
276 0xfc, 0x88, 0x99, 0xab, 0xba, 0x52, 0x43, 0x71, 0x60, 0x14, 0x05, 0x37, 0x26, 0xde, 0xcf,
277 0xfd, 0xec, 0x98, 0x89, 0xbb, 0xaa, 0x63, 0x72, 0x40, 0x51, 0x25, 0x34, 0x06, 0x17, 0xef,
278 0xfe, 0xcc, 0xdd, 0xa9, 0xb8, 0x8a, 0x9b, 0x73, 0x62, 0x50, 0x41, 0x35, 0x24, 0x16, 0x07,
279 0xff, 0xee, 0xdc, 0xcd, 0xb9, 0xa8, 0x9a, 0x8b, 0x84, 0x95, 0xa7, 0xb6, 0xc2, 0xd3, 0xe1,
280 0xf0, 0x08, 0x19, 0x2b, 0x3a, 0x4e, 0x5f, 0x6d, 0x7c, 0x94, 0x85, 0xb7, 0xa6, 0xd2, 0xc3,
281 0xf1, 0xe0, 0x18, 0x09, 0x3b, 0x2a, 0x5e, 0x4f, 0x7d, 0x6c, 0xa5, 0xb4, 0x86, 0x97, 0xe3,
282 0xf2, 0xc0, 0xd1, 0x29, 0x38, 0x0a, 0x1b, 0x6f, 0x7e, 0x4c, 0x5d, 0xb5, 0xa4, 0x96, 0x87,
283 0xf3, 0xe2, 0xd0, 0xc1, 0x39, 0x28, 0x1a, 0x0b, 0x7f, 0x6e, 0x5c, 0x4d, 0xc6, 0xd7, 0xe5,
284 0xf4, 0x80, 0x91, 0xa3, 0xb2, 0x4a, 0x5b, 0x69, 0x78, 0x0c, 0x1d, 0x2f, 0x3e, 0xd6, 0xc7,
285 0xf5, 0xe4, 0x90, 0x81, 0xb3, 0xa2, 0x5a, 0x4b, 0x79, 0x68, 0x1c, 0x0d, 0x3f, 0x2e, 0xe7,
286 0xf6, 0xc4, 0xd5, 0xa1, 0xb0, 0x82, 0x93, 0x6b, 0x7a, 0x48, 0x59, 0x2d, 0x3c, 0x0e, 0x1f,
287 0xf7, 0xe6, 0xd4, 0xc5, 0xb1, 0xa0, 0x92, 0x83, 0x7b, 0x6a, 0x58, 0x49, 0x3d, 0x2c, 0x1e,
290 /*************************************************************************
292 ************************************************************************/
294 static void delay(int ms)
296 unsigned long timeout = jiffies + ((ms * HZ) / 1000);
297 while (time_before(jiffies, timeout))
305 static void fpga_reset(int iobase)
307 outb(0, IER(iobase));
308 outb(LCR_DLAB | LCR_BIT5, LCR(iobase));
309 outb(1, DLL(iobase));
310 outb(0, DLM(iobase));
312 outb(LCR_BIT5, LCR(iobase));
315 /* turn off FPGA supply voltage */
316 outb(MCR_OUT1 | MCR_OUT2, MCR(iobase));
318 /* turn on FPGA supply voltage again */
319 outb(MCR_DTR | MCR_RTS | MCR_OUT1 | MCR_OUT2, MCR(iobase));
324 * send one byte to FPGA
327 static int fpga_write(int iobase, unsigned char wrd)
331 unsigned long timeout = jiffies + HZ / 10;
333 for (k = 0; k < 8; k++) {
334 bit = (wrd & 0x80) ? (MCR_RTS | MCR_DTR) : MCR_DTR;
335 outb(bit | MCR_OUT1 | MCR_OUT2, MCR(iobase));
337 outb(0xfc, THR(iobase));
338 while ((inb(LSR(iobase)) & LSR_TSRE) == 0)
339 if (time_after(jiffies, timeout))
346 static unsigned char *add_mcs(unsigned char *bits, int bitrate)
350 /* If it already exists, replace the bit data */
353 if (p->bitrate == bitrate) {
354 memcpy(p->bits, bits, YAM_FPGA_SIZE);
360 /* Allocate a new mcs */
361 if ((p = kmalloc(sizeof(struct yam_mcs), GFP_KERNEL)) == NULL) {
362 printk(KERN_WARNING "YAM: no memory to allocate mcs\n");
365 memcpy(p->bits, bits, YAM_FPGA_SIZE);
366 p->bitrate = bitrate;
373 static unsigned char *get_mcs(int bitrate)
379 if (p->bitrate == bitrate)
384 /* Load predefined mcs data */
387 return add_mcs(bits_1200, bitrate);
389 return add_mcs(bits_9600, bitrate);
394 * download bitstream to FPGA
395 * data is contained in bits[] array in yam1200.h resp. yam9600.h
398 static int fpga_download(int iobase, int bitrate)
401 unsigned char *pbits;
403 pbits = get_mcs(bitrate);
408 for (i = 0; i < YAM_FPGA_SIZE; i++) {
409 if (fpga_write(iobase, pbits[i])) {
410 printk(KERN_ERR "yam: error in write cycle\n");
411 return -1; /* write... */
415 fpga_write(iobase, 0xFF);
416 rc = inb(MSR(iobase)); /* check DONE signal */
418 /* Needed for some hardwares */
421 return (rc & MSR_DSR) ? 0 : -1;
425 /************************************************************************
427 ************************************************************************/
429 static void yam_set_uart(struct net_device *dev)
431 struct yam_port *yp = netdev_priv(dev);
432 int divisor = 115200 / yp->baudrate;
434 outb(0, IER(dev->base_addr));
435 outb(LCR_DLAB | LCR_BIT8, LCR(dev->base_addr));
436 outb(divisor, DLL(dev->base_addr));
437 outb(0, DLM(dev->base_addr));
438 outb(LCR_BIT8, LCR(dev->base_addr));
439 outb(PTT_OFF, MCR(dev->base_addr));
440 outb(0x00, FCR(dev->base_addr));
442 /* Flush pending irq */
444 inb(RBR(dev->base_addr));
445 inb(MSR(dev->base_addr));
449 outb(ENABLE_RTXINT, IER(dev->base_addr));
453 /* --------------------------------------------------------------------- */
456 c_uart_unknown, c_uart_8250,
457 c_uart_16450, c_uart_16550, c_uart_16550A
460 static const char *uart_str[] =
461 {"unknown", "8250", "16450", "16550", "16550A"};
463 static enum uart yam_check_uart(unsigned int iobase)
465 unsigned char b1, b2, b3;
467 enum uart uart_tab[] =
468 {c_uart_16450, c_uart_unknown, c_uart_16550, c_uart_16550A};
470 b1 = inb(MCR(iobase));
471 outb(b1 | 0x10, MCR(iobase)); /* loopback mode */
472 b2 = inb(MSR(iobase));
473 outb(0x1a, MCR(iobase));
474 b3 = inb(MSR(iobase)) & 0xf0;
475 outb(b1, MCR(iobase)); /* restore old values */
476 outb(b2, MSR(iobase));
478 return c_uart_unknown;
481 outb(0x01, FCR(iobase)); /* enable FIFOs */
482 u = uart_tab[(inb(IIR(iobase)) >> 6) & 3];
483 if (u == c_uart_16450) {
484 outb(0x5a, SCR(iobase));
485 b1 = inb(SCR(iobase));
486 outb(0xa5, SCR(iobase));
487 b2 = inb(SCR(iobase));
488 if ((b1 != 0x5a) || (b2 != 0xa5))
494 /******************************************************************************
496 ******************************************************************************/
497 static inline void yam_rx_flag(struct net_device *dev, struct yam_port *yp)
499 if (yp->dcd && yp->rx_len >= 3 && yp->rx_len < YAM_MAX_FRAME) {
500 int pkt_len = yp->rx_len - 2 + 1; /* -CRC + kiss */
503 if ((yp->rx_crch & yp->rx_crcl) != 0xFF) {
506 if (!(skb = dev_alloc_skb(pkt_len))) {
507 printk(KERN_WARNING "%s: memory squeeze, dropping packet\n", dev->name);
508 ++yp->stats.rx_dropped;
511 cp = skb_put(skb, pkt_len);
512 *cp++ = 0; /* KISS kludge */
513 memcpy(cp, yp->rx_buf, pkt_len - 1);
514 skb->protocol = ax25_type_trans(skb, dev);
516 dev->last_rx = jiffies;
517 ++yp->stats.rx_packets;
526 static inline void yam_rx_byte(struct net_device *dev, struct yam_port *yp, unsigned char rxb)
528 if (yp->rx_len < YAM_MAX_FRAME) {
529 unsigned char c = yp->rx_crcl;
530 yp->rx_crcl = (chktabl[c] ^ yp->rx_crch);
531 yp->rx_crch = (chktabh[c] ^ rxb);
532 yp->rx_buf[yp->rx_len++] = rxb;
536 /********************************************************************************
538 ********************************************************************************/
540 static void ptt_on(struct net_device *dev)
542 outb(PTT_ON, MCR(dev->base_addr));
545 static void ptt_off(struct net_device *dev)
547 outb(PTT_OFF, MCR(dev->base_addr));
550 static int yam_send_packet(struct sk_buff *skb, struct net_device *dev)
552 struct yam_port *yp = netdev_priv(dev);
554 skb_queue_tail(&yp->send_queue, skb);
555 dev->trans_start = jiffies;
559 static void yam_start_tx(struct net_device *dev, struct yam_port *yp)
561 if ((yp->tx_state == TX_TAIL) || (yp->txd == 0))
564 yp->tx_count = (yp->bitrate * yp->txd) / 8000;
565 yp->tx_state = TX_HEAD;
569 static unsigned short random_seed;
571 static inline unsigned short random_num(void)
573 random_seed = 28629 * random_seed + 157;
577 static void yam_arbitrate(struct net_device *dev)
579 struct yam_port *yp = netdev_priv(dev);
581 if (yp->magic != YAM_MAGIC || yp->tx_state != TX_OFF ||
582 skb_queue_empty(&yp->send_queue))
584 /* tx_state is TX_OFF and there is data to send */
587 /* Full duplex mode, don't wait */
588 yam_start_tx(dev, yp);
592 /* DCD on, wait slotime ... */
593 yp->slotcnt = yp->slot / 10;
596 /* Is slottime passed ? */
597 if ((--yp->slotcnt) > 0)
600 yp->slotcnt = yp->slot / 10;
602 /* is random > persist ? */
603 if ((random_num() % 256) > yp->pers)
606 yam_start_tx(dev, yp);
609 static void yam_dotimer(unsigned long dummy)
613 for (i = 0; i < NR_PORTS; i++) {
614 struct net_device *dev = yam_devs[i];
615 if (dev && netif_running(dev))
618 yam_timer.expires = jiffies + HZ / 100;
619 add_timer(&yam_timer);
622 static void yam_tx_byte(struct net_device *dev, struct yam_port *yp)
625 unsigned char b, temp;
627 switch (yp->tx_state) {
631 if (--yp->tx_count <= 0) {
632 if (!(skb = skb_dequeue(&yp->send_queue))) {
634 yp->tx_state = TX_OFF;
637 yp->tx_state = TX_DATA;
638 if (skb->data[0] != 0) {
639 /* do_kiss_params(s, skb->data, skb->len); */
640 dev_kfree_skb_any(skb);
643 yp->tx_len = skb->len - 1; /* strip KISS byte */
644 if (yp->tx_len >= YAM_MAX_FRAME || yp->tx_len < 2) {
645 dev_kfree_skb_any(skb);
648 memcpy(yp->tx_buf, skb->data + 1, yp->tx_len);
649 dev_kfree_skb_any(skb);
653 yp->tx_state = TX_DATA;
657 b = yp->tx_buf[yp->tx_count++];
658 outb(b, THR(dev->base_addr));
660 yp->tx_crcl = chktabl[temp] ^ yp->tx_crch;
661 yp->tx_crch = chktabh[temp] ^ b;
662 if (yp->tx_count >= yp->tx_len) {
663 yp->tx_state = TX_CRC1;
667 yp->tx_crch = chktabl[yp->tx_crcl] ^ yp->tx_crch;
668 yp->tx_crcl = chktabh[yp->tx_crcl] ^ chktabl[yp->tx_crch] ^ 0xff;
669 outb(yp->tx_crcl, THR(dev->base_addr));
670 yp->tx_state = TX_CRC2;
673 outb(chktabh[yp->tx_crch] ^ 0xFF, THR(dev->base_addr));
674 if (skb_queue_empty(&yp->send_queue)) {
675 yp->tx_count = (yp->bitrate * yp->txtail) / 8000;
676 if (yp->dupmode == 2)
677 yp->tx_count += (yp->bitrate * yp->holdd) / 8;
678 if (yp->tx_count == 0)
680 yp->tx_state = TX_TAIL;
683 yp->tx_state = TX_HEAD;
685 ++yp->stats.tx_packets;
688 if (--yp->tx_count <= 0) {
689 yp->tx_state = TX_OFF;
696 /***********************************************************************************
698 ************************************************************************************/
700 static irqreturn_t yam_interrupt(int irq, void *dev_id)
702 struct net_device *dev;
709 for (i = 0; i < NR_PORTS; i++) {
711 yp = netdev_priv(dev);
713 if (!netif_running(dev))
716 while ((iir = IIR_MASK & inb(IIR(dev->base_addr))) != IIR_NOPEND) {
717 unsigned char msr = inb(MSR(dev->base_addr));
718 unsigned char lsr = inb(LSR(dev->base_addr));
724 ++yp->stats.rx_fifo_errors;
726 yp->dcd = (msr & RX_DCD) ? 1 : 0;
728 if (--counter <= 0) {
729 printk(KERN_ERR "%s: too many irq iir=%d\n",
735 yam_tx_byte(dev, yp);
739 rxb = inb(RBR(dev->base_addr));
741 yam_rx_flag(dev, yp);
743 yam_rx_byte(dev, yp, rxb);
748 return IRQ_RETVAL(handled);
751 #ifdef CONFIG_PROC_FS
753 static void *yam_seq_start(struct seq_file *seq, loff_t *pos)
755 return (*pos < NR_PORTS) ? yam_devs[*pos] : NULL;
758 static void *yam_seq_next(struct seq_file *seq, void *v, loff_t *pos)
761 return (*pos < NR_PORTS) ? yam_devs[*pos] : NULL;
764 static void yam_seq_stop(struct seq_file *seq, void *v)
768 static int yam_seq_show(struct seq_file *seq, void *v)
770 struct net_device *dev = v;
771 const struct yam_port *yp = netdev_priv(dev);
773 seq_printf(seq, "Device %s\n", dev->name);
774 seq_printf(seq, " Up %d\n", netif_running(dev));
775 seq_printf(seq, " Speed %u\n", yp->bitrate);
776 seq_printf(seq, " IoBase 0x%x\n", yp->iobase);
777 seq_printf(seq, " BaudRate %u\n", yp->baudrate);
778 seq_printf(seq, " IRQ %u\n", yp->irq);
779 seq_printf(seq, " TxState %u\n", yp->tx_state);
780 seq_printf(seq, " Duplex %u\n", yp->dupmode);
781 seq_printf(seq, " HoldDly %u\n", yp->holdd);
782 seq_printf(seq, " TxDelay %u\n", yp->txd);
783 seq_printf(seq, " TxTail %u\n", yp->txtail);
784 seq_printf(seq, " SlotTime %u\n", yp->slot);
785 seq_printf(seq, " Persist %u\n", yp->pers);
786 seq_printf(seq, " TxFrames %lu\n", yp->stats.tx_packets);
787 seq_printf(seq, " RxFrames %lu\n", yp->stats.rx_packets);
788 seq_printf(seq, " TxInt %u\n", yp->nb_mdint);
789 seq_printf(seq, " RxInt %u\n", yp->nb_rxint);
790 seq_printf(seq, " RxOver %lu\n", yp->stats.rx_fifo_errors);
791 seq_printf(seq, "\n");
795 static struct seq_operations yam_seqops = {
796 .start = yam_seq_start,
797 .next = yam_seq_next,
798 .stop = yam_seq_stop,
799 .show = yam_seq_show,
802 static int yam_info_open(struct inode *inode, struct file *file)
804 return seq_open(file, &yam_seqops);
807 static const struct file_operations yam_info_fops = {
808 .owner = THIS_MODULE,
809 .open = yam_info_open,
812 .release = seq_release,
818 /* --------------------------------------------------------------------- */
820 static struct net_device_stats *yam_get_stats(struct net_device *dev)
827 yp = netdev_priv(dev);
828 if (yp->magic != YAM_MAGIC)
832 * Get the current statistics. This may be called with the
833 * card open or closed.
838 /* --------------------------------------------------------------------- */
840 static int yam_open(struct net_device *dev)
842 struct yam_port *yp = netdev_priv(dev);
847 printk(KERN_INFO "Trying %s at iobase 0x%lx irq %u\n", dev->name, dev->base_addr, dev->irq);
849 if (!dev || !yp->bitrate)
851 if (!dev->base_addr || dev->base_addr > 0x1000 - YAM_EXTENT ||
852 dev->irq < 2 || dev->irq > 15) {
855 if (!request_region(dev->base_addr, YAM_EXTENT, dev->name))
857 printk(KERN_ERR "%s: cannot 0x%lx busy\n", dev->name, dev->base_addr);
860 if ((u = yam_check_uart(dev->base_addr)) == c_uart_unknown) {
861 printk(KERN_ERR "%s: cannot find uart type\n", dev->name);
863 goto out_release_base;
865 if (fpga_download(dev->base_addr, yp->bitrate)) {
866 printk(KERN_ERR "%s: cannot init FPGA\n", dev->name);
868 goto out_release_base;
870 outb(0, IER(dev->base_addr));
871 if (request_irq(dev->irq, yam_interrupt, IRQF_DISABLED | IRQF_SHARED, dev->name, dev)) {
872 printk(KERN_ERR "%s: irq %d busy\n", dev->name, dev->irq);
874 goto out_release_base;
879 netif_start_queue(dev);
881 yp->slotcnt = yp->slot / 10;
883 /* Reset overruns for all ports - FPGA programming makes overruns */
884 for (i = 0; i < NR_PORTS; i++) {
885 struct net_device *dev = yam_devs[i];
886 struct yam_port *yp = netdev_priv(dev);
887 inb(LSR(dev->base_addr));
888 yp->stats.rx_fifo_errors = 0;
891 printk(KERN_INFO "%s at iobase 0x%lx irq %u uart %s\n", dev->name, dev->base_addr, dev->irq,
896 release_region(dev->base_addr, YAM_EXTENT);
900 /* --------------------------------------------------------------------- */
902 static int yam_close(struct net_device *dev)
905 struct yam_port *yp = netdev_priv(dev);
913 outb(0, IER(dev->base_addr));
914 outb(1, MCR(dev->base_addr));
915 /* Remove IRQ handler if last */
916 free_irq(dev->irq,dev);
917 release_region(dev->base_addr, YAM_EXTENT);
918 netif_stop_queue(dev);
919 while ((skb = skb_dequeue(&yp->send_queue)))
922 printk(KERN_INFO "%s: close yam at iobase 0x%lx irq %u\n",
923 yam_drvname, dev->base_addr, dev->irq);
927 /* --------------------------------------------------------------------- */
929 static int yam_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
931 struct yam_port *yp = netdev_priv(dev);
932 struct yamdrv_ioctl_cfg yi;
933 struct yamdrv_ioctl_mcs *ym;
936 if (copy_from_user(&ioctl_cmd, ifr->ifr_data, sizeof(int)))
939 if (yp->magic != YAM_MAGIC)
942 if (!capable(CAP_NET_ADMIN))
945 if (cmd != SIOCDEVPRIVATE)
950 case SIOCYAMRESERVED:
951 return -EINVAL; /* unused */
954 if (netif_running(dev))
955 return -EINVAL; /* Cannot change this parameter when up */
956 if ((ym = kmalloc(sizeof(struct yamdrv_ioctl_mcs), GFP_KERNEL)) == NULL)
959 if (copy_from_user(ym, ifr->ifr_data, sizeof(struct yamdrv_ioctl_mcs))) {
963 if (ym->bitrate > YAM_MAXBITRATE) {
967 add_mcs(ym->bits, ym->bitrate);
972 if (!capable(CAP_SYS_RAWIO))
974 if (copy_from_user(&yi, ifr->ifr_data, sizeof(struct yamdrv_ioctl_cfg)))
977 if ((yi.cfg.mask & YAM_IOBASE) && netif_running(dev))
978 return -EINVAL; /* Cannot change this parameter when up */
979 if ((yi.cfg.mask & YAM_IRQ) && netif_running(dev))
980 return -EINVAL; /* Cannot change this parameter when up */
981 if ((yi.cfg.mask & YAM_BITRATE) && netif_running(dev))
982 return -EINVAL; /* Cannot change this parameter when up */
983 if ((yi.cfg.mask & YAM_BAUDRATE) && netif_running(dev))
984 return -EINVAL; /* Cannot change this parameter when up */
986 if (yi.cfg.mask & YAM_IOBASE) {
987 yp->iobase = yi.cfg.iobase;
988 dev->base_addr = yi.cfg.iobase;
990 if (yi.cfg.mask & YAM_IRQ) {
993 yp->irq = yi.cfg.irq;
994 dev->irq = yi.cfg.irq;
996 if (yi.cfg.mask & YAM_BITRATE) {
997 if (yi.cfg.bitrate > YAM_MAXBITRATE)
999 yp->bitrate = yi.cfg.bitrate;
1001 if (yi.cfg.mask & YAM_BAUDRATE) {
1002 if (yi.cfg.baudrate > YAM_MAXBAUDRATE)
1004 yp->baudrate = yi.cfg.baudrate;
1006 if (yi.cfg.mask & YAM_MODE) {
1007 if (yi.cfg.mode > YAM_MAXMODE)
1009 yp->dupmode = yi.cfg.mode;
1011 if (yi.cfg.mask & YAM_HOLDDLY) {
1012 if (yi.cfg.holddly > YAM_MAXHOLDDLY)
1014 yp->holdd = yi.cfg.holddly;
1016 if (yi.cfg.mask & YAM_TXDELAY) {
1017 if (yi.cfg.txdelay > YAM_MAXTXDELAY)
1019 yp->txd = yi.cfg.txdelay;
1021 if (yi.cfg.mask & YAM_TXTAIL) {
1022 if (yi.cfg.txtail > YAM_MAXTXTAIL)
1024 yp->txtail = yi.cfg.txtail;
1026 if (yi.cfg.mask & YAM_PERSIST) {
1027 if (yi.cfg.persist > YAM_MAXPERSIST)
1029 yp->pers = yi.cfg.persist;
1031 if (yi.cfg.mask & YAM_SLOTTIME) {
1032 if (yi.cfg.slottime > YAM_MAXSLOTTIME)
1034 yp->slot = yi.cfg.slottime;
1035 yp->slotcnt = yp->slot / 10;
1040 yi.cfg.mask = 0xffffffff;
1041 yi.cfg.iobase = yp->iobase;
1042 yi.cfg.irq = yp->irq;
1043 yi.cfg.bitrate = yp->bitrate;
1044 yi.cfg.baudrate = yp->baudrate;
1045 yi.cfg.mode = yp->dupmode;
1046 yi.cfg.txdelay = yp->txd;
1047 yi.cfg.holddly = yp->holdd;
1048 yi.cfg.txtail = yp->txtail;
1049 yi.cfg.persist = yp->pers;
1050 yi.cfg.slottime = yp->slot;
1051 if (copy_to_user(ifr->ifr_data, &yi, sizeof(struct yamdrv_ioctl_cfg)))
1063 /* --------------------------------------------------------------------- */
1065 static int yam_set_mac_address(struct net_device *dev, void *addr)
1067 struct sockaddr *sa = (struct sockaddr *) addr;
1069 /* addr is an AX.25 shifted ASCII mac address */
1070 memcpy(dev->dev_addr, sa->sa_data, dev->addr_len);
1074 /* --------------------------------------------------------------------- */
1076 static void yam_setup(struct net_device *dev)
1078 struct yam_port *yp = netdev_priv(dev);
1080 yp->magic = YAM_MAGIC;
1081 yp->bitrate = DEFAULT_BITRATE;
1082 yp->baudrate = DEFAULT_BITRATE * 2;
1086 yp->holdd = DEFAULT_HOLDD;
1087 yp->txd = DEFAULT_TXD;
1088 yp->txtail = DEFAULT_TXTAIL;
1089 yp->slot = DEFAULT_SLOT;
1090 yp->pers = DEFAULT_PERS;
1093 dev->base_addr = yp->iobase;
1096 dev->open = yam_open;
1097 dev->stop = yam_close;
1098 dev->do_ioctl = yam_ioctl;
1099 dev->hard_start_xmit = yam_send_packet;
1100 dev->get_stats = yam_get_stats;
1102 skb_queue_head_init(&yp->send_queue);
1104 dev->hard_header = ax25_hard_header;
1105 dev->rebuild_header = ax25_rebuild_header;
1107 dev->set_mac_address = yam_set_mac_address;
1109 dev->type = ARPHRD_AX25;
1110 dev->hard_header_len = AX25_MAX_HEADER_LEN;
1111 dev->mtu = AX25_MTU;
1112 dev->addr_len = AX25_ADDR_LEN;
1113 memcpy(dev->broadcast, &ax25_bcast, AX25_ADDR_LEN);
1114 memcpy(dev->dev_addr, &ax25_defaddr, AX25_ADDR_LEN);
1117 static int __init yam_init_driver(void)
1119 struct net_device *dev;
1121 char name[IFNAMSIZ];
1123 printk(yam_drvinfo);
1125 for (i = 0; i < NR_PORTS; i++) {
1126 sprintf(name, "yam%d", i);
1128 dev = alloc_netdev(sizeof(struct yam_port), name,
1131 printk(KERN_ERR "yam: cannot allocate net device %s\n",
1137 err = register_netdev(dev);
1139 printk(KERN_WARNING "yam: cannot register net device %s\n", dev->name);
1146 yam_timer.function = yam_dotimer;
1147 yam_timer.expires = jiffies + HZ / 100;
1148 add_timer(&yam_timer);
1150 proc_net_fops_create("yam", S_IRUGO, &yam_info_fops);
1154 unregister_netdev(yam_devs[i]);
1155 free_netdev(yam_devs[i]);
1160 /* --------------------------------------------------------------------- */
1162 static void __exit yam_cleanup_driver(void)
1167 del_timer(&yam_timer);
1168 for (i = 0; i < NR_PORTS; i++) {
1169 struct net_device *dev = yam_devs[i];
1171 unregister_netdev(dev);
1178 yam_data = yam_data->next;
1182 proc_net_remove("yam");
1185 /* --------------------------------------------------------------------- */
1187 MODULE_AUTHOR("Frederic Rible F1OAT frible@teaser.fr");
1188 MODULE_DESCRIPTION("Yam amateur radio modem driver");
1189 MODULE_LICENSE("GPL");
1191 module_init(yam_init_driver);
1192 module_exit(yam_cleanup_driver);
1194 /* --------------------------------------------------------------------- */