JF 2

wang_qiao_ying 2010-05-18 05:23:47
#进行判断
set totalSize 0
set freeSize 0
set ptNo ""
set vcpuMask ""
set tNo ""
set fNo ""
foreach {ptNo vcpuMask tNo fNo} $info_list {
set totalSize [expr $totalSize + $tNo]
set freeSize [expr $freeSize + $fNo]
}

append freeSize ".0"
if {[expr ($freeSize / $totalSize) * 100] > 5} {
doAddValue $report "OK"
} else {
set tstr ""
append tstr $report

set ptNo ""
set vcpuMask ""
set tNo ""
set fNo ""
foreach {ptNo vcpuMask tNo fNo} $info_list {
set bStr [HexStrToBinary $vcpuMask]
set vcpuNo [string last "1" $bStr]
set vcpuNo [expr [string length $bStr] - $vcpuNo - 1]
set report [ExecTelnetCmd "debugging xboard command $num vcpu $vcpuNo mon show-share-memory 6 3 100 100"]
append $tstr $report
}

doAddValue $tstr
}
}
}

eg:
************************************************
PtNo = 0 , VCpuMask : 0xffffffff
TotalSize : 0x268039c0(616M)
FreeSize : 0x20c03120(524M)
----------------------------------------
PtNo = 1 , VCpuMask : 0x73700006
TotalSize : 0x7febfd0 (127M)
FreeSize : 0x7febfd0 (127M)
----------------------------------------
PtNo = 2 , VCpuMask : 0x 4077771
TotalSize : 0xfff7fd0 (255M)
FreeSize : 0x2ba4170 (43M)
----------------------------------------
PtNo = 3 , VCpuMask : 0x 4077770
TotalSize : 0xfff7fd0 (255M)
FreeSize : 0xf496ec0 (2M)
----------------------------------------
************************************************
...全文
99 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhai_yi_jia 2010-05-18
  • 打赏
  • 举报
回复
JF............
threenewbee 2010-05-18
  • 打赏
  • 举报
回复
这是什么。

741

社区成员

发帖
与我相关
我的任务
社区描述
VB 版八卦、闲侃,联络感情地盘,禁广告帖、作业帖
社区管理员
  • 非技术类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧