From 7190706c6e74961e2950721fd61ea02967f36c9c Mon Sep 17 00:00:00 2001
From: Werner Almesberger <werner@openmoko.org>
Date: Sat, 16 Oct 2010 08:17:35 -0300
Subject: [PATCH] boom/mbq2lst: utility to generate a KiCad-style BOM from a
 more human-friendly version.

---
 boom/mbq2lst | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100755 boom/mbq2lst

diff --git a/boom/mbq2lst b/boom/mbq2lst
new file mode 100755
index 0000000..f3e332c
--- /dev/null
+++ b/boom/mbq2lst
@@ -0,0 +1,28 @@
+#!/usr/bin/perl
+
+#
+# Format:
+#
+# number comp_ref_category footprint value ...
+#
+
+print "eeschema (whatever) >> some date\n\n";
+print "#Cmp ( order = Reference )\n";
+while (<>) {
+	s/#.*//;
+	next if /^\s*$/;
+	@a = split(/\s+/, $_);
+	$n = shift @a;
+	$cref = shift @a;
+	$fp = shift @a;
+	$value = shift @a;
+	for ($i = 0; $i != $n; $i++) {
+		$p++;
+		print "| $cref$p\t$value\t; $fp\t";
+		for (@a) {
+			print "; $_\t";
+		}
+		print "\n";
+	}
+}
+print "#End Cmp\n";