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.