AWK scripts

* Moved complex awk scripts to libexec/awk
* Simplified update index awk script (only awk!)
* Simplified help message extractor awk script
* Added tgts command for extracting targets from Makefiles

Author: guidanoli

libexec/awk/help.awk

@@ -0,0 +1,8 @@
+!/^#/ { stop = 1 }
+
+/^# .+/ && !stop {
+	printf $2
+	for (i = 3; i <= NF; i++)
+		printf " " $i
+	printf "\n"
+}

libexec/awk/html.awk

@@ -0,0 +1,18 @@
+/<\/TR>/ { row += 1; }
+
+/<TD CLASS="name">/ {
+	gsub(/<[^>]+>/, "")
+	data[row]["name"] = $0
+}
+
+/<TD CLASS="sum">/ {
+	gsub(/<BR>/, FS)
+	gsub(/<[^>]+>/, "")
+	data[row]["md5"] = $2
+	data[row]["sha1"] = $4
+}
+
+END {
+	for(row in data)
+		print(data[row]["name"], data[row]["sha1"], data[row]["md5"])
+}

libexec/comp

@@ -2,7 +2,7 @@
 #
 # Summary: Prints completion options for a command
 #
-# Usage: luav comp <command> [<args>]
+# Usage: luav comp <command> [<args...>]
 #
 
 if [[ $# -ge 1 ]]
@@ -19,7 +19,7 @@ then
 	get )
 		libexec/all
 		;;
-	set | unset | make | rm )
+	set | unset | make | rm | tgts )
 		libexec/list
 		;;
 	help | comp )
@@ -32,7 +32,7 @@ then
 	make )
 		if libexec/list | grep -q "^$1$"
 		then
-			awk -F ':' '/^[a-z-]+:/ { print $1 }' versions/$1/Makefile versions/$1/src/Makefile
+			libexec/tgts "$1"
 		fi
 		;;
 	esac	

libexec/help

@@ -16,7 +16,7 @@ then
 		exit 1
 	fi
 
-	sed -ne 's/^# \(Usage: .*\)$/\1/ p ; s/^# \(Hint: .*\)$/\1/ p' "libexec/$command"
+	awk -f libexec/awk/help.awk "libexec/$command"
 else
 	echo "Usage: luav <command> [<args>]"
 	echo "       luav help <command>"

libexec/make

@@ -2,7 +2,7 @@
 # 
 # Summary: Run make for a specific version of Lua
 #
-# Usage: luav make <version> [<targets-and-flags>]
+# Usage: luav make <version> [<options...>]
 #
 # Hint: You can customize your compilation by setting the CFLAGS environment variable
 #

libexec/tgts

@@ -0,0 +1,23 @@
+#!/usr/bin/env bash
+#
+# Summary: Lists all main targets of a specific version of Lua
+#
+# Usage: luav tgts <version>
+#
+
+if [[ $# -ge 1 ]]
+then
+	version=$1
+	shift
+else
+	usage
+fi
+
+if [[ ! -d versions/$version ]]
+then
+	echo "Version '$version' not found" 2>&1
+	echo "Hint: luav get $version" 2>&1
+	exit 1
+fi
+
+find "versions/$version" -name Makefile -type f | xargs awk -F: '/^[a-z-]+:/ { print $1 }' 

libexec/update

@@ -6,7 +6,4 @@
 #
 
 mkdir -p versions
-curl -s https://www.lua.org/ftp/ | \
-	awk '/<\/TR>/ { row += 1; } /<\/TD>/ { print row, $0 }' | \
-	sed 's/<\/TD>//g; s/<TD CLASS="\([^\"]*\)">/\1 /g; s/<A HREF="\([^\"]*\)">.*/\1/g; s/\(^[0-9]*\) [^ ]* md5: \([^<]*\)<BR>sha1: \(.*\)/\1 md5sum \2\n\1 sha1sum \3/g' | \
-	awk '{ data[$1][$2] = $3 } END { for (i in data) print(data[i]["name"], data[i]["sha1sum"], data[i]["md5sum"], data[i]["date"], data[i]["size"]) }' > versions/.index
+curl -s https://www.lua.org/ftp/ | awk -f libexec/awk/html.awk > versions/.index