Date: Tue, 26 Feb 2008 22:45:54 GMT From: Kip Macy <kmacy@FreeBSD.org> To: Perforce Change Reviews <perforce@freebsd.org> Subject: PERFORCE change 136296 for review Message-ID: <200802262245.m1QMjs2S099444@repoman.freebsd.org>
next in thread | raw e-mail | index | archive | help
http://perforce.freebsd.org/chv.cgi?CH=136296 Change 136296 by kmacy@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";
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?200802262245.m1QMjs2S099444>