XuntilY.awk is actually a shell script, but mostly written in awk to make XuntilY easier to use for people without Perl

gopherd.sh... I don't remember the change.
music.c is to practice reading music.
sockip is to get the IP of the listening socket, like if ran from inetd

2 files changed, 18 insertions, 1 deletions

diff --git a/nocompile/bin/XuntilY.awk b/nocompile/bin/XuntilY.awk
new file mode 100755
index 0000000..6334d31
--- /dev/null
+++ b/nocompile/bin/XuntilY.awk
@@ -0,0 +1,16 @@
+#!/bin/sh
+if [ "_$3" = "_" ];then
+ count=1
+else
+ count="$3"
+fi
+awk '
+BEGIN {counter='$count'}
+/'$1'/, /'$2'/{
+  print $0;
+  if($0 ~ /'$2'/) {
+    counter--;
+  }
+  if(counter == 0) {nextfile}
+}
+'
diff --git a/nocompile/libexec/gopherd.sh b/nocompile/libexec/gopherd.sh
index 3b44296..d710f80 100755
--- a/nocompile/libexec/gopherd.sh
+++ b/nocompile/libexec/gopherd.sh
@@ -22,7 +22,8 @@ if grep -v "^${base}" <<< "${realpath}" > /dev/null;then
  echo -e 'ierror!!! cant find base in realpath\tasdf\tasdf\tasdf\r'
  exit 1
 fi
-myIP=$(hop0 $(/usr/local/libexec/peerip | head -n1) | cut -d% -f1)
+#myIP=$(hop0 $(/usr/local/libexec/peerip | head -n1) | cut -d% -f1)
+myIP=$(/usr/local/libexec/sockip | head -n1 | cut -d% -f1)
 hostname=$(rdns ${myIP})
 if [ ! "${hostname}" ]; then
  hostname=${myIP}