diff options
Diffstat (limited to 'examples/extract.awk')
| -rw-r--r-- | examples/extract.awk | 69 |
1 files changed, 0 insertions, 69 deletions
diff --git a/examples/extract.awk b/examples/extract.awk deleted file mode 100644 index a1efd673c7..0000000000 --- a/examples/extract.awk +++ /dev/null @@ -1,69 +0,0 @@ -# extract - extract C source files from GTK Tutorial -# Copyright (C) Tony Gale 1998 -# Contact: gale@gtk.org -# -# Command Switches: -# -c : Just do checking rather than output files -# -f <filename> : Extract a specific file -# -d : Extract files to current directory -# -v : Verbose - -BEGIN {in_example=0; check=0; spec_example=""; do_output=0; flatten=0; verbose=0; - for (i=0 ; i < ARGC ; i++) { - if ( ARGV[i] == "-c" ) { - check = 1; - ARGV[i]=""; - } else if ( ARGV[i] == "-f" ) { - spec_example=ARGV[i+1]; - ARGV[i]=""; - ARGV[i+1]=""; - if ( length(spec_example) == 0 ) { - print "usage: -f <filename>"; - exit; - } - } else if ( ARGV[i] == "-d" ) { - flatten = 1; - ARGV[i]=""; - } else if ( ARGV[i] == "-v" ) { - verbose = 1; - ARGV[i] = ""; - } - } -} - -$2 == "example-end" && in_example == 0 { printf("\nERROR: multiple ends at line %d\n", NR) > "/dev/stderr"; - exit} -$2 == "example-end" { in_example=0; do_output=0 } - -in_example==1 && check==0 && do_output==1 { gsub(/&/, "\\&", $0); - gsub(/</, "<", $0); - gsub(/>/, ">", $0); - print $0 >file_name } - -$2 == "example-start" && in_example == 1 { printf("\nERROR: nested example at line %d\n", NR) > "/dev/stderr"; - exit} - -$2 == "example-start" { in_example=1 } - -$2 == "example-start" && check == 0 \ - { if ( (spec_example == "") || (spec_example == $4) ) { - if ( flatten == 0 ) { - if (file_name != "") - close(file_name); - file_name = sprintf("%s/%s",$3, $4); - command = sprintf("mkdir -p %s", $3); - system(command); - } else { - file_name = $4; - } - if (verbose == 1) - printf("%s\n", file_name); - do_output=1; - } - } - - -END {} - - - |