求助.tcl语言

z792784073

俺是搞SDH的新手一枚。最近老大让我看.tcl估计让我测试板子。看到几条语句不是很清楚，有木有大神教下
1 sfp $sfpIndex on  #sfp是啥命令？
2set currentType [string trimright [pm5450 $device x spe getLowSpeedSignalType $framerIndex] \n]
#[pm5450 $device x spe getLowSpeedSignalType $framerIndex] 这一大串是字符串？
3cross_OTU1 $sfpIndex #又是一个命令
4bcm 0 port 1 lb=rmt
5 for {set index 1} {$index <= 160} {incr index} {
        arad tdmcfgdel $index
        arad stream $index off
    }     #arad 是啥
#大致意思能跟我说一下吗，我很确定这不是tcl中的操作命令。能大致讲解下这命令来自哪里吗？:)谢谢啦 各位大牛