?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Import 2.3.18pre1
[davej-history.git] / drivers / net / arlan.c
blob15ccecb2f27d34df3a49c4752048107a04f2a473
1 /*
2 * Copyright (C) 1997 Cullen Jennings
3 * Copyright (C) 1998 Elmer.Joandi@ut.ee, +37-255-13500
4 * Gnu Public License applies
5 * This module provides support for the Arlan 655 card made by Aironet
6 */
7
8 #include <linux/config.h>
9 #include "arlan.h"
10
11 static const char *arlan_version = "C.Jennigs 97 & Elmer.Joandi@ut.ee Oct'98, http://www.ylenurme.ee/~elmer/655/";
12
13 struct net_device *arlan_device[MAX_ARLANS];
14 int last_arlan = 0;
15
16 static int SID = SIDUNKNOWN;
17 static int radioNodeId = radioNodeIdUNKNOWN;
18 static char encryptionKey[12] = {'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h'};
19 static char *siteName = siteNameUNKNOWN;
20 static int irq = irqUNKNOWN;
21 static int mem = memUNKNOWN;
22 static int arlan_debug = debugUNKNOWN;
23 static int probe = probeUNKNOWN;
24 static int numDevices = numDevicesUNKNOWN;
25 static int testMemory = testMemoryUNKNOWN;
26 static int spreadingCode = spreadingCodeUNKNOWN;
27 static int channelNumber = channelNumberUNKNOWN;
28 static int channelSet = channelSetUNKNOWN;
29 static int systemId = systemIdUNKNOWN;
30 static int registrationMode = registrationModeUNKNOWN;
31 static int txScrambled = 1;
32 static int keyStart = 0;
33 static int mdebug = 0;
34 static int tx_delay_ms = 0;
35 static int retries = 5;
36 static int async = 1;
37 static int tx_queue_len = 1;
38 static int arlan_entry_debug = 0;
39 static int arlan_exit_debug = 0;
40 static int arlan_entry_and_exit_debug = 0;
41 static int arlan_EEPROM_bad = 0;
42
43 #if LINUX_VERSION_CODE > 0x20100
44 MODULE_PARM(irq, "i");
45 MODULE_PARM(mem, "i");
46 MODULE_PARM(probe, "i");
47 MODULE_PARM(arlan_debug, "i");
48 MODULE_PARM(numDevices, "i");
49 MODULE_PARM(testMemory, "i");
50 MODULE_PARM(spreadingCode, "i");
51 MODULE_PARM(channelNumber, "i");
52 MODULE_PARM(channelSet, "i");
53 MODULE_PARM(systemId, "i");
54 MODULE_PARM(registrationMode, "i");
55 MODULE_PARM(radioNodeId, "i");
56 MODULE_PARM(SID, "i");
57 MODULE_PARM(txScrambled, "i");
58 MODULE_PARM(keyStart, "i");
59 MODULE_PARM(mdebug, "i");
60 MODULE_PARM(tx_delay_ms, "i");
61 MODULE_PARM(retries, "i");
62 MODULE_PARM(async, "i");
63 MODULE_PARM(tx_queue_len, "i");
64 MODULE_PARM(arlan_entry_debug, "i");
65 MODULE_PARM(arlan_exit_debug, "i");
66 MODULE_PARM(arlan_entry_and_exit_debug, "i");
67 MODULE_PARM(arlan_EEPROM_bad, "i");
68
69 EXPORT_SYMBOL(arlan_device);
70 EXPORT_SYMBOL(last_arlan);
71
72
73 // #warning kernel 2.1.110 tested
74 #define myATOMIC_INIT(a,b) atomic_set(&(a),b)
75
76 #else
77 #define test_and_set_bit set_bit
78 #if LINUX_VERSION_CODE != 0x20024
79 // #warning kernel 2.0.36 tested
80 #endif
81 #define myATOMIC_INIT(a,b) a = b;
82
83 #endif
84
85 struct arlan_conf_stru arlan_conf[MAX_ARLANS];
86 int arlans_found = 0;
87
88 static int arlan_probe_here(struct net_device *dev, int ioaddr);
89 static int arlan_open(struct net_device *dev);
90 static int arlan_tx(struct sk_buff *skb, struct net_device *dev);
91 static void arlan_interrupt(int irq, void *dev_id, struct pt_regs *regs);
92 static int arlan_close(struct net_device *dev);
93 static struct enet_statistics *
94 arlan_statistics (struct net_device *dev);
95 static void arlan_set_multicast (struct net_device *dev);
96 static int arlan_hw_tx (struct net_device* dev, char *buf, int length );
97 static int arlan_hw_config (struct net_device * dev);
98 static void arlan_tx_done_interrupt (struct net_device * dev, int status);
99 static void arlan_rx_interrupt (struct net_device * dev, u_char rxStatus, u_short, u_short);
100 static void arlan_process_interrupt (struct net_device * dev);
101 static int arlan_command(struct net_device * dev, int command);
102
103 EXPORT_SYMBOL(arlan_command);
104
105 extern inline long long arlan_time(void)
106 {
107 struct timeval timev;
108 do_gettimeofday(&timev);
109 return ((long long) timev.tv_sec * 1000000 + timev.tv_usec);
110 };
111
112 #ifdef ARLAN_ENTRY_EXIT_DEBUGING
113 #define ARLAN_DEBUG_ENTRY(name) \
114 {\
115 struct timeval timev;\
116 do_gettimeofday(&timev);\
117 if (arlan_entry_debug || arlan_entry_and_exit_debug)\
118 printk("--->>>" name " %ld " "\n",((long int) timev.tv_sec * 1000000 + timev.tv_usec));\
119 }
120 #define ARLAN_DEBUG_EXIT(name) \
121 {\
122 struct timeval timev;\
123 do_gettimeofday(&timev);\
124 if (arlan_exit_debug || arlan_entry_and_exit_debug)\
125 printk("<<<---" name " %ld " "\n",((long int) timev.tv_sec * 1000000 + timev.tv_usec) );\
126 }
127 #else
128 #define ARLAN_DEBUG_ENTRY(name)
129 #define ARLAN_DEBUG_EXIT(name)
130 #endif
131
132
133 #define arlan_interrupt_ack(dev)\
134 clearClearInterrupt(dev);\
135 setClearInterrupt(dev);
136
137
138 #define ARLAN_COMMAND_LOCK(dev) \
139 if (atomic_dec_and_test(&((struct arlan_private * )dev->priv)->card_users))\
140 arlan_wait_command_complete_short(dev,__LINE__);
141 #define ARLAN_COMMAND_UNLOCK(dev) \
142 atomic_inc(&((struct arlan_private * )dev->priv)->card_users);
143
144
145 #define ARLAN_COMMAND_INC(dev) \
146 {((struct arlan_private *) dev->priv)->under_command++;}
147 #define ARLAN_COMMAND_ZERO(dev) \
148 {((struct arlan_private *) dev->priv)->under_command =0;}
149 #define ARLAN_UNDER_COMMAND(dev)\
150 (((struct arlan_private *) dev->priv)->under_command)
151
152 #define ARLAN_COMMAND_START(dev) ARLAN_COMMAND_INC(dev)
153 #define ARLAN_COMMAND_END(dev) ARLAN_COMMAND_ZERO(dev)
154 #define ARLAN_TOGGLE_START(dev)\
155 {((struct arlan_private *) dev->priv)->under_toggle++;}
156 #define ARLAN_TOGGLE_END(dev)\
157 {((struct arlan_private *) dev->priv)->under_toggle=0;}
158 #define ARLAN_UNDER_TOGGLE(dev)\
159 (((struct arlan_private *) dev->priv)->under_toggle)
160
161
162
163 extern inline int arlan_drop_tx(struct net_device *dev)
164 {
165 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
166
167 priv->stats.tx_errors++;
168 if (priv->Conf->tx_delay_ms)
169 {
170 priv->tx_done_delayed = jiffies + priv->Conf->tx_delay_ms * HZ / 1000 + 1;
171 }
172 else
173 {
174 priv->waiting_command_mask &= ~ARLAN_COMMAND_TX;
175 TXHEAD(dev).offset = 0;
176 TXTAIL(dev).offset = 0;
177 priv->txLast = 0;
178 priv->txOffset = 0;
179 priv->bad = 0;
180 if (!priv->under_reset && !priv->under_config)
181 {
182 dev->tbusy = 0;
183 mark_bh(NET_BH);
184 }
185 }
186 return 1;
187 };
188
189
190 static int arlan_command(struct net_device *dev, int command_p)
191 {
192
193 volatile struct arlan_shmem *arlan = ((struct arlan_private *) dev->priv)->card;
194 struct arlan_conf_stru *conf = ((struct arlan_private *) dev->priv)->Conf;
195 struct arlan_private *priv = (struct arlan_private *) dev->priv;
196 int udelayed = 0;
197 int i = 0;
198 long long time_mks = arlan_time();
199
200 ARLAN_DEBUG_ENTRY("arlan_command");
201
202 if (priv->card_polling_interval)
203 priv->card_polling_interval = 1;
204
205 if (arlan_debug & ARLAN_DEBUG_CHAIN_LOCKS)
206 printk(KERN_DEBUG "arlan_command, %lx lock %x commandByte %x waiting %x incoming %x \n",
207 jiffies, priv->command_lock, READSHMB(arlan->commandByte),
208 priv->waiting_command_mask, command_p);
209
210 priv->waiting_command_mask |= command_p;
211
212 if (priv->waiting_command_mask & ARLAN_COMMAND_RESET)
213 if (jiffies - priv->lastReset < 5 * HZ)
214 priv->waiting_command_mask &= ~ARLAN_COMMAND_RESET;
215
216 if (priv->waiting_command_mask & ARLAN_COMMAND_INT_ACK)
217 {
218 arlan_interrupt_ack(dev);
219 priv->waiting_command_mask &= ~ARLAN_COMMAND_INT_ACK;
220 }
221 if (priv->waiting_command_mask & ARLAN_COMMAND_INT_ENABLE)
222 {
223 setInterruptEnable(dev);
224 priv->waiting_command_mask &= ~ARLAN_COMMAND_INT_ENABLE;
225 }
226
227 /* Card access serializing lock */
228
229 if (test_and_set_bit(0, (void *) &priv->command_lock))
230 {
231 if (arlan_debug & ARLAN_DEBUG_CHAIN_LOCKS)
232 printk(KERN_DEBUG "arlan_command: entered when command locked \n");
233 goto command_busy_end;
234 }
235 /* Check cards status and waiting */
236
237 if (priv->waiting_command_mask & (ARLAN_COMMAND_LONG_WAIT_NOW | ARLAN_COMMAND_WAIT_NOW))
238 {
239 while (priv->waiting_command_mask & (ARLAN_COMMAND_LONG_WAIT_NOW | ARLAN_COMMAND_WAIT_NOW))
240 {
241 if (READSHMB(arlan->resetFlag) ||
242 READSHMB(arlan->commandByte)) /* ||
243 (readControlRegister(dev) & ARLAN_ACCESS))
244 */
245 udelay(40);
246 else
247 priv->waiting_command_mask &= ~(ARLAN_COMMAND_LONG_WAIT_NOW | ARLAN_COMMAND_WAIT_NOW);
248
249 udelayed++;
250
251 if (priv->waiting_command_mask & ARLAN_COMMAND_LONG_WAIT_NOW)
252 {
253 if (udelayed * 40 > 1000000)
254 {
255 printk(KERN_ERR "%s long wait too long \n", dev->name);
256 priv->waiting_command_mask |= ARLAN_COMMAND_RESET;
257 break;
258 }
259 }
260 else if (priv->waiting_command_mask & ARLAN_COMMAND_WAIT_NOW)
261 {
262 if (udelayed * 40 > 1000)
263 {
264 printk(KERN_ERR "%s short wait too long \n", dev->name);
265 goto bad_end;
266 }
267 }
268 }
269 }
270 else
271 {
272 i = 0;
273 while ((READSHMB(arlan->resetFlag) ||
274 READSHMB(arlan->commandByte)) &&
275 conf->pre_Command_Wait > (i++) * 10)
276 udelay(10);
277
278
279 if ((READSHMB(arlan->resetFlag) ||
280 READSHMB(arlan->commandByte)) &&
281 !(priv->waiting_command_mask & ARLAN_COMMAND_RESET))
282 {
283 goto card_busy_end;
284 }
285 }
286 if (priv->waiting_command_mask & ARLAN_COMMAND_RESET)
287 {
288 priv->under_reset = 1;
289 dev->start = 0;
290 }
291 if (priv->waiting_command_mask & ARLAN_COMMAND_CONF)
292 {
293 priv->under_config = 1;
294 dev->start = 0;
295 }
296
297 /* Issuing command */
298 arlan_lock_card_access(dev);
299 if (priv->waiting_command_mask & ARLAN_COMMAND_POWERUP)
300 {
301 // if (readControlRegister(dev) & (ARLAN_ACCESS && ARLAN_POWER))
302 setPowerOn(dev);
303 arlan_interrupt_lancpu(dev);
304 priv->waiting_command_mask &= ~ARLAN_COMMAND_POWERUP;
305 priv->waiting_command_mask |= ARLAN_COMMAND_RESET;
306 priv->card_polling_interval = HZ / 10;
307 }
308 else if (priv->waiting_command_mask & ARLAN_COMMAND_ACTIVATE)
309 {
310 WRITESHMB(arlan->commandByte, ARLAN_COM_ACTIVATE);
311 arlan_interrupt_lancpu(dev);
312 priv->waiting_command_mask &= ~ARLAN_COMMAND_ACTIVATE;
313 priv->card_polling_interval = HZ / 10;
314 }
315 else if (priv->waiting_command_mask & ARLAN_COMMAND_RX_ABORT)
316 {
317 if (priv->rx_command_given)
318 {
319 WRITESHMB(arlan->commandByte, ARLAN_COM_RX_ABORT);
320 arlan_interrupt_lancpu(dev);
321 priv->rx_command_given = 0;
322 }
323 priv->waiting_command_mask &= ~ARLAN_COMMAND_RX_ABORT;
324 priv->card_polling_interval = 1;
325 }
326 else if (priv->waiting_command_mask & ARLAN_COMMAND_TX_ABORT)
327 {
328 if (priv->tx_command_given)
329 {
330 WRITESHMB(arlan->commandByte, ARLAN_COM_TX_ABORT);
331 arlan_interrupt_lancpu(dev);
332 priv->tx_command_given = 0;
333 }
334 priv->waiting_command_mask &= ~ARLAN_COMMAND_TX_ABORT;
335 priv->card_polling_interval = 1;
336 }
337 else if (priv->waiting_command_mask & ARLAN_COMMAND_RESET)
338 {
339 arlan_drop_tx(dev);
340 if (priv->tx_command_given || priv->rx_command_given)
341 {
342 printk(KERN_ERR "%s: Reset under tx or rx command \n", dev->name);
343 };
344 if (arlan_debug & ARLAN_DEBUG_RESET)
345 printk(KERN_ERR "%s: Doing chip reset\n", dev->name);
346 priv->lastReset = jiffies;
347 WRITESHM(arlan->commandByte, 0, u_char);
348 /* hold card in reset state */
349 setHardwareReset(dev);
350 /* set reset flag and then release reset */
351 WRITESHM(arlan->resetFlag, 0xff, u_char);
352 clearChannelAttention(dev);
353 clearHardwareReset(dev);
354 priv->numResets++;
355 priv->card_polling_interval = HZ / 4;
356 priv->waiting_command_mask &= ~ARLAN_COMMAND_RESET;
357 priv->waiting_command_mask |= ARLAN_COMMAND_INT_RACK;
358 // priv->waiting_command_mask |= ARLAN_COMMAND_INT_RENABLE;
359 // priv->waiting_command_mask |= ARLAN_COMMAND_RX;
360 }
361 else if (priv->waiting_command_mask & ARLAN_COMMAND_INT_RACK)
362 {
363 clearHardwareReset(dev);
364 clearClearInterrupt(dev);
365 setClearInterrupt(dev);
366 setInterruptEnable(dev);
367 priv->waiting_command_mask &= ~ARLAN_COMMAND_INT_RACK;
368 priv->waiting_command_mask |= ARLAN_COMMAND_CONF;
369 priv->under_config = 1;
370 priv->under_reset = 0;
371 }
372 else if (priv->waiting_command_mask & ARLAN_COMMAND_INT_RENABLE)
373 {
374 setInterruptEnable(dev);
375 priv->waiting_command_mask &= ~ARLAN_COMMAND_INT_RENABLE;
376 }
377 else if (priv->waiting_command_mask & ARLAN_COMMAND_CONF)
378 {
379 if (priv->tx_command_given || priv->rx_command_given)
380 {
381 printk(KERN_ERR "%s: Reset under tx or rx command \n", dev->name);
382 }
383 dev->start = 0;
384 arlan_drop_tx(dev);
385 setInterruptEnable(dev);
386 arlan_hw_config(dev);
387 arlan_interrupt_lancpu(dev);
388 priv->waiting_command_mask &= ~ARLAN_COMMAND_CONF;
389 priv->card_polling_interval = HZ / 10;
390 // priv->waiting_command_mask |= ARLAN_COMMAND_INT_RACK;
391 // priv->waiting_command_mask |= ARLAN_COMMAND_INT_ENABLE;
392 priv->waiting_command_mask |= ARLAN_COMMAND_CONF_WAIT;
393 }
394 else if (priv->waiting_command_mask & ARLAN_COMMAND_CONF_WAIT)
395 {
396 if (READSHMB(arlan->configuredStatusFlag) != 0 &&
397 READSHMB(arlan->diagnosticInfo) == 0xff)
398 {
399 priv->waiting_command_mask &= ~ARLAN_COMMAND_CONF_WAIT;
400 priv->waiting_command_mask |= ARLAN_COMMAND_RX;
401 priv->card_polling_interval = HZ / 10;
402 priv->tx_command_given = 0;
403 priv->under_config = 0;
404 if (dev->tbusy || !dev->start)
405 {
406 dev->tbusy = 0;
407 dev->start = 1;
408 mark_bh(NET_BH);
409 };
410 }
411 else
412 {
413 priv->card_polling_interval = 1;
414 if (arlan_debug & ARLAN_DEBUG_TIMING)
415 printk(KERN_ERR "configure delayed \n");
416 }
417 }
418 else if (priv->waiting_command_mask & ARLAN_COMMAND_RX)
419 {
420 if (!registrationBad(dev))
421 {
422 setInterruptEnable(dev);
423 memset_io((void *) arlan->commandParameter, 0, 0xf);
424 WRITESHMB(arlan->commandByte, ARLAN_COM_INT | ARLAN_COM_RX_ENABLE);
425 WRITESHMB(arlan->commandParameter[0], conf->rxParameter);
426 arlan_interrupt_lancpu(dev);
427 priv->rx_command_given;
428 priv->last_rx_time = arlan_time();
429 priv->waiting_command_mask &= ~ARLAN_COMMAND_RX;
430 priv->card_polling_interval = 1;
431 }
432 else
433 priv->card_polling_interval = 2;
434 }
435 else if (priv->waiting_command_mask & ARLAN_COMMAND_TX)
436 {
437 if (!test_and_set_bit(0, (void *) &priv->tx_command_given))
438 {
439 if ((time_mks - priv->last_tx_time > conf->rx_tweak1) ||
440 (time_mks - priv->last_rx_int_ack_time < conf->rx_tweak2))
441 {
442 setInterruptEnable(dev);
443 memset_io((void *) arlan->commandParameter, 0, 0xf);
444 WRITESHMB(arlan->commandByte, ARLAN_COM_TX_ENABLE | ARLAN_COM_INT);
445 memcpy_toio((void *) arlan->commandParameter, &TXLAST(dev), 14);
446 // for ( i=1 ; i < 15 ; i++) printk("%02x:",READSHMB(arlan->commandParameter[i]));
447 priv->last_command_was_rx = 0;
448 priv->tx_last_sent = jiffies;
449 arlan_interrupt_lancpu(dev);
450 priv->last_tx_time = arlan_time();
451 priv->tx_command_given = 1;
452 priv->waiting_command_mask &= ~ARLAN_COMMAND_TX;
453 priv->card_polling_interval = 1;
454 }
455 else
456 {
457 priv->tx_command_given = 0;
458 priv->card_polling_interval = 1;
459 }
460 }
461 else if (arlan_debug & ARLAN_DEBUG_CHAIN_LOCKS)
462 printk(KERN_ERR "tx command when tx chain locked \n");
463 }
464 else if (priv->waiting_command_mask & ARLAN_COMMAND_NOOPINT)
465 {
466 {
467 WRITESHMB(arlan->commandByte, ARLAN_COM_NOP | ARLAN_COM_INT);
468 }
469 arlan_interrupt_lancpu(dev);
470 priv->waiting_command_mask &= ~ARLAN_COMMAND_NOOPINT;
471 priv->card_polling_interval = HZ / 3;
472 }
473 else if (priv->waiting_command_mask & ARLAN_COMMAND_NOOP)
474 {
475 WRITESHMB(arlan->commandByte, ARLAN_COM_NOP);
476 arlan_interrupt_lancpu(dev);
477 priv->waiting_command_mask &= ~ARLAN_COMMAND_NOOP;
478 priv->card_polling_interval = HZ / 3;
479 }
480 else if (priv->waiting_command_mask & ARLAN_COMMAND_SLOW_POLL)
481 {
482 WRITESHMB(arlan->commandByte, ARLAN_COM_GOTO_SLOW_POLL);
483 arlan_interrupt_lancpu(dev);
484 priv->waiting_command_mask &= ~ARLAN_COMMAND_SLOW_POLL;
485 priv->card_polling_interval = HZ / 3;
486 }
487 else if (priv->waiting_command_mask & ARLAN_COMMAND_POWERDOWN)
488 {
489 setPowerOff(dev);
490 if (arlan_debug & ARLAN_DEBUG_CARD_STATE)
491 printk(KERN_WARNING "%s: Arlan Going Standby\n", dev->name);
492 priv->waiting_command_mask &= ~ARLAN_COMMAND_POWERDOWN;
493 priv->card_polling_interval = 3 * HZ;
494 }
495 arlan_unlock_card_access(dev);
496 for (i = 0; READSHMB(arlan->commandByte) && i < 20; i++)
497 udelay(10);
498 if (READSHMB(arlan->commandByte))
499 if (arlan_debug & ARLAN_DEBUG_CARD_STATE)
500 printk(KERN_ERR "card busy leaving command %x \n", priv->waiting_command_mask);
501
502 priv->command_lock = 0;
503 ARLAN_DEBUG_EXIT("arlan_command");
504 priv->last_command_buff_free_time = jiffies;
505 return 0;
506
507 card_busy_end:
508 if (jiffies - priv->last_command_buff_free_time > HZ)
509 priv->waiting_command_mask |= ARLAN_COMMAND_CLEAN_AND_RESET;
510
511 if (arlan_debug & ARLAN_DEBUG_CARD_STATE)
512 printk(KERN_ERR "%s arlan_command card busy end \n", dev->name);
513 priv->command_lock = 0;
514 ARLAN_DEBUG_EXIT("arlan_command");
515 return 1;
516
517 bad_end:
518 printk(KERN_ERR "%s arlan_command bad end \n", dev->name);
519
520 priv->command_lock = 0;
521 ARLAN_DEBUG_EXIT("arlan_command");
522
523 return -1;
524
525 command_busy_end:
526 if (arlan_debug & ARLAN_DEBUG_CARD_STATE)
527 printk(KERN_ERR "%s arlan_command command busy end \n", dev->name);
528 ARLAN_DEBUG_EXIT("arlan_command");
529 return 2;
530
531 };
532
533 extern inline void arlan_command_process(struct net_device *dev)
534 {
535 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
536
537 int times = 0;
538 while (priv->waiting_command_mask && times < 8)
539 {
540 if (priv->waiting_command_mask)
541 {
542 if (arlan_command(dev, 0))
543 break;
544 times++;
545 }
546 /* if long command, we wont repeat trying */ ;
547 if (priv->card_polling_interval > 1)
548 break;
549 times++;
550 }
551 }
552
553
554 extern inline void arlan_retransmit_now(struct net_device *dev)
555 {
556 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
557
558
559 ARLAN_DEBUG_ENTRY("arlan_retransmit_now");
560 if (TXLAST(dev).offset == 0)
561 {
562 if (TXHEAD(dev).offset)
563 {
564 priv->txLast = 0;
565 IFDEBUG(ARLAN_DEBUG_TX_CHAIN) printk(KERN_DEBUG "TX buff switch to head \n");
566
567 }
568 else if (TXTAIL(dev).offset)
569 {
570 IFDEBUG(ARLAN_DEBUG_TX_CHAIN) printk(KERN_DEBUG "TX buff switch to tail \n");
571 priv->txLast = 1;
572 }
573 else
574 IFDEBUG(ARLAN_DEBUG_TX_CHAIN) printk(KERN_ERR "ReTransmit buff empty");
575 priv->txOffset = 0;
576 dev->tbusy = 0;
577 mark_bh(NET_BH);
578 return;
579
580 }
581 arlan_command(dev, ARLAN_COMMAND_TX);
582
583 priv->nof_tx++;
584
585 priv->Conf->driverRetransmissions++;
586 priv->retransmissions++;
587
588 IFDEBUG(ARLAN_DEBUG_TX_CHAIN) printk("Retransmit %d bytes \n", TXLAST(dev).length);
589
590 ARLAN_DEBUG_EXIT("arlan_retransmit_now");
591 }
592
593
594
595 static void arlan_registration_timer(unsigned long data)
596 {
597 struct net_device *dev = (struct net_device *) data;
598 struct arlan_private *priv = (struct arlan_private *) dev->priv;
599
600 int lostTime = ((int) (jiffies - priv->registrationLastSeen)) * 1000 / HZ;
601 int bh_mark_needed = 0;
602 int next_tick = 1;
603
604
605 priv->timer_chain_active = 1;
606
607
608 if (registrationBad(dev))
609 {
610 //debug=100;
611 priv->registrationLostCount++;
612 if (lostTime > 7000 && lostTime < 7200)
613 {
614 printk(KERN_NOTICE "%s registration Lost \n", dev->name);
615 }
616 if (lostTime / priv->reRegisterExp > 2000)
617 arlan_command(dev, ARLAN_COMMAND_CLEAN_AND_CONF);
618 if (lostTime / (priv->reRegisterExp) > 3500)
619 arlan_command(dev, ARLAN_COMMAND_CLEAN_AND_RESET);
620 if (priv->reRegisterExp < 400)
621 priv->reRegisterExp += 2;
622 if (lostTime > 7200)
623 {
624 next_tick = HZ;
625 arlan_command(dev, ARLAN_COMMAND_CLEAN_AND_RESET);
626 }
627 }
628 else
629 {
630 if (priv->Conf->registrationMode && lostTime > 10000 &&
631 priv->registrationLostCount)
632 {
633 printk(KERN_NOTICE "%s registration is back after %d milliseconds\n", dev->name,
634 ((int) (jiffies - priv->registrationLastSeen) * 1000) / HZ);
635 }
636 priv->registrationLastSeen = jiffies;
637 priv->registrationLostCount = 0;
638 priv->reRegisterExp = 1;
639 if (dev->start == 0)
640 {
641 dev->start = 1;
642 mark_bh(NET_BH);
643 }
644 }
645
646
647 if (!registrationBad(dev) && priv->ReTransmitRequested)
648 {
649 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
650 printk(KERN_ERR "Retranmit from timer \n");
651 priv->ReTransmitRequested = 0;
652 arlan_retransmit_now(dev);
653 }
654 if (!registrationBad(dev) &&
655 priv->tx_done_delayed < jiffies &&
656 priv->tx_done_delayed != 0)
657 {
658 TXLAST(dev).offset = 0;
659 if (priv->txLast)
660 priv->txLast = 0;
661 else if (TXTAIL(dev).offset)
662 priv->txLast = 1;
663 if (TXLAST(dev).offset)
664 {
665 arlan_retransmit_now(dev);
666 dev->trans_start = jiffies;
667 }
668 if (!(TXHEAD(dev).offset && TXTAIL(dev).offset))
669 {
670 priv->txOffset = 0;
671 dev->tbusy = 0;
672 mark_bh(NET_BH);
673 }
674 priv->tx_done_delayed = 0;
675 bh_mark_needed = 1;
676 }
677 if (bh_mark_needed)
678 {
679 priv->txOffset = 0;
680 dev->tbusy = 0;
681 mark_bh(NET_BH);
682 }
683 arlan_process_interrupt(dev);
684
685 if (next_tick < priv->card_polling_interval)
686 next_tick = priv->card_polling_interval;
687
688 priv->timer_chain_active = 0;
689 priv->timer.expires = jiffies + next_tick;
690
691 add_timer(&priv->timer);
692 }
693
694
695
696
697 static void arlan_print_registers(struct net_device *dev, int line)
698 {
699 volatile struct arlan_shmem *arlan = ((struct arlan_private *) dev->priv)->card;
700
701 u_char hostcpuLock, lancpuLock, controlRegister, cntrlRegImage,
702 txStatus, rxStatus, interruptInProgress, commandByte;
703
704
705 ARLAN_DEBUG_ENTRY("arlan_print_registers");
706 READSHM(interruptInProgress, arlan->interruptInProgress, u_char);
707 READSHM(hostcpuLock, arlan->hostcpuLock, u_char);
708 READSHM(lancpuLock, arlan->lancpuLock, u_char);
709 READSHM(controlRegister, arlan->controlRegister, u_char);
710 READSHM(cntrlRegImage, arlan->cntrlRegImage, u_char);
711 READSHM(txStatus, arlan->txStatus, u_char);
712 READSHM(rxStatus, arlan->rxStatus, u_char);
713 READSHM(commandByte, arlan->commandByte, u_char);
714
715 printk(KERN_WARNING "line %04d IP %02x HL %02x LL %02x CB %02x CR %02x CRI %02x TX %02x RX %02x\n",
716 line, interruptInProgress, hostcpuLock, lancpuLock, commandByte,
717 controlRegister, cntrlRegImage, txStatus, rxStatus);
718
719 ARLAN_DEBUG_EXIT("arlan_print_registers");
720 }
721
722
723 static int arlan_hw_tx(struct net_device *dev, char *buf, int length)
724 {
725 int i;
726
727 struct arlan_private *priv = (struct arlan_private *) dev->priv;
728 volatile struct arlan_shmem *arlan = priv->card;
729 struct arlan_conf_stru *conf = priv->Conf;
730
731 int tailStarts = 0x800;
732 int headEnds = 0x0;
733
734
735 ARLAN_DEBUG_ENTRY("arlan_hw_tx");
736 if (TXHEAD(dev).offset)
737 headEnds = (((TXHEAD(dev).offset + TXHEAD(dev).length - (((int) arlan->txBuffer) - ((int) arlan))) / 64) + 1) * 64;
738 if (TXTAIL(dev).offset)
739 tailStarts = 0x800 - (((TXTAIL(dev).offset - (((int) arlan->txBuffer) - ((int) arlan))) / 64) + 2) * 64;
740
741
742 if (!TXHEAD(dev).offset && length < tailStarts)
743 {
744 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
745 printk(KERN_ERR "TXHEAD insert, tailStart %d\n", tailStarts);
746
747 TXHEAD(dev).offset =
748 (((int) arlan->txBuffer) - ((int) arlan));
749 TXHEAD(dev).length = length - ARLAN_FAKE_HDR_LEN;
750 for (i = 0; i < 6; i++)
751 TXHEAD(dev).dest[i] = buf[i];
752 TXHEAD(dev).clear = conf->txClear;
753 TXHEAD(dev).retries = conf->txRetries; /* 0 is use default */
754 TXHEAD(dev).routing = conf->txRouting;
755 TXHEAD(dev).scrambled = conf->txScrambled;
756 memcpy_toio(((char *) arlan + TXHEAD(dev).offset), buf + ARLAN_FAKE_HDR_LEN, TXHEAD(dev).length);
757 }
758 else if (!TXTAIL(dev).offset && length < (0x800 - headEnds))
759 {
760 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
761 printk(KERN_ERR "TXTAIL insert, headEnd %d\n", headEnds);
762
763 TXTAIL(dev).offset =
764 (((int) arlan->txBuffer) - ((int) arlan)) + 0x800 - (length / 64 + 2) * 64;
765 TXTAIL(dev).length = length - ARLAN_FAKE_HDR_LEN;
766 for (i = 0; i < 6; i++)
767 TXTAIL(dev).dest[i] = buf[i];
768 TXTAIL(dev).clear = conf->txClear;
769 TXTAIL(dev).retries = conf->txRetries;
770 TXTAIL(dev).routing = conf->txRouting;
771 TXTAIL(dev).scrambled = conf->txScrambled;
772 memcpy_toio(((char *) arlan + TXTAIL(dev).offset), buf + ARLAN_FAKE_HDR_LEN, TXTAIL(dev).length);
773 }
774 else
775 {
776 dev->tbusy = 1;
777 return -1;
778 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
779 printk(KERN_ERR "TX TAIL & HEAD full, return, tailStart %d headEnd %d\n", tailStarts, headEnds);
780 }
781 priv->out_bytes += length;
782 priv->out_bytes10 += length;
783 if (conf->measure_rate < 1)
784 conf->measure_rate = 1;
785 if (jiffies - priv->out_time > conf->measure_rate * HZ)
786 {
787 conf->out_speed = priv->out_bytes / conf->measure_rate;
788 priv->out_bytes = 0;
789 priv->out_time = jiffies;
790 }
791 if (jiffies - priv->out_time10 > conf->measure_rate * HZ * 10)
792 {
793 conf->out_speed10 = priv->out_bytes10 / (10 * conf->measure_rate);
794 priv->out_bytes10 = 0;
795 priv->out_time10 = jiffies;
796 }
797 if (TXHEAD(dev).offset && TXTAIL(dev).offset)
798 {
799 dev->tbusy = 1;
800 return 0;
801 }
802 else
803 dev->tbusy = 0;
804
805
806 IFDEBUG(ARLAN_DEBUG_HEADER_DUMP)
807 printk(KERN_WARNING "%s Transmit t %2x:%2x:%2x:%2x:%2x:%2x f %2x:%2x:%2x:%2x:%2x:%2x \n", dev->name,
808 (unsigned char) buf[0], (unsigned char) buf[1], (unsigned char) buf[2], (unsigned char) buf[3],
809 (unsigned char) buf[4], (unsigned char) buf[5], (unsigned char) buf[6], (unsigned char) buf[7],
810 (unsigned char) buf[8], (unsigned char) buf[9], (unsigned char) buf[10], (unsigned char) buf[11]);
811
812 IFDEBUG(ARLAN_DEBUG_TX_CHAIN) printk(KERN_ERR "TX command prepare for buffer %d\n", priv->txLast);
813
814 arlan_command(dev, ARLAN_COMMAND_TX);
815
816 priv->last_command_was_rx = 0;
817 priv->tx_last_sent = jiffies;
818 priv->nof_tx++;
819
820 IFDEBUG(ARLAN_DEBUG_TX_CHAIN) printk("%s TX Qued %d bytes \n", dev->name, length);
821
822 ARLAN_DEBUG_EXIT("arlan_hw_tx");
823
824 return 0;
825 }
826
827
828 static int arlan_hw_config(struct net_device *dev)
829 {
830 volatile struct arlan_shmem *arlan = ((struct arlan_private *) dev->priv)->card;
831 struct arlan_conf_stru *conf = ((struct arlan_private *) dev->priv)->Conf;
832 struct arlan_private *priv = (struct arlan_private *) dev->priv;
833
834 ARLAN_DEBUG_ENTRY("arlan_hw_config");
835
836 printk(KERN_NOTICE "%s arlan configure called \n", dev->name);
837 if (arlan_EEPROM_bad)
838 printk(KERN_NOTICE "arlan configure with eeprom bad option \n");
839
840
841 WRITESHM(arlan->spreadingCode, conf->spreadingCode, u_char);
842 WRITESHM(arlan->channelSet, conf->channelSet, u_char);
843
844 if (arlan_EEPROM_bad)
845 WRITESHM(arlan->defaultChannelSet, conf->channelSet, u_char);
846
847 WRITESHM(arlan->channelNumber, conf->channelNumber, u_char);
848
849 WRITESHM(arlan->scramblingDisable, conf->scramblingDisable, u_char);
850 WRITESHM(arlan->txAttenuation, conf->txAttenuation, u_char);
851
852 WRITESHM(arlan->systemId, conf->systemId, u_int);
853
854 WRITESHM(arlan->maxRetries, conf->maxRetries, u_char);
855 WRITESHM(arlan->receiveMode, conf->receiveMode, u_char);
856 WRITESHM(arlan->priority, conf->priority, u_char);
857 WRITESHM(arlan->rootOrRepeater, conf->rootOrRepeater, u_char);
858 WRITESHM(arlan->SID, conf->SID, u_int);
859
860 WRITESHM(arlan->registrationMode, conf->registrationMode, u_char);
861
862 WRITESHM(arlan->registrationFill, conf->registrationFill, u_char);
863 WRITESHM(arlan->localTalkAddress, conf->localTalkAddress, u_char);
864 WRITESHM(arlan->codeFormat, conf->codeFormat, u_char);
865 WRITESHM(arlan->numChannels, conf->numChannels, u_char);
866 WRITESHM(arlan->channel1, conf->channel1, u_char);
867 WRITESHM(arlan->channel2, conf->channel2, u_char);
868 WRITESHM(arlan->channel3, conf->channel3, u_char);
869 WRITESHM(arlan->channel4, conf->channel4, u_char);
870 WRITESHM(arlan->radioNodeId, conf->radioNodeId, u_short);
871 WRITESHM(arlan->SID, conf->SID, u_int);
872 WRITESHM(arlan->waitTime, conf->waitTime, u_short);
873 WRITESHM(arlan->lParameter, conf->lParameter, u_short);
874 memcpy_toio(&(arlan->_15), &(conf->_15), 3);
875 WRITESHM(arlan->_15, conf->_15, u_short);
876 WRITESHM(arlan->headerSize, conf->headerSize, u_short);
877 if (arlan_EEPROM_bad)
878 WRITESHM(arlan->hardwareType, conf->hardwareType, u_char);
879 WRITESHM(arlan->radioType, conf->radioType, u_char);
880 if (arlan_EEPROM_bad)
881 WRITESHM(arlan->radioModule, conf->radioType, u_char);
882
883 memcpy_toio(arlan->encryptionKey + keyStart, encryptionKey, 8);
884 memcpy_toio(arlan->name, conf->siteName, 16);
885
886 WRITESHMB(arlan->commandByte, ARLAN_COM_INT | ARLAN_COM_CONF); /* do configure */
887 memset_io(arlan->commandParameter, 0, 0xf); /* 0xf */
888 memset_io(arlan->commandParameter + 1, 0, 2);
889 if (conf->writeEEPROM)
890 {
891 memset_io(arlan->commandParameter, conf->writeEEPROM, 1);
892 // conf->writeEEPROM=0;
893 }
894 if (conf->registrationMode && conf->registrationInterrupts)
895 memset_io(arlan->commandParameter + 3, 1, 1);
896 else
897 memset_io(arlan->commandParameter + 3, 0, 1);
898
899 priv->irq_test_done = 0;
900
901 if (conf->tx_queue_len)
902 dev->tx_queue_len = conf->tx_queue_len;
903 udelay(100);
904
905 ARLAN_DEBUG_EXIT("arlan_hw_config");
906 return 0;
907 }
908
909
910 static int arlan_read_card_configuration(struct net_device *dev)
911 {
912 u_char tlx415;
913 volatile struct arlan_shmem *arlan = ((struct arlan_private *) dev->priv)->card;
914 struct arlan_conf_stru *conf = ((struct arlan_private *) dev->priv)->Conf;
915
916 ARLAN_DEBUG_ENTRY("arlan_read_card_configuration");
917
918 if (radioNodeId == radioNodeIdUNKNOWN)
919 {
920 READSHM(conf->radioNodeId, arlan->radioNodeId, u_short);
921 }
922 else
923 conf->radioNodeId = radioNodeId;
924
925 if (SID == SIDUNKNOWN)
926 {
927 READSHM(conf->SID, arlan->SID, u_int);
928 }
929 else conf->SID = SID;
930
931 if (spreadingCode == spreadingCodeUNKNOWN)
932 {
933 READSHM(conf->spreadingCode, arlan->spreadingCode, u_char);
934 }
935 else
936 conf->spreadingCode = spreadingCode;
937
938 if (channelSet == channelSetUNKNOWN)
939 {
940 READSHM(conf->channelSet, arlan->channelSet, u_char);
941 }
942 else conf->channelSet = channelSet;
943
944 if (channelNumber == channelNumberUNKNOWN)
945 {
946 READSHM(conf->channelNumber, arlan->channelNumber, u_char);
947 }
948 else conf->channelNumber = channelNumber;
949
950 READSHM(conf->scramblingDisable, arlan->scramblingDisable, u_char);
951 READSHM(conf->txAttenuation, arlan->txAttenuation, u_char);
952
953 if (systemId == systemIdUNKNOWN)
954 {
955 READSHM(conf->systemId, arlan->systemId, u_int);
956 }
957 else conf->systemId = systemId;
958
959 READSHM(conf->maxDatagramSize, arlan->maxDatagramSize, u_short);
960 READSHM(conf->maxFrameSize, arlan->maxFrameSize, u_short);
961 READSHM(conf->maxRetries, arlan->maxRetries, u_char);
962 READSHM(conf->receiveMode, arlan->receiveMode, u_char);
963 READSHM(conf->priority, arlan->priority, u_char);
964 READSHM(conf->rootOrRepeater, arlan->rootOrRepeater, u_char);
965
966 if (SID == SIDUNKNOWN)
967 {
968 READSHM(conf->SID, arlan->SID, u_int);
969 }
970 else conf->SID = SID;
971
972 if (registrationMode == registrationModeUNKNOWN)
973 {
974 READSHM(conf->registrationMode, arlan->registrationMode, u_char);
975 }
976 else conf->registrationMode = registrationMode;
977
978 READSHM(conf->registrationFill, arlan->registrationFill, u_char);
979 READSHM(conf->localTalkAddress, arlan->localTalkAddress, u_char);
980 READSHM(conf->codeFormat, arlan->codeFormat, u_char);
981 READSHM(conf->numChannels, arlan->numChannels, u_char);
982 READSHM(conf->channel1, arlan->channel1, u_char);
983 READSHM(conf->channel2, arlan->channel2, u_char);
984 READSHM(conf->channel3, arlan->channel3, u_char);
985 READSHM(conf->channel4, arlan->channel4, u_char);
986 READSHM(conf->waitTime, arlan->waitTime, u_short);
987 READSHM(conf->lParameter, arlan->lParameter, u_short);
988 READSHM(conf->_15, arlan->_15, u_short);
989 READSHM(conf->headerSize, arlan->headerSize, u_short);
990 READSHM(conf->hardwareType, arlan->hardwareType, u_char);
991 READSHM(conf->radioType, arlan->radioModule, u_char);
992
993 if (conf->radioType == 0)
994 conf->radioType = 0xc;
995
996 WRITESHM(arlan->configStatus, 0xA5, u_char);
997 READSHM(tlx415, arlan->configStatus, u_char);
998
999 if (tlx415 != 0xA5)
1000 printk(KERN_INFO "%s tlx415 chip \n", dev->name);
1001
1002 conf->txClear = 0;
1003 conf->txRetries = 1;
1004 conf->txRouting = 1;
1005 conf->txScrambled = 0;
1006 conf->rxParameter = 1;
1007 conf->txTimeoutMs = 4000;
1008 conf->waitCardTimeout = 100000;
1009 conf->receiveMode = ARLAN_RCV_CLEAN;
1010 memcpy_fromio(conf->siteName, arlan->name, 16);
1011 conf->siteName[16] = '\0';
1012 conf->retries = retries;
1013 conf->tx_delay_ms = tx_delay_ms;
1014 conf->async = async;
1015 conf->ReTransmitPacketMaxSize = 200;
1016 conf->waitReTransmitPacketMaxSize = 200;
1017 conf->txAckTimeoutMs = 900;
1018 conf->fastReTransCount = 3;
1019
1020 ARLAN_DEBUG_EXIT("arlan_read_card_configuration");
1021
1022 return 0;
1023 }
1024
1025
1026 static int lastFoundAt = 0xbe000;
1027
1028
1029 /*
1030 * This is the real probe routine. Linux has a history of friendly device
1031 * probes on the ISA bus. A good device probes avoids doing writes, and
1032 * verifies that the correct device exists and functions.
1033 */
1034
1035 static int __init arlan_check_fingerprint(int memaddr)
1036 {
1037 static char probeText[] = "TELESYSTEM SLW INC. ARLAN \0";
1038 char tempBuf[49];
1039 volatile struct arlan_shmem *arlan = (struct arlan_shmem *) memaddr;
1040
1041 ARLAN_DEBUG_ENTRY("arlan_check_fingerprint");
1042 memcpy_fromio(tempBuf, arlan->textRegion, 29);
1043 tempBuf[30] = 0;
1044
1045 /* check for card at this address */
1046 if (0 != strncmp(tempBuf, probeText, 29))
1047 return -ENODEV;
1048
1049 // printk(KERN_INFO "arlan found at 0x%x \n",memaddr);
1050 ARLAN_DEBUG_EXIT("arlan_check_fingerprint");
1051
1052 return 0;
1053
1054
1055 }
1056
1057 int __init arlan_probe_everywhere(struct net_device *dev)
1058 {
1059 int m;
1060 int probed = 0;
1061 int found = 0;
1062
1063 ARLAN_DEBUG_ENTRY("arlan_probe_everywhere");
1064 if (mem != 0 && numDevices == 1) /* Check a single specified location. */
1065 {
1066 if (arlan_probe_here(dev, mem) == 0)
1067 return 0;
1068 else
1069 return -ENODEV;
1070 }
1071 for (m = lastFoundAt + 0x2000; m <= 0xDE000; m += 0x2000)
1072 {
1073 if (arlan_probe_here(dev, m) == 0)
1074 {
1075 found++;
1076 lastFoundAt = m;
1077 break;
1078 }
1079 probed++;
1080 }
1081 if (found == 0 && probed != 0)
1082 {
1083 if (lastFoundAt == 0xbe000)
1084 printk(KERN_ERR "arlan: No Arlan devices found \n");
1085 return ENODEV;
1086 }
1087 else
1088 return 0;
1089
1090 ARLAN_DEBUG_EXIT("arlan_probe_everywhere");
1091
1092 return ENODEV;
1093 }
1094
1095 int __init arlan_find_devices(void)
1096 {
1097 int m;
1098 int found = 0;
1099
1100 ARLAN_DEBUG_ENTRY("arlan_find_devices");
1101 if (mem != 0 && numDevices == 1) /* Check a single specified location. */
1102 return 1;
1103 for (m = 0xc000; m <= 0xDE000; m += 0x2000)
1104 {
1105 if (arlan_check_fingerprint(m) == 0)
1106 found++;
1107 }
1108 ARLAN_DEBUG_EXIT("arlan_find_devices");
1109
1110 return found;
1111 }
1112
1113
1114 static int arlan_change_mtu(struct net_device *dev, int new_mtu)
1115 {
1116 struct arlan_conf_stru *conf = ((struct arlan_private *) dev->priv)->Conf;
1117
1118 ARLAN_DEBUG_ENTRY("arlan_change_mtu");
1119 if ((new_mtu < 68) || (new_mtu > 2032))
1120 return -EINVAL;
1121 dev->mtu = new_mtu;
1122 if (new_mtu < 256)
1123 new_mtu = 256; /* cards book suggests 1600 */
1124 conf->maxDatagramSize = new_mtu;
1125 conf->maxFrameSize = new_mtu + 48;
1126
1127 arlan_command(dev, ARLAN_COMMAND_CLEAN_AND_CONF);
1128 printk(KERN_NOTICE "%s mtu changed to %d \n", dev->name, new_mtu);
1129
1130 ARLAN_DEBUG_EXIT("arlan_change_mtu");
1131
1132 return 0;
1133 }
1134
1135 static int arlan_mac_addr(struct net_device *dev, void *p)
1136 {
1137 struct sockaddr *addr = p;
1138
1139
1140 ARLAN_DEBUG_ENTRY("arlan_mac_addr");
1141 return -EINVAL;
1142
1143 if (dev->start)
1144 return -EBUSY;
1145 memcpy(dev->dev_addr, addr->sa_data, dev->addr_len);
1146
1147 ARLAN_DEBUG_EXIT("arlan_mac_addr");
1148 return 0;
1149 }
1150
1151
1152
1153
1154 static int __init
1155 arlan_allocate_device(int num, struct net_device *devs)
1156 {
1157
1158 struct net_device *dev;
1159
1160 ARLAN_DEBUG_ENTRY("arlan_allocate_device");
1161
1162 if (!devs)
1163 dev = init_etherdev(0, sizeof(struct arlan_private));
1164 else
1165 {
1166 dev = devs;
1167 dev->priv = kmalloc(sizeof(struct arlan_private), GFP_KERNEL);
1168 };
1169
1170 if (dev == NULL || dev->priv == NULL)
1171 {
1172 printk(KERN_CRIT "init_etherdev failed ");
1173 return 0;
1174 }
1175 ((struct arlan_private *) dev->priv)->conf =
1176 kmalloc(sizeof(struct arlan_shmem), GFP_KERNEL);
1177
1178 if (dev == NULL || dev->priv == NULL ||
1179 ((struct arlan_private *) dev->priv)->conf == NULL)
1180 {
1181 return 0;
1182 printk(KERN_CRIT " No memory at arlan_allocate_device \n");
1183 }
1184 /* Fill in the 'dev' fields. */
1185 dev->base_addr = 0;
1186 dev->mem_start = 0;
1187 dev->mem_end = 0;
1188 dev->mtu = 1500;
1189 dev->flags = 0; /* IFF_BROADCAST & IFF_MULTICAST & IFF_PROMISC; */
1190 dev->irq = 0;
1191 dev->dma = 0;
1192 dev->tx_queue_len = tx_queue_len;
1193 ether_setup(dev);
1194 dev->tx_queue_len = tx_queue_len;
1195 dev->open = arlan_open;
1196 dev->stop = arlan_close;
1197 dev->hard_start_xmit = arlan_tx;
1198 dev->get_stats = arlan_statistics;
1199 dev->set_multicast_list = arlan_set_multicast;
1200 dev->change_mtu = arlan_change_mtu;
1201 dev->set_mac_address = arlan_mac_addr;
1202 ((struct arlan_private *) dev->priv)->irq_test_done = 0;
1203 arlan_device[num] = dev;
1204 ((struct arlan_private *) arlan_device[num]->priv)->Conf = &(arlan_conf[num]);
1205
1206 ((struct arlan_private *) dev->priv)->Conf->pre_Command_Wait = 40;
1207 ((struct arlan_private *) dev->priv)->Conf->rx_tweak1 = 30;
1208 ((struct arlan_private *) dev->priv)->Conf->rx_tweak2 = 0;
1209
1210 ARLAN_DEBUG_EXIT("arlan_allocate_device");
1211 return (int) dev;
1212 }
1213
1214
1215 int __init arlan_probe_here(struct net_device *dev, int memaddr)
1216 {
1217 volatile struct arlan_shmem *arlan;
1218
1219 ARLAN_DEBUG_ENTRY("arlan_probe_here");
1220
1221 if (arlan_check_fingerprint(memaddr))
1222 return -ENODEV;
1223
1224 printk(KERN_NOTICE "%s: Arlan found at %#5x, \n ", dev->name, memaddr);
1225
1226 if (!arlan_allocate_device(arlans_found, dev))
1227 return -1;
1228
1229 ((struct arlan_private *) dev->priv)->card = (struct arlan_shmem *) memaddr;
1230 arlan = (void *) memaddr;
1231
1232 dev->mem_start = memaddr;
1233 dev->mem_end = memaddr + 0x1FFF;
1234
1235 if (dev->irq < 2)
1236 {
1237 READSHM(dev->irq, arlan->irqLevel, u_char);
1238 } else if (dev->irq == 2)
1239 dev->irq = 9;
1240
1241 arlan_read_card_configuration(dev);
1242
1243 ARLAN_DEBUG_EXIT("arlan_probe_here");
1244 return 0;
1245 }
1246
1247
1248
1249
1250 static int arlan_open(struct net_device *dev)
1251 {
1252 struct arlan_private *priv = (struct arlan_private *) dev->priv;
1253 volatile struct arlan_shmem *arlan = priv->card;
1254 int ret = 0;
1255
1256 ARLAN_DEBUG_ENTRY("arlan_open");
1257
1258 if (dev->mem_start == 0)
1259 ret = arlan_probe_everywhere(dev);
1260 if (ret != 0)
1261 return ret;
1262
1263 arlan = ((struct arlan_private *) dev->priv)->card;
1264
1265 if (request_irq(dev->irq, &arlan_interrupt, 0, dev->name, dev))
1266 {
1267 printk(KERN_ERR "%s: unable to get IRQ %d .\n",
1268 dev->name, dev->irq);
1269 return -EAGAIN;
1270 }
1271 arlan_command(dev, ARLAN_COMMAND_POWERUP | ARLAN_COMMAND_LONG_WAIT_NOW);
1272
1273 priv->bad = 0;
1274 priv->lastReset = 0;
1275 priv->reset = 0;
1276 priv->open_time = jiffies;
1277 memcpy_fromio(dev->dev_addr, arlan->lanCardNodeId, 6);
1278 memset(dev->broadcast, 0xff, 6);
1279 dev->tbusy = 1;
1280 priv->txOffset = 0;
1281 dev->interrupt = 0;
1282 dev->start = 1;
1283 dev->tx_queue_len = tx_queue_len;
1284 init_timer(&priv->timer);
1285 priv->timer.expires = jiffies + HZ / 10;
1286 priv->timer.data = (unsigned long) dev;
1287 priv->timer.function = &arlan_registration_timer; /* timer handler */
1288 priv->interrupt_processing_active = 0;
1289 priv->command_lock = 0;
1290 add_timer(&priv->timer);
1291
1292 init_MUTEX(&priv->card_lock);
1293 myATOMIC_INIT(priv->card_users, 1); /* damn 2.0.33 */
1294 priv->registrationLostCount = 0;
1295 priv->registrationLastSeen = jiffies;
1296 priv->txLast = 0;
1297 priv->tx_command_given = 0;
1298
1299 priv->reRegisterExp = 1;
1300 priv->nof_tx = 0;
1301 priv->nof_tx_ack = 0;
1302 priv->last_command_was_rx = 0;
1303 priv->tx_last_sent = jiffies - 1;
1304 priv->tx_last_cleared = jiffies;
1305 priv->Conf->writeEEPROM = 0;
1306 priv->Conf->registrationInterrupts = 1;
1307
1308 dev->tbusy = 0;
1309
1310 MOD_INC_USE_COUNT;
1311 #ifdef CONFIG_PROC_FS
1312 #ifndef MODULE
1313 if (arlan_device[0])
1314 init_arlan_proc();
1315 #endif
1316 #endif
1317 ARLAN_DEBUG_EXIT("arlan_open");
1318 return 0;
1319 }
1320
1321
1322
1323
1324 static int arlan_tx(struct sk_buff *skb, struct net_device *dev)
1325 {
1326 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
1327 struct arlan_conf_stru *conf = ((struct arlan_private *) dev->priv)->Conf;
1328
1329 ARLAN_DEBUG_ENTRY("arlan_tx");
1330
1331 if (dev->tbusy)
1332 {
1333 /*
1334 * If we get here, some higher level has decided we are broken.
1335 * There should really be a "kick me" function call instead.
1336 */
1337 int tickssofar = jiffies - dev->trans_start;
1338
1339 if (((tickssofar * 1000) / HZ) * 2 > conf->txTimeoutMs)
1340 arlan_command(dev, ARLAN_COMMAND_TX_ABORT);
1341
1342 if (((tickssofar * 1000) / HZ) < conf->txTimeoutMs)
1343 {
1344 // up(&priv->card_lock);
1345 goto bad_end;
1346 }
1347 printk(KERN_ERR "%s: arlan transmit timed out, kernel decided\n", dev->name);
1348 /* Try to restart the adaptor. */
1349 arlan_command(dev, ARLAN_COMMAND_CLEAN_AND_RESET);
1350 dev->trans_start = jiffies;
1351 goto bad_end;
1352
1353 }
1354 /*
1355 * Block a timer-based transmit from overlapping. This could better be
1356 * done with atomic_swap(1, dev->tbusy), but set_bit() works as well.
1357 */
1358 if (test_and_set_bit(0, (void *) &dev->tbusy) != 0)
1359 {
1360 printk(KERN_ERR "%s: Transmitter access conflict.\n",
1361 dev->name);
1362 }
1363 else
1364 {
1365 short length;
1366 unsigned char *buf;
1367
1368 /*
1369 * If some higher layer thinks we've missed an tx-done interrupt
1370 * we are passed NULL. Caution: dev_tint() handles the cli()/sti()
1371 * itself.
1372 */
1373
1374 length = ETH_ZLEN < skb->len ? skb->len : ETH_ZLEN;
1375 buf = skb->data;
1376
1377 if (priv->txOffset + length + 0x12 > 0x800)
1378 printk(KERN_ERR "TX RING overflow \n");
1379
1380 if (arlan_hw_tx(dev, buf, length) == -1)
1381 goto bad_end;
1382
1383 dev->trans_start = jiffies;
1384 }
1385 dev_kfree_skb(skb);
1386
1387 arlan_process_interrupt(dev);
1388 priv->tx_chain_active = 0;
1389 ARLAN_DEBUG_EXIT("arlan_tx");
1390 return 0;
1391
1392 bad_end:
1393 arlan_process_interrupt(dev);
1394 priv->tx_chain_active = 0;
1395 ARLAN_DEBUG_EXIT("arlan_tx");
1396 return 1;
1397 }
1398
1399
1400 extern inline int DoNotReTransmitCrap(struct net_device *dev)
1401 {
1402 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
1403
1404 if (TXLAST(dev).length < priv->Conf->ReTransmitPacketMaxSize)
1405 return 1;
1406 return 0;
1407
1408 }
1409
1410 extern inline int DoNotWaitReTransmitCrap(struct net_device *dev)
1411 {
1412 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
1413
1414 if (TXLAST(dev).length < priv->Conf->waitReTransmitPacketMaxSize)
1415 return 1;
1416 return 0;
1417 }
1418
1419 extern inline void arlan_queue_retransmit(struct net_device *dev)
1420 {
1421 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
1422
1423 ARLAN_DEBUG_ENTRY("arlan_queue_retransmit");
1424
1425 if (DoNotWaitReTransmitCrap(dev))
1426 {
1427 arlan_drop_tx(dev);
1428 } else
1429 priv->ReTransmitRequested++;
1430
1431 ARLAN_DEBUG_EXIT("arlan_queue_retransmit");
1432 };
1433
1434 extern inline void RetryOrFail(struct net_device *dev)
1435 {
1436 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
1437
1438 ARLAN_DEBUG_ENTRY("RetryOrFail");
1439
1440 if (priv->retransmissions > priv->Conf->retries ||
1441 DoNotReTransmitCrap(dev))
1442 {
1443 arlan_drop_tx(dev);
1444 }
1445 else if (priv->bad <= priv->Conf->fastReTransCount)
1446 {
1447 arlan_retransmit_now(dev);
1448 }
1449 else arlan_queue_retransmit(dev);
1450
1451 ARLAN_DEBUG_EXIT("RetryOrFail");
1452 }
1453
1454
1455 static void arlan_tx_done_interrupt(struct net_device *dev, int status)
1456 {
1457 struct arlan_private *priv = ((struct arlan_private *) dev->priv);
1458
1459 ARLAN_DEBUG_ENTRY("arlan_tx_done_interrupt");
1460
1461 priv->tx_last_cleared = jiffies;
1462 priv->tx_command_given = 0;
1463 priv->nof_tx_ack++;
1464 switch (status)
1465 {
1466 case 1:
1467 {
1468 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1469 printk("arlan intr: transmit OK\n");
1470 priv->stats.tx_packets++;
1471 priv->bad = 0;
1472 priv->reset = 0;
1473 priv->retransmissions = 0;
1474 if (priv->Conf->tx_delay_ms)
1475 {
1476 priv->tx_done_delayed = jiffies + (priv->Conf->tx_delay_ms * HZ) / 1000 + 1;;
1477 }
1478 else
1479 {
1480 TXLAST(dev).offset = 0;
1481 if (priv->txLast)
1482 priv->txLast = 0;
1483 else if (TXTAIL(dev).offset)
1484 priv->txLast = 1;
1485 if (TXLAST(dev).offset)
1486 {
1487 arlan_retransmit_now(dev);
1488 dev->trans_start = jiffies;
1489 }
1490 if (!TXHEAD(dev).offset || !TXTAIL(dev).offset)
1491 {
1492 priv->txOffset = 0;
1493 dev->tbusy = 0;
1494 mark_bh(NET_BH);
1495 }
1496 }
1497 }
1498 break;
1499
1500 case 2:
1501 {
1502 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1503 printk("arlan intr: transmit timed out\n");
1504 priv->bad += 1;
1505 //arlan_queue_retransmit(dev);
1506 RetryOrFail(dev);
1507 }
1508 break;
1509
1510 case 3:
1511 {
1512 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1513 printk("arlan intr: transmit max retries\n");
1514 priv->bad += 1;
1515 priv->reset = 0;
1516 //arlan_queue_retransmit(dev);
1517 RetryOrFail(dev);
1518 }
1519 break;
1520
1521 case 4:
1522 {
1523 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1524 printk("arlan intr: transmit aborted\n");
1525 priv->bad += 1;
1526 arlan_queue_retransmit(dev);
1527 //RetryOrFail(dev);
1528 }
1529 break;
1530
1531 case 5:
1532 {
1533 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1534 printk("arlan intr: transmit not registered\n");
1535 priv->bad += 1;
1536 //debug=101;
1537 arlan_queue_retransmit(dev);
1538 }
1539 break;
1540
1541 case 6:
1542 {
1543 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1544 printk("arlan intr: transmit destination full\n");
1545 priv->bad += 1;
1546 priv->reset = 0;
1547 //arlan_drop_tx(dev);
1548 arlan_queue_retransmit(dev);
1549 }
1550 break;
1551
1552 case 7:
1553 {
1554 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1555 printk("arlan intr: transmit unknown ack\n");
1556 priv->bad += 1;
1557 priv->reset = 0;
1558 arlan_queue_retransmit(dev);
1559 }
1560 break;
1561
1562 case 8:
1563 {
1564 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1565 printk("arlan intr: transmit dest mail box full\n");
1566 priv->bad += 1;
1567 priv->reset = 0;
1568 //arlan_drop_tx(dev);
1569 arlan_queue_retransmit(dev);
1570 }
1571 break;
1572
1573 case 9:
1574 {
1575 IFDEBUG(ARLAN_DEBUG_TX_CHAIN)
1576 printk("arlan intr: transmit root dest not reg.\n");
1577 priv->bad += 1;
1578 priv->reset = 1;
1579 //arlan_drop_tx(dev);
1580 arlan_queue_retransmit(dev);
1581 }
1582 break;
1583
1584 default:
1585 {
1586 printk(KERN_ERR "arlan intr: transmit status unknown\n");
1587 priv->bad += 1;
1588 priv->reset = 1;
1589 arlan_drop_tx(dev);
1590 }
1591 }
1592
1593 ARLAN_DEBUG_EXIT("arlan_tx_done_interrupt");
1594 }
1595
1596
1597 static void arlan_rx_interrupt(struct net_device *dev, u_char rxStatus, u_short rxOffset, u_short pkt_len)
1598 {
1599 char *skbtmp;
1600 int i = 0;
1601
1602 struct arlan_private *priv = (struct arlan_private *) dev->priv;
1603 volatile struct arlan_shmem *arlan = priv->card;
1604 struct arlan_conf_stru *conf = priv->Conf;
1605
1606
1607 ARLAN_DEBUG_ENTRY("arlan_rx_interrupt");
1608 // by spec, not WRITESHMB(arlan->rxStatus,0x00);
1609 // prohibited here arlan_command(dev, ARLAN_COMMAND_RX);
1610
1611 if (pkt_len < 10 || pkt_len > 2048)
1612 {
1613 printk(KERN_WARNING "%s: got too short or long packet, len %d \n", dev->name, pkt_len);
1614 return;
1615 }
1616 if (rxOffset + pkt_len > 0x2000)
1617 {
1618 printk("%s: got too long packet, len %d offset %x\n", dev->name, pkt_len, rxOffset);
1619 return;
1620 }
1621 priv->in_bytes += pkt_len;
1622 priv->in_bytes10 += pkt_len;
1623 if (conf->measure_rate < 1)
1624 conf->measure_rate = 1;
1625 if (jiffies - priv->in_time > conf->measure_rate * HZ)
1626 {
1627 conf->in_speed = priv->in_bytes / conf->measure_rate;
1628 priv->in_bytes = 0;
1629 priv->in_time = jiffies;
1630 }
1631 if (jiffies - priv->in_time10 > conf->measure_rate * HZ * 10)
1632 {
1633 conf->in_speed10 = priv->in_bytes10 / (10 * conf->measure_rate);
1634 priv->in_bytes10 = 0;
1635 priv->in_time10 = jiffies;
1636 }
1637 DEBUGSHM(1, "arlan rcv pkt rxStatus= %d ", arlan->rxStatus, u_char);
1638 switch (rxStatus)
1639 {
1640 case 1:
1641 case 2:
1642 case 3:
1643 {
1644 /* Malloc up new buffer. */
1645 struct sk_buff *skb;
1646
1647 DEBUGSHM(50, "arlan recv pkt offs=%d\n", arlan->rxOffset, u_short);
1648 DEBUGSHM(1, "arlan rxFrmType = %d \n", arlan->rxFrmType, u_char);
1649 DEBUGSHM(1, KERN_INFO "arlan rx scrambled = %d \n", arlan->scrambled, u_char);
1650
1651 /* here we do multicast filtering to avoid slow 8-bit memcopy */
1652 #ifdef ARLAN_MULTICAST
1653 if (!(dev->flags & IFF_ALLMULTI) &&
1654 !(dev->flags & IFF_PROMISC) &&
1655 dev->mc_list)
1656 {
1657 char hw_dst_addr[6];
1658 struct dev_mc_list *dmi = dev->mc_list;
1659 int i;
1660
1661 memcpy_fromio(hw_dst_addr, arlan->ultimateDestAddress, 6);
1662 if (hw_dst_addr[0] == 0x01)
1663 {
1664 if (mdebug)
1665 if (hw_dst_addr[1] == 0x00)
1666 printk(KERN_ERR "%s mcast 0x0100 \n", dev->name);
1667 else if (hw_dst_addr[1] == 0x40)
1668 printk(KERN_ERR "%s m/bcast 0x0140 \n", dev->name);
1669 while (dmi)
1670 { if (dmi->dmi_addrlen == 6)
1671 {
1672 if (arlan_debug & ARLAN_DEBUG_HEADER_DUMP)
1673 printk(KERN_ERR "%s mcl %2x:%2x:%2x:%2x:%2x:%2x \n", dev->name,
1674 dmi->dmi_addr[0], dmi->dmi_addr[1], dmi->dmi_addr[2],
1675 dmi->dmi_addr[3], dmi->dmi_addr[4], dmi->dmi_addr[5]);
1676 for (i = 0; i < 6; i++)
1677 if (dmi->dmi_addr[i] != hw_dst_addr[i])
1678 break;
1679 if (i == 6)
1680 break;
1681 }
1682 else
1683 printk(KERN_ERR "%s: invalid multicast address length given.\n", dev->name);
1684 dmi = dmi->next;
1685 }
1686 /* we reach here if multicast filtering is on and packet
1687 * is multicast and not for receive */
1688 goto end_of_interupt;
1689 }
1690 }
1691 #endif // ARLAN_MULTICAST
1692 /* multicast filtering ends here */
1693 pkt_len += ARLAN_FAKE_HDR_LEN;
1694
1695 skb = dev_alloc_skb(pkt_len + 4);
1696 if (skb == NULL)
1697 {
1698 printk(KERN_ERR "%s: Memory squeeze, dropping packet.\n", dev->name);
1699 priv->stats.rx_dropped++;
1700 break;
1701 }
1702 skb_reserve(skb, 2);
1703 skb->dev = dev;
1704 skbtmp = skb_put(skb, pkt_len);
1705
1706 memcpy_fromio(skbtmp + ARLAN_FAKE_HDR_LEN, ((char *) arlan) + rxOffset, pkt_len - ARLAN_FAKE_HDR_LEN);
1707 memcpy_fromio(skbtmp, arlan->ultimateDestAddress, 6);
1708 memcpy_fromio(skbtmp + 6, arlan->rxSrc, 6);
1709 WRITESHMB(arlan->rxStatus, 0x00);
1710 arlan_command(dev, ARLAN_COMMAND_RX);
1711
1712 IFDEBUG(ARLAN_DEBUG_HEADER_DUMP)
1713 {
1714 char immedDestAddress[6];
1715 char immedSrcAddress[6];
1716 memcpy_fromio(immedDestAddress, arlan->immedDestAddress, 6);
1717 memcpy_fromio(immedSrcAddress, arlan->immedSrcAddress, 6);
1718
1719 printk(KERN_WARNING "%s t %2x:%2x:%2x:%2x:%2x:%2x f %2x:%2x:%2x:%2x:%2x:%2x imd %2x:%2x:%2x:%2x:%2x:%2x ims %2x:%2x:%2x:%2x:%2x:%2x\n", dev->name,
1720 (unsigned char) skbtmp[0], (unsigned char) skbtmp[1], (unsigned char) skbtmp[2], (unsigned char) skbtmp[3],
1721 (unsigned char) skbtmp[4], (unsigned char) skbtmp[5], (unsigned char) skbtmp[6], (unsigned char) skbtmp[7],
1722 (unsigned char) skbtmp[8], (unsigned char) skbtmp[9], (unsigned char) skbtmp[10], (unsigned char) skbtmp[11],
1723 immedDestAddress[0], immedDestAddress[1], immedDestAddress[2],
1724 immedDestAddress[3], immedDestAddress[4], immedDestAddress[5],
1725 immedSrcAddress[0], immedSrcAddress[1], immedSrcAddress[2],
1726 immedSrcAddress[3], immedSrcAddress[4], immedSrcAddress[5]);
1727 }
1728 skb->protocol = eth_type_trans(skb, dev);
1729 IFDEBUG(ARLAN_DEBUG_HEADER_DUMP)
1730 if (skb->protocol != 0x608 && skb->protocol != 0x8)
1731 {
1732 for (i = 0; i <= 22; i++)
1733 printk("%02x:", (u_char) skbtmp[i + 12]);
1734 printk(KERN_ERR "\n");
1735 printk(KERN_WARNING "arlan kernel pkt type trans %x \n", skb->protocol);
1736 }
1737 netif_rx(skb);
1738 priv->stats.rx_packets++;
1739 }
1740 break;
1741
1742 default:
1743 printk(KERN_ERR "arlan intr: recieved unknown status\n");
1744 priv->stats.rx_crc_errors++;
1745 break;
1746 }
1747 ARLAN_DEBUG_EXIT("arlan_rx_interrupt");
1748 }
1749
1750 static void arlan_process_interrupt(struct net_device *dev)
1751 {
1752 struct arlan_private *priv = (struct arlan_private *) dev->priv;
1753 volatile struct arlan_shmem *arlan = priv->card;
1754 u_char rxStatus = READSHMB(arlan->rxStatus);
1755 u_char txStatus = READSHMB(arlan->txStatus);
1756 u_short rxOffset = READSHMS(arlan->rxOffset);
1757 u_short pkt_len = READSHMS(arlan->rxLength);
1758 int interrupt_count = 0;
1759
1760 ARLAN_DEBUG_ENTRY("arlan_process_interrupt");
1761
1762 if (test_and_set_bit(0, (void *) &priv->interrupt_processing_active))
1763 {
1764 if (arlan_debug & ARLAN_DEBUG_CHAIN_LOCKS)
1765 printk(KERN_ERR "interrupt chain reentering \n");
1766 goto end_int_process;
1767 }
1768 while ((rxStatus || txStatus || priv->interrupt_ack_requested)
1769 && (interrupt_count < 5))
1770 {
1771 if (rxStatus)
1772 priv->last_rx_int_ack_time = arlan_time();
1773
1774 arlan_command(dev, ARLAN_COMMAND_INT_ACK);
1775 arlan_command(dev, ARLAN_COMMAND_INT_ENABLE);
1776
1777 IFDEBUG(ARLAN_DEBUG_INTERRUPT)
1778 printk(KERN_ERR "%s: got IRQ rx %x tx %x comm %x rxOff %x rxLen %x \n",
1779 dev->name, rxStatus, txStatus, READSHMB(arlan->commandByte),
1780 rxOffset, pkt_len);
1781
1782 if (rxStatus == 0 && txStatus == 0)
1783 {
1784 priv->last_command_was_rx = 0;
1785 if (priv->irq_test_done)
1786 {
1787 if (!registrationBad(dev))
1788 IFDEBUG(ARLAN_DEBUG_INTERRUPT) printk(KERN_ERR "%s unknown interrupt(nop? regLost ?) reason tx %d rx %d ",
1789 dev->name, txStatus, rxStatus);
1790 } else {
1791 IFDEBUG(ARLAN_DEBUG_INTERRUPT)
1792 printk(KERN_INFO "%s irq $%d test OK \n", dev->name, dev->irq);
1793
1794 }
1795 priv->interrupt_ack_requested = 0;
1796 goto ends;
1797 }
1798 if (txStatus != 0)
1799 {
1800 WRITESHMB(arlan->txStatus, 0x00);
1801 arlan_tx_done_interrupt(dev, txStatus);
1802 goto ends;
1803 }
1804 if (rxStatus == 1 || rxStatus == 2)
1805 { /* a packet waiting */
1806 arlan_rx_interrupt(dev, rxStatus, rxOffset, pkt_len);
1807 goto ends;
1808 }
1809 if (rxStatus > 2 && rxStatus < 0xff)
1810 {
1811 priv->last_command_was_rx = 0;
1812 WRITESHMB(arlan->rxStatus, 0x00);
1813 printk(KERN_ERR "%s unknown rxStatus reason tx %d rx %d ",
1814 dev->name, txStatus, rxStatus);
1815 goto ends;
1816 }
1817 if (rxStatus == 0xff)
1818 {
1819 priv->last_command_was_rx = 0;
1820 WRITESHMB(arlan->rxStatus, 0x00);
1821 arlan_command(dev, ARLAN_COMMAND_RX);
1822 if (registrationBad(dev))
1823 dev->start = 0;
1824 if (!registrationBad(dev))
1825 {
1826 priv->registrationLastSeen = jiffies;
1827 if (!dev->tbusy && !priv->under_reset && !priv->under_config)
1828 {
1829 mark_bh(NET_BH);
1830 dev->start = 1;
1831 }
1832 }
1833 goto ends;
1834 }
1835 ends:
1836
1837 arlan_command_process(dev);
1838
1839 rxStatus = READSHMB(arlan->rxStatus);
1840 txStatus = READSHMB(arlan->txStatus);
1841 rxOffset = READSHMS(arlan->rxOffset);
1842 pkt_len = READSHMS(arlan->rxLength);
1843
1844
1845 priv->irq_test_done = 1;
1846
1847 interrupt_count++;
1848 }
1849 priv->interrupt_processing_active = 0;
1850
1851 end_int_process:
1852 arlan_command_process(dev);
1853
1854 ARLAN_DEBUG_EXIT("arlan_process_interrupt");
1855 return;
1856 }
1857
1858 static void arlan_interrupt(int irq, void *dev_id, struct pt_regs *regs)
1859 {
1860 struct net_device *dev = dev_id;
1861 struct arlan_private *priv = (struct arlan_private *) dev->priv;
1862 volatile struct arlan_shmem *arlan = priv->card;
1863 u_char rxStatus = READSHMB(arlan->rxStatus);
1864 u_char txStatus = READSHMB(arlan->txStatus);
1865
1866 ARLAN_DEBUG_ENTRY("arlan_interrupt");
1867
1868
1869 if (!rxStatus && !txStatus)
1870 priv->interrupt_ack_requested++;
1871 dev->interrupt++;
1872
1873 arlan_process_interrupt(dev);
1874
1875 priv->irq_test_done = 1;
1876 dev->interrupt--;
1877
1878 ARLAN_DEBUG_EXIT("arlan_interrupt");
1879 return;
1880
1881 }
1882
1883
1884 static int arlan_close(struct net_device *dev)
1885 {
1886 struct arlan_private *priv = (struct arlan_private *) dev->priv;
1887
1888 if (!dev)
1889 {
1890 printk(KERN_CRIT "arlan: No Device\n");
1891 return 0;
1892 }
1893 priv = (struct arlan_private *) dev->priv;
1894 if (!priv)
1895 {
1896 printk(KERN_CRIT "arlan: No Device priv \n");
1897 return 0;
1898 }
1899 ARLAN_DEBUG_ENTRY("arlan_close");
1900
1901 IFDEBUG(ARLAN_DEBUG_STARTUP)
1902 printk(KERN_NOTICE "%s: Closing device\n", dev->name);
1903
1904 priv->open_time = 0;
1905 dev->tbusy = 1;
1906 dev->start = 0;
1907 del_timer(&priv->timer);
1908 free_irq(dev->irq, dev);
1909
1910 MOD_DEC_USE_COUNT;
1911
1912 ARLAN_DEBUG_EXIT("arlan_close");
1913 return 0;
1914 }
1915
1916
1917 static long alignLong(volatile u_char * ptr)
1918 {
1919 long ret;
1920 memcpy_fromio(&ret, (void *) ptr, 4);
1921 return ret;
1922 }
1923
1924
1925 /*
1926 * Get the current statistics.
1927 * This may be called with the card open or closed.
1928 */
1929
1930 static struct enet_statistics *arlan_statistics(struct net_device *dev)
1931 {
1932 struct arlan_private *priv = (struct arlan_private *) dev->priv;
1933 volatile struct arlan_shmem *arlan = ((struct arlan_private *) dev->priv)->card;
1934
1935
1936 ARLAN_DEBUG_ENTRY("arlan_statistics");
1937
1938 /* Update the statistics from the device registers. */
1939
1940 READSHM(priv->stats.collisions, arlan->numReTransmissions, u_int);
1941 READSHM(priv->stats.rx_crc_errors, arlan->numCRCErrors, u_int);
1942 READSHM(priv->stats.rx_dropped, arlan->numFramesDiscarded, u_int);
1943 READSHM(priv->stats.rx_fifo_errors, arlan->numRXBufferOverflows, u_int);
1944 READSHM(priv->stats.rx_frame_errors, arlan->numReceiveFramesLost, u_int);
1945 READSHM(priv->stats.rx_over_errors, arlan->numRXOverruns, u_int);
1946 READSHM(priv->stats.rx_packets, arlan->numDatagramsReceived, u_int);
1947 READSHM(priv->stats.tx_aborted_errors, arlan->numAbortErrors, u_int);
1948 READSHM(priv->stats.tx_carrier_errors, arlan->numStatusTimeouts, u_int);
1949 READSHM(priv->stats.tx_dropped, arlan->numDatagramsDiscarded, u_int);
1950 READSHM(priv->stats.tx_fifo_errors, arlan->numTXUnderruns, u_int);
1951 READSHM(priv->stats.tx_packets, arlan->numDatagramsTransmitted, u_int);
1952 READSHM(priv->stats.tx_window_errors, arlan->numHoldOffs, u_int);
1953
1954 ARLAN_DEBUG_EXIT("arlan_statistics");
1955
1956 return &priv->stats;
1957 }
1958
1959
1960 static void arlan_set_multicast(struct net_device *dev)
1961 {
1962 volatile struct arlan_shmem *arlan = ((struct arlan_private *) dev->priv)->card;
1963 struct arlan_conf_stru *conf = ((struct arlan_private *) dev->priv)->Conf;
1964 int board_conf_needed = 0;
1965
1966
1967 ARLAN_DEBUG_ENTRY("arlan_set_multicast");
1968
1969 if (dev->flags & IFF_PROMISC)
1970 {
1971 unsigned char recMode;
1972 READSHM(recMode, arlan->receiveMode, u_char);
1973 conf->receiveMode = (ARLAN_RCV_PROMISC | ARLAN_RCV_CONTROL);
1974 if (conf->receiveMode != recMode)
1975 board_conf_needed = 1;
1976 }
1977 else
1978 {
1979 /* turn off promiscuous mode */
1980 unsigned char recMode;
1981 READSHM(recMode, arlan->receiveMode, u_char);
1982 conf->receiveMode = ARLAN_RCV_CLEAN | ARLAN_RCV_CONTROL;
1983 if (conf->receiveMode != recMode)
1984 board_conf_needed = 1;
1985 }
1986 if (board_conf_needed)
1987 arlan_command(dev, ARLAN_COMMAND_CONF);
1988
1989 ARLAN_DEBUG_EXIT("arlan_set_multicast");
1990 }
1991
1992
1993 int __init arlan_probe(struct net_device *dev)
1994 {
1995 printk("Arlan driver %s\n", arlan_version);
1996
1997 if (arlan_probe_everywhere(dev))
1998 return ENODEV;
1999
2000 arlans_found++;
2001
2002 if (arlans_found == 1)
2003 siteName = kmalloc(100, GFP_KERNEL);
2004 return 0;
2005 }
2006
2007 #ifdef MODULE
2008
2009 int init_module(void)
2010 {
2011 int i = 0;
2012
2013 ARLAN_DEBUG_ENTRY("init_module");
2014
2015 if (channelSet != channelSetUNKNOWN || channelNumber != channelNumberUNKNOWN || systemId != systemIdUNKNOWN)
2016 {
2017 printk(KERN_WARNING "arlan: wrong module params for multiple devices\n ");
2018 return -1;
2019 }
2020 numDevices = arlan_find_devices();
2021 if (numDevices == 0)
2022 {
2023 printk(KERN_ERR "arlan: no devices found \n");
2024 return -1;
2025 }
2026
2027 siteName = kmalloc(100, GFP_KERNEL);
2028 if(siteName==NULL)
2029 {
2030 printk(KERN_ERR "arlan: No memory for site name.\n");
2031 return -1;
2032 }
2033 for (i = 0; i < numDevices && i < MAX_ARLANS; i++)
2034 {
2035 if (!arlan_allocate_device(i, NULL))
2036 return -1;
2037 if (arlan_device[i] == NULL)
2038 {
2039 printk(KERN_CRIT "arlan: Not Enough memory \n");
2040 return -1;
2041 }
2042 if (probe)
2043 arlan_probe_everywhere(arlan_device[i]);
2044 }
2045 printk(KERN_INFO "Arlan driver %s\n", arlan_version);
2046 ARLAN_DEBUG_EXIT("init_module");
2047 return 0;
2048 }
2049
2050
2051 void cleanup_module(void)
2052 {
2053 int i = 0;
2054
2055 ARLAN_DEBUG_ENTRY("cleanup_module");
2056
2057 IFDEBUG(ARLAN_DEBUG_SHUTDOWN)
2058 printk(KERN_INFO "arlan: unloading module\n");
2059 for (i = 0; i < MAX_ARLANS; i++)
2060 {
2061 if (arlan_device[i])
2062 {
2063 unregister_netdev(arlan_device[i]);
2064 if (arlan_device[i]->priv)
2065 {
2066 if (((struct arlan_private *) arlan_device[i]->priv)->conf)
2067 kfree(((struct arlan_private *) arlan_device[i]->priv)->conf);
2068 kfree(arlan_device[i]);
2069 }
2070 arlan_device[i] = NULL;
2071 }
2072 }
2073 ARLAN_DEBUG_EXIT("cleanup_module");
2074 }
2075
2076
2077 #endif
Copy of Dave Jones history.git as used by http://archive.org/details/git-history-of-linux