#  py_to_c.awk
#
#  $Id: py_to_c.awk,v 1.1.1.1 2006/04/11 17:56:13 source Exp $
#
#  GAWK python embeding script
#  
#  This file is part of the OpenLink Software Virtuoso Open-Source (VOS)
#  project.
#  
#  Copyright (C) 1998-2006 OpenLink Software
#  
#  This project is free software; you can redistribute it and/or modify it
#  under the terms of the GNU General Public License as published by the
#  Free Software Foundation; only version 2 of the License, dated June 1991.
#  
#  This program is distributed in the hope that it will be useful, but
#  WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
#  General Public License for more details.
#  
#  You should have received a copy of the GNU General Public License along
#  with this program; if not, write to the Free Software Foundation, Inc.,
#  51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
#  
#  

BEGIN {
  filename = FILENAME
}

END {
  print ";"
}


{
  if (filename != FILENAME)
    {
      if (filename != "")
	print ";"

      filename = FILENAME
      ndirs = split ( filename, dirs, /[\\\/]/)
      if (ndirs > 0)
	      fn = dirs[ndirs]
      split ( fn, parts, ".")
      print "static char *" parts[1] " ="
    }

  x = $0
  gsub (/\\/, "\\\\", x)
  gsub (/\"/, "\\\"", x)
  print "\"" x "\\n\""
}
