Pileus Git - ~andy/ct/blob - ct.awk

   1 #!/bin/awk -f
   2 /\[/ {
   3         gsub(/[\[\]]/, "")
   4         code[length(code)] = $0
   5         next
   6 }
   7 /./{
   8         gsub(/"/, "\\\"")
   9         data[length(data)] = "\""$0"\\n\""
  10         i=length(data)-1
  11         code[length(code)] = "fwrite(data"i", sizeof(data"i")-1, 1, stdout);"
  12 }
  13 END {
  14         print "#include <stdio.h>"
  15         print ""
  16         for (i=0; i < length(data); i++)
  17                 print "static char data"i"[] = "data[i]";"
  18         print ""
  19         for (i=0; i < length(code); i++)
  20                 print code[i]
  21 }