pm5337_debug.tcl

用于EOS芯片的驱动程序, 供参考 参考

proc EOS_SONET_CST_Loopback {devID enable} {
  
  admwrb $devID 0xE005 0 $enable

}

#------------------------------------------------------------------------------
# PROC NAME:  EOS_VCAT_CST_Loopback
#
# DESCRIPTION:  This procedure enables/disables the VCAT Client (LAN) Loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc EOS_VCAT_CST_Loopback {devID enable} {
  
  admwrb $devID 0xE005 1 $enable

}

#------------------------------------------------------------------------------
# PROC NAME:  EOS_BUF_SYS_Loopback
#
# DESCRIPTION:  This procedure enables/disables the Buffer System (WAN) Loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0 (port 1) ... 7 (port 8)
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc EOS_BUF_SYS_Loopback {devID port enable} {
  
  admwrb $devID 0xE005 [expr 2 + $port] $enable

}

#------------------------------------------------------------------------------
# PROC NAME:  EOS_GMII_SYS_Loopback
#
# DESCRIPTION:  This procedure enables/disables the GMII System (WAN) Loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc EOS_GMII_SYS_Loopback {devID  enable} {
  
  admwrb $devID 0xE005 10 $enable

}

#------------------------------------------------------------------------------
# PROC NAME:  EOS_GMII_CST_Loopback
#
# DESCRIPTION:  This procedure enables/disables the GMII Client (LAN) Loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc EOS_GMII_CST_Loopback {devID enable} {
  
  admwrb $devID 0xE005 11 $enable

}

#------------------------------------------------------------------------------
# PROC NAME:  EOS_GFP_CST_Loopback
#
# DESCRIPTION:  This procedure enables/disables the GMII Client (LAN) Loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc EOS_GFP_CST_Loopback {devID enable} {

  admwrb $devID 0xE600 1 $enable

}
#------------------------------------------------------------------------------
# PROC NAME:  EOS_MAC_CST_Loopback
#
# DESCRIPTION:  This procedure enables/disables the MAC Client (LAN) Loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0 (port 1) ... 7 (port 8)
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------

proc EOS_MAC_CST_Loopback {devID port enable} {
  
  set addr_0xEC00 [expr 0xEC00 + ($port * 0x20)] 
      
  admwrb $devID 0xE005 [expr 12 + $port] $enable
  admwrb $devID $addr_0xEC00 0 0
  admwrb $devID $addr_0xEC00 2 $enable
  admwrb $devID $addr_0xEC00 0 1              
  
}

#------------------------------------------------------------------------------
# PROC NAME:  DE1_LD1_Loopback
#
# DESCRIPTION:  This procedure enables/disables T1/E1 line loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               T1_E1 - 0 - T1
#                       1 - E1
#
#               port - 1 (T1 #1) ... 28 (T1 #28) for T1s
#                    - 1 (E1 #1) ... 21 (E1 #21) for E1s
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------

proc DE1_LD1_Loopback {devID T1_E1 port enable} {
 
 # CADDR[6:5] must be set to 1 for drop data stream
 # CADDR[4:0] specify the link to loopback
 
 set port [dec2hex $port]
 
 if {$T1_E1 == 0} {
    set ivalue [admindrd $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN 0xCDF6 1 $port]
    set value [format "0x%04X" [expr [expr $ivalue & 0xBFFF]|[expr $enable << 14]]]
    admindwr $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN $value 0xCDF6 1 $port
  }   
  if {$T1_E1 == 1} {
    set ivalue [admindrd $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN 0xCDF8 1 $port]
    set value [format "0x%04X" [expr [expr $ivalue & 0xBFFF]|[expr $enable << 14]]]
    admindwr $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN $value 0xCDF8 1 $port
  }

}

#------------------------------------------------------------------------------
# PROC NAME:  DE1_SD1_Loopback
#
# DESCRIPTION:  This procedure enables/disables T1/E1 system loopback
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               T1_E1 - 0 - T1
#                       1 - E1
#
#               port - 1 (T1 #1) ... 28 (T1 #28) for T1s
#                    - 1 (E1 #1) ... 21 (E1 #21) for E1s
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc DE1_SD1_Loopback {devID T1_E1 port enable} {
  
 if {$T1_E1 == 0} {
    set ivalue [admindrd $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN 0xCDF6 2 $port]
    set value [format "0x%04X" [expr [expr $ivalue & 0xBFFF]|[expr $enable << 14]]]
    admindwr $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN $value 0xCDF6 2 $port
  }   
  if {$T1_E1 == 1} {
    set ivalue [admindrd $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN 0xCDF8 2 $port]
    set value [format "0x%04X" [expr [expr $ivalue & 0xBFFF]|[expr $enable << 14]]]
    admindwr $devID PDH_SONET::DE1_SLICE::DS1E1_TRAN $value 0xCDF8 2 $port
  }
}

#------------------------------------------------------------------------------
# PROC NAME:  DE3_LD1_Loopback
#
# DESCRIPTION:  This procedure enables/disables DE3 Line loopback 1 (from
#               FRAMER_LINE to TRAN_LINE).
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 2
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc DE3_LD1_Loopback {devID port enable} {

  set addr [expr 0xC701 + $port * 0x100]    
  
  if {$enable == 1} {
    admwrb $devID $addr 5 1
    admwrb $devID $addr 4 0
  }
  if {$enable == 0} {
    admwrb $devID $addr 5 0
    admwrb $devID $addr 4 1
  }
  
}

#------------------------------------------------------------------------------
# PROC NAME:  DE3_LD2_Loopback
#
# DESCRIPTION:  This procedure enables/disables DE3 line loopback 2 (from DE3
#               TRAN to FRAMER)
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 3
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc DE3_LD2_Loopback {devID port enable} {

  set addr [expr 0xC701 + $port * 0x100]    
    
  admwrb $devID $addr 6 $enable  
  
}

#------------------------------------------------------------------------------
# PROC NAME:  DE3_SD1_Loopback
#
# DESCRIPTION:  This procedure enables/disables DE3 system loopback 1 (from D3E3MD to 
#               D3E3MA)
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 3
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc DE3_SD1_Loopback {devID port enable} {

  set addr [expr 0xC701 + $port * 0x100]    
    
  admwrb $devID $addr 10 $enable  
  
}

#------------------------------------------------------------------------------
# PROC NAME:  DE3_SD2_Loopback
#
# DESCRIPTION:  This procedure enables/disables DE3 system loopback 2 (from DE3FRM to 
#               D34TRAN)
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 3
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc DE3_SD2_Loopback {devID port enable} {

  set addr [expr 0xC701 + $port * 0x100]    
    
  admwrb $devID $addr 3 0 
  admwrb $devID $addr 2 $enable  
  
}

#------------------------------------------------------------------------------
# PROC NAME:  DE3_SD3_Loopabck
#
# DESCRIPTION:  This procedure enables/disables DE3 system loopback 3 (from 
#               DE3TRAN_LINE to DE3FRM_LINE)
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 3
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc DE3_SD3_Loopabck {devID port enable} {

  set addr [expr 0xC701 + $port * 0x100]    
  
  admwrb $devID $addr 7 $enable   
  
}

#------------------------------------------------------------------------------
# PROC NAME:  EC1DE3_LD1_Loopback
#
# DESCRIPTION:  This procedure enables/disables EC1DE3 line loopback 1 (from 
#               AJAT-PDH to DJAT-PDH)
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 3
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: 
#------------------------------------------------------------------------------
proc EC1DE3_LD1_Loopback {devID port enable} {

  set addr [expr 0xC108 + $port * 0x10]    
  
  admwrb $devID $addr 7 $enable   
  
}

#------------------------------------------------------------------------------
# PROC NAME:  M13DS3_D1_Loopback
#
# DESCRIPTION:  This procedure enables/disables EC1DE3 system loopback 1 (MX23 to MX23)
#               
# PARAMETERS:	devID  - This parameter is used to specify the device 
#                        under configuration
#
#               port - 0, 1 , 3
#
#		enable	- 0 (disable), 1 (enable)
# 		
# NOTES: