ref: bdaf1a663cf88374589d1aad556614aa3af838fa
parent: e551ef409ae2b004595f38323ce212ed152f6c3f
author: cinap_lenrek <cinap_lenrek@felloff.net>
date: Fri Dec 26 13:25:13 EST 2025
rcpu: mirror aanport behaviour from 9front rcpu(1)/rconnec (thanks panini)
--- a/cpu.c
+++ b/cpu.c
@@ -86,7 +86,16 @@
"<>$netdir/clone {\n" " netdir=$netdir/`{read} || exit\n" " >[3] $netdir/ctl {\n"-" echo -n 'announce *!0' >[1=3]\n"
+" @{\n"+" for(range in `{ndb/query -cia sys $sysname aanport} 0){\n"+" range=`{echo `-{echo $range}}\n"+" if(~ $#range 2)range=`{seq $range}\n"+" for(port in $range){\n"+" echo -n announce '*!'^$port >[1=3] && exit ''\n"
+" }\n"
+" }\n"
+" exit 'nope'\n"
+" } >[2]/dev/null\n"
" echo `{cat $netdir/local} || exit\n"" bind '#|' /mnt/aan || exit\n"
" exec aan -m $aanto $netdir <>/mnt/aan/data1 >[1=0] >[2]/dev/null &\n"
--
⑨