iAdd BOB support to geomyidae. - geomyidae - A small C-based gopherd. Err bitreich.org 70
hgit clone git://bitreich.org/geomyidae/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/geomyidae/ URL:git://bitreich.org/geomyidae/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/geomyidae/ bitreich.org 70
1Log /scm/geomyidae/log.gph bitreich.org 70
1Files /scm/geomyidae/files.gph bitreich.org 70
1Refs /scm/geomyidae/refs.gph bitreich.org 70
1Tags /scm/geomyidae/tag bitreich.org 70
1README /scm/geomyidae/file/README.gph bitreich.org 70
1LICENSE /scm/geomyidae/file/LICENSE.gph bitreich.org 70
i--- Err bitreich.org 70
1commit 55786ce96a30a89b836e2ebdda0a284dfecffefe /scm/geomyidae/commit/55786ce96a30a89b836e2ebdda0a284dfecffefe.gph bitreich.org 70
1parent 9f57161218c2528eb3ba17e30d6c44a970101888 /scm/geomyidae/commit/9f57161218c2528eb3ba17e30d6c44a970101888.gph bitreich.org 70
hAuthor: Christoph Lohmann <20h@r-36.net> URL:mailto:20h@r-36.net bitreich.org 70
iDate: Fri, 24 Feb 2023 18:52:16 +0100 Err bitreich.org 70
i Err bitreich.org 70
iAdd BOB support to geomyidae. Err bitreich.org 70
i Err bitreich.org 70
iDiffstat: Err bitreich.org 70
i A bob/README.md | 13 +++++++++++++ Err bitreich.org 70
i A bob/eval-bob | 53 ++++++++++++++++++++++++++++++ Err bitreich.org 70
i A bob/index.bob | 14 ++++++++++++++ Err bitreich.org 70
i A bob/index.dbob | 13 +++++++++++++ Err bitreich.org 70
i M filetypes.h | 2 ++ Err bitreich.org 70
i M main.c | 2 +- Err bitreich.org 70
i Err bitreich.org 70
i6 files changed, 96 insertions(+), 1 deletion(-) Err bitreich.org 70
i--- Err bitreich.org 70
1diff --git a/bob/README.md b/bob/README.md /scm/geomyidae/file/bob/README.md.gph bitreich.org 70
i@@ -0,0 +1,13 @@ Err bitreich.org 70
i+Why BOB? Err bitreich.org 70
i+ Err bitreich.org 70
i+Too many people use the Internet drunken. See the web, PHP and other Err bitreich.org 70
i+technologies, where this will end. Err bitreich.org 70
i+ Err bitreich.org 70
i+To show you how not to write code drunken and simplify things, this is an Err bitreich.org 70
i+example of how to add your own dynamic handler language to geomyidae. Err bitreich.org 70
i+ Err bitreich.org 70
i+We support that people should use gopherspace only when being sober. Err bitreich.org 70
i+ Err bitreich.org 70
i+Do not accidently ruin someone's life with your strange hype idea you Err bitreich.org 70
i+created drunken at 2am at night! Err bitreich.org 70
i+ Err bitreich.org 70
1diff --git a/bob/eval-bob b/bob/eval-bob /scm/geomyidae/file/bob/eval-bob.gph bitreich.org 70
i@@ -0,0 +1,53 @@ Err bitreich.org 70
i+#!/bin/sh Err bitreich.org 70
i+# Err bitreich.org 70
i+# Don't drink and code. Err bitreich.org 70
i+# Eval BOB! Err bitreich.org 70
i+# Err bitreich.org 70
i+# https://www.bob.be Err bitreich.org 70
i+# Err bitreich.org 70
i+# We want to create awareness of people writing code while being drunken. Err bitreich.org 70
i+# See PHP or Ruby on Rails for how to not do it. You will end up in a Err bitreich.org 70
i+# life of misery, where you cannot escape and need to keep going until Err bitreich.org 70
i+# your pension with some ugly language, reinventing what has been done Err bitreich.org 70
i+# before. Noone will remember you, since you write shit code and the next Err bitreich.org 70
i+# hype kid replaced your idea with their own hype, rewriting what you Err bitreich.org 70
i+# already did. Err bitreich.org 70
i+# Err bitreich.org 70
i+# Example BOB file: Err bitreich.org 70
i+# Err bitreich.org 70
i+# <?geomyidae echo hello bob ?> Err bitreich.org 70
i+# Err bitreich.org 70
i+# See index.bob for an example file. Err bitreich.org 70
i+# Err bitreich.org 70
i+ Err bitreich.org 70
i+if [ -z "$1" ]; Err bitreich.org 70
i+then Err bitreich.org 70
i+ input="/dev/stdin" Err bitreich.org 70
i+else Err bitreich.org 70
i+ input="$1" Err bitreich.org 70
i+fi Err bitreich.org 70
i+ Err bitreich.org 70
i+{ Err bitreich.org 70
i+ awk -v "bob=1" \ Err bitreich.org 70
i+ 'BEGIN { Err bitreich.org 70
i+ print "cat <<BOBEND" bob ";" Err bitreich.org 70
i+ } Err bitreich.org 70
i+ /^#!\// && NR==1 { Err bitreich.org 70
i+ next; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ /<\?geomyidae/ { Err bitreich.org 70
i+ sub(/<\?geomyidae/, "BOBEND" bob "\n"); Err bitreich.org 70
i+ bob=bob+1; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ /\?>/ { Err bitreich.org 70
i+ sub(/?>/,"\ncat <<BOBEND" bob ";\n"); Err bitreich.org 70
i+ } Err bitreich.org 70
i+ { Err bitreich.org 70
i+ print; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ END { Err bitreich.org 70
i+ print "BOBEND" bob Err bitreich.org 70
i+ } Err bitreich.org 70
i+ ' "${input}" Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
1diff --git a/bob/index.bob b/bob/index.bob /scm/geomyidae/file/bob/index.bob.gph bitreich.org 70
i@@ -0,0 +1,14 @@ Err bitreich.org 70
i+#!/usr/bin/env eval-bob Err bitreich.org 70
i+[h|BOB is great.|URL:https://www.bob.be|server|port] Err bitreich.org 70
i+<?geomyidae Err bitreich.org 70
i+ echo aaaaahhhh Err bitreich.org 70
i+ a="sober" Err bitreich.org 70
i+?> Err bitreich.org 70
i+<?geomyidae printf "BOB is programming "; ?> Err bitreich.org 70
i+extra $a Err bitreich.org 70
i+<?geomyidae Err bitreich.org 70
i+ for i in $(seq 10); Err bitreich.org 70
i+ do Err bitreich.org 70
i+ printf "%s\n" "$a"; Err bitreich.org 70
i+ done Err bitreich.org 70
i+?> Err bitreich.org 70
1diff --git a/bob/index.dbob b/bob/index.dbob /scm/geomyidae/file/bob/index.dbob.gph bitreich.org 70
i@@ -0,0 +1,13 @@ Err bitreich.org 70
i+#!/usr/bin/env eval-bob Err bitreich.org 70
i+<?geomyidae Err bitreich.org 70
i+ echo aaaaahhhh Err bitreich.org 70
i+ a="sober" Err bitreich.org 70
i+?> Err bitreich.org 70
i+<?geomyidae printf "BOB is programming "; ?> Err bitreich.org 70
i+extra $a Err bitreich.org 70
i+<?geomyidae Err bitreich.org 70
i+ for i in $(seq 10); Err bitreich.org 70
i+ do Err bitreich.org 70
i+ printf "%s\n" "$a"; Err bitreich.org 70
i+ done Err bitreich.org 70
i+?> Err bitreich.org 70
1diff --git a/filetypes.h b/filetypes.h /scm/geomyidae/file/filetypes.h.gph bitreich.org 70
i@@ -17,6 +17,8 @@ filetype type[] = { Err bitreich.org 70
i {"gph", "1", handlegph}, Err bitreich.org 70
i {"cgi", "0", handlecgi}, Err bitreich.org 70
i {"dcgi", "1", handledcgi}, Err bitreich.org 70
i+ {"bob", "0", handlecgi}, Err bitreich.org 70
i+ {"dbob", "1", handledcgi}, Err bitreich.org 70
i {"bin", "9", handlebin}, Err bitreich.org 70
i {"tgz", "9", handlebin}, Err bitreich.org 70
i {"gz", "9", handlebin}, Err bitreich.org 70
1diff --git a/main.c b/main.c /scm/geomyidae/file/main.c.gph bitreich.org 70
i@@ -59,7 +59,7 @@ int nlistfds = 0; Err bitreich.org 70
i char *argv0; Err bitreich.org 70
i char stdbase[] = "/var/gopher"; Err bitreich.org 70
i char *stdport = "70"; Err bitreich.org 70
i-char *indexf[] = {"/index.gph", "/index.cgi", "/index.dcgi", "/index.bin"}; Err bitreich.org 70
i+char *indexf[] = {"/index.gph", "/index.cgi", "/index.dcgi", "/index.bob", "/index.bin"}; Err bitreich.org 70
i char *nocgierr = "3Sorry, execution of the token '%s' was requested, but this " Err bitreich.org 70
i "is disabled in the server configuration.\tErr" Err bitreich.org 70
i "\tlocalhost\t70\r\n"; Err bitreich.org 70
.
Response:
text/plain