/* ARGSNOTUSED */
void
kev_dispatch_msg(int fd, short event, void *bula)
{
char buf[RT_BUF_SIZE];
char *next, *lim;
ssize_t n;
struct rt_msghdr *rtm;
struct if_msghdr ifm;
struct iface *iface;
if ((n = read(kev_state.fd, &buf, sizeof(buf))) == -1)
fatal("kev_dispatch_rtmsg: read error");
if (n == 0)
fatalx("kernel event socket closed");
lim = buf + n;
for (next = buf; next < lim; next += rtm->rtm_msglen) {
memcpy(&ifm, next, sizeof(ifm));
rtm = (struct rt_msghdr *)next;
if (rtm->rtm_version != RTM_VERSION)
continue;
iface = if_find_index(ifm.ifm_index);
if (iface == NULL) /* this interface isn't configured */
continue;
switch (rtm->rtm_type) {
case RTM_IFINFO:
log_debug("RTM_IFINFO");
if (LINK_STATE_IS_UP(ifm.ifm_data.ifi_link_state))
if_fsm(iface, IF_EVT_UP);
else
if_fsm(iface, IF_EVT_DOWN);
break;
case RTM_IFANNOUNCE:
log_debug("RTM_IFANNOUNCE");
break;
case RTM_NEWADDR:
/* TODO */
log_debug("RTM_NEWADDR");
break;
case RTM_DELADDR:
/* TODO */
log_debug("RTM_DELADDR");
break;
default:
/* ignore for now */
break;
}
}
}
void
recv_db_description(struct nbr *nbr, char *buf, u_int16_t len)
{
struct db_dscrp_hdr dd_hdr;
int dupe = 0;
if (len < sizeof(dd_hdr)) {
log_warnx("recv_db_description: "
"bad packet size, neighbor ID %s", inet_ntoa(nbr->id));
return;
}
memcpy(&dd_hdr, buf, sizeof(dd_hdr));
buf += sizeof(dd_hdr);
len -= sizeof(dd_hdr);
/* db description packet sanity checks */
if (ntohs(dd_hdr.iface_mtu) > nbr->iface->mtu) {
log_warnx("recv_db_description: invalid MTU %d sent by "
"neighbor ID %s, expected %d", ntohs(dd_hdr.iface_mtu),
inet_ntoa(nbr->id), nbr->iface->mtu);
return;
}
if (nbr->last_rx_options == dd_hdr.opts &&
nbr->last_rx_bits == dd_hdr.bits &&
ntohl(dd_hdr.dd_seq_num) == nbr->dd_seq_num - nbr->dd_master ?
1 : 0) {
log_debug("recv_db_description: dupe from ID %s",
inet_ntoa(nbr->id));
dupe = 1;
}
switch (nbr->state) {
case NBR_STA_DOWN:
case NBR_STA_ATTEMPT:
case NBR_STA_2_WAY:
case NBR_STA_SNAP:
log_debug("recv_db_description: packet ignored in state %s, "
"neighbor ID %s", nbr_state_name(nbr->state),
inet_ntoa(nbr->id));
return;
case NBR_STA_INIT:
/* evaluate dr and bdr after issuing a 2-Way event */
nbr_fsm(nbr, NBR_EVT_2_WAY_RCVD);
if_fsm(nbr->iface, IF_EVT_NBR_CHNG);
if (nbr->state != NBR_STA_XSTRT)
return;
/* FALLTHROUGH */
case NBR_STA_XSTRT:
if (dupe)
return;
/*
* check bits: either I,M,MS or only M
*/
if (dd_hdr.bits == (OSPF_DBD_I | OSPF_DBD_M | OSPF_DBD_MS)) {
/* if nbr Router ID is larger than own -> slave */
if ((ntohl(nbr->id.s_addr)) >
ntohl(ospfe_router_id())) {
/* slave */
nbr->dd_master = 0;
nbr->dd_seq_num = ntohl(dd_hdr.dd_seq_num);
/* event negotiation done */
nbr_fsm(nbr, NBR_EVT_NEG_DONE);
}
} else if (!(dd_hdr.bits & (OSPF_DBD_I | OSPF_DBD_MS))) {
/* M only case: we are master */
if (ntohl(dd_hdr.dd_seq_num) != nbr->dd_seq_num) {
log_warnx("recv_db_description: invalid "
"seq num, mine %x his %x",
nbr->dd_seq_num, ntohl(dd_hdr.dd_seq_num));
return;
}
nbr->dd_seq_num++;
/* event negotiation done */
nbr_fsm(nbr, NBR_EVT_NEG_DONE);
/* this packet may already have data so pass it on */
if (len > 0) {
nbr->dd_pending++;
ospfe_imsg_compose_rde(IMSG_DD, nbr->peerid,
0, buf, len);
}
} else {
/* ignore packet */
log_debug("recv_db_description: packet ignored in "
"state %s (bad flags), neighbor ID %s",
nbr_state_name(nbr->state), inet_ntoa(nbr->id));
}
break;
case NBR_STA_XCHNG:
case NBR_STA_LOAD:
case NBR_STA_FULL:
if (dd_hdr.bits & OSPF_DBD_I ||
!(dd_hdr.bits & OSPF_DBD_MS) == !nbr->dd_master) {
log_warnx("recv_db_description: seq num mismatch, "
"bad flags");
nbr_fsm(nbr, NBR_EVT_SEQ_NUM_MIS);
return;
}
if (nbr->last_rx_options != dd_hdr.opts) {
log_warnx("recv_db_description: seq num mismatch, "
"bad options");
nbr_fsm(nbr, NBR_EVT_SEQ_NUM_MIS);
return;
}
if (dupe) {
if (!nbr->dd_master)
/* retransmit */
start_db_tx_timer(nbr);
return;
}
if (nbr->state != NBR_STA_XCHNG) {
log_warnx("recv_db_description: invalid "
"seq num, mine %x his %x",
nbr->dd_seq_num, ntohl(dd_hdr.dd_seq_num));
nbr_fsm(nbr, NBR_EVT_SEQ_NUM_MIS);
return;
}
/* sanity check dd seq number */
if (nbr->dd_master) {
/* master */
if (ntohl(dd_hdr.dd_seq_num) != nbr->dd_seq_num) {
log_warnx("recv_db_description: invalid "
"seq num, mine %x his %x",
nbr->dd_seq_num, ntohl(dd_hdr.dd_seq_num));
nbr_fsm(nbr, NBR_EVT_SEQ_NUM_MIS);
return;
}
nbr->dd_seq_num++;
} else {
/* slave */
if (ntohl(dd_hdr.dd_seq_num) != nbr->dd_seq_num + 1) {
log_warnx("recv_db_description: invalid "
"seq num, mine %x his %x",
nbr->dd_seq_num, ntohl(dd_hdr.dd_seq_num));
nbr_fsm(nbr, NBR_EVT_SEQ_NUM_MIS);
return;
}
nbr->dd_seq_num = ntohl(dd_hdr.dd_seq_num);
}
/* forward to RDE and let it decide which LSAs to request */
if (len > 0) {
nbr->dd_pending++;
ospfe_imsg_compose_rde(IMSG_DD, nbr->peerid, 0,
buf, len);
}
/* next packet */
db_sum_list_next(nbr);
start_db_tx_timer(nbr);
if (!(dd_hdr.bits & OSPF_DBD_M) &&
TAILQ_EMPTY(&nbr->db_sum_list))
if (!nbr->dd_master || !nbr->dd_more)
nbr_fsm(nbr, NBR_EVT_XCHNG_DONE);
break;
default:
fatalx("recv_db_description: unknown neighbor state");
}
nbr->last_rx_options = dd_hdr.opts;
nbr->last_rx_bits = dd_hdr.bits;
}
