Index: devhelpers/list_dialogs.sh =================================================================== --- devhelpers/list_dialogs.sh (revision 37025) +++ devhelpers/list_dialogs.sh (revision 37026) @@ -1,10 +1,11 @@ -#!/bin/sh +# shell lib # assumes running from the source tree -trunk=$(dirname $0)/../.. - -grep RND_DAD_NEW $trunk/src/*.c $trunk/src_plugins/*/*.c | awk ' +# list all dialogs from the source files provided on the arg list +list_dlgs() +{ +grep RND_DAD_NEW "$@" | awk ' ($1 ~ "TEMPLATE") { next } { file=$1 @@ -32,3 +33,65 @@ print name "\t" title "\t" file } ' +} + +# read dialog list and emit a html +gen_html() +{ +awk -F "[\t]" ' +function orna(s) +{ + if ((s == "") || (s == "")) return "n/a" + return s +} + +'"$dlgtbl"' +'"`cat dialog_extra.awk`"' + +function out(id, name, src, action, comment ,acturl1,acturl2,fn,tmp) { + if (action == "") { + if (id in ACTION) action = ACTION[id] + else if (src in ACTION) action = ACTION[src] + } + + if (action != "") { + acturl1 = action + sub("[(].*", "", acturl1) + fn = "../action_src/" acturl1 ".html" + if ((getline tmp < fn) == 1) { + acturl1 = "" + acturl2 = "" + } + else { + acturl1 = "" + acturl2 = "" + } + close(fn) + } + + if (comment == "") { + if (id in COMMENT) comment = COMMENT[id] + else if (src in COMMENT) comment = COMMENT[src] + else comment = " " + } + + print "" orna(id) "" orna(name) "" acturl1 orna(action) acturl2 "" src "" comment +} + +{ + id=$1 + name=$2 + src=$3 + if ((src in IGNORE) && ((name ~ IGNORE[src]) || (id ~ IGNORE[src]))) + next + out(id, name, src) +} +' + +echo ' + + + +' +} + Property changes on: devhelpers/list_dialogs.sh ___________________________________________________________________ Deleted: svn:executable ## -1 +0,0 ## -* \ No newline at end of property