shithub: sm2

ref: d6499f94e740761303aca148502239832a96eb9f
dir: /bin/sm2geradd/

View raw version
#!/bin/rc
awk -F'	+' -v 'p=/usr/qwx/p/sm2/ger' -v 'dict=/usr/qwx/p/sm2/ger/db' '
$1 == ""{
	print "\n" $0 >>last
	close(last)
}
$1 != ""{
	f = $1
	gsub("[\\[\\(,]+.*", "", f)
	h = f
	gsub(" ", ".", f)
	last = p "/" f ".t"
	if(system("test -f " last) == 0)
		print f ": appending to existing file"
	else
		print "2.5 0 0 0 " f ".pdf" >>dict
	printf "%s\n.Bp\n%s\n\n%s\n", h, $1, $2 >>last
	close(last)
}
' $*