?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
net: use NETDEV_TX_OK instead of 0 in ndo_start_xmit() functions
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / drivers / net / irda / au1k_ir.c
blob22baf65e1563ec0e4a713daaabc6edc30d4e6c98
1 /*
2 * Alchemy Semi Au1000 IrDA driver
3 *
4 * Copyright 2001 MontaVista Software Inc.
5 * Author: MontaVista Software, Inc.
6 * ppopov@mvista.com or source@mvista.com
7 *
8 * This program is free software; you can distribute it and/or modify it
9 * under the terms of the GNU General Public License (Version 2) as
10 * published by the Free Software Foundation.
11 *
12 * This program is distributed in the hope it will be useful, but WITHOUT
13 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 * for more details.
16 *
17 * You should have received a copy of the GNU General Public License along
18 * with this program; if not, write to the Free Software Foundation, Inc.,
19 * 59 Temple Place - Suite 330, Boston MA 02111-1307, USA.
20 */
21 #include <linux/module.h>
22 #include <linux/types.h>
23 #include <linux/init.h>
24 #include <linux/errno.h>
25 #include <linux/netdevice.h>
26 #include <linux/etherdevice.h>
27 #include <linux/slab.h>
28 #include <linux/rtnetlink.h>
29 #include <linux/interrupt.h>
30 #include <linux/pm.h>
31 #include <linux/bitops.h>
32
33 #include <asm/irq.h>
34 #include <asm/io.h>
35 #include <asm/au1000.h>
36 #if defined(CONFIG_MIPS_PB1000) || defined(CONFIG_MIPS_PB1100)
37 #include <asm/pb1000.h>
38 #elif defined(CONFIG_MIPS_DB1000) || defined(CONFIG_MIPS_DB1100)
39 #include <asm/db1x00.h>
40 #else
41 #error au1k_ir: unsupported board
42 #endif
43
44 #include <net/irda/irda.h>
45 #include <net/irda/irmod.h>
46 #include <net/irda/wrapper.h>
47 #include <net/irda/irda_device.h>
48 #include "au1000_ircc.h"
49
50 static int au1k_irda_net_init(struct net_device *);
51 static int au1k_irda_start(struct net_device *);
52 static int au1k_irda_stop(struct net_device *dev);
53 static int au1k_irda_hard_xmit(struct sk_buff *, struct net_device *);
54 static int au1k_irda_rx(struct net_device *);
55 static void au1k_irda_interrupt(int, void *);
56 static void au1k_tx_timeout(struct net_device *);
57 static int au1k_irda_ioctl(struct net_device *, struct ifreq *, int);
58 static int au1k_irda_set_speed(struct net_device *dev, int speed);
59
60 static void *dma_alloc(size_t, dma_addr_t *);
61 static void dma_free(void *, size_t);
62
63 static int qos_mtt_bits = 0x07; /* 1 ms or more */
64 static struct net_device *ir_devs[NUM_IR_IFF];
65 static char version[] __devinitdata =
66 "au1k_ircc:1.2 ppopov@mvista.com\n";
67
68 #define RUN_AT(x) (jiffies + (x))
69
70 #if defined(CONFIG_MIPS_DB1000) || defined(CONFIG_MIPS_DB1100)
71 static BCSR * const bcsr = (BCSR *)0xAE000000;
72 #endif
73
74 static DEFINE_SPINLOCK(ir_lock);
75
76 /*
77 * IrDA peripheral bug. You have to read the register
78 * twice to get the right value.
79 */
80 u32 read_ir_reg(u32 addr)
81 {
82 readl(addr);
83 return readl(addr);
84 }
85
86
87 /*
88 * Buffer allocation/deallocation routines. The buffer descriptor returned
89 * has the virtual and dma address of a buffer suitable for
90 * both, receive and transmit operations.
91 */
92 static db_dest_t *GetFreeDB(struct au1k_private *aup)
93 {
94 db_dest_t *pDB;
95 pDB = aup->pDBfree;
96
97 if (pDB) {
98 aup->pDBfree = pDB->pnext;
99 }
100 return pDB;
101 }
102
103 static void ReleaseDB(struct au1k_private *aup, db_dest_t *pDB)
104 {
105 db_dest_t *pDBfree = aup->pDBfree;
106 if (pDBfree)
107 pDBfree->pnext = pDB;
108 aup->pDBfree = pDB;
109 }
110
111
112 /*
113 DMA memory allocation, derived from pci_alloc_consistent.
114 However, the Au1000 data cache is coherent (when programmed
115 so), therefore we return KSEG0 address, not KSEG1.
116 */
117 static void *dma_alloc(size_t size, dma_addr_t * dma_handle)
118 {
119 void *ret;
120 int gfp = GFP_ATOMIC | GFP_DMA;
121
122 ret = (void *) __get_free_pages(gfp, get_order(size));
123
124 if (ret != NULL) {
125 memset(ret, 0, size);
126 *dma_handle = virt_to_bus(ret);
127 ret = (void *)KSEG0ADDR(ret);
128 }
129 return ret;
130 }
131
132
133 static void dma_free(void *vaddr, size_t size)
134 {
135 vaddr = (void *)KSEG0ADDR(vaddr);
136 free_pages((unsigned long) vaddr, get_order(size));
137 }
138
139
140 static void
141 setup_hw_rings(struct au1k_private *aup, u32 rx_base, u32 tx_base)
142 {
143 int i;
144 for (i=0; i<NUM_IR_DESC; i++) {
145 aup->rx_ring[i] = (volatile ring_dest_t *)
146 (rx_base + sizeof(ring_dest_t)*i);
147 }
148 for (i=0; i<NUM_IR_DESC; i++) {
149 aup->tx_ring[i] = (volatile ring_dest_t *)
150 (tx_base + sizeof(ring_dest_t)*i);
151 }
152 }
153
154 static int au1k_irda_init(void)
155 {
156 static unsigned version_printed = 0;
157 struct au1k_private *aup;
158 struct net_device *dev;
159 int err;
160
161 if (version_printed++ == 0) printk(version);
162
163 dev = alloc_irdadev(sizeof(struct au1k_private));
164 if (!dev)
165 return -ENOMEM;
166
167 dev->irq = AU1000_IRDA_RX_INT; /* TX has its own interrupt */
168 err = au1k_irda_net_init(dev);
169 if (err)
170 goto out;
171 err = register_netdev(dev);
172 if (err)
173 goto out1;
174 ir_devs[0] = dev;
175 printk(KERN_INFO "IrDA: Registered device %s\n", dev->name);
176 return 0;
177
178 out1:
179 aup = netdev_priv(dev);
180 dma_free((void *)aup->db[0].vaddr,
181 MAX_BUF_SIZE * 2*NUM_IR_DESC);
182 dma_free((void *)aup->rx_ring[0],
183 2 * MAX_NUM_IR_DESC*(sizeof(ring_dest_t)));
184 kfree(aup->rx_buff.head);
185 out:
186 free_netdev(dev);
187 return err;
188 }
189
190 static int au1k_irda_init_iobuf(iobuff_t *io, int size)
191 {
192 io->head = kmalloc(size, GFP_KERNEL);
193 if (io->head != NULL) {
194 io->truesize = size;
195 io->in_frame = FALSE;
196 io->state = OUTSIDE_FRAME;
197 io->data = io->head;
198 }
199 return io->head ? 0 : -ENOMEM;
200 }
201
202 static const struct net_device_ops au1k_irda_netdev_ops = {
203 .ndo_open = au1k_irda_start,
204 .ndo_stop = au1k_irda_stop,
205 .ndo_start_xmit = au1k_irda_hard_xmit,
206 .ndo_tx_timeout = au1k_tx_timeout,
207 .ndo_do_ioctl = au1k_irda_ioctl,
208 .ndo_change_mtu = eth_change_mtu,
209 .ndo_validate_addr = eth_validate_addr,
210 .ndo_set_mac_address = eth_mac_addr,
211 };
212
213 static int au1k_irda_net_init(struct net_device *dev)
214 {
215 struct au1k_private *aup = netdev_priv(dev);
216 int i, retval = 0, err;
217 db_dest_t *pDB, *pDBfree;
218 dma_addr_t temp;
219
220 err = au1k_irda_init_iobuf(&aup->rx_buff, 14384);
221 if (err)
222 goto out1;
223
224 dev->netdev_ops = &au1k_irda_netdev_ops;
225
226 irda_init_max_qos_capabilies(&aup->qos);
227
228 /* The only value we must override it the baudrate */
229 aup->qos.baud_rate.bits = IR_9600|IR_19200|IR_38400|IR_57600|
230 IR_115200|IR_576000 |(IR_4000000 << 8);
231
232 aup->qos.min_turn_time.bits = qos_mtt_bits;
233 irda_qos_bits_to_value(&aup->qos);
234
235 retval = -ENOMEM;
236
237 /* Tx ring follows rx ring + 512 bytes */
238 /* we need a 1k aligned buffer */
239 aup->rx_ring[0] = (ring_dest_t *)
240 dma_alloc(2*MAX_NUM_IR_DESC*(sizeof(ring_dest_t)), &temp);
241 if (!aup->rx_ring[0])
242 goto out2;
243
244 /* allocate the data buffers */
245 aup->db[0].vaddr =
246 (void *)dma_alloc(MAX_BUF_SIZE * 2*NUM_IR_DESC, &temp);
247 if (!aup->db[0].vaddr)
248 goto out3;
249
250 setup_hw_rings(aup, (u32)aup->rx_ring[0], (u32)aup->rx_ring[0] + 512);
251
252 pDBfree = NULL;
253 pDB = aup->db;
254 for (i=0; i<(2*NUM_IR_DESC); i++) {
255 pDB->pnext = pDBfree;
256 pDBfree = pDB;
257 pDB->vaddr =
258 (u32 *)((unsigned)aup->db[0].vaddr + MAX_BUF_SIZE*i);
259 pDB->dma_addr = (dma_addr_t)virt_to_bus(pDB->vaddr);
260 pDB++;
261 }
262 aup->pDBfree = pDBfree;
263
264 /* attach a data buffer to each descriptor */
265 for (i=0; i<NUM_IR_DESC; i++) {
266 pDB = GetFreeDB(aup);
267 if (!pDB) goto out;
268 aup->rx_ring[i]->addr_0 = (u8)(pDB->dma_addr & 0xff);
269 aup->rx_ring[i]->addr_1 = (u8)((pDB->dma_addr>>8) & 0xff);
270 aup->rx_ring[i]->addr_2 = (u8)((pDB->dma_addr>>16) & 0xff);
271 aup->rx_ring[i]->addr_3 = (u8)((pDB->dma_addr>>24) & 0xff);
272 aup->rx_db_inuse[i] = pDB;
273 }
274 for (i=0; i<NUM_IR_DESC; i++) {
275 pDB = GetFreeDB(aup);
276 if (!pDB) goto out;
277 aup->tx_ring[i]->addr_0 = (u8)(pDB->dma_addr & 0xff);
278 aup->tx_ring[i]->addr_1 = (u8)((pDB->dma_addr>>8) & 0xff);
279 aup->tx_ring[i]->addr_2 = (u8)((pDB->dma_addr>>16) & 0xff);
280 aup->tx_ring[i]->addr_3 = (u8)((pDB->dma_addr>>24) & 0xff);
281 aup->tx_ring[i]->count_0 = 0;
282 aup->tx_ring[i]->count_1 = 0;
283 aup->tx_ring[i]->flags = 0;
284 aup->tx_db_inuse[i] = pDB;
285 }
286
287 #if defined(CONFIG_MIPS_DB1000) || defined(CONFIG_MIPS_DB1100)
288 /* power on */
289 bcsr->resets &= ~BCSR_RESETS_IRDA_MODE_MASK;
290 bcsr->resets |= BCSR_RESETS_IRDA_MODE_FULL;
291 au_sync();
292 #endif
293
294 return 0;
295
296 out3:
297 dma_free((void *)aup->rx_ring[0],
298 2 * MAX_NUM_IR_DESC*(sizeof(ring_dest_t)));
299 out2:
300 kfree(aup->rx_buff.head);
301 out1:
302 printk(KERN_ERR "au1k_init_module failed. Returns %d\n", retval);
303 return retval;
304 }
305
306
307 static int au1k_init(struct net_device *dev)
308 {
309 struct au1k_private *aup = netdev_priv(dev);
310 int i;
311 u32 control;
312 u32 ring_address;
313
314 /* bring the device out of reset */
315 control = 0xe; /* coherent, clock enable, one half system clock */
316
317 #ifndef CONFIG_CPU_LITTLE_ENDIAN
318 control |= 1;
319 #endif
320 aup->tx_head = 0;
321 aup->tx_tail = 0;
322 aup->rx_head = 0;
323
324 for (i=0; i<NUM_IR_DESC; i++) {
325 aup->rx_ring[i]->flags = AU_OWN;
326 }
327
328 writel(control, IR_INTERFACE_CONFIG);
329 au_sync_delay(10);
330
331 writel(read_ir_reg(IR_ENABLE) & ~0x8000, IR_ENABLE); /* disable PHY */
332 au_sync_delay(1);
333
334 writel(MAX_BUF_SIZE, IR_MAX_PKT_LEN);
335
336 ring_address = (u32)virt_to_phys((void *)aup->rx_ring[0]);
337 writel(ring_address >> 26, IR_RING_BASE_ADDR_H);
338 writel((ring_address >> 10) & 0xffff, IR_RING_BASE_ADDR_L);
339
340 writel(RING_SIZE_64<<8 | RING_SIZE_64<<12, IR_RING_SIZE);
341
342 writel(1<<2 | IR_ONE_PIN, IR_CONFIG_2); /* 48MHz */
343 writel(0, IR_RING_ADDR_CMPR);
344
345 au1k_irda_set_speed(dev, 9600);
346 return 0;
347 }
348
349 static int au1k_irda_start(struct net_device *dev)
350 {
351 int retval;
352 char hwname[32];
353 struct au1k_private *aup = netdev_priv(dev);
354
355 if ((retval = au1k_init(dev))) {
356 printk(KERN_ERR "%s: error in au1k_init\n", dev->name);
357 return retval;
358 }
359
360 if ((retval = request_irq(AU1000_IRDA_TX_INT, &au1k_irda_interrupt,
361 0, dev->name, dev))) {
362 printk(KERN_ERR "%s: unable to get IRQ %d\n",
363 dev->name, dev->irq);
364 return retval;
365 }
366 if ((retval = request_irq(AU1000_IRDA_RX_INT, &au1k_irda_interrupt,
367 0, dev->name, dev))) {
368 free_irq(AU1000_IRDA_TX_INT, dev);
369 printk(KERN_ERR "%s: unable to get IRQ %d\n",
370 dev->name, dev->irq);
371 return retval;
372 }
373
374 /* Give self a hardware name */
375 sprintf(hwname, "Au1000 SIR/FIR");
376 aup->irlap = irlap_open(dev, &aup->qos, hwname);
377 netif_start_queue(dev);
378
379 writel(read_ir_reg(IR_CONFIG_2) | 1<<8, IR_CONFIG_2); /* int enable */
380
381 aup->timer.expires = RUN_AT((3*HZ));
382 aup->timer.data = (unsigned long)dev;
383 return 0;
384 }
385
386 static int au1k_irda_stop(struct net_device *dev)
387 {
388 struct au1k_private *aup = netdev_priv(dev);
389
390 /* disable interrupts */
391 writel(read_ir_reg(IR_CONFIG_2) & ~(1<<8), IR_CONFIG_2);
392 writel(0, IR_CONFIG_1);
393 writel(0, IR_INTERFACE_CONFIG); /* disable clock */
394 au_sync();
395
396 if (aup->irlap) {
397 irlap_close(aup->irlap);
398 aup->irlap = NULL;
399 }
400
401 netif_stop_queue(dev);
402 del_timer(&aup->timer);
403
404 /* disable the interrupt */
405 free_irq(AU1000_IRDA_TX_INT, dev);
406 free_irq(AU1000_IRDA_RX_INT, dev);
407 return 0;
408 }
409
410 static void __exit au1k_irda_exit(void)
411 {
412 struct net_device *dev = ir_devs[0];
413 struct au1k_private *aup = netdev_priv(dev);
414
415 unregister_netdev(dev);
416
417 dma_free((void *)aup->db[0].vaddr,
418 MAX_BUF_SIZE * 2*NUM_IR_DESC);
419 dma_free((void *)aup->rx_ring[0],
420 2 * MAX_NUM_IR_DESC*(sizeof(ring_dest_t)));
421 kfree(aup->rx_buff.head);
422 free_netdev(dev);
423 }
424
425
426 static inline void
427 update_tx_stats(struct net_device *dev, u32 status, u32 pkt_len)
428 {
429 struct au1k_private *aup = netdev_priv(dev);
430 struct net_device_stats *ps = &aup->stats;
431
432 ps->tx_packets++;
433 ps->tx_bytes += pkt_len;
434
435 if (status & IR_TX_ERROR) {
436 ps->tx_errors++;
437 ps->tx_aborted_errors++;
438 }
439 }
440
441
442 static void au1k_tx_ack(struct net_device *dev)
443 {
444 struct au1k_private *aup = netdev_priv(dev);
445 volatile ring_dest_t *ptxd;
446
447 ptxd = aup->tx_ring[aup->tx_tail];
448 while (!(ptxd->flags & AU_OWN) && (aup->tx_tail != aup->tx_head)) {
449 update_tx_stats(dev, ptxd->flags,
450 ptxd->count_1<<8 | ptxd->count_0);
451 ptxd->count_0 = 0;
452 ptxd->count_1 = 0;
453 au_sync();
454
455 aup->tx_tail = (aup->tx_tail + 1) & (NUM_IR_DESC - 1);
456 ptxd = aup->tx_ring[aup->tx_tail];
457
458 if (aup->tx_full) {
459 aup->tx_full = 0;
460 netif_wake_queue(dev);
461 }
462 }
463
464 if (aup->tx_tail == aup->tx_head) {
465 if (aup->newspeed) {
466 au1k_irda_set_speed(dev, aup->newspeed);
467 aup->newspeed = 0;
468 }
469 else {
470 writel(read_ir_reg(IR_CONFIG_1) & ~IR_TX_ENABLE,
471 IR_CONFIG_1);
472 au_sync();
473 writel(read_ir_reg(IR_CONFIG_1) | IR_RX_ENABLE,
474 IR_CONFIG_1);
475 writel(0, IR_RING_PROMPT);
476 au_sync();
477 }
478 }
479 }
480
481
482 /*
483 * Au1000 transmit routine.
484 */
485 static int au1k_irda_hard_xmit(struct sk_buff *skb, struct net_device *dev)
486 {
487 struct au1k_private *aup = netdev_priv(dev);
488 int speed = irda_get_next_speed(skb);
489 volatile ring_dest_t *ptxd;
490 u32 len;
491
492 u32 flags;
493 db_dest_t *pDB;
494
495 if (speed != aup->speed && speed != -1) {
496 aup->newspeed = speed;
497 }
498
499 if ((skb->len == 0) && (aup->newspeed)) {
500 if (aup->tx_tail == aup->tx_head) {
501 au1k_irda_set_speed(dev, speed);
502 aup->newspeed = 0;
503 }
504 dev_kfree_skb(skb);
505 return NETDEV_TX_OK;
506 }
507
508 ptxd = aup->tx_ring[aup->tx_head];
509 flags = ptxd->flags;
510
511 if (flags & AU_OWN) {
512 printk(KERN_DEBUG "%s: tx_full\n", dev->name);
513 netif_stop_queue(dev);
514 aup->tx_full = 1;
515 return NETDEV_TX_BUSY;
516 }
517 else if (((aup->tx_head + 1) & (NUM_IR_DESC - 1)) == aup->tx_tail) {
518 printk(KERN_DEBUG "%s: tx_full\n", dev->name);
519 netif_stop_queue(dev);
520 aup->tx_full = 1;
521 return NETDEV_TX_BUSY;
522 }
523
524 pDB = aup->tx_db_inuse[aup->tx_head];
525
526 #if 0
527 if (read_ir_reg(IR_RX_BYTE_CNT) != 0) {
528 printk("tx warning: rx byte cnt %x\n",
529 read_ir_reg(IR_RX_BYTE_CNT));
530 }
531 #endif
532
533 if (aup->speed == 4000000) {
534 /* FIR */
535 skb_copy_from_linear_data(skb, pDB->vaddr, skb->len);
536 ptxd->count_0 = skb->len & 0xff;
537 ptxd->count_1 = (skb->len >> 8) & 0xff;
538
539 }
540 else {
541 /* SIR */
542 len = async_wrap_skb(skb, (u8 *)pDB->vaddr, MAX_BUF_SIZE);
543 ptxd->count_0 = len & 0xff;
544 ptxd->count_1 = (len >> 8) & 0xff;
545 ptxd->flags |= IR_DIS_CRC;
546 au_writel(au_readl(0xae00000c) & ~(1<<13), 0xae00000c);
547 }
548 ptxd->flags |= AU_OWN;
549 au_sync();
550
551 writel(read_ir_reg(IR_CONFIG_1) | IR_TX_ENABLE, IR_CONFIG_1);
552 writel(0, IR_RING_PROMPT);
553 au_sync();
554
555 dev_kfree_skb(skb);
556 aup->tx_head = (aup->tx_head + 1) & (NUM_IR_DESC - 1);
557 dev->trans_start = jiffies;
558 return NETDEV_TX_OK;
559 }
560
561
562 static inline void
563 update_rx_stats(struct net_device *dev, u32 status, u32 count)
564 {
565 struct au1k_private *aup = netdev_priv(dev);
566 struct net_device_stats *ps = &aup->stats;
567
568 ps->rx_packets++;
569
570 if (status & IR_RX_ERROR) {
571 ps->rx_errors++;
572 if (status & (IR_PHY_ERROR|IR_FIFO_OVER))
573 ps->rx_missed_errors++;
574 if (status & IR_MAX_LEN)
575 ps->rx_length_errors++;
576 if (status & IR_CRC_ERROR)
577 ps->rx_crc_errors++;
578 }
579 else
580 ps->rx_bytes += count;
581 }
582
583 /*
584 * Au1000 receive routine.
585 */
586 static int au1k_irda_rx(struct net_device *dev)
587 {
588 struct au1k_private *aup = netdev_priv(dev);
589 struct sk_buff *skb;
590 volatile ring_dest_t *prxd;
591 u32 flags, count;
592 db_dest_t *pDB;
593
594 prxd = aup->rx_ring[aup->rx_head];
595 flags = prxd->flags;
596
597 while (!(flags & AU_OWN)) {
598 pDB = aup->rx_db_inuse[aup->rx_head];
599 count = prxd->count_1<<8 | prxd->count_0;
600 if (!(flags & IR_RX_ERROR)) {
601 /* good frame */
602 update_rx_stats(dev, flags, count);
603 skb=alloc_skb(count+1,GFP_ATOMIC);
604 if (skb == NULL) {
605 aup->netdev->stats.rx_dropped++;
606 continue;
607 }
608 skb_reserve(skb, 1);
609 if (aup->speed == 4000000)
610 skb_put(skb, count);
611 else
612 skb_put(skb, count-2);
613 skb_copy_to_linear_data(skb, pDB->vaddr, count - 2);
614 skb->dev = dev;
615 skb_reset_mac_header(skb);
616 skb->protocol = htons(ETH_P_IRDA);
617 netif_rx(skb);
618 prxd->count_0 = 0;
619 prxd->count_1 = 0;
620 }
621 prxd->flags |= AU_OWN;
622 aup->rx_head = (aup->rx_head + 1) & (NUM_IR_DESC - 1);
623 writel(0, IR_RING_PROMPT);
624 au_sync();
625
626 /* next descriptor */
627 prxd = aup->rx_ring[aup->rx_head];
628 flags = prxd->flags;
629
630 }
631 return 0;
632 }
633
634
635 static irqreturn_t au1k_irda_interrupt(int dummy, void *dev_id)
636 {
637 struct net_device *dev = dev_id;
638
639 writel(0, IR_INT_CLEAR); /* ack irda interrupts */
640
641 au1k_irda_rx(dev);
642 au1k_tx_ack(dev);
643
644 return IRQ_HANDLED;
645 }
646
647
648 /*
649 * The Tx ring has been full longer than the watchdog timeout
650 * value. The transmitter must be hung?
651 */
652 static void au1k_tx_timeout(struct net_device *dev)
653 {
654 u32 speed;
655 struct au1k_private *aup = netdev_priv(dev);
656
657 printk(KERN_ERR "%s: tx timeout\n", dev->name);
658 speed = aup->speed;
659 aup->speed = 0;
660 au1k_irda_set_speed(dev, speed);
661 aup->tx_full = 0;
662 netif_wake_queue(dev);
663 }
664
665
666 /*
667 * Set the IrDA communications speed.
668 */
669 static int
670 au1k_irda_set_speed(struct net_device *dev, int speed)
671 {
672 unsigned long flags;
673 struct au1k_private *aup = netdev_priv(dev);
674 u32 control;
675 int ret = 0, timeout = 10, i;
676 volatile ring_dest_t *ptxd;
677 #if defined(CONFIG_MIPS_DB1000) || defined(CONFIG_MIPS_DB1100)
678 unsigned long irda_resets;
679 #endif
680
681 if (speed == aup->speed)
682 return ret;
683
684 spin_lock_irqsave(&ir_lock, flags);
685
686 /* disable PHY first */
687 writel(read_ir_reg(IR_ENABLE) & ~0x8000, IR_ENABLE);
688
689 /* disable RX/TX */
690 writel(read_ir_reg(IR_CONFIG_1) & ~(IR_RX_ENABLE|IR_TX_ENABLE),
691 IR_CONFIG_1);
692 au_sync_delay(1);
693 while (read_ir_reg(IR_ENABLE) & (IR_RX_STATUS | IR_TX_STATUS)) {
694 mdelay(1);
695 if (!timeout--) {
696 printk(KERN_ERR "%s: rx/tx disable timeout\n",
697 dev->name);
698 break;
699 }
700 }
701
702 /* disable DMA */
703 writel(read_ir_reg(IR_CONFIG_1) & ~IR_DMA_ENABLE, IR_CONFIG_1);
704 au_sync_delay(1);
705
706 /*
707 * After we disable tx/rx. the index pointers
708 * go back to zero.
709 */
710 aup->tx_head = aup->tx_tail = aup->rx_head = 0;
711 for (i=0; i<NUM_IR_DESC; i++) {
712 ptxd = aup->tx_ring[i];
713 ptxd->flags = 0;
714 ptxd->count_0 = 0;
715 ptxd->count_1 = 0;
716 }
717
718 for (i=0; i<NUM_IR_DESC; i++) {
719 ptxd = aup->rx_ring[i];
720 ptxd->count_0 = 0;
721 ptxd->count_1 = 0;
722 ptxd->flags = AU_OWN;
723 }
724
725 if (speed == 4000000) {
726 #if defined(CONFIG_MIPS_DB1000) || defined(CONFIG_MIPS_DB1100)
727 bcsr->resets |= BCSR_RESETS_FIR_SEL;
728 #else /* Pb1000 and Pb1100 */
729 writel(1<<13, CPLD_AUX1);
730 #endif
731 }
732 else {
733 #if defined(CONFIG_MIPS_DB1000) || defined(CONFIG_MIPS_DB1100)
734 bcsr->resets &= ~BCSR_RESETS_FIR_SEL;
735 #else /* Pb1000 and Pb1100 */
736 writel(readl(CPLD_AUX1) & ~(1<<13), CPLD_AUX1);
737 #endif
738 }
739
740 switch (speed) {
741 case 9600:
742 writel(11<<10 | 12<<5, IR_WRITE_PHY_CONFIG);
743 writel(IR_SIR_MODE, IR_CONFIG_1);
744 break;
745 case 19200:
746 writel(5<<10 | 12<<5, IR_WRITE_PHY_CONFIG);
747 writel(IR_SIR_MODE, IR_CONFIG_1);
748 break;
749 case 38400:
750 writel(2<<10 | 12<<5, IR_WRITE_PHY_CONFIG);
751 writel(IR_SIR_MODE, IR_CONFIG_1);
752 break;
753 case 57600:
754 writel(1<<10 | 12<<5, IR_WRITE_PHY_CONFIG);
755 writel(IR_SIR_MODE, IR_CONFIG_1);
756 break;
757 case 115200:
758 writel(12<<5, IR_WRITE_PHY_CONFIG);
759 writel(IR_SIR_MODE, IR_CONFIG_1);
760 break;
761 case 4000000:
762 writel(0xF, IR_WRITE_PHY_CONFIG);
763 writel(IR_FIR|IR_DMA_ENABLE|IR_RX_ENABLE, IR_CONFIG_1);
764 break;
765 default:
766 printk(KERN_ERR "%s unsupported speed %x\n", dev->name, speed);
767 ret = -EINVAL;
768 break;
769 }
770
771 aup->speed = speed;
772 writel(read_ir_reg(IR_ENABLE) | 0x8000, IR_ENABLE);
773 au_sync();
774
775 control = read_ir_reg(IR_ENABLE);
776 writel(0, IR_RING_PROMPT);
777 au_sync();
778
779 if (control & (1<<14)) {
780 printk(KERN_ERR "%s: configuration error\n", dev->name);
781 }
782 else {
783 if (control & (1<<11))
784 printk(KERN_DEBUG "%s Valid SIR config\n", dev->name);
785 if (control & (1<<12))
786 printk(KERN_DEBUG "%s Valid MIR config\n", dev->name);
787 if (control & (1<<13))
788 printk(KERN_DEBUG "%s Valid FIR config\n", dev->name);
789 if (control & (1<<10))
790 printk(KERN_DEBUG "%s TX enabled\n", dev->name);
791 if (control & (1<<9))
792 printk(KERN_DEBUG "%s RX enabled\n", dev->name);
793 }
794
795 spin_unlock_irqrestore(&ir_lock, flags);
796 return ret;
797 }
798
799 static int
800 au1k_irda_ioctl(struct net_device *dev, struct ifreq *ifreq, int cmd)
801 {
802 struct if_irda_req *rq = (struct if_irda_req *)ifreq;
803 struct au1k_private *aup = netdev_priv(dev);
804 int ret = -EOPNOTSUPP;
805
806 switch (cmd) {
807 case SIOCSBANDWIDTH:
808 if (capable(CAP_NET_ADMIN)) {
809 /*
810 * We are unable to set the speed if the
811 * device is not running.
812 */
813 if (aup->open)
814 ret = au1k_irda_set_speed(dev,
815 rq->ifr_baudrate);
816 else {
817 printk(KERN_ERR "%s ioctl: !netif_running\n",
818 dev->name);
819 ret = 0;
820 }
821 }
822 break;
823
824 case SIOCSMEDIABUSY:
825 ret = -EPERM;
826 if (capable(CAP_NET_ADMIN)) {
827 irda_device_set_media_busy(dev, TRUE);
828 ret = 0;
829 }
830 break;
831
832 case SIOCGRECEIVING:
833 rq->ifr_receiving = 0;
834 break;
835 default:
836 break;
837 }
838 return ret;
839 }
840
841 MODULE_AUTHOR("Pete Popov <ppopov@mvista.com>");
842 MODULE_DESCRIPTION("Au1000 IrDA Device Driver");
843
844 module_init(au1k_irda_init);
845 module_exit(au1k_irda_exit);
Linux 2.6 ibm-acpi/thinkpad-acpi driver git tree