Preliminary version

git-svn-id: svn://svn.mplayerhq.hu/mplayer/trunk@4072 b3059339-0415-0410-9bf9-f77b7e298cf2

1 files changed, 268 insertions, 0 deletions

diff --git a/libdha/pci_db2c.awk b/libdha/pci_db2c.awk
new file mode 100644
index 0000000000..c9d3d0747a
--- /dev/null
+++ b/libdha/pci_db2c.awk
@@ -0,0 +1,268 @@
+# This file converts given pci.db to "C" source and header files
+# For latest version of pci ids see: http://pciids.sf.net
+# Copyright 2002 Nick Kurshev
+#
+# Usage gawk -f pci_db2c.awk pci.db
+#
+# Tested with Gawk v 3.0.3
+#
+
+BEGIN {
+
+    if(ARGC != 2) {
+# check for arguments:
+	print "Usage gawk -f pci_dc2c.awk pci.db";
+	exit(1);
+    }
+    in_file = ARGV[1];
+# Try get input file attributes.
+    system("ls -o -q --time=ctime "in_file" >.tmp_file")
+    getline <".tmp_file"
+    in_file_attr = $0
+    system("rm -f .tmp_file")
+    vendor_file = "pci_vendors.h";
+    ids_file = "pci_ids.h"
+    name_file = "pci_names.c"
+    name_h_file = "pci_names.h"
+    dev_ids_file = "pci_dev_ids.c"
+    line=0;
+# print out head lines
+    print_head(vendor_file);
+    print_head(ids_file);
+    print_head(name_file);
+    print_head(name_h_file);
+    print_head(dev_ids_file);
+    print "#ifndef PCI_VENDORS_INCLUDED" >vendor_file
+    print "#define PCI_VENDORS_INCLUDED 1">vendor_file
+    print "" >vendor_file
+    print "#ifndef PCI_IDS_INCLUDED" >ids_file
+    print "#define PCI_IDS_INCLUDED 1">ids_file
+    print "" >ids_file
+    print "#include \"pci_vendors.h\"">ids_file
+    print "" >ids_file
+
+    print "#ifndef PCI_NAMES_INCLUDED" >name_h_file
+    print "#define PCI_NAMES_INCLUDED 1">name_h_file
+    print "" >name_h_file
+    print_name_struct(name_h_file);
+    print "#include <stddef.h>">name_file
+    print "#include \"pci_names.h\"">name_file
+    print "#include \"pci_dev_ids.c\"">name_file
+    print "">name_file
+    print "static struct vendor_id_s vendor_ids[] = {">name_file
+    first_pass=1;
+    init_name_db();
+    while(getline <in_file) 
+    {
+# count up lines
+	line++;
+	n=split($0, field, "[\t]");
+	name_field = kill_double_quoting(field[3])
+	if(field[1] == "v" && length(field[3])>0 && field[4] == "0")
+	{
+		init_device_db()
+		svend_name = get_short_vendor_name(field[3])
+		printf("#define VENDOR_%s\t", svend_name) >vendor_file;
+		if(length(svend_name) < 9) printf("\t") >vendor_file;
+		printf("0x%s /*%s*/\n",field[2], name_field) >vendor_file;
+		printf("{ 0x%s, \"%s\", dev_lst_%s },\n",field[2], name_field, field[2]) >name_file;
+		printf("/* Vendor: %s: %s */\n", field[2], name_field) > ids_file
+		if(first_pass == 1) { first_pass=0; }
+		else	{ print "{ 0xFFFF,  NULL }\n};" >dev_ids_file; }
+		printf("static const struct device_id_s dev_lst_%s[]={\n", field[2])>dev_ids_file
+	}
+	if(field[1] == "d" && length(field[3])>0 && field[4] == "0")
+	{
+		sdev_name = get_short_device_name(field[3])
+		full_name = sprintf("#define DEVICE_%s_%s", svend_name, sdev_name);
+		printf("%s\t", full_name) >ids_file
+		if(length(full_name) < 9) printf("\t") >ids_file;
+		if(length(full_name) < 17) printf("\t") >ids_file;
+		if(length(full_name) < 25) printf("\t") >ids_file;
+		if(length(full_name) < 32) printf("\t") >ids_file;
+		if(length(full_name) < 40) printf("\t") >ids_file;
+		if(length(full_name) < 48) printf("\t") >ids_file;
+		printf("0x%s /*%s*/\n", substr(field[2], 5), name_field) >ids_file
+		printf("{ 0x%s, \"%s\" },\n", substr(field[2], 5), name_field) >dev_ids_file
+	}
+	if(field[1] == "s" && length(field[3])>0 && field[4] == "0")
+	{
+		subdev_name = get_short_subdevice_name(field[3])
+		full_name = sprintf("#define SUBDEVICE_%s_%s", svend_name, subdev_name)
+		printf("\t%s\t", full_name) >ids_file
+		if(length(full_name) < 9) printf("\t") >ids_file;
+		if(length(full_name) < 17) printf("\t") >ids_file;
+		if(length(full_name) < 25) printf("\t") >ids_file;
+		if(length(full_name) < 32) printf("\t") >ids_file;
+		if(length(full_name) < 40) printf("\t") >ids_file;
+		printf("0x%s /*%s*/\n", substr(field[2], 9), name_field) >ids_file
+	}
+    }
+    print "Total lines parsed:", line;
+    print "">vendor_file
+    print "#endif/*PCI_VENDORS_INCLUDED*/">vendor_file
+    print "">ids_file
+    print "#endif/*PCI_IDS_INCLUDED*/">ids_file
+    print "">name_h_file
+    print "#endif/*PCI_NAMES_INCLUDED*/">name_h_file
+    print "};">name_file
+    print "{ 0xFFFF,  NULL }" >dev_ids_file;
+    print "};">dev_ids_file
+    print_func_bodies(name_file);
+}
+
+function print_head( out_file)
+{
+    print "/*" >out_file;
+    printf(" * File: %s\n", out_file) >out_file;
+    printf(" * This file was generated automatically from:\n * %s\n", in_file_attr) >out_file;
+    print "*/" >out_file;
+    return;
+}
+
+function print_name_struct(out_file)
+{
+   print "#ifdef __cplusplus" >out_file
+   print "extern \"C\" {" >out_file
+   print "#endif" >out_file
+   print "">out_file
+   print "struct device_id_s" >out_file
+   print "{" >out_file
+   print "\tunsigned short\tid;" >out_file
+   print "\tconst char *\tname;" >out_file
+   print "};" >out_file
+   print "">out_file
+   print "struct vendor_id_s" >out_file
+   print "{" >out_file
+   print "\tunsigned short\tid;" >out_file
+   print "\tconst char *\tname;" >out_file
+   print "\tconst struct device_id_s *\tdev_list;" >out_file
+   print "};" >out_file
+   print "extern const char *pci_vendor_name(unsigned short id);">out_file
+   print "extern const char *pci_device_name(unsigned short vendor_id, unsigned short device_id);">out_file
+   print "">out_file
+   print "#ifdef __cplusplus" >out_file
+   print "}" >out_file
+   print "#endif" >out_file
+   return
+}
+
+function print_func_bodies(out_file)
+{
+   print "">out_file
+   print "const char *pci_vendor_name(unsigned short id)" >out_file
+   print "{" >out_file
+   print "  unsigned i;" >out_file
+   print "  for(i=0;i<sizeof(vendor_ids)/sizeof(struct vendor_id_s);i++)">out_file
+   print "  {" >out_file
+   print "\tif(vendor_ids[i].id == id) return vendor_ids[i].name;" >out_file
+   print "  }" >out_file
+   print "  return NULL;" >out_file
+   print "}">out_file
+   print "" >out_file
+   print "const char *pci_device_name(unsigned short vendor_id, unsigned short device_id)" >out_file
+   print "{" >out_file
+   print "  unsigned i, j;" >out_file
+   print "  for(i=0;i<sizeof(vendor_ids)/sizeof(struct vendor_id_s);i++)">out_file
+   print "  {" >out_file
+   print "\tif(vendor_ids[i].id == vendor_id)" >out_file
+   print "\t{" >out_file
+   print "\t  j=0;" >out_file
+   print "\t  while(vendor_ids[i].dev_list[j].id != 0xFFFF)" >out_file
+   print "\t  {">out_file
+   print "\t\tif(vendor_ids[i].dev_list[j].id == device_id) return vendor_ids[i].dev_list[j].name;">out_file
+   print "\t\tj++;">out_file
+   print "\t  };">out_file
+   print "\t  break;" >out_file
+   print "\t}" >out_file
+   print "  }" >out_file
+   print "  return NULL;">out_file
+   print "}">out_file
+   return
+}
+
+function kill_double_quoting(fld)
+{
+  n=split(fld,phrases, "[\"]");
+  new_fld = phrases[1]
+  for(i=2;i<=n;i++) new_fld = sprintf("%s\\\"%s", new_fld, phrases[i])
+  return new_fld
+}
+
+function init_name_db()
+{
+  vendor_names[1]=""
+}
+
+function init_device_db()
+{
+  delete device_names
+  device_names[1]=""
+  delete subdevice_names
+  subdevice_names[1] = ""
+}
+
+function get_short_vendor_name(from)
+{
+  n=split(from, name, "[ ]");
+  new_name = toupper(name[1]);
+  if(length(new_name)<3) new_name = sprintf("%s_%s", new_name, toupper(name[2]));
+  n=split(new_name, name, "[^0-9A-Za-z]");
+  svendor = name[1];
+  for(i=2;i<=n;i++) svendor=sprintf("%s%s%s", svendor, length(name[i])?"_":"", name[i]);
+  new_name = svendor;
+  vend_suffix = 2;
+# check for unique 
+  while(new_name in vendor_names) 
+  {
+    new_name = sprintf("%s%u", svendor, vend_suffix)
+    vend_suffix = vend_suffix + 1;
+  }
+# Add new name in array of vendor's names
+  vendor_names[new_name] = new_name
+  return new_name;
+}
+
+function get_short_device_name(from_name)
+{
+  n=split(from_name, name, "[ ]");
+  new_name = toupper(name[1]);
+  if(length(name[2])) new_name = sprintf("%s_%s", new_name, toupper(name[2]));
+  if(length(name[3])) new_name = sprintf("%s_%s", new_name, toupper(name[3]));
+  n=split(new_name, name, "[^0-9A-Za-z]");
+  sdevice = name[1];
+  for(i=2;i<=n;i++) sdevice=sprintf("%s%s%s", sdevice, length(name[i])?"_":"", name[i]);
+  new_name = sdevice;
+  dev_suffix = 2;
+# check for unique 
+  while(new_name in device_names) 
+  {
+    new_name = sprintf("%s%u", sdevice, dev_suffix)
+    dev_suffix = dev_suffix + 1;
+  }
+# Add new name in array of device names
+  device_names[new_name] = new_name
+  return new_name;
+}
+
+function get_short_subdevice_name(from_name)
+{
+  n=split(from_name, name, "[ ]");
+  new_name = toupper(name[1]);
+  if(length(name[2])) new_name = sprintf("%s_%s", new_name, toupper(name[2]));
+  if(length(name[3])) new_name = sprintf("%s_%s", new_name, toupper(name[3]));
+  n=split(new_name, name, "[^0-9A-Za-z]");
+  ssdevice = name[1];
+  for(i=2;i<=n;i++) ssdevice=sprintf("%s%s%s", ssdevice, length(name[i])?"_":"", name[i]);
+  new_name = ssdevice;
+  sdev_suffix = 2;
+# check for unique 
+  while(new_name in subdevice_names) 
+  {
+    new_name = sprintf("%s%u", ssdevice, sdev_suffix)
+    sdev_suffix = sdev_suffix + 1;
+  }
+# Add new name in array of subdevice names
+  subdevice_names[new_name] = new_name
+  return new_name;
+}
\ No newline at end of file