tools/Merge_dimPCBPS

   1 #!/bin/sh
   2 #
   3 # $Id$
   4 #
   5 # merges PostScript files created by pcb (version >= 1.4.2) into
   6 # a single file for backward compatibility
   7 #
   8 # Usage: name files...
   9 #
  10 # by Thomas Nau 9/96
  11 #
  12
  13 if [ $# -eq 0 ]; then
  14         echo "Usage: `basename $0` files..." >&2
  15         exit 1
  16 fi
  17
  18 # some system need nawk
  19 #
  20 case `uname` in
  21         SunOS)  AWK=nawk;;
  22         *)              AWK=awk;;
  23 esac
  24
  25 $AWK '
  26         BEGIN                                                           { filecount = 0; }
  27         /^%!PS/                                                         { filecount++;  if (filecount > 1) { print "Black"; } }
  28         /^%!PS/,/^% PCBENDDATA/                         {
  29                 if (filecount == 1)
  30                 {
  31                         if (index($0, "%%Title:") == 1)
  32                                 sub(",.*$", ", merged layouts");
  33                         if (index($0, "Black") == 1)
  34                            sub ("Black", "0.9 mysetgray");
  35                         print $0;
  36                         next;
  37                 }
  38         }
  39         /^% PCBSTARTDATA/,/^% PCBENDDATA/       {
  40                 if (filecount > 1)
  41                 {
  42                         print $0;
  43                         next;
  44                 }
  45         }
  46                                                                                 { next; }
  47         END                                                                     {
  48                 print "showpage";
  49                 print "%%EOF";
  50         }
  51 ' $@