view scripts/ @ 1087:b73a61542297 draft

I've finally gotten 'cpio' into a shape where it could be useable. This version can archive and extract directories, sockets, FIFOs, devices, symlinks, and regular files. Supported options are -iot, -H FMT (which is a dummy right now). It only writes newc, and could read newc or newcrc. This does NOT implement -d, which essentially is equivalent to mkdir -p $(dirname $FILE) for every file that needs it. Hard links are not supported, though it would be easy to add them given a hash table or something like that. I also have not implemented the "<n> blocks" output on stderr. If desired, I can add it pretty simply. There is one assumption this makes: that the mode of a file, as mode_t, is bitwise equivalent to the mode as defined for the cpio format. This is true of Linux, but is not mandated by POSIX. If it is compiled for a system where that is false, the archives will not be portable.
author Isaac Dunham <>
date Mon, 14 Oct 2013 11:15:22 -0500
parents 786841fdb1e0
line wrap: on
line source

#!/bin/bash -e

function firstmajor() {
	declare -i n j=$1
	test $j -gt 0 || return -1
	for j in $@; do
		if [ $j -gt $1 ]; then
			echo $j
			return 0
	return 1
}; export -f firstmajor

function print_h() {
	declare -i i c=$2 s=$3 e=$4
	local str="$(echo "$1" | head -n$c | tail -n1 | sed -e "s,config[\t ]*,,")"
	echo -n "#define help_"$str" \"" | tr [A-Z] [a-z]
	echo -n "$1\\n" | head -n$e | tail -n$[e-s+1] | sed -e "s,\$,\r," | tr \\n\\r n\\
	echo \"
}; export -f print_h

if test "$0" != "bash"; then
	if test -r "$file"; then
#		echo "$file..." >&2
		filetxt="$(sed -e "s,^[\t ]*,," -e "s,\([\"\\\\]\),\\\\\\1,g" "$file")"
		helps=$(echo "$filetxt" | egrep -ne "^help *" -e "^---help--- *" | cut -d\:  -f1)
		configs=$(echo "$filetxt" | egrep -ne "^config *" | cut -d\:  -f1)
		endmenus=$(echo "$filetxt" | egrep -ne "^endmenu *" | cut -d\:  -f1)
		let last=$(echo "$filetxt" | wc -l)+2

		declare -i i c s e
		for i in $configs; do
#			echo -n "c:$i" >&2
			s=$(firstmajor $i $helps)
			test $s -gt 0
			e=$(firstmajor $s $configs || firstmajor $s $endmenus $last)
			let s++ e-=2
			test $e -ge $s
#			echo " s:$s e:$e" >&2
			print_h "$filetxt" $i $s $e
		for fle in $(cat "$file" | egrep -e "^[ \t]*source " | sed -e "s,^[ \t]*source *\(.*\),\\1,"); do
			$0 $fle
		echo "USAGE EXAMPLE: $(basename $0) > generated/help.h"
	fi | sed -e "s,\\\\n\\\\n\"$,\\\\n\","