1
0
mirror of https://github.com/vlang/v.git synced 2023-08-10 21:13:21 +03:00
v/cmd/tools/vdoctor.v

232 lines
5.9 KiB
V
Raw Normal View History

2020-09-20 13:13:20 +03:00
import os
import term
import time
import v.util
import runtime
struct App {
mut:
report_lines []string
cached_cpuinfo map[string]string
}
fn (mut a App) println(s string) {
a.report_lines << s
}
fn (mut a App) collect_info() {
mut os_kind := os.user_os()
2020-09-20 13:13:20 +03:00
mut arch_details := []string{}
arch_details << '${runtime.nr_cpus()} cpus'
if runtime.is_32bit() {
arch_details << '32bit'
}
if runtime.is_64bit() {
arch_details << '64bit'
}
if runtime.is_big_endian() {
arch_details << 'big endian'
}
if runtime.is_little_endian() {
arch_details << 'little endian'
}
if os_kind == 'mac' {
arch_details << a.cmd(command:'sysctl -n machdep.cpu.brand_string')
}
if os_kind == 'linux' {
info := a.cpu_info()
if info['model name'] != '' {
arch_details << info['model name']
2020-09-21 21:21:07 +03:00
} else {
arch_details << info['hardware']
2020-09-21 21:21:07 +03:00
}
}
if os_kind == 'windows' {
arch_details << a.cmd(command:'wmic cpu get name /format:table', line: 1)
}
//
2020-09-20 13:13:20 +03:00
mut os_details := ''
if os_kind == 'linux' {
os_details = a.get_linux_os_name()
info := a.cpu_info()
if 'hypervisor' in info['flags'] {
if 'microsoft' in a.cmd(command: 'cat /proc/sys/kernel/osrelease') {
os_details += ' (WSL)'
} else {
os_details += ' (VM)'
}
}
// From https://unix.stackexchange.com/a/14346
if a.cmd(command: '[ "$(awk \'\$5=="/" {print \$1}\' </proc/1/mountinfo)" != "$(awk \'\$5=="/" {print \$1}\' </proc/$$/mountinfo)" ] ; echo \$?') == '0' {
os_details += ' (chroot)'
}
2020-09-20 15:28:34 +03:00
} else if os_kind == 'mac' {
mut details := []string{}
details << a.cmd(command: 'sw_vers -productName')
details << a.cmd(command: 'sw_vers -productVersion')
details << a.cmd(command: 'sw_vers -buildVersion')
os_details = details.join(', ')
2020-09-20 15:28:34 +03:00
} else if os_kind == 'windows' {
wmic_info := a.cmd(command:'wmic os get * /format:value', line: -1)
p := a.parse(wmic_info, '=')
caption, build_number, os_arch := p['caption'], p['buildnumber'], p['osarchitecture']
os_details = '$caption v$build_number $os_arch'
2020-09-20 15:28:34 +03:00
} else {
ouname := os.uname()
os_details = '$ouname.release, $ouname.version'
}
a.line('OS', '$os_kind, $os_details')
a.line('Processor', arch_details.join(', '))
a.line('CC version', a.cmd(command:'cc --version'))
a.println('')
2020-09-20 13:13:20 +03:00
vexe := os.getenv('VEXE')
vroot := os.dir(vexe)
os.chdir(vroot)
a.line('vroot', vroot)
a.line('vexe', vexe)
a.line('vexe mtime', time.unix(os.file_last_mod_unix(vexe)).str())
2020-09-20 13:13:20 +03:00
is_writable_vroot := os.is_writable_folder(vroot) or { false }
a.line('is vroot writable', is_writable_vroot.str())
a.line('V full version', util.full_v_version(true))
vtmp := os.getenv('VTMP')
if vtmp != '' {
a.line('env VTMP', '"$vtmp"')
}
vflags := os.getenv('VFLAGS')
if vflags != '' {
a.line('env VFLAGS', '"$vflags"')
}
a.println('')
a.line('Git version', a.cmd(command:'git --version'))
a.line('Git vroot status', a.git_info())
a.line('.git/config present', os.is_file('.git/config').str())
//
if os_kind == 'linux' {
a.report_tcc_version('/var/tmp/tcc')
}
a.report_tcc_version('thirdparty/tcc')
2020-09-20 13:13:20 +03:00
}
2020-09-20 14:49:27 +03:00
struct CmdConfig {
line int
command string
}
fn (mut a App) cmd(c CmdConfig) string {
2020-09-20 14:49:27 +03:00
x := os.exec(c.command) or {
2020-09-20 13:13:20 +03:00
return 'N/A'
}
if x.exit_code == 0 {
if c.line < 0 { return x.output }
2020-09-21 21:21:07 +03:00
output := x.output.split_into_lines()
if output.len > 0 && output.len > c.line {
return output[c.line]
}
2020-09-20 13:13:20 +03:00
}
2020-09-20 15:28:34 +03:00
return 'Error: $x.output'
2020-09-20 13:13:20 +03:00
}
fn (mut a App) line(label string, value string) {
a.println('$label: ${util.bold(value)}')
2020-09-20 13:13:20 +03:00
}
fn (app &App) parse(config, sep string) map[string]string {
mut m := map[string]string
for line in config.split_into_lines() {
sline := line.trim_space()
if sline.len == 0 || sline[0] == `#` {
continue
}
x := sline.split(sep)
if x.len < 2 {
continue
}
m[x[0].trim_space().to_lower()] = x[1].trim_space().trim('"')
}
return m
}
fn (mut a App) get_linux_os_name() string {
mut os_details := ''
linux_os_methods := ['os-release', 'lsb_release', 'kernel', 'uname']
for m in linux_os_methods {
match m {
'os-release' {
if !os.is_file('/etc/os-release') {
continue
}
lines := os.read_file('/etc/os-release') or { continue }
vals := a.parse(lines, '=')
if vals['PRETTY_NAME'] == '' { continue }
os_details = vals['PRETTY_NAME']
break
}
'lsb_release' {
exists := a.cmd(command:'type lsb_release')
if exists.starts_with('Error') {
continue
}
os_details = a.cmd(command: 'lsb_release -d -s')
break
}
'kernel' {
if !os.is_file('/proc/version') {
continue
}
os_details = a.cmd(command: 'cat /proc/version')
break
}
'uname' {
ouname := os.uname()
os_details = '$ouname.release, $ouname.version'
break
}
else {}
}
}
return os_details
}
fn (mut a App) cpu_info() map[string]string {
if a.cached_cpuinfo.len > 0 {
return a.cached_cpuinfo
}
info := os.exec('cat /proc/cpuinfo') or { return a.cached_cpuinfo }
vals := a.parse(info.output, ':')
a.cached_cpuinfo = vals
return vals
}
fn (mut a App) git_info() string {
mut out := a.cmd(command:'git -C . describe --abbrev=8 --dirty --always --tags').trim_space()
os.exec('git -C . remote add V_REPO https://github.com/vlang/v') or {} // ignore failure (i.e. remote exists)
os.exec('git -C . fetch V_REPO') or {}
commit_count := a.cmd(command:'git rev-list @{0}...V_REPO/master --right-only --count').int()
if commit_count > 0 { out += ' ($commit_count commit(s) behind V master)' }
return out
}
fn (mut a App) report_tcc_version(tccfolder string) {
if !os.is_file(os.join_path(tccfolder, '.git', 'config')) {
a.line(tccfolder, 'N/A')
return
}
tcc_branch_name := a.cmd(command:'git -C $tccfolder rev-parse --abbrev-ref HEAD')
tcc_commit := a.cmd(command:'git -C $tccfolder describe --abbrev=8 --dirty --always --tags')
a.line('$tccfolder status', '$tcc_branch_name $tcc_commit')
}
fn (mut a App) report_info() {
for x in a.report_lines {
println(x)
}
}
fn main(){
mut app := App{}
app.collect_info()
app.report_info()
}