freebsd-dev/sys/netatm/uni/uniarp_timer.c
1999-08-28 01:08:13 +00:00

321 lines
6.7 KiB
C

/*
*
* ===================================
* HARP | Host ATM Research Platform
* ===================================
*
*
* This Host ATM Research Platform ("HARP") file (the "Software") is
* made available by Network Computing Services, Inc. ("NetworkCS")
* "AS IS". NetworkCS does not provide maintenance, improvements or
* support of any kind.
*
* NETWORKCS MAKES NO WARRANTIES OR REPRESENTATIONS, EXPRESS OR IMPLIED,
* INCLUDING, BUT NOT LIMITED TO, IMPLIED WARRANTIES OF MERCHANTABILITY
* AND FITNESS FOR A PARTICULAR PURPOSE, AS TO ANY ELEMENT OF THE
* SOFTWARE OR ANY SUPPORT PROVIDED IN CONNECTION WITH THIS SOFTWARE.
* In no event shall NetworkCS be responsible for any damages, including
* but not limited to consequential damages, arising from or relating to
* any use of the Software or related support.
*
* Copyright 1994-1998 Network Computing Services, Inc.
*
* Copies of this Software may be made, however, the above copyright
* notice must be reproduced on all copies.
*
* @(#) $FreeBSD$
*
*/
/*
* ATM Forum UNI Support
* ---------------------
*
* UNI ATMARP support (RFC1577) - Timer processing
*
*/
#include <netatm/kern_include.h>
#include <netatm/ipatm/ipatm_var.h>
#include <netatm/ipatm/ipatm_serv.h>
#include <netatm/uni/unisig_var.h>
#include <netatm/uni/uniip_var.h>
#ifndef lint
__RCSID("@(#) $FreeBSD$");
#endif
/*
* Local functions
*/
static void uniarp_svc_oldage __P((struct uniarp *));
static void uniarp_pvc_oldage __P((struct uniarp *));
/*
* Process a UNI ATMARP entry timeout
*
* Called when a previously scheduled uniarp control block timer expires.
*
* Called at splnet.
*
* Arguments:
* tip pointer to uniarp timer control block
*
* Returns:
* none
*
*/
void
uniarp_timeout(tip)
struct atm_time *tip;
{
struct uniip *uip;
struct uniarp *uap;
struct ipvcc *ivp;
/*
* Back-off to uniarp control block
*/
uap = (struct uniarp *)
((caddr_t)tip - (int)(&((struct uniarp *)0)->ua_time));
uip = uap->ua_intf;
/*
* Do we know the IP address for this entry yet??
*/
if (uap->ua_dstip.s_addr == 0) {
/*
* No, then send another InATMARP_REQ on each active VCC
* associated with this entry to solicit the peer's identity.
*/
for (ivp = uap->ua_ivp; ivp; ivp = ivp->iv_arpnext) {
if (ivp->iv_state != IPVCC_ACTIVE)
continue;
(void) uniarp_inarp_req(uip, &uap->ua_dstatm,
&uap->ua_dstatmsub, ivp);
}
/*
* Restart retry timer
*/
UNIARP_TIMER(uap, UNIARP_ARP_RETRY);
} else {
/*
* Yes, then we're trying to find the ATM address for this
* IP address - so send another ATMARP_REQ to the arpserver
* (if it's up at the moment)
*/
if (uip->uip_arpstate == UIAS_CLIENT_ACTIVE)
(void) uniarp_arp_req(uip, &uap->ua_dstip);
/*
* Restart retry timer
*/
UNIARP_TIMER(uap, UNIARP_ARP_RETRY);
}
return;
}
/*
* Process an UNI ARP SVC entry aging timer expiration
*
* This function is called when an SVC arp entry's aging timer has expired.
*
* Called at splnet().
*
* Arguments:
* uap pointer to atmarp table entry
*
* Returns:
* none
*
*/
static void
uniarp_svc_oldage(uap)
struct uniarp *uap;
{
struct ipvcc *ivp, *inext;
struct uniip *uip = uap->ua_intf;
/*
* Permanent (manually installed) entries are never aged
*/
if (uap->ua_origin >= UAO_PERM)
return;
/*
* If entry is valid and we're out of retrys, tell
* IP/ATM that the SVCs can't be used
*/
if ((uap->ua_flags & UAF_VALID) && (uap->ua_retry-- == 0)) {
uap->ua_flags |= UAF_LOCKED;
for (ivp = uap->ua_ivp; ivp; ivp = inext) {
inext = ivp->iv_arpnext;
(*ivp->iv_ipnif->inf_arpnotify)(ivp, MAP_INVALID);
}
uap->ua_flags &= ~(UAF_LOCKED | UAF_VALID);
uap->ua_origin = 0;
/*
* Delete and free an unused entry
*/
if (uap->ua_ivp == NULL) {
UNIARP_CANCEL(uap);
UNIARP_DELETE(uap);
atm_free((caddr_t)uap);
return;
}
}
/*
* We want to try and refresh this entry but we don't want
* to keep unused entries laying around forever.
*/
if (uap->ua_ivp || (uap->ua_flags & UAF_USED)) {
if (uip->uip_arpstate == UIAS_CLIENT_ACTIVE) {
/*
* If we are a client (and the server VCC is active),
* then we'll ask the server for a refresh
*/
(void) uniarp_arp_req(uip, &uap->ua_dstip);
} else {
/*
* Otherwise, solicit the each active VCC peer with
* an Inverse ATMARP
*/
for (ivp = uap->ua_ivp; ivp; ivp = ivp->iv_arpnext) {
if (ivp->iv_state != IPVCC_ACTIVE)
continue;
(void) uniarp_inarp_req(uip, &uap->ua_dstatm,
&uap->ua_dstatmsub, ivp);
}
}
}
/*
* Reset timeout
*/
if (uap->ua_flags & UAF_VALID)
uap->ua_aging = UNIARP_RETRY_AGE;
else
uap->ua_aging = UNIARP_REVALID_AGE;
return;
}
/*
* Process an UNI ARP PVC entry aging timer expiration
*
* This function is called when a PVC arp entry's aging timer has expired.
*
* Called at splnet().
*
* Arguments:
* uap pointer to atmarp table entry
*
* Returns:
* none
*
*/
static void
uniarp_pvc_oldage(uap)
struct uniarp *uap;
{
struct ipvcc *ivp = uap->ua_ivp;
/*
* If entry is valid and we're out of retrys, tell
* IP/ATM that PVC can't be used
*/
if ((uap->ua_flags & UAF_VALID) && (uap->ua_retry-- == 0)) {
(*ivp->iv_ipnif->inf_arpnotify)(ivp, MAP_INVALID);
uap->ua_flags &= ~UAF_VALID;
}
/*
* Solicit peer with Inverse ATMARP
*/
(void) uniarp_inarp_req(uap->ua_intf, &uap->ua_dstatm,
&uap->ua_dstatmsub, ivp);
/*
* Reset timeout
*/
if (uap->ua_flags & UAF_VALID)
uap->ua_aging = UNIARP_RETRY_AGE;
else
uap->ua_aging = UNIARP_REVALID_AGE;
return;
}
/*
* Process a UNI ARP aging timer tick
*
* This function is called every UNIARP_AGING seconds, in order to age
* all the arp table entries. If an entry's timer is expired, then the
* uniarp old-age timeout function will be called for that entry.
*
* Called at splnet.
*
* Arguments:
* tip pointer to uniarp aging timer control block
*
* Returns:
* none
*
*/
void
uniarp_aging(tip)
struct atm_time *tip;
{
struct uniarp *uap, *unext;
int i;
/*
* Schedule next timeout
*/
atm_timeout(&uniarp_timer, UNIARP_AGING, uniarp_aging);
/*
* Run through arp table bumping each entry's aging timer.
* If an expired timer is found, process that entry.
*/
for (i = 0; i < UNIARP_HASHSIZ; i++) {
for (uap = uniarp_arptab[i]; uap; uap = unext) {
unext = uap->ua_next;
if (uap->ua_aging && --uap->ua_aging == 0)
uniarp_svc_oldage(uap);
}
}
/*
* Check out PVC aging timers too
*/
for (uap = uniarp_pvctab; uap; uap = unext) {
unext = uap->ua_next;
if (uap->ua_aging && --uap->ua_aging == 0)
uniarp_pvc_oldage(uap);
}
/*
* Only fully resolved SVC entries need aging, so there's no need
* to examine the 'no map' table
*/
}