mISDN/drivers/isdn/hardware/mISDN/layer1.c

821 lines
19 KiB
C

/* $Id$
*
* mISDN_l1.c common low level stuff for I.430 layer1
*
* Author Karsten Keil (keil@isdn4linux.de)
*
* This file is (c) under GNU PUBLIC LICENSE
* For changes and modifications please read
* ../../../Documentation/isdn/mISDN.cert
*
*/
static char *l1_revision = "$Revision$";
#include <linux/config.h>
#include <linux/module.h>
#include "layer1.h"
#include "helper.h"
#include "debug.h"
typedef struct _layer1 {
struct _layer1 *prev;
struct _layer1 *next;
u_long Flags;
struct FsmInst l1m;
struct FsmTimer timer;
int debug;
int delay;
mISDNinstance_t inst;
} layer1_t;
/* l1 status_info */
typedef struct _status_info_l1 {
int len;
int typ;
int protocol;
int status;
int state;
u_long Flags;
int T3;
int delay;
int debug;
} status_info_l1_t;
static int debug = 0;
static mISDNobject_t isdnl1;
#define TIMER3_VALUE 7000
static
struct Fsm l1fsm_b =
{NULL, 0, 0, NULL, NULL};
static
struct Fsm l1fsm_s =
{NULL, 0, 0, NULL, NULL};
enum {
ST_L1_F2,
ST_L1_F3,
ST_L1_F4,
ST_L1_F5,
ST_L1_F6,
ST_L1_F7,
ST_L1_F8,
};
#define L1S_STATE_COUNT (ST_L1_F8+1)
static char *strL1SState[] =
{
"ST_L1_F2",
"ST_L1_F3",
"ST_L1_F4",
"ST_L1_F5",
"ST_L1_F6",
"ST_L1_F7",
"ST_L1_F8",
};
#ifdef mISDN_UINTERFACE
static
struct Fsm l1fsm_u =
{NULL, 0, 0, NULL, NULL};
enum {
ST_L1_RESET,
ST_L1_DEACT,
ST_L1_SYNC2,
ST_L1_TRANS,
};
#define L1U_STATE_COUNT (ST_L1_TRANS+1)
static char *strL1UState[] =
{
"ST_L1_RESET",
"ST_L1_DEACT",
"ST_L1_SYNC2",
"ST_L1_TRANS",
};
#endif
enum {
ST_L1_NULL,
ST_L1_WAIT_ACT,
ST_L1_WAIT_DEACT,
ST_L1_ACTIV,
};
#define L1B_STATE_COUNT (ST_L1_ACTIV+1)
static char *strL1BState[] =
{
"ST_L1_NULL",
"ST_L1_WAIT_ACT",
"ST_L1_WAIT_DEACT",
"ST_L1_ACTIV",
};
enum {
EV_PH_ACTIVATE,
EV_PH_DEACTIVATE,
EV_RESET_IND,
EV_DEACT_CNF,
EV_DEACT_IND,
EV_POWER_UP,
EV_ANYSIG_IND,
EV_INFO2_IND,
EV_INFO4_IND,
EV_TIMER_DEACT,
EV_TIMER_ACT,
EV_TIMER3,
};
#define L1_EVENT_COUNT (EV_TIMER3 + 1)
static char *strL1Event[] =
{
"EV_PH_ACTIVATE",
"EV_PH_DEACTIVATE",
"EV_RESET_IND",
"EV_DEACT_CNF",
"EV_DEACT_IND",
"EV_POWER_UP",
"EV_ANYSIG_IND",
"EV_INFO2_IND",
"EV_INFO4_IND",
"EV_TIMER_DEACT",
"EV_TIMER_ACT",
"EV_TIMER3",
};
static void
l1m_debug(struct FsmInst *fi, char *fmt, ...)
{
layer1_t *l1 = fi->userdata;
logdata_t log;
va_start(log.args, fmt);
log.fmt = fmt;
log.head = l1->inst.name;
l1->inst.obj->ctrl(&l1->inst, MGR_DEBUGDATA | REQUEST, &log);
va_end(log.args);
}
static int
l1up(layer1_t *l1, u_int prim, int dinfo, int len, void *arg)
{
return(if_link(&l1->inst.up, prim, dinfo, len, arg, 0));
}
static int
l1down(layer1_t *l1, u_int prim, int dinfo, int len, void *arg)
{
return(if_link(&l1->inst.down, prim, dinfo, len, arg, 0));
}
static void
l1_reset(struct FsmInst *fi, int event, void *arg)
{
FsmChangeState(fi, ST_L1_F3);
}
static void
l1_deact_cnf(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_F3);
if (test_bit(FLG_L1_ACTIVATING, &l1->Flags))
l1down(l1, PH_CONTROL | REQUEST, HW_POWERUP, 0, NULL);
}
static void
l1_deact_req_s(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_F3);
FsmRestartTimer(&l1->timer, 550, EV_TIMER_DEACT, NULL, 2);
test_and_set_bit(FLG_L1_DEACTTIMER, &l1->Flags);
}
static void
l1_power_up_s(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
if (test_bit(FLG_L1_ACTIVATING, &l1->Flags)) {
FsmChangeState(fi, ST_L1_F4);
l1down(l1, PH_SIGNAL | REQUEST, INFO3_P8, 0, NULL);
FsmRestartTimer(&l1->timer, TIMER3_VALUE, EV_TIMER3, NULL, 2);
test_and_set_bit(FLG_L1_T3RUN, &l1->Flags);
} else
FsmChangeState(fi, ST_L1_F3);
}
static void
l1_go_F5(struct FsmInst *fi, int event, void *arg)
{
FsmChangeState(fi, ST_L1_F5);
}
static void
l1_go_F8(struct FsmInst *fi, int event, void *arg)
{
FsmChangeState(fi, ST_L1_F8);
}
static void
l1_info2_ind(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
#ifdef mISDN_UINTERFACE
if (test_bit(FLG_L1_UINT, &l1->Flags))
FsmChangeState(fi, ST_L1_SYNC2);
else
#endif
FsmChangeState(fi, ST_L1_F6);
l1down(l1, PH_SIGNAL | REQUEST, INFO3_P8, 0, NULL);
}
static void
l1_info4_ind(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
#ifdef mISDN_UINTERFACE
if (test_bit(FLG_L1_UINT, &l1->Flags))
FsmChangeState(fi, ST_L1_TRANS);
else
#endif
FsmChangeState(fi, ST_L1_F7);
l1down(l1, PH_SIGNAL | REQUEST, INFO3_P8, 0, NULL);
if (test_and_clear_bit(FLG_L1_DEACTTIMER, &l1->Flags))
FsmDelTimer(&l1->timer, 4);
if (!test_bit(FLG_L1_ACTIVATED, &l1->Flags)) {
if (test_and_clear_bit(FLG_L1_T3RUN, &l1->Flags))
FsmDelTimer(&l1->timer, 3);
FsmRestartTimer(&l1->timer, 110, EV_TIMER_ACT, NULL, 2);
test_and_set_bit(FLG_L1_ACTTIMER, &l1->Flags);
}
}
static void
l1_timer3(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
u_int db = HW_D_NOBLOCKED;
test_and_clear_bit(FLG_L1_T3RUN, &l1->Flags);
if (test_and_clear_bit(FLG_L1_ACTIVATING, &l1->Flags)) {
if (test_and_clear_bit(FLG_L1_DBLOCKED, &l1->Flags))
l1up(l1, PH_CONTROL | INDICATION, 0, 4, &db);
l1up(l1, PH_DEACTIVATE | INDICATION, 0, 0, NULL);
}
#ifdef mISDN_UINTERFACE
if (!test_bit(FLG_L1_UINT, &l1->Flags))
#endif
if (l1->l1m.state != ST_L1_F6) {
FsmChangeState(fi, ST_L1_F3);
l1down(l1, PH_CONTROL | REQUEST, HW_POWERUP, 0, NULL);
}
}
static void
l1_timer_act(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
test_and_clear_bit(FLG_L1_ACTTIMER, &l1->Flags);
test_and_set_bit(FLG_L1_ACTIVATED, &l1->Flags);
if (test_and_clear_bit(FLG_L1_ACTIVATING, &l1->Flags))
l1up(l1, PH_ACTIVATE | CONFIRM, 0, 0, NULL);
else
l1up(l1, PH_ACTIVATE | INDICATION, 0, 0, NULL);
}
static void
l1_timer_deact(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
u_int db = HW_D_NOBLOCKED;
test_and_clear_bit(FLG_L1_DEACTTIMER, &l1->Flags);
test_and_clear_bit(FLG_L1_ACTIVATED, &l1->Flags);
if (test_and_clear_bit(FLG_L1_DBLOCKED, &l1->Flags))
l1up(l1, PH_CONTROL | INDICATION, 0, 4, &db);
l1up(l1, PH_DEACTIVATE | INDICATION, 0, 0, NULL);
l1down(l1, PH_CONTROL | REQUEST, HW_DEACTIVATE, 0, NULL);
}
static void
l1_activate_s(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
l1down(l1, PH_CONTROL | REQUEST, HW_RESET, 0, NULL);
}
static void
l1_activate_no(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
u_int db = HW_D_NOBLOCKED;
if ((!test_bit(FLG_L1_DEACTTIMER, &l1->Flags)) && (!test_bit(FLG_L1_T3RUN, &l1->Flags))) {
test_and_clear_bit(FLG_L1_ACTIVATING, &l1->Flags);
if (test_and_clear_bit(FLG_L1_DBLOCKED, &l1->Flags))
l1up(l1, PH_CONTROL | INDICATION, 0, 4, &db);
l1up(l1, PH_DEACTIVATE | INDICATION, 0, 0, NULL);
}
}
static struct FsmNode L1SFnList[] =
{
{ST_L1_F3, EV_PH_ACTIVATE, l1_activate_s},
{ST_L1_F6, EV_PH_ACTIVATE, l1_activate_no},
{ST_L1_F8, EV_PH_ACTIVATE, l1_activate_no},
{ST_L1_F3, EV_RESET_IND, l1_reset},
{ST_L1_F4, EV_RESET_IND, l1_reset},
{ST_L1_F5, EV_RESET_IND, l1_reset},
{ST_L1_F6, EV_RESET_IND, l1_reset},
{ST_L1_F7, EV_RESET_IND, l1_reset},
{ST_L1_F8, EV_RESET_IND, l1_reset},
{ST_L1_F3, EV_DEACT_CNF, l1_deact_cnf},
{ST_L1_F4, EV_DEACT_CNF, l1_deact_cnf},
{ST_L1_F5, EV_DEACT_CNF, l1_deact_cnf},
{ST_L1_F6, EV_DEACT_CNF, l1_deact_cnf},
{ST_L1_F7, EV_DEACT_CNF, l1_deact_cnf},
{ST_L1_F8, EV_DEACT_CNF, l1_deact_cnf},
{ST_L1_F6, EV_DEACT_IND, l1_deact_req_s},
{ST_L1_F7, EV_DEACT_IND, l1_deact_req_s},
{ST_L1_F8, EV_DEACT_IND, l1_deact_req_s},
{ST_L1_F3, EV_POWER_UP, l1_power_up_s},
{ST_L1_F4, EV_ANYSIG_IND,l1_go_F5},
{ST_L1_F6, EV_ANYSIG_IND,l1_go_F8},
{ST_L1_F7, EV_ANYSIG_IND,l1_go_F8},
{ST_L1_F3, EV_INFO2_IND, l1_info2_ind},
{ST_L1_F4, EV_INFO2_IND, l1_info2_ind},
{ST_L1_F5, EV_INFO2_IND, l1_info2_ind},
{ST_L1_F7, EV_INFO2_IND, l1_info2_ind},
{ST_L1_F8, EV_INFO2_IND, l1_info2_ind},
{ST_L1_F3, EV_INFO4_IND, l1_info4_ind},
{ST_L1_F4, EV_INFO4_IND, l1_info4_ind},
{ST_L1_F5, EV_INFO4_IND, l1_info4_ind},
{ST_L1_F6, EV_INFO4_IND, l1_info4_ind},
{ST_L1_F8, EV_INFO4_IND, l1_info4_ind},
{ST_L1_F3, EV_TIMER3, l1_timer3},
{ST_L1_F4, EV_TIMER3, l1_timer3},
{ST_L1_F5, EV_TIMER3, l1_timer3},
{ST_L1_F6, EV_TIMER3, l1_timer3},
{ST_L1_F8, EV_TIMER3, l1_timer3},
{ST_L1_F7, EV_TIMER_ACT, l1_timer_act},
{ST_L1_F3, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_F4, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_F5, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_F6, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_F7, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_F8, EV_TIMER_DEACT, l1_timer_deact},
};
#define L1S_FN_COUNT (sizeof(L1SFnList)/sizeof(struct FsmNode))
#ifdef mISDN_UINTERFACE
static void
l1_deact_req_u(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_RESET);
FsmRestartTimer(&l1->timer, 550, EV_TIMER_DEACT, NULL, 2);
test_and_set_bit(FLG_L1_DEACTTIMER, &l1->Flags);
l1down(l1, PH_CONTROL | REQUEST, HW_POWERUP, 0, NULL);
}
static void
l1_power_up_u(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmRestartTimer(&l1->timer, TIMER3_VALUE, EV_TIMER3, NULL, 2);
test_and_set_bit(FLG_L1_T3RUN, &l1->Flags);
}
static void
l1_info0_ind(struct FsmInst *fi, int event, void *arg)
{
FsmChangeState(fi, ST_L1_DEACT);
}
static void
l1_activate_u(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
l1down(l1, PH_SIGNAL | REQUEST, INFO1, 0, NULL);
}
static struct FsmNode L1UFnList[] =
{
{ST_L1_RESET, EV_DEACT_IND, l1_deact_req_u},
{ST_L1_DEACT, EV_DEACT_IND, l1_deact_req_u},
{ST_L1_SYNC2, EV_DEACT_IND, l1_deact_req_u},
{ST_L1_TRANS, EV_DEACT_IND, l1_deact_req_u},
{ST_L1_DEACT, EV_PH_ACTIVATE, l1_activate_u},
{ST_L1_DEACT, EV_POWER_UP, l1_power_up_u},
{ST_L1_DEACT, EV_INFO2_IND, l1_info2_ind},
{ST_L1_TRANS, EV_INFO2_IND, l1_info2_ind},
{ST_L1_RESET, EV_DEACT_CNF, l1_info0_ind},
{ST_L1_DEACT, EV_INFO4_IND, l1_info4_ind},
{ST_L1_SYNC2, EV_INFO4_IND, l1_info4_ind},
{ST_L1_RESET, EV_INFO4_IND, l1_info4_ind},
{ST_L1_DEACT, EV_TIMER3, l1_timer3},
{ST_L1_SYNC2, EV_TIMER3, l1_timer3},
{ST_L1_TRANS, EV_TIMER_ACT, l1_timer_act},
{ST_L1_DEACT, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_SYNC2, EV_TIMER_DEACT, l1_timer_deact},
{ST_L1_RESET, EV_TIMER_DEACT, l1_timer_deact},
};
#define L1U_FN_COUNT (sizeof(L1UFnList)/sizeof(struct FsmNode))
#endif
static void
l1b_activate(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_WAIT_ACT);
FsmRestartTimer(&l1->timer, l1->delay, EV_TIMER_ACT, NULL, 2);
}
static void
l1b_deactivate(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_WAIT_DEACT);
FsmRestartTimer(&l1->timer, 10, EV_TIMER_DEACT, NULL, 2);
}
static void
l1b_timer_act(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_ACTIV);
l1up(l1, PH_ACTIVATE | CONFIRM, 0, 0, NULL);
}
static void
l1b_timer_deact(struct FsmInst *fi, int event, void *arg)
{
layer1_t *l1 = fi->userdata;
FsmChangeState(fi, ST_L1_NULL);
l1up(l1, PH_DEACTIVATE | CONFIRM, 0, 0, NULL);
}
static struct FsmNode L1BFnList[] =
{
{ST_L1_NULL, EV_PH_ACTIVATE, l1b_activate},
{ST_L1_WAIT_ACT, EV_TIMER_ACT, l1b_timer_act},
{ST_L1_ACTIV, EV_PH_DEACTIVATE, l1b_deactivate},
{ST_L1_WAIT_DEACT, EV_TIMER_DEACT, l1b_timer_deact},
};
#define L1B_FN_COUNT (sizeof(L1BFnList)/sizeof(struct FsmNode))
static int
l1from_up(mISDNif_t *hif, struct sk_buff *skb)
{
layer1_t *l1;
mISDN_head_t *hh;
int err = 0;
if (!hif || !hif->fdata || !skb)
return(-EINVAL);
l1 = hif->fdata;
hh = mISDN_HEAD_P(skb);
switch(hh->prim) {
case (PH_DATA | REQUEST):
case (PH_CONTROL | REQUEST):
if (l1->inst.down.func)
return(l1->inst.down.func(&l1->inst.down,
skb));
else
err = -ENXIO;
break;
case (PH_ACTIVATE | REQUEST):
if (test_bit(FLG_L1_ACTIVATED, &l1->Flags))
l1up(l1, PH_ACTIVATE | CONFIRM, 0, 0, NULL);
else {
test_and_set_bit(FLG_L1_ACTIVATING, &l1->Flags);
FsmEvent(&l1->l1m, EV_PH_ACTIVATE, NULL);
}
break;
case (MDL_FINDTEI | REQUEST):
if (l1->inst.up.func)
return(l1->inst.up.func(&l1->inst.up, skb));
else
err = -ENXIO;
break;
default:
if (l1->debug)
mISDNdebug(l1->inst.st->id, NULL,
"l1from_up msg %x unhandled", hh->prim);
err = -EINVAL;
break;
}
if (!err)
dev_kfree_skb(skb);
return(err);
}
static int
l1from_down(mISDNif_t *hif, struct sk_buff *skb)
{
layer1_t *l1;
mISDN_head_t *hh;
int err = 0;
if (!hif || !hif->fdata || !skb)
return(-EINVAL);
l1 = hif->fdata;
hh = mISDN_HEAD_P(skb);
if (hh->prim == PH_DATA_IND) {
if (test_bit(FLG_L1_ACTTIMER, &l1->Flags))
FsmEvent(&l1->l1m, EV_TIMER_ACT, NULL);
if (l1->inst.up.func)
return(l1->inst.up.func(&l1->inst.up, skb));
else
err = -ENXIO;
} else if (hh->prim == PH_DATA_CNF) {
if (l1->inst.up.func)
return(l1->inst.up.func(&l1->inst.up, skb));
else
err = -ENXIO;
} else if (hh->prim == (PH_CONTROL | INDICATION)) {
if (hh->dinfo == HW_RESET)
FsmEvent(&l1->l1m, EV_RESET_IND, NULL);
else if (hh->dinfo == HW_DEACTIVATE)
FsmEvent(&l1->l1m, EV_DEACT_IND, NULL);
else if (hh->dinfo == HW_POWERUP)
FsmEvent(&l1->l1m, EV_POWER_UP, NULL);
else if (l1->debug)
mISDNdebug(l1->inst.st->id, NULL,
"l1from_down ctrl ind %x unhandled", hh->dinfo);
} else if (hh->prim == (PH_CONTROL | CONFIRM)) {
if (hh->dinfo == HW_DEACTIVATE)
FsmEvent(&l1->l1m, EV_DEACT_CNF, NULL);
else if (l1->debug)
mISDNdebug(l1->inst.st->id, NULL,
"l1from_down ctrl cnf %x unhandled", hh->dinfo);
} else if (hh->prim == (PH_SIGNAL | INDICATION)) {
if (hh->dinfo == ANYSIGNAL)
FsmEvent(&l1->l1m, EV_ANYSIG_IND, NULL);
else if (hh->dinfo == LOSTFRAMING)
FsmEvent(&l1->l1m, EV_ANYSIG_IND, NULL);
else if (hh->dinfo == INFO2)
FsmEvent(&l1->l1m, EV_INFO2_IND, NULL);
else if (hh->dinfo == INFO4_P8)
FsmEvent(&l1->l1m, EV_INFO4_IND, NULL);
else if (hh->dinfo == INFO4_P10)
FsmEvent(&l1->l1m, EV_INFO4_IND, NULL);
else if (l1->debug)
mISDNdebug(l1->inst.st->id, NULL,
"l1from_down sig %x unhandled", hh->dinfo);
} else {
if (l1->debug)
mISDNdebug(l1->inst.st->id, NULL,
"l1from_down msg %x unhandled", hh->prim);
err = -EINVAL;
}
if (!err)
dev_kfree_skb(skb);
return(err);
}
static void
release_l1(layer1_t *l1) {
mISDNinstance_t *inst = &l1->inst;
FsmDelTimer(&l1->timer, 0);
if (inst->up.peer) {
inst->up.peer->obj->ctrl(inst->up.peer,
MGR_DISCONNECT | REQUEST, &inst->up);
}
if (inst->down.peer) {
inst->down.peer->obj->ctrl(inst->down.peer,
MGR_DISCONNECT | REQUEST, &inst->down);
}
REMOVE_FROM_LISTBASE(l1, ((layer1_t *)isdnl1.ilist));
isdnl1.ctrl(inst, MGR_UNREGLAYER | REQUEST, NULL);
kfree(l1);
}
static int
new_l1(mISDNstack_t *st, mISDN_pid_t *pid) {
layer1_t *nl1;
int err;
if (!st || !pid)
return(-EINVAL);
if (!(nl1 = kmalloc(sizeof(layer1_t), GFP_ATOMIC))) {
printk(KERN_ERR "kmalloc layer1_t failed\n");
return(-ENOMEM);
}
memset(nl1, 0, sizeof(layer1_t));
memcpy(&nl1->inst.pid, pid, sizeof(mISDN_pid_t));
init_mISDNinstance(&nl1->inst, &isdnl1, nl1);
if (!SetHandledPID(&isdnl1, &nl1->inst.pid)) {
int_error();
return(-ENOPROTOOPT);
}
switch(pid->protocol[1]) {
case ISDN_PID_L1_TE_S0:
sprintf(nl1->inst.name, "l1TES0 %d", st->id);
nl1->l1m.fsm = &l1fsm_s;
nl1->l1m.state = ST_L1_F3;
nl1->Flags = 0;
break;
default:
printk(KERN_ERR "layer1 create failed prt %x\n",
pid->protocol[1]);
kfree(nl1);
return(-ENOPROTOOPT);
}
nl1->debug = debug;
nl1->l1m.debug = debug;
nl1->l1m.userdata = nl1;
nl1->l1m.userint = 0;
nl1->l1m.printdebug = l1m_debug;
FsmInitTimer(&nl1->l1m, &nl1->timer);
APPEND_TO_LIST(nl1, ((layer1_t *)isdnl1.ilist));
err = isdnl1.ctrl(st, MGR_REGLAYER | INDICATION, &nl1->inst);
if (err) {
FsmDelTimer(&nl1->timer, 0);
REMOVE_FROM_LISTBASE(nl1, ((layer1_t *)isdnl1.ilist));
kfree(nl1);
}
return(err);
}
static int
l1_status(layer1_t *l1, status_info_l1_t *si)
{
if (!si)
return(-EINVAL);
memset(si, 0, sizeof(status_info_l1_t));
si->len = sizeof(status_info_l1_t) - 2*sizeof(int);
si->typ = STATUS_INFO_L1;
si->protocol = l1->inst.pid.protocol[1];
if (test_bit(FLG_L1_ACTIVATED, &l1->Flags))
si->status = 1;
si->state = l1->l1m.state;
si->Flags = l1->Flags;
si->T3 = TIMER3_VALUE;
si->debug = l1->delay;
si->debug = l1->debug;
return(0);
}
static char MName[] = "ISDNL1";
#ifdef MODULE
MODULE_AUTHOR("Karsten Keil");
MODULE_PARM(debug, "1i");
#ifdef MODULE_LICENSE
MODULE_LICENSE("GPL");
#endif
#define Isdnl1Init init_module
#endif
static int
l1_manager(void *data, u_int prim, void *arg) {
mISDNinstance_t *inst = data;
layer1_t *l1l = isdnl1.ilist;
printk(KERN_DEBUG "l1_manager data:%p prim:%x arg:%p\n", data, prim, arg);
if (!data)
return(-EINVAL);
while(l1l) {
if (&l1l->inst == inst)
break;
l1l = l1l->next;
}
switch(prim) {
case MGR_NEWLAYER | REQUEST:
return(new_l1(data, arg));
case MGR_CONNECT | REQUEST:
if (!l1l) {
printk(KERN_WARNING "l1_manager connect no instance\n");
return(-EINVAL);
}
return(ConnectIF(inst, arg));
break;
case MGR_SETIF | REQUEST:
case MGR_SETIF | INDICATION:
if (!l1l) {
printk(KERN_WARNING "l1_manager setif no instance\n");
return(-EINVAL);
}
return(SetIF(inst, arg, prim, l1from_up, l1from_down, l1l));
break;
case MGR_DISCONNECT | REQUEST:
case MGR_DISCONNECT | INDICATION:
if (!l1l) {
printk(KERN_WARNING "l1_manager disconnect no instance\n");
return(-EINVAL);
}
return(DisConnectIF(inst, arg));
break;
case MGR_UNREGLAYER | REQUEST:
case MGR_RELEASE | INDICATION:
if (l1l) {
printk(KERN_DEBUG "release_l1 id %x\n", l1l->inst.st->id);
release_l1(l1l);
} else
printk(KERN_WARNING "l1_manager release no instance\n");
break;
case MGR_STATUS | REQUEST:
if (!l1l) {
printk(KERN_WARNING "l1_manager status l1 no instance\n");
return(-EINVAL);
}
return(l1_status(l1l, arg));
default:
printk(KERN_WARNING "l1_manager prim %x not handled\n", prim);
return(-EINVAL);
}
return(0);
}
int Isdnl1Init(void)
{
int err;
printk(KERN_INFO "ISDN L1 driver version %s\n", mISDN_getrev(l1_revision));
SET_MODULE_OWNER(&isdnl1);
isdnl1.name = MName;
isdnl1.DPROTO.protocol[1] = ISDN_PID_L1_TE_S0;
isdnl1.own_ctrl = l1_manager;
isdnl1.prev = NULL;
isdnl1.next = NULL;
isdnl1.ilist = NULL;
#ifdef mISDN_UINTERFACE
isdnl1.DPROTO.protocol[1] |= ISDN_PID_L1_TE_U;
l1fsm_u.state_count = L1U_STATE_COUNT;
l1fsm_u.event_count = L1_EVENT_COUNT;
l1fsm_u.strEvent = strL1Event;
l1fsm_u.strState = strL1UState;
FsmNew(&l1fsm_u, L1UFnList, L1U_FN_COUNT);
#endif
l1fsm_s.state_count = L1S_STATE_COUNT;
l1fsm_s.event_count = L1_EVENT_COUNT;
l1fsm_s.strEvent = strL1Event;
l1fsm_s.strState = strL1SState;
FsmNew(&l1fsm_s, L1SFnList, L1S_FN_COUNT);
l1fsm_b.state_count = L1B_STATE_COUNT;
l1fsm_b.event_count = L1_EVENT_COUNT;
l1fsm_b.strEvent = strL1Event;
l1fsm_b.strState = strL1BState;
FsmNew(&l1fsm_b, L1BFnList, L1B_FN_COUNT);
if ((err = mISDN_register(&isdnl1))) {
printk(KERN_ERR "Can't register %s error(%d)\n", MName, err);
#ifdef mISDN_UINTERFACE
FsmFree(&l1fsm_u);
#endif
FsmFree(&l1fsm_s);
FsmFree(&l1fsm_b);
}
return(err);
}
#ifdef MODULE
void cleanup_module(void)
{
int err;
if ((err = mISDN_unregister(&isdnl1))) {
printk(KERN_ERR "Can't unregister ISDN layer 1 error(%d)\n", err);
}
if(isdnl1.ilist) {
printk(KERN_WARNING "mISDNl1 inst list not empty\n");
while(isdnl1.ilist)
release_l1(isdnl1.ilist);
}
#ifdef mISDN_UINTERFACE
FsmFree(&l1fsm_u);
#endif
FsmFree(&l1fsm_s);
FsmFree(&l1fsm_b);
}
#endif