PERFORCE change 136296 for review

Kip Macy kmacy at FreeBSD.org
Tue Feb 26 22:45:55 UTC 2008


http://perforce.freebsd.org/chv.cgi?CH=136296

Change 136296 by kmacy at kmacy:entropy:iwarp on 2008/02/26 22:45:30

	parameterize slightly better to allow creation of multiple of blob headers

Affected files ...

.. //depot/projects/iwarp/sys/dev/cxgb/bin2h.pl#2 edit

Differences ...

==== //depot/projects/iwarp/sys/dev/cxgb/bin2h.pl#2 (text+ko) ====

@@ -12,7 +12,7 @@
   print "failed to open input\n";
   exit 1;
 }
-$success = open OUTPUT, ">$ARGV[1]";
+$success = open OUTPUT, ">$ARGV[1].h";
 unless ($success) {
   print "failed to open output\n";
   exit 1;
@@ -64,13 +64,13 @@
 
 print OUTPUT "#define U (unsigned char)\n\n"; 
 
-print OUTPUT "static unsigned int t3fw_length = $size;\n";
-print OUTPUT "static unsigned char t3fw[$size] = {\n";
+print OUTPUT "static unsigned int $ARGV[1]_length = $size;\n";
+print OUTPUT "static unsigned char $ARGV[1]" . "[$size]" . " = {\n";
 
 for (my $i = 0; $i < $size; $i += 4) {
   my $number_read = read(INPUT, $binary, 4);
   my ($a, $b, $c, $d) = unpack("C C C C", $binary);
-  $buf = sprintf("U 0x%02X, U 0x%02X, U 0x%02X, U 0x%02X, \n", $a, $b, $c, $d);
+  $buf = sprintf("\tU 0x%02X, U 0x%02X, U 0x%02X, U 0x%02X, \n", $a, $b, $c, $d);
   print OUTPUT $buf;
 }
 print OUTPUT "};\n";


More information about the p4-projects mailing list