Index by: file name | procedure name | procedure call | annotation
sysInfo_proc.tcl (annotations | original source)

####################################################################
# Print System Inforamtion. 
####################################################################
proc sysInfo { } {

   global env  

   set width 40 

   putsLog "System Details are....................."

   putsTabular $width "java.vm.name"                        $env(java.vm.name)
   putsTabular $width "java.vm.specification.name"          $env(java.vm.specification.name)
   putsTabular $width "java.vm.specification.vendor"        $env(java.vm.specification.vendor)
   putsTabular $width "java.vm.specification.version"       $env(java.vm.specification.version)
   putsTabular $width "java.vm.vendor"                      $env(java.vm.vendor)
   putsTabular $width "java.vm.version"                     $env(java.vm.version)
   putsTabular $width "jxe.current.romimage.version"        $env(jxe.current.romimage.version)
   putsTabular $width "jxe.lowest.romimage.version"         $env(jxe.lowest.romimage.version)
   putsTabular $width "line.separator"                      $env(line.separator)
   putsTabular $width "local.cell"                          $env(local.cell)
   putsTabular $width "local.node"                          $env(local.node)
   putsTabular $width "org.osgi.framework.os.name"          $env(org.osgi.framework.os.name)    
   putsTabular $width "org.osgi.framework.os.version"       $env(org.osgi.framework.os.version)
   putsTabular $width "org.osgi.framework.processor"        $env(org.osgi.framework.processor) 
   putsTabular $width "USER"                                $env(USER)                                
   putsTabular $width "awt.toolkit"                         $env(awt.toolkit)                         
   putsTabular $width "cmd.properties.file"                 $env(cmd.properties.file)                 
   putsTabular $width "com.ibm.CORBA.ConfigURL"             $env(com.ibm.CORBA.ConfigURL)             
   putsTabular $width "com.ibm.SOAP.ConfigURL"              $env(com.ibm.SOAP.ConfigURL)              
   putsTabular $width "com.ibm.ws.scripting.connectionType" $env(com.ibm.ws.scripting.connectionType) 
   putsTabular $width "com.ibm.ws.scripting.defaultLang"    $env(com.ibm.ws.scripting.defaultLang)    
   putsTabular $width "com.ibm.ws.scripting.echoparams"     $env(com.ibm.ws.scripting.echoparams)     
   putsTabular $width "com.ibm.ws.scripting.host"           $env(com.ibm.ws.scripting.host)           
   putsTabular $width "com.ibm.ws.scripting.port"           $env(com.ibm.ws.scripting.port)           
   putsTabular $width "os.arch"                             $env(os.arch)                             
   putsTabular $width "os.name"                             $env(os.name)                             
   putsTabular $width "os.version"                          $env(os.version)                          
   putsTabular $width "osgi.adaptor"                        $env(osgi.adaptor)                        
   putsTabular $width "osgi.arch"                           $env(osgi.arch)                           
   putsTabular $width "java.fullversion"                    $env(java.fullversion)                    
   putsTabular $width "java.runtime.version"                $env(java.runtime.version)                

}

Index by: file name | procedure name | procedure call | annotation
File generated 2007-08-07 at 13:42.