bvaudour/elvish_config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Préparation à elvish 0.17

Browse source
This commit is contained in:
Benjamin VAUDOUR 2021-10-13 20:43:40 +02:00
parent 4170890f54
commit 08d0e16cff
11 changed files with 47 additions and 47 deletions
Download patch file Download diff file Expand all files Collapse all files

18
aliases/ipof.elv
View file

@ -33,15 +33,15 @@ edit:add-var ipof~ [@argv]{
str:split ', ' $value | peach [e]{
var ee = $e
if (ip:is-ip $ee) {
result[ips][$ee] = $nil
set result[ips][$ee] = $nil
}
}
} elif (str:has-prefix $ll 'TXT records') {
result[txt] = $value
set result[txt] = $value
} elif (str:has-prefix $ll 'Resolver') {
result[resolvers] = $value
set result[resolvers] = $value
} elif (str:has-prefix $ll 'Name servers') {
result[remote] = (not-eq $value 'name does not exist')
set result[remote] = (not-eq $value 'name does not exist')
}
}
put $result
@ -57,9 +57,9 @@ edit:add-var ipof~ [@argv]{
peach [d]{
var dd = $d
if (has-key $hosts $dd) {
hosts[$dd][$ip] = $nil
set hosts[$dd][$ip] = $nil
} else {
hosts[$dd] = [&$ip=$nil]
set hosts[$dd] = [&$ip=$nil]
}
} $domains
}
@ -69,7 +69,7 @@ edit:add-var ipof~ [@argv]{
var dd = $d
var solve = (dnssolve $dd)
if (> (keys $solve[ips] | count) 0) {
remote[$dd] = $solve
set remote[$dd] = $solve
}
} $argv
@ -78,14 +78,14 @@ edit:add-var ipof~ [@argv]{
echo (styled 'Resolving '$d'…' bright-green)
echo
if (has-key $hosts $d) {
exists = $true
set exists = $true
echo (styled ' local:' bright-yellow)
keys $hosts[$d] | order &less-than=$sort-ip~ | each [ip]{
echo ' - '$ip
}
}
if (and (has-key $remote $d) $remote[$d][remote]) {
exists = $true
set exists = $true
var info = $remote[$d]
echo (styled ' remote:' bright-yellow)
echo ' IPs:'