SmartMIB Small Solution:

IP Datagram Statistics Report (Routing Process Utilization)

(SM-SmallSol00032)

Solution’s SOSL Based management process script:

The solution defines the following main module:

MainIpStats:

This is the main module that controls and instantiates the ‘IpStats1’ and the ‘IpStats2’ modules.

The details of the Main module and the transient Service modules are provided below:

MODULE MainIpStats ();

DESCRIPTION "Normal Speed Interfaces Process";

BEGIN

            ALL-DEV BY DEV

            {

                        MODULE-CALL IpStats1 (DEV);

            };

            POLL-FREQ

            {

                        WAIT (6000);

                        ALL-DEV BY DEV

                        {

                                    MODULE-CALL IpStats2 (DEV);

                        };

            };

END

MODULE IpStats1 (DEV DEVICE);

DESCRIPTION "Device IP Group Statistics Process";

BEGIN

            ALL-DEV BY DEV                  

            {

                        #################################

                        #     MSG-MGR("@1", DEV);

                        #################################

                        DEFINE ipForwarding DISPL;

                        ipForwarding = POLL (ipForwarding);

                        IF (ipForwarding  == "forwarding")

                        THEN    

                                    POLL (  ipInReceives;

                                                ipInDelivers;

                                                ipForwDatagrams;

                                                ipInDiscards;

                                                ipOutRequests;

                                                ipOutDiscards );

                        ENDIF;

            };

END

MODULE IpStats2 (DEV DEVICE);

DESCRIPTION "Device IP Group Statistics Process";

BEGIN

            ALL-DEV BY DEV                  

            {

                        DEFINE ipForwarding DISPL;

                        ipForwarding = POLL (ipForwarding);

                        IF (ipForwarding  == "forwarding")

                        THEN

                            DEFINE ipInReceivesT1 MAP INT;

                            DEFINE ipInDeliversT1 MAP INT;

                            DEFINE ipForwDatagramsT1 MAP INT;

                            DEFINE ipInDiscardsT1 MAP INT;

                            DEFINE ipOutRequestsT1 MAP INT;

                            DEFINE ipOutDiscardsT1 MAP INT;

                            DEFINE  ipInReceives DB INT;

                            DEFINE  ipInDelivers DB INT;

                            DEFINE  ipForwDatagrams DB INT;

                            DEFINE  ipInDiscards DB INT;

                            DEFINE  ipOutRequests DB INT;

                            DEFINE  ipOutDiscards DB INT;

                            ipInReceivesT1 = ipInReceives;

                            ipInDeliversT1 = ipInDelivers;

                            ipForwDatagramsT1 = ipForwDatagrams;

                            ipInDiscardsT1 = ipInDiscards;

                            ipOutRequestsT1 = ipOutRequests;

                            ipOutDiscardsT1 = ipOutDiscards;

                            RMV ( ipInReceives;

                                    ipInDelivers;

                                    ipForwDatagrams ;

                                    ipInDiscards;

                                    ipOutRequests  ;

                                    ipOutDiscards );                        

                            POLL (   ipInReceives;

                                        ipInDelivers;

                                        ipForwDatagrams;

                                        ipInDiscards;

                                        ipOutRequests;

                                        ipOutDiscards );                        

                            DEFINE ipInReceivesT2 MAP INT;

                            DEFINE ipInDeliversT2 MAP INT;

                            DEFINE ipForwDatagramsT2 MAP INT;

                            DEFINE ipInDiscardsT2 MAP INT;

                            DEFINE ipOutRequestsT2 MAP INT;

                            DEFINE ipOutDiscardsT2 MAP INT;

                            ipInReceivesT2 = ipInReceives;

                            ipInDeliversT2 = ipInDelivers;

                            ipForwDatagramsT2 = ipForwDatagrams;

                            ipInDiscardsT2 = ipInDiscards;

                            ipOutRequestsT2 = ipOutRequests;

                            ipOutDiscardsT2 = ipOutDiscards;

                            CounterData (DeltaIpInReceives,         

                                                ipInReceivesT1,           

                                                ipInReceivesT2);

                            CounterData (DeltaIpInDelivers,          

                                                ipInDeliversT1,            

                                                ipInDeliversT2);

                            CounterData (DeltaIpForwDatagrams,

                                                ipForwDatagramsT1,   

                                                ipForwDatagramsT2);

                            CounterData (DeltaIpInDiscards,         

                                                ipInDiscardsT1,           

                                                ipInDiscardsT2);

                            CounterData (DeltaIpOutRequests,      

                                                ipOutRequestsT1,        

                                                ipOutRequestsT2);

                            CounterData (DeltaIpOutDiscards,      

                                                ipOutRequestsT1,        

                                                ipOutRequestsT2);

                            ###################################

                            # PERCENTAGE OF IP DATAGRAM DELIVERED TO  

                            # THE IP PROCESS TO THE TOTAL INBOUND

                            # DATAGRAMS RECEIVED

                            ###################################

                            DEFINE InDeliveredDatagrmsVar MAP INT;

                            DEFINE InDeliveredDatagrms DB INT;

                            InDeliveredDatagrmsVar = ipInDelivers * 100 / ipInReceives;

                            InDeliveredDatagrms = InDeliveredDatagrmsVar;

                            ######################################

                            #PERCENTAGE OF IP DATAGRAM DISCARDS DUE

                            #TO NO BUFFERS

                            ######################################

                            DEFINE BufferDiscardsVar MAP INT;

                            DEFINE BufferDiscards DB INT;

                            BufferDiscardsVar = ipInDiscards * 100 / ipInReceives;

                            BufferDiscards = BufferDiscardsVar;

                            #####################################

                            #PERCENT DATAGRAMS DISTANT TO REMOTE

                            #ADDRESSES TO THE TOTAL INBOUND DATAGRAMS

                            #RECEIVED

                            #####################################

                            DEFINE ForwrdedToRcvedVar MAP INT;

                            DEFINE ForwrdedToRcved DB INT;

                            ForwrdedToRcvedVar = ipForwDatagrams * 100 / ipInReceives;

                            ForwrdedToRcved = ForwrdedToRcvedVar;

                            #####################################

                            # PERCENT datagram OUTBOUND DISCARDS TO total

                            # datagram REQUESTS

                            #####################################

                            DEFINE OutDiscardsToRequestsVar MAP INT;

                            DEFINE OutDiscardsToRequests DB INT;

                            OutDiscardsToRequestsVar = ipOutDiscards * 100 / ipOutRequests;

                            OutDiscardsToRequests = OutDiscardsToRequestsVar;

                            #####################################

                            #NUMBER OF ROUTING PROCESS INVOCATIONS

                            #####################################

                            DEFINE RouteProcInvocationsVar MAP INT;

                            DEFINE RouteProcInvocations DB INT;

                            RouteProcInvocationsVar = ipForwDatagrams + ipOutRequests;

                            RouteProcInvocations = RouteProcInvocationsVar;

                    ENDIF;

        };

END

[Small Solutions], [Professional Solutions], [Security Solutions], [Development Solutions]

[Home], [About], [Solutions Center], [NMS Market], [Products & Services],
[Management Technology], [Technical Support], [Contact us], [Site Map]