Max's Blog

用perl cpan安装模块

首先配置CPAN Module，方法是在bash下面运行

$ perl -MCPAN -eshell

配置过程会询问一些问题，其中CPAN的镜像，是/root/.cpan/sources/MIRRORED.BY文件，从官方网站找完整版的
http://www.cpan.org/MIRRORED.BY
配置好，中国的站点基本都垃圾不更新了，通过 o conf init 重新配置，选到好的为止。。。

接下来要更新CPAN Module，而不是直接装LWP。否则会遇到undefined subroutine &Digest::base::new之类的错误。方法是运行

cpan> install Bundle::CPAN

这一步是关键，切记切记。我开始不知道，还在网上搜索这个错误信息，发现有人说是Perl的问题，我就把整个Cygwin更新到1.5.19.4，结果啥用也没有，还把其它东西弄得一塌糊涂。
装好新的CPAN Module，先退出，然后再运行perl -MCPAN -eshell
命令进入CPAN的shell，这时就可以装LWP了

cpan> install Bundle::LWP

安装Bundle::LWP意味着不仅安装LWP，而且安装它需要的其它module。

没有linux下面这么方便，windows下面的find是直接搜字符串的，不过结合dir就可以实现linux find的一些功能

dir /p /s path | find “string” > result.txt

/p就是以普通格式输出
/s就相当于遍历

当然windows下面也有实现全功能的find，只要安装微软的
Windows Services for UNIX
这个包，就可以实现unix下面所有基本功能了，连UFS都可以挂得上去。

一个很好的保存时间数据的数据库实现

可以自动实现近期数据详细，历史数据概要和自动生成图片，用来做存放监控数据十分方便

可惜就是默认不是线程安全的，需要做同步锁，不过还好监控的东西一般都是并发访问并不大，单线运行也没有什么问题。

net-snmp版本是2.5.4，比较新，squid文档里面的方法都有点错误了。。。

首先是squid的配置文件squid.conf

acl monitor src ip/mask

acl snmppublic snmp_community topsecret
snmp_access allow snmppublic monitor
snmp_access deny all

这里定义了哪个机器可以访问snmp agent，还有snmp community string，这个community string一定要记住，类似验证字符串的东西，估计是加密解密传输数据用到的种子。

然后看看squid的

share/mib.txt

这个就是squid mib的id信息，有很多，随便找个

— SQUID-MIB  { iso org(3) dod(6) internet(1) private(4) enterprises(1) 3495 }

。。。。。

nlanr OBJECT IDENTIFIER ::= { enterprises 3495 }

squid MODULE-IDENTITY
    LAST-UPDATED “9809220000Z”
    ORGANIZATION “National Laboratory for Applied Network Research”
    CONTACT-INFO
            ”        Squid Developers

             E-mail: squid@squid-cache.org”
    DESCRIPTION
                “Squid MIB defined for the management of the Squid
                proxy server. See http://www.squid-cache.org/.”

    REVISION      “9809220000Z”
    DESCRIPTION
                “Move to SMIv2. Prepare to split into proxy/squid.”
    REVISION      “9901010000Z”
    DESCRIPTION
                “Added objects and corrected asn.1 syntax and
                descriptions.”
    ::= { nlanr 1 }

—
— OID Assignments
—

        cacheSystem     OBJECT IDENTIFIER ::= { squid 1 }
        cacheConfig     OBJECT IDENTIFIER ::= { squid 2 }
        cachePerf       OBJECT IDENTIFIER ::= { squid 3 }
        cacheNetwork    OBJECT IDENTIFIER ::= { squid 4 }
        cacheMesh       OBJECT IDENTIFIER ::= { squid 5 }
—
— cacheSystem group
—

        cacheSysVMsize OBJECT-TYPE
                SYNTAX Integer32
                MAX-ACCESS read-only
                STATUS current
                DESCRIPTION
                        ” Storage Mem size in KB ”
        ::= { cacheSystem 1 }

 

 

– SQUID-MIB  { iso org(3) dod(6) internet(1) private(4) enterprises(1) 3495 }

第一行的意思就是mib oid开头是怎么样子的，squid的全部是 .1.3.6.1.4.1.3495

 

nlanr OBJECT IDENTIFIER ::= { enterprises 3495 }

nlanr 代表前面那串

squid  一大串最后 ::= { nlanr 1 } 表示 squid  是 enterprises.3495.1

cacheSystem     OBJECT IDENTIFIER ::= { squid 1 }

表示 cacheSystem     是squid 后面的1。enterprises.3495.1.1

 

下面就是具体数据，比如squid->cacheSystem->cacheSysVMsize 是 .1.3.6.1.4.1.3495.1.1.1

        cacheSysVMsize OBJECT-TYPE
                SYNTAX Integer32
                MAX-ACCESS read-only
                STATUS current
                DESCRIPTION
                        ” Storage Mem size in KB ”
        ::= { cacheSystem 1 }

cacheSysVMsize 是 cacheSystem 下面的1

 

都有说明数值和类型。。。

然后用新版的net-snmp命令snmpget，协议版本用1和2c都可以，估计2c是向下兼容，3就不行。

squid默认的snmp端口是3401，udp方式，照写就好了。配置里面可以通过snmp_port改端口。

snmpget -v 2c -c topsecret udp:ip:port “.1.3.6.1.4.1.3495.1.1.1”

这样是get一个数值。

snmpwalk -v 2c -c topsecret udp:ip:port “.1.3.6.1.4.1.3495”

这样就可以把所有squid mibs都get出来了，然后具体分析就看模板怎么搞了，继续研究之。。。

或者可以把mib.txt复制都本机，或者snmp的mib模块目录，然后

snmpwalk -m “./mib.txt” -v 2c -c topsecret udp:ip:port “squid”

这样不用这么长，出来的数据的直观一点了。。。