lib/gen_geda_m4.awk

   1 #!/usr/bin/awk -f
   2 #
   3 # $Id$
   4 #
   5 # Script to regenerate geda.m4 from geda.inc
   6 #
   7 # Usage:
   8 #
   9 #  awk -f gen_geda_m4.awk geda.inc > geda.m4
  10 #
  11
  12 BEGIN {
  13         printf("divert(-1)\n");
  14         printf("#\n");
  15         printf("# NOTE: Auto-generated. Do not change.\n");
  16         printf("#");
  17 }
  18
  19 /^\#\#/ {
  20         descr = $0;
  21         ind = index(descr, $2);
  22         descr = substr(descr, ind);
  23         printf("#\n");
  24         next;
  25 }
  26
  27
  28 /^[ \t]*define/ {
  29         pkg = $1;
  30         ind = index(pkg, "PKG");
  31         pkg = substr(pkg, ind+4);
  32         ind = index(pkg, "'");
  33         pkg = substr(pkg, 1, ind-1);
  34         printf("define(`Description_geda_%s',\t``%s'')\n", pkg, descr);
  35 }
  36
  37 END {
  38         printf("divert(0)dnl\n");
  39 }
  40