module.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:22k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /* $Id: module.c,v 1.1.4.1 2001/11/20 14:19:34 kai Exp $
  2.  *
  3.  * ISDN lowlevel-module for the IBM ISDN-S0 Active 2000.
  4.  *
  5.  * Author       Fritz Elfert
  6.  * Copyright    by Fritz Elfert      <fritz@isdn4linux.de>
  7.  * 
  8.  * This software may be used and distributed according to the terms
  9.  * of the GNU General Public License, incorporated herein by reference.
  10.  *
  11.  * Thanks to Friedemann Baitinger and IBM Germany
  12.  *
  13.  */
  14. #include "act2000.h"
  15. #include "act2000_isa.h"
  16. #include "capi.h"
  17. #include <linux/module.h>
  18. #include <linux/init.h>
  19. static unsigned short act2000_isa_ports[] =
  20. {
  21.         0x0200, 0x0240, 0x0280, 0x02c0, 0x0300, 0x0340, 0x0380,
  22.         0xcfe0, 0xcfa0, 0xcf60, 0xcf20, 0xcee0, 0xcea0, 0xce60,
  23. };
  24. #define ISA_NRPORTS (sizeof(act2000_isa_ports)/sizeof(unsigned short))
  25. static act2000_card *cards = (act2000_card *) NULL;
  26. /* Parameters to be set by insmod */
  27. static int   act_bus  =  0;
  28. static int   act_port = -1;  /* -1 = Autoprobe  */
  29. static int   act_irq  = -1;
  30. static char *act_id   = "";
  31. MODULE_DESCRIPTION(       "ISDN4Linux: Driver for IBM Active 2000 ISDN card");
  32. MODULE_AUTHOR(            "Fritz Elfert");
  33. MODULE_LICENSE(           "GPL");
  34. MODULE_PARM_DESC(act_bus, "BusType of first card, 1=ISA, 2=MCA, 3=PCMCIA, currently only ISA");
  35. MODULE_PARM_DESC(membase, "Base port address of first card");
  36. MODULE_PARM_DESC(act_irq, "IRQ of first card");
  37. MODULE_PARM_DESC(act_id,  "ID-String of first card");
  38. MODULE_PARM(act_bus,  "i");
  39. MODULE_PARM(act_port, "i");
  40. MODULE_PARM(act_irq,  "i");
  41. MODULE_PARM(act_id,   "s");
  42. static int act2000_addcard(int, int, int, char *);
  43. static act2000_chan *
  44. find_channel(act2000_card *card, int channel)
  45. {
  46. if ((channel >= 0) && (channel < ACT2000_BCH))
  47.          return &(card->bch[channel]);
  48. printk(KERN_WARNING "act2000: Invalid channel %dn", channel);
  49. return NULL;
  50. }
  51. /*
  52.  * Free MSN list
  53.  */
  54. static void
  55. act2000_clear_msn(act2000_card *card)
  56. {
  57.         struct msn_entry *p = card->msn_list;
  58.         struct msn_entry *q;
  59. unsigned long flags;
  60. save_flags(flags);
  61. cli();
  62.         card->msn_list = NULL;
  63. restore_flags(flags);
  64.         while (p) {
  65.                 q  = p->next;
  66.                 kfree(p);
  67.                 p = q;
  68.         }
  69. }
  70. /*
  71.  * Find an MSN entry in the list.
  72.  * If ia5 != 0, return IA5-encoded EAZ, else
  73.  * return a bitmask with corresponding bit set.
  74.  */
  75. static __u16
  76. act2000_find_msn(act2000_card *card, char *msn, int ia5)
  77. {
  78.         struct msn_entry *p = card->msn_list;
  79. __u8 eaz = '0';
  80. while (p) {
  81. if (!strcmp(p->msn, msn)) {
  82. eaz = p->eaz;
  83. break;
  84. }
  85. p = p->next;
  86. }
  87. if (!ia5)
  88. return (1 << (eaz - '0'));
  89. else
  90. return eaz;
  91. }
  92. /*
  93.  * Find an EAZ entry in the list.
  94.  * return a string with corresponding msn.
  95.  */
  96. char *
  97. act2000_find_eaz(act2000_card *card, char eaz)
  98. {
  99.         struct msn_entry *p = card->msn_list;
  100. while (p) {
  101. if (p->eaz == eaz)
  102. return(p->msn);
  103. p = p->next;
  104. }
  105. return("");
  106. }
  107. /*
  108.  * Add or delete an MSN to the MSN list
  109.  *
  110.  * First character of msneaz is EAZ, rest is MSN.
  111.  * If length of eazmsn is 1, delete that entry.
  112.  */
  113. static int
  114. act2000_set_msn(act2000_card *card, char *eazmsn)
  115. {
  116.         struct msn_entry *p = card->msn_list;
  117.         struct msn_entry *q = NULL;
  118. unsigned long flags;
  119. int i;
  120. if (!strlen(eazmsn))
  121. return 0;
  122. if (strlen(eazmsn) > 16)
  123. return -EINVAL;
  124. for (i = 0; i < strlen(eazmsn); i++)
  125. if (!isdigit(eazmsn[i]))
  126. return -EINVAL;
  127.         if (strlen(eazmsn) == 1) {
  128. /* Delete a single MSN */
  129. while (p) {
  130. if (p->eaz == eazmsn[0]) {
  131. save_flags(flags);
  132. cli();
  133. if (q)
  134. q->next = p->next;
  135. else
  136. card->msn_list = p->next;
  137. restore_flags(flags);
  138. kfree(p);
  139. printk(KERN_DEBUG
  140.        "Mapping for EAZ %c deletedn",
  141.        eazmsn[0]);
  142. return 0;
  143. }
  144. q = p;
  145. p = p->next;
  146. }
  147. return 0;
  148.         }
  149. /* Add a single MSN */
  150. while (p) {
  151. /* Found in list, replace MSN */
  152. if (p->eaz == eazmsn[0]) {
  153. save_flags(flags);
  154. cli();
  155. strcpy(p->msn, &eazmsn[1]);
  156. restore_flags(flags);
  157. printk(KERN_DEBUG
  158.        "Mapping for EAZ %c changed to %sn",
  159.        eazmsn[0],
  160.        &eazmsn[1]);
  161. return 0;
  162. }
  163. p = p->next;
  164. }
  165. /* Not found in list, add new entry */
  166. p = kmalloc(sizeof(msn_entry), GFP_KERNEL);
  167. if (!p)
  168. return -ENOMEM;
  169. p->eaz = eazmsn[0];
  170. strcpy(p->msn, &eazmsn[1]);
  171. p->next = card->msn_list;
  172. save_flags(flags);
  173. cli();
  174. card->msn_list = p;
  175. restore_flags(flags);
  176. printk(KERN_DEBUG
  177.        "Mapping %c -> %s addedn",
  178.        eazmsn[0],
  179.        &eazmsn[1]);
  180. return 0;
  181. }
  182. static void
  183. act2000_transmit(struct act2000_card *card)
  184. {
  185. switch (card->bus) {
  186. case ACT2000_BUS_ISA:
  187. act2000_isa_send(card);
  188. break;
  189. case ACT2000_BUS_PCMCIA:
  190. case ACT2000_BUS_MCA:
  191. default:
  192. printk(KERN_WARNING
  193.        "act2000_transmit: Illegal bustype %dn", card->bus);
  194. }
  195. }
  196. static void
  197. act2000_receive(struct act2000_card *card)
  198. {
  199. switch (card->bus) {
  200. case ACT2000_BUS_ISA:
  201. act2000_isa_receive(card);
  202. break;
  203. case ACT2000_BUS_PCMCIA:
  204. case ACT2000_BUS_MCA:
  205. default:
  206. printk(KERN_WARNING
  207.        "act2000_receive: Illegal bustype %dn", card->bus);
  208. }
  209. }
  210. static void
  211. act2000_poll(unsigned long data)
  212. {
  213. act2000_card * card = (act2000_card *)data;
  214. unsigned long flags;
  215. act2000_receive(card);
  216.         save_flags(flags);
  217.         cli();
  218.         mod_timer(&card->ptimer, jiffies+3);
  219.         restore_flags(flags);
  220. }
  221. static int
  222. act2000_command(act2000_card * card, isdn_ctrl * c)
  223. {
  224.         ulong a;
  225.         act2000_chan *chan;
  226. act2000_cdef cdef;
  227. isdn_ctrl cmd;
  228. char tmp[17];
  229. int ret;
  230. unsigned long flags;
  231.  
  232.         switch (c->command) {
  233. case ISDN_CMD_IOCTL:
  234. memcpy(&a, c->parm.num, sizeof(ulong));
  235. switch (c->arg) {
  236. case ACT2000_IOCTL_LOADBOOT:
  237. switch (card->bus) {
  238. case ACT2000_BUS_ISA:
  239. ret = act2000_isa_download(card,
  240.    (act2000_ddef *)a);
  241. if (!ret) {
  242. card->flags |= ACT2000_FLAGS_LOADED;
  243. if (!(card->flags & ACT2000_FLAGS_IVALID)) {
  244. card->ptimer.expires = jiffies + 3;
  245. card->ptimer.function = act2000_poll;
  246. card->ptimer.data = (unsigned long)card;
  247. add_timer(&card->ptimer);
  248. }
  249. actcapi_manufacturer_req_errh(card);
  250. }
  251. break;
  252. default:
  253. printk(KERN_WARNING
  254.        "act2000: Illegal BUS type %dn",
  255.        card->bus);
  256. ret = -EIO;
  257. }
  258. return ret;
  259. case ACT2000_IOCTL_SETPROTO:
  260. card->ptype = a?ISDN_PTYPE_EURO:ISDN_PTYPE_1TR6;
  261. if (!(card->flags & ACT2000_FLAGS_RUNNING))
  262. return 0;
  263. actcapi_manufacturer_req_net(card);
  264. return 0;
  265. case ACT2000_IOCTL_SETMSN:
  266. if ((ret = copy_from_user(tmp, (char *)a, sizeof(tmp))))
  267. return ret;
  268. if ((ret = act2000_set_msn(card, tmp)))
  269. return ret;
  270. if (card->flags & ACT2000_FLAGS_RUNNING)
  271. return(actcapi_manufacturer_req_msn(card));
  272. return 0;
  273. case ACT2000_IOCTL_ADDCARD:
  274. if ((ret = copy_from_user(&cdef, (char *)a, sizeof(cdef))))
  275. return ret;
  276. if (act2000_addcard(cdef.bus, cdef.port, cdef.irq, cdef.id))
  277. return -EIO;
  278. return 0;
  279. case ACT2000_IOCTL_TEST:
  280. if (!(card->flags & ACT2000_FLAGS_RUNNING))
  281. return -ENODEV;
  282. return 0;
  283. default:
  284. return -EINVAL;
  285. }
  286. break;
  287. case ISDN_CMD_DIAL:
  288. if (!card->flags & ACT2000_FLAGS_RUNNING)
  289. return -ENODEV;
  290. if (!(chan = find_channel(card, c->arg & 0x0f)))
  291. break;
  292. save_flags(flags);
  293. cli();
  294. if (chan->fsm_state != ACT2000_STATE_NULL) {
  295. restore_flags(flags);
  296. printk(KERN_WARNING "Dial on channel with state %dn",
  297. chan->fsm_state);
  298. return -EBUSY;
  299. }
  300. if (card->ptype == ISDN_PTYPE_EURO)
  301. tmp[0] = act2000_find_msn(card, c->parm.setup.eazmsn, 1);
  302. else
  303. tmp[0] = c->parm.setup.eazmsn[0];
  304. chan->fsm_state = ACT2000_STATE_OCALL;
  305. chan->callref = 0xffff;
  306. restore_flags(flags);
  307. ret = actcapi_connect_req(card, chan, c->parm.setup.phone,
  308.   tmp[0], c->parm.setup.si1,
  309.   c->parm.setup.si2);
  310. if (ret) {
  311. cmd.driver = card->myid;
  312. cmd.command = ISDN_STAT_DHUP;
  313. cmd.arg &= 0x0f;
  314. card->interface.statcallb(&cmd);
  315. }
  316. return ret;
  317. case ISDN_CMD_ACCEPTD:
  318. if (!card->flags & ACT2000_FLAGS_RUNNING)
  319. return -ENODEV;
  320. if (!(chan = find_channel(card, c->arg & 0x0f)))
  321. break;
  322. if (chan->fsm_state == ACT2000_STATE_ICALL)
  323. actcapi_select_b2_protocol_req(card, chan);
  324. return 0;
  325. case ISDN_CMD_ACCEPTB:
  326. if (!card->flags & ACT2000_FLAGS_RUNNING)
  327. return -ENODEV;
  328. return 0;
  329. case ISDN_CMD_HANGUP:
  330. if (!card->flags & ACT2000_FLAGS_RUNNING)
  331. return -ENODEV;
  332. if (!(chan = find_channel(card, c->arg & 0x0f)))
  333. break;
  334. switch (chan->fsm_state) {
  335. case ACT2000_STATE_ICALL:
  336. case ACT2000_STATE_BSETUP:
  337. actcapi_connect_resp(card, chan, 0x15);
  338. break;
  339. case ACT2000_STATE_ACTIVE:
  340. actcapi_disconnect_b3_req(card, chan);
  341. break;
  342. }
  343. return 0;
  344. case ISDN_CMD_SETEAZ:
  345. if (!card->flags & ACT2000_FLAGS_RUNNING)
  346. return -ENODEV;
  347. if (!(chan = find_channel(card, c->arg & 0x0f)))
  348. break;
  349. if (strlen(c->parm.num)) {
  350. if (card->ptype == ISDN_PTYPE_EURO) {
  351. chan->eazmask = act2000_find_msn(card, c->parm.num, 0);
  352. }
  353. if (card->ptype == ISDN_PTYPE_1TR6) {
  354. int i;
  355. chan->eazmask = 0;
  356. for (i = 0; i < strlen(c->parm.num); i++)
  357. if (isdigit(c->parm.num[i]))
  358. chan->eazmask |= (1 << (c->parm.num[i] - '0'));
  359. }
  360. } else
  361. chan->eazmask = 0x3ff;
  362. actcapi_listen_req(card);
  363. return 0;
  364. case ISDN_CMD_CLREAZ:
  365. if (!card->flags & ACT2000_FLAGS_RUNNING)
  366. return -ENODEV;
  367. if (!(chan = find_channel(card, c->arg & 0x0f)))
  368. break;
  369. chan->eazmask = 0;
  370. actcapi_listen_req(card);
  371. return 0;
  372. case ISDN_CMD_SETL2:
  373. if (!card->flags & ACT2000_FLAGS_RUNNING)
  374. return -ENODEV;
  375. if (!(chan = find_channel(card, c->arg & 0x0f)))
  376. break;
  377. chan->l2prot = (c->arg >> 8);
  378. return 0;
  379. case ISDN_CMD_GETL2:
  380. if (!card->flags & ACT2000_FLAGS_RUNNING)
  381. return -ENODEV;
  382. if (!(chan = find_channel(card, c->arg & 0x0f)))
  383. break;
  384. return chan->l2prot;
  385. case ISDN_CMD_SETL3:
  386. if (!card->flags & ACT2000_FLAGS_RUNNING)
  387. return -ENODEV;
  388. if ((c->arg >> 8) != ISDN_PROTO_L3_TRANS) {
  389. printk(KERN_WARNING "L3 protocol unknownn");
  390. return -1;
  391. }
  392. if (!(chan = find_channel(card, c->arg & 0x0f)))
  393. break;
  394. chan->l3prot = (c->arg >> 8);
  395. return 0;
  396. case ISDN_CMD_GETL3:
  397. if (!card->flags & ACT2000_FLAGS_RUNNING)
  398. return -ENODEV;
  399. if (!(chan = find_channel(card, c->arg & 0x0f)))
  400. break;
  401. return chan->l3prot;
  402. case ISDN_CMD_GETEAZ:
  403. if (!card->flags & ACT2000_FLAGS_RUNNING)
  404. return -ENODEV;
  405. printk(KERN_DEBUG "act2000 CMD_GETEAZ not implementedn");
  406. return 0;
  407. case ISDN_CMD_SETSIL:
  408. if (!card->flags & ACT2000_FLAGS_RUNNING)
  409. return -ENODEV;
  410. printk(KERN_DEBUG "act2000 CMD_SETSIL not implementedn");
  411. return 0;
  412. case ISDN_CMD_GETSIL:
  413. if (!card->flags & ACT2000_FLAGS_RUNNING)
  414. return -ENODEV;
  415. printk(KERN_DEBUG "act2000 CMD_GETSIL not implementedn");
  416. return 0;
  417. case ISDN_CMD_LOCK:
  418. MOD_INC_USE_COUNT;
  419. return 0;
  420. case ISDN_CMD_UNLOCK:
  421. MOD_DEC_USE_COUNT;
  422. return 0;
  423.         }
  424.         return -EINVAL;
  425. }
  426. static int
  427. act2000_sendbuf(act2000_card *card, int channel, int ack, struct sk_buff *skb)
  428. {
  429.         struct sk_buff *xmit_skb;
  430.         int len;
  431.         act2000_chan *chan;
  432. actcapi_msg *msg;
  433.         if (!(chan = find_channel(card, channel)))
  434. return -1;
  435.         if (chan->fsm_state != ACT2000_STATE_ACTIVE)
  436.                 return -1;
  437.         len = skb->len;
  438.         if ((chan->queued + len) >= ACT2000_MAX_QUEUED)
  439.                 return 0;
  440. if (!len)
  441. return 0;
  442. if (skb_headroom(skb) < 19) {
  443. printk(KERN_WARNING "act2000_sendbuf: Headroom only %dn",
  444.        skb_headroom(skb));
  445. xmit_skb = alloc_skb(len + 19, GFP_ATOMIC);
  446. if (!xmit_skb) {
  447. printk(KERN_WARNING "act2000_sendbuf: Out of memoryn");
  448. return 0;
  449. }
  450. skb_reserve(xmit_skb, 19);
  451. memcpy(skb_put(xmit_skb, len), skb->data, len);
  452. } else {
  453. xmit_skb = skb_clone(skb, GFP_ATOMIC);
  454. if (!xmit_skb) {
  455. printk(KERN_WARNING "act2000_sendbuf: Out of memoryn");
  456. return 0;
  457. }
  458. }
  459. dev_kfree_skb(skb);
  460. msg = (actcapi_msg *)skb_push(xmit_skb, 19);
  461. msg->hdr.len = 19 + len;
  462. msg->hdr.applicationID = 1;
  463. msg->hdr.cmd.cmd = 0x86;
  464. msg->hdr.cmd.subcmd = 0x00;
  465. msg->hdr.msgnum = actcapi_nextsmsg(card);
  466. msg->msg.data_b3_req.datalen = len;
  467. msg->msg.data_b3_req.blocknr = (msg->hdr.msgnum & 0xff);
  468. msg->msg.data_b3_req.fakencci = MAKE_NCCI(chan->plci, 0, chan->ncci);
  469. msg->msg.data_b3_req.flags = ack; /* Will be set to 0 on actual sending */
  470. actcapi_debug_msg(xmit_skb, 1);
  471.         chan->queued += len;
  472. skb_queue_tail(&card->sndq, xmit_skb);
  473. act2000_schedule_tx(card);
  474.         return len;
  475. }
  476. /* Read the Status-replies from the Interface */
  477. static int
  478. act2000_readstatus(u_char * buf, int len, int user, act2000_card * card)
  479. {
  480.         int count;
  481.         u_char *p;
  482.         for (p = buf, count = 0; count < len; p++, count++) {
  483.                 if (card->status_buf_read == card->status_buf_write)
  484.                         return count;
  485.                 if (user)
  486.                         put_user(*card->status_buf_read++, p);
  487.                 else
  488.                         *p = *card->status_buf_read++;
  489.                 if (card->status_buf_read > card->status_buf_end)
  490.                         card->status_buf_read = card->status_buf;
  491.         }
  492.         return count;
  493. }
  494. /*
  495.  * Find card with given driverId
  496.  */
  497. static inline act2000_card *
  498. act2000_findcard(int driverid)
  499. {
  500.         act2000_card *p = cards;
  501.         while (p) {
  502.                 if (p->myid == driverid)
  503.                         return p;
  504.                 p = p->next;
  505.         }
  506.         return (act2000_card *) 0;
  507. }
  508. /*
  509.  * Wrapper functions for interface to linklevel
  510.  */
  511. static int
  512. if_command(isdn_ctrl * c)
  513. {
  514.         act2000_card *card = act2000_findcard(c->driver);
  515.         if (card)
  516.                 return (act2000_command(card, c));
  517.         printk(KERN_ERR
  518.              "act2000: if_command %d called with invalid driverId %d!n",
  519.                c->command, c->driver);
  520.         return -ENODEV;
  521. }
  522. static int
  523. if_writecmd(const u_char * buf, int len, int user, int id, int channel)
  524. {
  525.         act2000_card *card = act2000_findcard(id);
  526.         if (card) {
  527.                 if (!card->flags & ACT2000_FLAGS_RUNNING)
  528.                         return -ENODEV;
  529.                 return (len);
  530.         }
  531.         printk(KERN_ERR
  532.                "act2000: if_writecmd called with invalid driverId!n");
  533.         return -ENODEV;
  534. }
  535. static int
  536. if_readstatus(u_char * buf, int len, int user, int id, int channel)
  537. {
  538.         act2000_card *card = act2000_findcard(id);
  539.         if (card) {
  540.                 if (!card->flags & ACT2000_FLAGS_RUNNING)
  541.                         return -ENODEV;
  542.                 return (act2000_readstatus(buf, len, user, card));
  543.         }
  544.         printk(KERN_ERR
  545.                "act2000: if_readstatus called with invalid driverId!n");
  546.         return -ENODEV;
  547. }
  548. static int
  549. if_sendbuf(int id, int channel, int ack, struct sk_buff *skb)
  550. {
  551.         act2000_card *card = act2000_findcard(id);
  552.         if (card) {
  553.                 if (!card->flags & ACT2000_FLAGS_RUNNING)
  554.                         return -ENODEV;
  555. return (act2000_sendbuf(card, channel, ack, skb));
  556.         }
  557.         printk(KERN_ERR
  558.                "act2000: if_sendbuf called with invalid driverId!n");
  559.         return -ENODEV;
  560. }
  561. /*
  562.  * Allocate a new card-struct, initialize it
  563.  * link it into cards-list.
  564.  */
  565. static void
  566. act2000_alloccard(int bus, int port, int irq, char *id)
  567. {
  568. int i;
  569.         act2000_card *card;
  570.         if (!(card = (act2000_card *) kmalloc(sizeof(act2000_card), GFP_KERNEL))) {
  571.                 printk(KERN_WARNING
  572.        "act2000: (%s) Could not allocate card-struct.n", id);
  573.                 return;
  574.         }
  575.         memset((char *) card, 0, sizeof(act2000_card));
  576. skb_queue_head_init(&card->sndq);
  577. skb_queue_head_init(&card->rcvq);
  578. skb_queue_head_init(&card->ackq);
  579. card->snd_tq.routine = (void *) (void *) act2000_transmit;
  580. card->snd_tq.data = card;
  581. card->rcv_tq.routine = (void *) (void *) actcapi_dispatch;
  582. card->rcv_tq.data = card;
  583. card->poll_tq.routine = (void *) (void *) act2000_receive;
  584. card->poll_tq.data = card;
  585. init_timer(&card->ptimer);
  586.         card->interface.channels = ACT2000_BCH;
  587.         card->interface.maxbufsize = 4000;
  588.         card->interface.command = if_command;
  589.         card->interface.writebuf_skb = if_sendbuf;
  590.         card->interface.writecmd = if_writecmd;
  591.         card->interface.readstat = if_readstatus;
  592.         card->interface.features =
  593. ISDN_FEATURE_L2_X75I |
  594. ISDN_FEATURE_L2_HDLC |
  595. ISDN_FEATURE_L3_TRANS |
  596. ISDN_FEATURE_P_UNKNOWN;
  597.         card->interface.hl_hdrlen = 20;
  598.         card->ptype = ISDN_PTYPE_EURO;
  599.         strncpy(card->interface.id, id, sizeof(card->interface.id) - 1);
  600.         for (i=0; i<ACT2000_BCH; i++) {
  601.                 card->bch[i].plci = 0x8000;
  602.                 card->bch[i].ncci = 0x8000;
  603.                 card->bch[i].l2prot = ISDN_PROTO_L2_X75I;
  604.                 card->bch[i].l3prot = ISDN_PROTO_L3_TRANS;
  605.         }
  606.         card->myid = -1;
  607.         card->bus = bus;
  608.         card->port = port;
  609.         card->irq = irq;
  610.         card->next = cards;
  611.         cards = card;
  612. }
  613. /*
  614.  * register card at linklevel
  615.  */
  616. static int
  617. act2000_registercard(act2000_card * card)
  618. {
  619.         switch (card->bus) {
  620. case ACT2000_BUS_ISA:
  621. break;
  622. case ACT2000_BUS_MCA:
  623. case ACT2000_BUS_PCMCIA:
  624. default:
  625. printk(KERN_WARNING
  626.        "act2000: Illegal BUS type %dn",
  627.        card->bus);
  628. return -1;
  629.         }
  630.         if (!register_isdn(&card->interface)) {
  631.                 printk(KERN_WARNING
  632.                        "act2000: Unable to register %sn",
  633.                        card->interface.id);
  634.                 return -1;
  635.         }
  636.         card->myid = card->interface.channels;
  637.         sprintf(card->regname, "act2000-isdn (%s)", card->interface.id);
  638.         return 0;
  639. }
  640. static void
  641. unregister_card(act2000_card * card)
  642. {
  643.         isdn_ctrl cmd;
  644.         cmd.command = ISDN_STAT_UNLOAD;
  645.         cmd.driver = card->myid;
  646.         card->interface.statcallb(&cmd);
  647.         switch (card->bus) {
  648. case ACT2000_BUS_ISA:
  649. act2000_isa_release(card);
  650. break;
  651. case ACT2000_BUS_MCA:
  652. case ACT2000_BUS_PCMCIA:
  653. default:
  654. printk(KERN_WARNING
  655.        "act2000: Invalid BUS type %dn",
  656.        card->bus);
  657. break;
  658.         }
  659. }
  660. static int
  661. act2000_addcard(int bus, int port, int irq, char *id)
  662. {
  663. act2000_card *p;
  664. act2000_card *q = NULL;
  665. int initialized;
  666. int added = 0;
  667. int failed = 0;
  668. int i;
  669. if (!bus)
  670. bus = ACT2000_BUS_ISA;
  671. if (port != -1) {
  672. /* Port defined, do fixed setup */
  673. act2000_alloccard(bus, port, irq, id);
  674. } else {
  675. /* No port defined, perform autoprobing.
  676.  * This may result in more than one card detected.
  677.  */
  678. switch (bus) {
  679. case ACT2000_BUS_ISA:
  680. for (i = 0; i < ISA_NRPORTS; i++)
  681. if (act2000_isa_detect(act2000_isa_ports[i])) {
  682. printk(KERN_INFO
  683.        "act2000: Detected ISA card at port 0x%xn",
  684.        act2000_isa_ports[i]);
  685. act2000_alloccard(bus, act2000_isa_ports[i], irq, id);
  686. }
  687. break;
  688. case ACT2000_BUS_MCA:
  689. case ACT2000_BUS_PCMCIA:
  690. default:
  691. printk(KERN_WARNING
  692.        "act2000: addcard: Invalid BUS type %dn",
  693.        bus);
  694. }
  695. }
  696. if (!cards)
  697. return 1;
  698.         p = cards;
  699.         while (p) {
  700. initialized = 0;
  701. if (!p->interface.statcallb) {
  702. /* Not yet registered.
  703.  * Try to register and activate it.
  704.  */
  705. added++;
  706. switch (p->bus) {
  707. case ACT2000_BUS_ISA:
  708. if (act2000_isa_detect(p->port)) {
  709. if (act2000_registercard(p))
  710. break;
  711. if (act2000_isa_config_port(p, p->port)) {
  712. printk(KERN_WARNING
  713.        "act2000: Could not request port 0x%04xn",
  714.        p->port);
  715. unregister_card(p);
  716. p->interface.statcallb = NULL;
  717. break;
  718. }
  719. if (act2000_isa_config_irq(p, p->irq)) {
  720. printk(KERN_INFO
  721.        "act2000: No IRQ available, fallback to pollingn");
  722. /* Fall back to polled operation */
  723. p->irq = 0;
  724. }
  725. printk(KERN_INFO
  726.        "act2000: ISA"
  727.        "-type card at port "
  728.        "0x%04x ",
  729.        p->port);
  730. if (p->irq)
  731. printk("irq %dn", p->irq);
  732. else
  733. printk("polledn");
  734. initialized = 1;
  735. }
  736. break;
  737. case ACT2000_BUS_MCA:
  738. case ACT2000_BUS_PCMCIA:
  739. default:
  740. printk(KERN_WARNING
  741.        "act2000: addcard: Invalid BUS type %dn",
  742.        p->bus);
  743. }
  744. } else
  745. /* Card already initialized */
  746. initialized = 1;
  747.                 if (initialized) {
  748. /* Init OK, next card ... */
  749.                         q = p;
  750.                         p = p->next;
  751.                 } else {
  752.                         /* Init failed, remove card from list, free memory */
  753.                         printk(KERN_WARNING
  754.                                "act2000: Initialization of %s failedn",
  755.                                p->interface.id);
  756.                         if (q) {
  757.                                 q->next = p->next;
  758.                                 kfree(p);
  759.                                 p = q->next;
  760.                         } else {
  761.                                 cards = p->next;
  762.                                 kfree(p);
  763.                                 p = cards;
  764.                         }
  765. failed++;
  766.                 }
  767. }
  768.         return (added - failed);
  769. }
  770. #define DRIVERNAME "IBM Active 2000 ISDN driver"
  771. static int __init act2000_init(void)
  772. {
  773.         printk(KERN_INFO "%sn", DRIVERNAME);
  774.         if (!cards)
  775. act2000_addcard(act_bus, act_port, act_irq, act_id);
  776.         if (!cards)
  777.                 printk(KERN_INFO "act2000: No cards defined yetn");
  778.         /* No symbols to export, hide all symbols */
  779.         EXPORT_NO_SYMBOLS;
  780.         return 0;
  781. }
  782. static void __exit act2000_exit(void)
  783. {
  784.         act2000_card *card = cards;
  785.         act2000_card *last;
  786.         while (card) {
  787.                 unregister_card(card);
  788. del_timer(&card->ptimer);
  789.                 card = card->next;
  790.         }
  791.         card = cards;
  792.         while (card) {
  793.                 last = card;
  794.                 card = card->next;
  795. act2000_clear_msn(last);
  796.                 kfree(last);
  797.         }
  798.         printk(KERN_INFO "%s unloadedn", DRIVERNAME);
  799. }
  800. module_init(act2000_init);
  801. module_exit(act2000_exit);