Nasal-Interpreter/test/occupation.nas

211 lines
6.9 KiB
Plaintext

use std.coroutine;
use std.process_bar;
use module.libkey;
use std.runtime;
use std.os;
use std.io;
use std.unix;
use std.math;
var is_windows_platform = os.platform()=="windows";
var is_macos_platform = os.platform()=="macOS";
if (is_windows_platform) {
runtime.windows.set_utf8_output();
}
var cpu_stat = func() {
if (is_windows_platform or is_macos_platform)
return nil;
var cpu = split("\n", io.readfile("/proc/stat"))[0];
cpu = split(" ", cpu);
cpu = {
name: cpu[0],
user: cpu[1],
nice: cpu[2],
system: cpu[3],
idle: cpu[4],
iowait: cpu[5],
irq: cpu[6],
softirq: cpu[7],
};
return cpu;
}
var cpu_occupation = func() {
var first_in = 1;
while(1) {
var cpu0 = cpu_stat();
if (first_in) {
unix.sleep(0.1);
first_in = 0;
} else {
for(var i = 0; i < 10; i += 1) {
unix.sleep(0.1);
coroutine.yield(nil);
}
}
var cpu1 = cpu_stat();
if (is_windows_platform or is_macos_platform) {
coroutine.yield(0);
continue;
}
var t0 = cpu0.user+cpu0.nice+cpu0.system+cpu0.idle+cpu0.iowait+cpu0.irq+cpu0.softirq;
var t1 = cpu1.user+cpu1.nice+cpu1.system+cpu1.idle+cpu1.iowait+cpu1.irq+cpu1.softirq;
var interval = cpu1.idle-cpu0.idle;
coroutine.yield(t0==t1? 0:(1-interval/(t1-t0))*100);
}
}
var mem_occupation = func() {
if (is_windows_platform or is_macos_platform)
return {MemTotal:math.inf,MemFree:math.inf};
var meminfo = split("\n",io.readfile("/proc/meminfo"));
var mem_res = {};
forindex(var i; meminfo) {
var tmp = split(" ", meminfo[i])[0:1];
tmp[0] = substr(tmp[0], 0, size(tmp[0])-1);
mem_res[tmp[0]] = num(tmp[1]);
}
return mem_res;
}
var random_generator = func() {
var rise = [" ", "▁", "▂", "▃", "▄", "▅", "▆", "▇", "█"];
var total = 0;
var statistics = [];
setsize(statistics, 70);
while(1) {
for(var i=0;i<10;i+=1) {
total+=1;
var u=rand()*rand()*(rand()>0.5?-1:1);
statistics[int(size(statistics)/2+u*size(statistics)/2)]+=1;
}
var s = ["", "", ""];
foreach(var st; statistics) {
var max_rate=100/size(statistics);
var rate=st/total*100;
for(var i=size(s)-1;i>=0;i-=1) {
if (rate>=max_rate) {
s[i]~="█";
rate-=max_rate;
} else {
s[i]~=rise[rate/max_rate*size(rise)];
rate=0;
}
}
}
var tmp="";
for(var i=0;i<size(statistics);i+=1) {
tmp~="─";
}
println("\e[16;1H \e[32m│", s[0], "│\e[0m");
println("\e[17;1H \e[32m│", s[1], "│\e[0m");
println("\e[18;1H \e[32m│", s[2], "│\e[0m");
println("\e[19;1H \e[32m╰", tmp, "╯\e[0m");
coroutine.yield();
}
}
func() {
var limited_loop=(size(runtime.argv())!=0 and !math.isnan(num(runtime.argv()[0])));
if (limited_loop) {
limited_loop=num(runtime.argv()[0]);
} else {
limited_loop=-1;
}
var rise=[" ","▁","▂","▃","▄","▅","▆","▇","█"];
var cpu_occupation_log=[];
var mem_occupation_log=[];
setsize(cpu_occupation_log,70);
setsize(mem_occupation_log,70);
var co=coroutine.create(cpu_occupation);
var rd=coroutine.create(random_generator);
var bar=process_bar.high_resolution_bar(48);
print("\ec");
while(limited_loop!=0) {
limited_loop=limited_loop<0?limited_loop:limited_loop-1;
var mem=mem_occupation();
var mem_occ=(mem.MemTotal-mem.MemFree)/mem.MemTotal*100;
if (math.isnan(mem_occ) or mem_occ<0 or mem_occ>100) {
mem_occ=0;
}
var cpu_occ=nil;
while((cpu_occ=coroutine.resume(co)[0])==nil) {
var key=libkey.nonblock();
coroutine.resume(rd);
if (key!=nil and chr(key)=="q")
return;
}
if (is_windows_platform or is_macos_platform) {
# sorry this is not real data
cpu_occ=rand()*10;
mem_occ=rand()*10+40;
}
for(var i=0;i<size(cpu_occupation_log)-1;i+=1) {
cpu_occupation_log[i]=cpu_occupation_log[i+1];
mem_occupation_log[i]=mem_occupation_log[i+1];
}
cpu_occupation_log[-1]=cpu_occ;
mem_occupation_log[-1]=mem_occ;
println("\e[1;1H\e[1m Operating system : \e[0m",is_windows_platform?"\e[31m":"\e[36m",os.platform()," ",os.arch(),"\e[0m");
println("\e[2;1H\e[1m Current time : \e[0m\e[36m",os.time(),"\e[0m");
println("\e[3;1H\e[1m Memory total(GB) : \e[0m\e[36m",mem.MemTotal/1024/1024,"\e[0m");
println("\e[4;1H\e[1m Memory free(GB) : \e[0m\e[36m",mem.MemFree/1024/1024,"\e[0m");
println("\e[5;1H\e[1m Memory occupation(%): \e[0m",mem_occ>60?"\e[91m":"\e[32m",bar.bar(mem_occ/100)~" ",mem_occ,"\e[0m ");
println("\e[6;1H\e[1m CPU occupation(%) : \e[0m",cpu_occ>90?"\e[91m":"\e[32m",bar.bar(cpu_occ/100)~" ",cpu_occ,"\e[0m ");
var tmp="";
for(var i=0;i<70;i+=1) {
tmp~="─";
}
var s=["","",""];
foreach(var occ;cpu_occupation_log) {
var max_rate=50/size(s);
var rate=occ;
for(var i=size(s)-1;i>=0;i-=1) {
if (rate>=max_rate) {
s[i]~="█";
rate-=max_rate;
} else {
s[i]~=rise[rate/max_rate*size(rise)];
rate=0;
}
}
}
println("\e[7;1H \e[32m╭"~tmp~"╮\e[0m");
println("\e[8;1H \e[32m│",s[0],"│\e[0m");
println("\e[9;1H \e[32m│",s[1],"│\e[0m");
println("\e[10;1H \e[32m│",s[2],"│\e[0m");
println("\e[11;1H \e[32m├"~tmp~"┤\e[0m");
var s=["","",""];
foreach(var occ;mem_occupation_log) {
var max_rate=100/size(s);
var rate=occ;
for(var i=size(s)-1;i>=0;i-=1) {
if (rate>=max_rate) {
s[i]~="█";
rate-=max_rate;
} else {
s[i]~=rise[rate/max_rate*size(rise)];
rate=0;
}
}
}
println("\e[12;1H \e[32m│",s[0],"│\e[0m");
println("\e[13;1H \e[32m│",s[1],"│\e[0m");
println("\e[14;1H \e[32m│",s[2],"│\e[0m");
println("\e[15;1H \e[32m├"~tmp~"┤\e[0m");
println("\e[20;1H Press 'q' to quit.");
}
}();