Add plugins

Plugins go in the vienna directory as hidden .sh files. They're sourced by vienna so pages or whatever can use them.
author: Case Duckworth 2023-01-06 16:22:15 -0600
committer: Case Duckworth 2023-01-06 16:22:15 -0600
commit: 21fd5c66eecedddd0bf33379a6d3731ea6ea3a7e (patch)
tree: 28840f252aa32351de7cbcb2700af6c19ecd6a95
parent: Remove trailing --> (diff)
download: vienna-21fd5c66eecedddd0bf33379a6d3731ea6ea3a7e.tar.gz
vienna-21fd5c66eecedddd0bf33379a6d3731ea6ea3a7e.zip
2 files changed, 213 insertions, 0 deletions
diff --git a/plugins/el.sh b/plugins/el.sh
new file mode 100644
index 0000000..6d0780a
--- /dev/null
+++ b/plugins/el.sh

@@ -0,0 +1,202 @@
+# el.sh --- insert html elements using sh
+### Code:
+el() { # el NAME ARGS...
+    ## Create an HTML element named NAME using ARGS.
+    # Any ARGS that contain an equals sign will be made into attributes of the
+    # element, until the special argument '--' which will stop attribute
+    # processing.  While some nesting is possible with 'el', the way bash
+    # expansion works it's not great.
+    #
+    # No validation is done on any arguments in this function.  It could create
+    # something that looks vaguely like an HTML element but isn't valid.
+    _name="$1"; shift || return 1 # Require at least an element name
+    _element="\\<$_name"
+    _content=""
+    _process_args=true
+    while test -n "$1"; do
+        case "$1" in
+            --) if "$_process_args"; then
+                    _process_args=false
+                else
+                    _content="$_content${_content:+ }$1"
+                fi
+                ;;
+            *=*)
+                if "$_process_args"; then
+                    _element="$_element ${1%%=*}=\"${1#*=}\""
+                else
+                    _content="$_content${_content:+ }$1"
+                fi
+                ;;
+            *)
+                if "$_process_args"; then
+                    _process_args=false
+                fi
+                _content="$_content${_content:+ }$1"
+                ;;
+        esac
+        shift
+    done
+    _element="$_element\\>"
+    printf '%s%s\\</%s\\>\n' "$_element" "$_content" "$_name"
+}
+### HTML5 element aliases
+## These come from https://developer.mozilla.org/en-US/docs/Web/HTML/Element
+# To avoid clobbering the shell's namespace, a prefix is used.  Change this
+# variable when sourcing el.sh in order to change or disable the prefix.  E.g.:
+# $ EL_PREFIX= . ./el.sh
+# $ EL_PREFIX=HTML . ./el.sh
+: "${EL_PREFIX:=_}"
+for e in \
+    html \
+        base \
+        head \
+        link \
+        meta \
+        style \
+        title \
+        body \
+        address \
+        article \
+        aside \
+        footer \
+        header \
+        h1 \
+        h2 \
+        h3 \
+        h4 \
+        h5 \
+        h6 \
+        main \
+        nav \
+        section \
+        blockquote \
+        dd \
+        div \
+        dl \
+        dt \
+        figcaption \
+        figure \
+        hr \
+        li \
+        menu \
+        ol \
+        p \
+        pre \
+        ul \
+        a \
+        abbr \
+        b \
+        bdi \
+        bdo \
+        br \
+        cite \
+        code \
+        data \
+        dfn \
+        em \
+        i \
+        kbd \
+        mark \
+        q \
+        rp \
+        rt \
+        ruby \
+        s \
+        samp \
+        small \
+        span \
+        strong \
+        sub \
+        sup \
+        time \
+        u \
+        var \
+        wbr \
+        area \
+        audio \
+        img \
+        map \
+        track \
+        video \
+        embed \
+        iframe \
+        object \
+        picture \
+        portal \
+        source \
+        svg \
+        math \
+        canvas \
+        noscript \
+        script \
+        del \
+        ins \
+        caption \
+        col \
+        colgroup \
+        table \
+        tbody \
+        td \
+        tfoot \
+        th \
+        thead \
+        tr \
+        button \
+        datalist \
+        fieldset \
+        form \
+        input \
+        label \
+        legend \
+        meter \
+        optgroup \
+        option \
+        output \
+        progress \
+        select \
+        textarea \
+        details \
+        dialog \
+        summary \
+        slot \
+        template \
+        acronym \
+        applet \
+        bgsound \
+        big \
+        blink \
+        center \
+        content \
+        dir \
+        font \
+        frame \
+        frameset \
+        image \
+        keygen \
+        marquee \
+        menuitem \
+        nobr \
+        noembed \
+        noframes \
+        param \
+        plaintext \
+        rb \
+        rtc \
+        shadow \
+        spacer \
+        strike \
+        tt \
+        xmp \
+    ; do
+    eval "alias $EL_PREFIX$e='el $e'"
+done
+# el.sh ends here
diff --git a/vienna b/vienna
index 5528463..dba855b 100755
--- a/vienna
+++ b/vienna

@@ -105,6 +105,17 @@ main() {
        log "Can't find configuration \`$CONFIG'."
        exit 2
    fi
+    ## Plugins
+    # Plugins are .*.sh files in build directory.  They're sourced here.
+    for plugin in ./.*.sh; do
+        case "$plugin" in
+            *"$CONFIG"*) continue ;;
+            *)
+                log plugin "source $plugin"
+                . "$plugin"
+                ;;
+        esac
+    done
    mkdir -p "$OUTD" || exit 2
    mkdir -p "$TMPD" || exit 2
    # Build pages
author	Case Duckworth	2023-01-06 16:22:15 -0600
committer	Case Duckworth	2023-01-06 16:22:15 -0600
commit	21fd5c66eecedddd0bf33379a6d3731ea6ea3a7e (patch)
tree	28840f252aa32351de7cbcb2700af6c19ecd6a95
parent	Remove trailing --> (diff)
download	vienna-21fd5c66eecedddd0bf33379a6d3731ea6ea3a7e.tar.gz vienna-21fd5c66eecedddd0bf33379a6d3731ea6ea3a7e.zip

diff --git a/plugins/el.sh b/plugins/el.sh new file mode 100644 index 0000000..6d0780a --- /dev/null +++ b/plugins/el.sh
@@ -0,0 +1,202 @@
		1	# el.sh --- insert html elements using sh
		2
		3	### Code:
		4
		5	el() { # el NAME ARGS...
		6	## Create an HTML element named NAME using ARGS.
		7	# Any ARGS that contain an equals sign will be made into attributes of the
		8	# element, until the special argument '--' which will stop attribute
		9	# processing. While some nesting is possible with 'el', the way bash
		10	# expansion works it's not great.
		11	#
		12	# No validation is done on any arguments in this function. It could create
		13	# something that looks vaguely like an HTML element but isn't valid.
		14	_name="$1"; shift \|\| return 1 # Require at least an element name
		15	_element="\\<$_name"
		16	_content=""
		17	_process_args=true
		18
		19	while test -n "$1"; do
		20	case "$1" in
		21	--) if "$_process_args"; then
		22	_process_args=false
		23	else
		24	_content="$_content${_content:+ }$1"
		25	fi
		26	;;
		27	=)
		28	if "$_process_args"; then
		29	_element="$_element ${1%%=}=\"${1#=}\""
		30	else
		31	_content="$_content${_content:+ }$1"
		32	fi
		33	;;
		34	*)
		35	if "$_process_args"; then
		36	_process_args=false
		37	fi
		38	_content="$_content${_content:+ }$1"
		39	;;
		40	esac
		41	shift
		42	done
		43	_element="$_element\\>"
		44	printf '%s%s\\</%s\\>\n' "$_element" "$_content" "$_name"
		45	}
		46
		47	### HTML5 element aliases
		48	## These come from https://developer.mozilla.org/en-US/docs/Web/HTML/Element
		49
		50	# To avoid clobbering the shell's namespace, a prefix is used. Change this
		51	# variable when sourcing el.sh in order to change or disable the prefix. E.g.:
		52	# $ EL_PREFIX= . ./el.sh
		53	# $ EL_PREFIX=HTML . ./el.sh
		54	: "${EL_PREFIX:=_}"
		55
		56	for e in \
		57	html \
		58	base \
		59	head \
		60	link \
		61	meta \
		62	style \
		63	title \
		64	body \
		65	address \
		66	article \
		67	aside \
		68	footer \
		69	header \
		70	h1 \
		71	h2 \
		72	h3 \
		73	h4 \
		74	h5 \
		75	h6 \
		76	main \
		77	nav \
		78	section \
		79	blockquote \
		80	dd \
		81	div \
		82	dl \
		83	dt \
		84	figcaption \
		85	figure \
		86	hr \
		87	li \
		88	menu \
		89	ol \
		90	p \
		91	pre \
		92	ul \
		93	a \
		94	abbr \
		95	b \
		96	bdi \
		97	bdo \
		98	br \
		99	cite \
		100	code \
		101	data \
		102	dfn \
		103	em \
		104	i \
		105	kbd \
		106	mark \
		107	q \
		108	rp \
		109	rt \
		110	ruby \
		111	s \
		112	samp \
		113	small \
		114	span \
		115	strong \
		116	sub \
		117	sup \
		118	time \
		119	u \
		120	var \
		121	wbr \
		122	area \
		123	audio \
		124	img \
		125	map \
		126	track \
		127	video \
		128	embed \
		129	iframe \
		130	object \
		131	picture \
		132	portal \
		133	source \
		134	svg \
		135	math \
		136	canvas \
		137	noscript \
		138	script \
		139	del \
		140	ins \
		141	caption \
		142	col \
		143	colgroup \
		144	table \
		145	tbody \
		146	td \
		147	tfoot \
		148	th \
		149	thead \
		150	tr \
		151	button \
		152	datalist \
		153	fieldset \
		154	form \
		155	input \
		156	label \
		157	legend \
		158	meter \
		159	optgroup \
		160	option \
		161	output \
		162	progress \
		163	select \
		164	textarea \
		165	details \
		166	dialog \
		167	summary \
		168	slot \
		169	template \
		170	acronym \
		171	applet \
		172	bgsound \
		173	big \
		174	blink \
		175	center \
		176	content \
		177	dir \
		178	font \
		179	frame \
		180	frameset \
		181	image \
		182	keygen \
		183	marquee \
		184	menuitem \
		185	nobr \
		186	noembed \
		187	noframes \
		188	param \
		189	plaintext \
		190	rb \
		191	rtc \
		192	shadow \
		193	spacer \
		194	strike \
		195	tt \
		196	xmp \
		197	; do
		198	eval "alias $EL_PREFIX$e='el $e'"
		199	done
		200
		201
		202	# el.sh ends here


diff --git a/vienna b/vienna index 5528463..dba855b 100755 --- a/vienna +++ b/vienna
@@ -105,6 +105,17 @@ main() {
105	log "Can't find configuration \`$CONFIG'."	105	log "Can't find configuration \`$CONFIG'."
106	exit 2	106	exit 2
107	fi	107	fi
		108	## Plugins
		109	# Plugins are .*.sh files in build directory. They're sourced here.
		110	for plugin in ./.*.sh; do
		111	case "$plugin" in
		112	"$CONFIG") continue ;;
		113	*)
		114	log plugin "source $plugin"
		115	. "$plugin"
		116	;;
		117	esac
		118	done
108	mkdir -p "$OUTD" \|\| exit 2	119	mkdir -p "$OUTD" \|\| exit 2
109	mkdir -p "$TMPD" \|\| exit 2	120	mkdir -p "$TMPD" \|\| exit 2
110	# Build pages	121	# Build pages