业务开通模版介绍

业务开通模版介绍中盈优创资讯科技有限公司2023年1月12日1.业务简介2.交互式telnet模版3.交互式snmp模版内容提纲业务简介AD开通

对DSLAM设备进行端口配置、激活、去激活、速率配置和变更。PON开通

对OLT和ONU设备进行端口配置、激活、去激活、速率配置和变更。EMS开通

通过EMS对OLT和ONU进行业务配置。LAN开通

在SR下联端口和交换机上做业务配置，SR上配置下联端口和限速、路由配置,交换机上配置VLAN端口、用户接入端口配置以及接入端口的限速配置。VPN开通

在PE或BAS上配置端口、VPN和路由信息，在交换上配置上下联端口及VLAN。交互式telnet模版全局变量：

$CMD_ERROR执行命令后返回错误结果

$CMD_RESULT执行命令后返回命令结果$TMP_RESULT存储命令结果和错误日志函数：cmd_cfg()用途:命令配置函数,主要用于配置开通用法：cmd_cfg(‘xxxx’,timeout,prompt,pagedown)cmd_cfg(‘conft’)cmd_cfg(‘conft’,30)指定命令执行超时时间 cmd_cfg(‘conft’,30,’>|#’)指定超时时间和等待符

cmd_cfg(‘conft’,30,’>|#’,’—More--’)指定超时

时间、等待符和翻页符cmd_show（）

用途：用于配置预览、配置提取和配置后检查。

用法：同cmd_cfg

cmd_view（）

用途：用于配置预览,不登录设备直接显示命令。

用法：cmd_view（‘conft’）

settaskpara（）

用途：一般用于配置检查，将检查结果存入变量，在配置下发时使用

用法：settaskpara('DELSPEED',1);

gettaskpara（）

用途：用于配置下发，取得配置检查时settaskpara的变量。

用法：my$DEL=settaskpara('DELSPEED');<CMDBEG>

<CMDEND>

用途：配置下发，效果同cmd_cfg(),支持多行配置。

用法：<CMDBEG>

interface$port

noencapsulationppp

nomultilink-group$multilink

shutdown

exit

<CMDEND>systime

用途：返回当前时间。

用法：my$now=&systime();返回格式为yyyymmddhhmiss，

如”20081001150000”代表2008年10月1日15点

writelog（）

用途：将结果接入日志汇总。

用法：writelog(“<SERVSB>端口配置异常!</SERVSB>\n");

writelog(“端口检查正常!\n");

<SERVSB></SERVSB>标签将结果标红标粗显示。注释：//或#

用法：//PE端口IP不重复,则删除BGPNEI设备信息

用法：$SubTaskHashRef->{‘DEVINFO’}{‘LoopAddress’};设备IP

$SubTaskHashRef->{‘DEVINFO’}{‘OSVERSION’};设备OS版本

$SubTaskHashRef->{‘TaskType’};

任务类型：cfgdeploy配置下发

viewconfiglet配置预览

cfgcheck配置检查配置检查模版一、参数检查

依次检查每个业务参数是否正常。

my$INTNAME=${INTNAME}||'';

if($INTNAMEeq'')

{

writelog("<SERVSB>缺少必需的业务配置参数INTNAME!</SERVSB>\n");

$ret--;

}二、业务逻辑检查

cmd_show(“showrunint${INTNAME}");if($CMD_RESULT=~/\%Invalidinput/i){

writelog(“<SERVSB>端口不存在!</SERVSB>\n");

$ret--;}三、返回结果

若检查正常则返回0，否则返回-1,程序根据返回结果判断业务检查是否成功。

return0;成功

return-1;失败my$ret=0;my$LoopAddress=$SubTaskHashRef->{‘DEVINFO’}{‘LoopAddress’};--设备IPmy$INTNAME=${INTNAME}||‘’;--对应业务参数编码，使用是${xxx}if($INTNAMEeq'')

{

writelog("<SERVSB>缺少必需的业务配置参数INTNAME!</SERVSB>\n");

$ret--;}cmd_show(“showrunint${INTNAME}”);--执行命令if($CMD_RESULT=~/\%Invalidinput/i){

writelog(“<SERVSB>端口不存在!</SERVSB>\n”);--写入日志并标红标粗

$ret--;}if($CMD_RESULT=~/shutdown/im){

settaskpara(‘NOSHUT’,1);--标记端口DOWN，下发模版中使用}return$ret;--返回配置检查结果配置下发模版一、进入配置模式cmd_cfg(‘conft');if($CMD_ERRORne''){

writelog("<SERVSB>进入配置层失败!</SERVSB>\n");

return-1;}二、业务配置

<CMDBEG>interfacexxdescriptionxxxxexit

<CMDEND>三、保存配置cmdcfg(“end”);cmdcfg(“write”);四、配置后检查（根据客户需要）

my$ret=0;my$INTNAME=${INTNAME}||'';my($PortIp,$Mask)=split/\//,${PORTIP};my$Mask=(1x$Mask).(0x(32-$Mask));my$Mask=sprintf(“%d.%d.%d.%d”,oct(‘0b’.substr($Mask,0,8)),oct(‘0b’.substr($Mask,8,8)),oct(‘0b’.substr($Mask,16,8)),oct(‘0b’.substr($Mask,24)));掩码转化my$NOSHUT=gettaskpara(“NOSHUT”);配置检查定义的变量//进入配置层cmd_cfg('configureterminal');if($CMD_ERRORne''){writelog("<SERVSB>执行命令失败,$LoopAddress,进入配置层失败!</SERVSB>\n");

return-1;}<CMDBEG>interface$INTNAMEipaddress$PortIp$Maskquit<CMDEND>//端口配置if($CMD_ERRORne''){writelog("<SERVSB>端口配置层失败!</SERVSB>\n");

return-1;}<CMDBEG>endwrite<CMDEND>if($CMD_ERRORne''){

writelog("<SERVSB>配置保存失败!</SERVSB>\n");

gotoROLLBACK;--内部回滚}return0;ROLLBACK:<CMDBEG>conftinterface$INTNAMEnoipaddress$PortIp$Maskendwrite<CMDEND>return-1;

模版开发完测试时一定通过配置预览，特别是对于专线和VPN开通，要仔细核对端口和其他配置信息，防止误删或在已存在业务的端口进行操作。

注意事项交互式snmp模版函数：cmd_snmpget()用途:通过snmp获取设备信息用法：my(@RESULT,@Index)=cmd_snmpget("$OID.$ifIndex");返回值：@Index端口索引，

@RESULT返回值，端口索引$Index[0]对应值为

$RESULT[0]cmd_snmpset()用途:通过snmpset下发设备配置用法：my(@RESULT,@Index)= cmd_snmpset("$Oid.$adsl_ifIndex,INTEGER,2")参数：OID.ADSLINDEXOID和端口索引

INTEGER参数类型

2参数值无返回值PortToIndex()用途:将端口名称转化为端口索引用法：

my($flag,$adsl_ifIndex,$fast_ifIndex,$interleave_ifIndex)=PortToIndex(‘0-0-0-6’);

$flag为1表示转化正常，为-1表示未正常转化。

$adsl_ifIndex端口索引

$fast_ifIndex2快速模式端口索引

$interleave_ifIndex交织模式端口索引GetDslamSave()用途:查询snmp开通配置保存OID用法：

my($saveValue,$saveType,$saveOID)=&GetDslamSave($sess,$Mib,$sysobjectid);参数：

$sess,$Mib固定用法

$sysobjectidSYSOBJECTOID返回值：$saveValue保存值

$saveType类型

$saveOIDOID配置检查模版一、参数检查，端口索引转化my($flag,$adsl_ifIndex,$fast_ifIndex2,$interleave_ifIndex3)

=PortToIndex(${DSLAM_portlist});if($flag==-1){

writelog("\n<SERVSB>ADSL-999:端口转换成索引时失败!</SERVSB>");

return-1;}二、检查端口状态

my($adminStatus)=cmd_snmpget($adminOid);$adminStatus=$adminStatus->[0]ifref$adminStatus;if($CMD_ERRORne''){

writelog("<SERVSB>ADSL-003:获取端口管理状态失败!</SERVSB>\n");

return-1;}if($adminStatus!=1&&$adminStatus