windows-nt/Source/XPSP1/NT/net/snmp/subagent/lmmib2/srvr_tbl.c
2020-09-26 16:20:57 +08:00

421 lines
11 KiB
C

/*++
Copyright (c) 1992-1996 Microsoft Corporation
Module Name:
srvr_tbl.c
Abstract:
Routines to perform operations on the Domain Server Table.
Environment:
User Mode - Win32
Revision History:
10-May-1996 DonRyan
Removed banner from Technology Dynamics, Inc.
--*/
//--------------------------- WINDOWS DEPENDENCIES --------------------------
//--------------------------- STANDARD DEPENDENCIES -- #include<xxxxx.h> ----
#include <stdio.h>
#include <memory.h>
//--------------------------- MODULE DEPENDENCIES -- #include"xxxxx.h" ------
#include <snmp.h>
#include <snmputil.h>
#include "mibfuncs.h"
//--------------------------- SELF-DEPENDENCY -- ONE #include"module.h" -----
#include "srvr_tbl.h"
//--------------------------- PUBLIC VARIABLES --(same as in module.h file)--
// Prefix to the Domain Server table
static UINT svsondSubids[] = { 4, 6, 1 };
static AsnObjectIdentifier MIB_DomServerPrefix = { 3, svsondSubids };
DOM_SERVER_TABLE MIB_DomServerTable = { 0, NULL };
//--------------------------- PRIVATE CONSTANTS -----------------------------
#define SRVR_FIELD_SUBID (MIB_DomServerPrefix.idLength+MIB_OidPrefix.idLength)
#define SRVR_FIRST_FIELD SRVR_NAME_FIELD
#define SRVR_LAST_FIELD SRVR_NAME_FIELD
//--------------------------- PRIVATE STRUCTS -------------------------------
//--------------------------- PRIVATE VARIABLES -----------------------------
//--------------------------- PRIVATE PROTOTYPES ----------------------------
UINT MIB_svsond_get(
IN OUT RFC1157VarBind *VarBind
);
int MIB_svsond_match(
IN AsnObjectIdentifier *Oid,
OUT UINT *Pos
);
UINT MIB_svsond_copyfromtable(
IN UINT Entry,
IN UINT Field,
OUT RFC1157VarBind *VarBind
);
//--------------------------- PRIVATE PROCEDURES ----------------------------
//--------------------------- PUBLIC PROCEDURES -----------------------------
//
// MIB_svsond_func
// High level routine for handling operations on the Domain Server table
//
// Notes:
//
// Return Codes:
// SNMPAPI_NOERROR
// SNMPAPI_ERROR
//
// Error Codes:
// None.
//
UINT MIB_svsond_func(
IN UINT Action,
IN MIB_ENTRY *MibPtr,
IN OUT RFC1157VarBind *VarBind
)
{
int Found;
UINT Entry;
UINT Field;
UINT ErrStat;
switch ( Action )
{
case MIB_ACTION_GETFIRST:
// Fill the Domain Server table with the info from server
if ( SNMPAPI_ERROR == MIB_svsond_lmget() )
{
ErrStat = SNMP_ERRORSTATUS_GENERR;
goto Exit;
}
// If no elements in table, then return next MIB var, if one
if ( MIB_DomServerTable.Len == 0 )
{
if ( MibPtr->MibNext == NULL )
{
ErrStat = SNMP_ERRORSTATUS_NOSUCHNAME;
goto Exit;
}
// Do get first on the next MIB var
ErrStat = (*MibPtr->MibNext->MibFunc)( Action, MibPtr->MibNext,
VarBind );
break;
}
//
// Place correct OID in VarBind
// Assuming the first field in the first record is the "start"
{
UINT temp_subs[] = { SRVR_FIRST_FIELD };
AsnObjectIdentifier FieldOid = { 1, temp_subs };
SnmpUtilOidFree( &VarBind->name );
SnmpUtilOidCpy( &VarBind->name, &MIB_OidPrefix );
SnmpUtilOidAppend( &VarBind->name, &MIB_DomServerPrefix );
SnmpUtilOidAppend( &VarBind->name, &FieldOid );
SnmpUtilOidAppend( &VarBind->name, &MIB_DomServerTable.Table[0].Oid );
}
//
// Let fall through on purpose
//
case MIB_ACTION_GET:
ErrStat = MIB_svsond_get( VarBind );
break;
case MIB_ACTION_GETNEXT:
// Fill the Domain Server table with the info from server
if ( SNMPAPI_ERROR == MIB_svsond_lmget() )
{
ErrStat = SNMP_ERRORSTATUS_GENERR;
goto Exit;
}
// Determine which field
Field = VarBind->name.ids[SRVR_FIELD_SUBID];
// Lookup OID in table
if (Field < SRVR_FIRST_FIELD)
{
Entry = 0; // will take the first entry into the table
Field = SRVR_FIRST_FIELD; // and the first column of the table
Found = MIB_TBL_POS_BEFORE;
}
else if (Field > SRVR_LAST_FIELD)
Found = MIB_TBL_POS_END;
else
Found = MIB_svsond_match( &VarBind->name, &Entry );
// Index not found, but could be more fields to base GET on
if ((Found == MIB_TBL_POS_BEFORE && MIB_DomServerTable.Len == 0) ||
Found == MIB_TBL_POS_END )
{
// Index not found in table, get next from field
// Field ++;
// Make sure not past last field
// if ( Field > SRVR_LAST_FIELD )
// {
if ( MibPtr->MibNext == NULL )
{
ErrStat = SNMP_ERRORSTATUS_NOSUCHNAME;
goto Exit;
}
// Get next VAR in MIB
ErrStat = (*MibPtr->MibNext->MibFunc)( MIB_ACTION_GETFIRST,
MibPtr->MibNext,
VarBind );
break;
// }
}
// Get next TABLE entry
if ( Found == MIB_TBL_POS_FOUND )
{
Entry ++;
if ( Entry > MIB_DomServerTable.Len-1 )
{
Entry = 0;
Field ++;
if ( Field > SRVR_LAST_FIELD )
{
if ( MibPtr->MibNext == NULL )
{
ErrStat = SNMP_ERRORSTATUS_NOSUCHNAME;
goto Exit;
}
// Get next VAR in MIB
ErrStat = (*MibPtr->MibNext->MibFunc)( MIB_ACTION_GETFIRST,
MibPtr->MibNext,
VarBind );
break;
}
}
}
//
// Place correct OID in VarBind
// Assuming the first field in the first record is the "start"
{
UINT temp_subs[1];
AsnObjectIdentifier FieldOid;
temp_subs[0] = Field;
FieldOid.idLength = 1;
FieldOid.ids = temp_subs;
SnmpUtilOidFree( &VarBind->name );
SnmpUtilOidCpy( &VarBind->name, &MIB_OidPrefix );
SnmpUtilOidAppend( &VarBind->name, &MIB_DomServerPrefix );
SnmpUtilOidAppend( &VarBind->name, &FieldOid );
SnmpUtilOidAppend( &VarBind->name, &MIB_DomServerTable.Table[Entry].Oid );
}
ErrStat = MIB_svsond_copyfromtable( Entry, Field, VarBind );
break;
case MIB_ACTION_SET:
ErrStat = SNMP_ERRORSTATUS_NOSUCHNAME;
break;
default:
ErrStat = SNMP_ERRORSTATUS_GENERR;
}
Exit:
return ErrStat;
} // MIB_svsond_func
//
// MIB_svsond_get
// Retrieve Domain Server table information.
//
// Notes:
//
// Return Codes:
//
// Error Codes:
// None.
//
UINT MIB_svsond_get(
IN OUT RFC1157VarBind *VarBind
)
{
UINT Entry;
int Found;
UINT ErrStat;
if (VarBind->name.ids[SRVR_FIELD_SUBID] < SRVR_FIRST_FIELD ||
VarBind->name.ids[SRVR_FIELD_SUBID] > SRVR_LAST_FIELD)
{
ErrStat = SNMP_ERRORSTATUS_NOSUCHNAME;
goto Exit;
}
// Fill the Domain Server table with the info from server
if ( SNMPAPI_ERROR == MIB_svsond_lmget() )
{
ErrStat = SNMP_ERRORSTATUS_GENERR;
goto Exit;
}
Found = MIB_svsond_match( &VarBind->name, &Entry );
// Look for a complete OID match
if ( Found != MIB_TBL_POS_FOUND )
{
ErrStat = SNMP_ERRORSTATUS_NOSUCHNAME;
goto Exit;
}
// Copy data from table
ErrStat = MIB_svsond_copyfromtable( Entry, VarBind->name.ids[SRVR_FIELD_SUBID],
VarBind );
Exit:
return ErrStat;
} // MIB_svsond_get
//
// MIB_svsond_match
// Match the target OID with a location in the Domain Server table
//
// Notes:
//
// Return Codes:
//
// Error Codes:
// None
//
int MIB_svsond_match(
IN AsnObjectIdentifier *Oid,
OUT UINT *Pos
)
{
AsnObjectIdentifier TempOid;
int nResult;
// Remove prefix including field reference
TempOid.idLength = Oid->idLength - MIB_OidPrefix.idLength -
MIB_DomServerPrefix.idLength - 1;
TempOid.ids = &Oid->ids[MIB_OidPrefix.idLength+MIB_DomServerPrefix.idLength+1];
*Pos = 0;
while ( *Pos < MIB_DomServerTable.Len )
{
nResult = SnmpUtilOidCmp( &TempOid, &MIB_DomServerTable.Table[*Pos].Oid );
if ( !nResult )
{
nResult = MIB_TBL_POS_FOUND;
goto Exit;
}
if ( nResult < 0 )
{
nResult = MIB_TBL_POS_BEFORE;
goto Exit;
}
(*Pos)++;
}
nResult = MIB_TBL_POS_END;
Exit:
return nResult;
}
UINT MIB_svsond_copyfromtable(
IN UINT Entry,
IN UINT Field,
OUT RFC1157VarBind *VarBind
)
{
UINT ErrStat;
// Get the requested field and save in var bind
switch( Field )
{
case SRVR_NAME_FIELD:
// Alloc space for string
VarBind->value.asnValue.string.stream = SnmpUtilMemAlloc( sizeof(char)
* MIB_DomServerTable.Table[Entry].domServerName.length );
if ( VarBind->value.asnValue.string.stream == NULL )
{
ErrStat = SNMP_ERRORSTATUS_GENERR;
goto Exit;
}
// Copy string into return position
memcpy( VarBind->value.asnValue.string.stream,
MIB_DomServerTable.Table[Entry].domServerName.stream,
MIB_DomServerTable.Table[Entry].domServerName.length );
// Set string length
VarBind->value.asnValue.string.length =
MIB_DomServerTable.Table[Entry].domServerName.length;
VarBind->value.asnValue.string.dynamic = TRUE;
// Set type of var bind
VarBind->value.asnType = ASN_RFC1213_DISPSTRING;
break;
default:
SNMPDBG(( SNMP_LOG_TRACE, "LMMIB2: Internal Error Domain Server Table\n" ));
ErrStat = SNMP_ERRORSTATUS_GENERR;
goto Exit;
}
ErrStat = SNMP_ERRORSTATUS_NOERROR;
Exit:
return ErrStat;
} // MIB_svsond_copyfromtable
//-------------------------------- END --------------------------------------