iAdd pearl generation to gopher lawn. - gopher-lawn - The gopher lawn gopher directory project. Err bitreich.org 70 hgit clone git://bitreich.org/gopher-lawn/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/gopher-lawn/ URL:git://bitreich.org/gopher-lawn/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/gopher-lawn/ bitreich.org 70 1Log /scm/gopher-lawn/log.gph bitreich.org 70 1Files /scm/gopher-lawn/files.gph bitreich.org 70 1Refs /scm/gopher-lawn/refs.gph bitreich.org 70 1Tags /scm/gopher-lawn/tag bitreich.org 70 i--- Err bitreich.org 70 1commit c5927bfe4b5654ad7141d202bc02e39ce0c4f170 /scm/gopher-lawn/commit/c5927bfe4b5654ad7141d202bc02e39ce0c4f170.gph bitreich.org 70 1parent 8c8c4d7198368ff3f2a9d5c9a98652ebffa53383 /scm/gopher-lawn/commit/8c8c4d7198368ff3f2a9d5c9a98652ebffa53383.gph bitreich.org 70 hAuthor: Christoph Lohmann <20h@r-36.net> URL:mailto:20h@r-36.net bitreich.org 70 iDate: Tue, 8 Aug 2023 22:50:19 +0200 Err bitreich.org 70 i Err bitreich.org 70 iAdd pearl generation to gopher lawn. Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i A mk-pearls | 56 +++++++++++++++++++++++++++++++ Err bitreich.org 70 i A pearls/footer.gph | 9 +++++++++ Err bitreich.org 70 i A pearls/header.gph | 15 +++++++++++++++ Err bitreich.org 70 i A pearls/pearls.gph.orig | 27 +++++++++++++++++++++++++++ Err bitreich.org 70 i Err bitreich.org 70 i4 files changed, 107 insertions(+), 0 deletions(-) Err bitreich.org 70 i--- Err bitreich.org 70 1diff --git a/mk-pearls b/mk-pearls /scm/gopher-lawn/file/mk-pearls.gph bitreich.org 70 i@@ -0,0 +1,56 @@ Err bitreich.org 70 i+#!/bin/sh Err bitreich.org 70 i+ Err bitreich.org 70 i+{ Err bitreich.org 70 i+ cat pearls/header.gph Err bitreich.org 70 i+ Err bitreich.org 70 i+ find db -name "pearl-*" -type f \ Err bitreich.org 70 i+ | while read -r pearl; Err bitreich.org 70 i+ do Err bitreich.org 70 i+ cat $pearl \ Err bitreich.org 70 i+ | while read -r line; Err bitreich.org 70 i+ do Err bitreich.org 70 i+ fieldval="$(printf "%s\n" "${line}" \ Err bitreich.org 70 i+ | cut -d':' -f2- | xargs)" Err bitreich.org 70 i+ case "${line}" in Err bitreich.org 70 i+ Type:*) Err bitreich.org 70 i+ if [ "${fieldval}" != "text" ]; Err bitreich.org 70 i+ then Err bitreich.org 70 i+ break; Err bitreich.org 70 i+ fi Err bitreich.org 70 i+ ;; Err bitreich.org 70 i+ Selector:*) Err bitreich.org 70 i+ selector="${fieldval}" Err bitreich.org 70 i+ ;; Err bitreich.org 70 i+ Server:*) Err bitreich.org 70 i+ server="${fieldval}" Err bitreich.org 70 i+ ;; Err bitreich.org 70 i+ Port:*) Err bitreich.org 70 i+ port="${fieldval}" Err bitreich.org 70 i+ ;; Err bitreich.org 70 i+ LinkName:*) Err bitreich.org 70 i+ linkname="${fieldval}" Err bitreich.org 70 i+ ;; Err bitreich.org 70 i+ *) Err bitreich.org 70 i+ ;; Err bitreich.org 70 i+ esac Err bitreich.org 70 i+ Err bitreich.org 70 i+ if [ -n "${selector}" ] \ Err bitreich.org 70 i+ && [ -n "${server}" ] \ Err bitreich.org 70 i+ && [ -n "${port}" ] \ Err bitreich.org 70 i+ && [ -n "${linkname}" ]; Err bitreich.org 70 i+ then Err bitreich.org 70 i+ printf "[0| (_) %s|%s|%s|%s]\n" \ Err bitreich.org 70 i+ "${linkname}" \ Err bitreich.org 70 i+ "${selector}" \ Err bitreich.org 70 i+ "${server}" \ Err bitreich.org 70 i+ "${port}" Err bitreich.org 70 i+ selector="" Err bitreich.org 70 i+ server="" Err bitreich.org 70 i+ port="" Err bitreich.org 70 i+ linkname="" Err bitreich.org 70 i+ fi Err bitreich.org 70 i+ done Err bitreich.org 70 i+ done Err bitreich.org 70 i+ Err bitreich.org 70 i+ cat pearls/footer.gph Err bitreich.org 70 i+} > pearls.gph Err bitreich.org 70 1diff --git a/pearls/footer.gph b/pearls/footer.gph /scm/gopher-lawn/file/pearls/footer.gph.gph bitreich.org 70 i@@ -0,0 +1,9 @@ Err bitreich.org 70 i+ (_) ... Send your pearls please. ... Err bitreich.org 70 i+ (_) Err bitreich.org 70 i+ (_) Err bitreich.org 70 i+ _ _ (_)_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ Err bitreich.org 70 i+(_))(_) (_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)@< Err bitreich.org 70 i+ ~VK Err bitreich.org 70 i+ Err bitreich.org 70 i+[1|<< back to bitreich.org||server|port] Err bitreich.org 70 i+ Err bitreich.org 70 1diff --git a/pearls/header.gph b/pearls/header.gph /scm/gopher-lawn/file/pearls/header.gph.gph bitreich.org 70 i@@ -0,0 +1,15 @@ Err bitreich.org 70 i+ Err bitreich.org 70 i+ / Err bitreich.org 70 i+ / GOPHER 2007 PEARL PROJECT Err bitreich.org 70 i+ _/ Err bitreich.org 70 i+[1| (_) Here you go! >> Enter the Archive <<|archive|server|port] Err bitreich.org 70 i+ / Err bitreich.org 70 i+ / Err bitreich.org 70 i+ | The fun in gopherspace is discovery. Err bitreich.org 70 i+ | Many treasures are out there to be found by you. Err bitreich.org 70 i+ | Keep on discovering! Err bitreich.org 70 i+ | And here is a challenge. Err bitreich.org 70 i+ | Can you find the pearls in gopherspace 2007? Err bitreich.org 70 i+[h| \| Please send them to 20h@r-36.net.|URL:mailto:20h@r-36.net|server|port] Err bitreich.org 70 i+ | The pearls will be presented here. Err bitreich.org 70 i+ | Err bitreich.org 70 1diff --git a/pearls/pearls.gph.orig b/pearls/pearls.gph.orig /scm/gopher-lawn/file/pearls/pearls.gph.orig.gph bitreich.org 70 i@@ -0,0 +1,27 @@ Err bitreich.org 70 i+ Err bitreich.org 70 i+ / Err bitreich.org 70 i+ / GOPHER 2007 PEARL PROJECT Err bitreich.org 70 i+ _/ Err bitreich.org 70 i+[1| (_) Here you go! >> Enter the Archive <<|archive|server|port] Err bitreich.org 70 i+ / Err bitreich.org 70 i+ / Err bitreich.org 70 i+ | The fun in gopherspace is discovery. Err bitreich.org 70 i+ | Many treasures are out there to be found by you. Err bitreich.org 70 i+ | Keep on discovering! Err bitreich.org 70 i+ | And here is a challenge. Err bitreich.org 70 i+ | Can you find the pearls in gopherspace 2007? Err bitreich.org 70 i+[h| \| Please send them to 20h@r-36.net.|URL:mailto:20h@r-36.net|server|port] Err bitreich.org 70 i+ | The pearls will be presented here. Err bitreich.org 70 i+ | Err bitreich.org 70 i+[0| (_) gopher-manifesto.txt - The Gopher Manifesto|archive/seanm.ca/70/0/nerd/gopher-manifesto.txt|server|port] Err bitreich.org 70 i+[0| (_) language_parable.txt - Well parse this, you little markup asshole!|archive/seanm.ca/70/0/nerd/language_parable.txt|server|port] Err bitreich.org 70 i+[0| (_) 500mileemail.txt - How E-Mail only is sent 500 miles.|archive/seanm.ca/70/0/nerd/500mileemail.txt|server|port] Err bitreich.org 70 i+ (_) ... Send your pearls please. ... Err bitreich.org 70 i+ (_) Err bitreich.org 70 i+ (_) Err bitreich.org 70 i+ _ _ (_)_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ Err bitreich.org 70 i+(_))(_) (_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)(_)@< Err bitreich.org 70 i+ ~VK Err bitreich.org 70 i+ Err bitreich.org 70 i+[1|<< back to bitreich.org||server|port] Err bitreich.org 70 i+ Err bitreich.org 70 .