Import sources from 2011-03-30 iso image

1 files changed, 46 insertions, 0 deletions

diff --git a/sys/src/9/port/mkdevlist b/sys/src/9/port/mkdevlist
new file mode 100755
index 000000000..6d745b318
--- /dev/null
+++ b/sys/src/9/port/mkdevlist
@@ -0,0 +1,46 @@
+#!/bin/rc
+
+awk -v 'objtype='$objtype '
+BEGIN{
+	if(ARGC < 2)
+		exit;
+	collect = isdev = 0;
+}
+
+/^[ \t]*$/{
+	next;
+}
+/^#/{
+	next;
+}
+collect && /^[^	\t]/{
+	collect = isdev = 0;
+}
+collect && $0 ~ /[^ \t]+/{
+	if(isdev)
+		obj["dev" $1 "'.$O'"]++;
+	else
+		obj[$1 "'.$O'"]++;
+	for(i = 2; i <= NF; i++){
+		if($i !~ "[+=-].*")
+			obj[$i "'.$O'"]++;
+	}
+}
+$0 ~ /^[^ \t]/{
+	if($1 ~ "dev"){
+		isdev = 1;
+		collect = 1;
+	}
+	else if($1 ~ "misc" || $1 ~ "link" || $1 ~ "ip")
+		collect = 1;
+	next;
+}
+
+END{
+	x = ""
+	for(i in obj)
+		x = x i "\n";
+	if(objtype ~ "386" && obj["pci" "'.$O'"])
+		x = x "bios32'.$O' \n";
+	printf x;
+}' $*