git: 9front

ref: a4b24f4624755ef8deb90529a61f5017f6155a3a
dir: /sys/src/9/port/mkdevlist/

View raw version 
#!/bin/rc

awk '
BEGIN{
	if(ARGC < 2)
		exit;
	collect = isdev = 0;
}

/^[ \t]*$/{
	next;
}
/^#/{
	next;
}
collect && /^[^	\t]/{
	collect = isdev = 0;
}
collect && $0 ~ /[^ \t]+/{
	if(isdev)
		obj["dev" $1]++;
	else
		obj[$1]++;
	for(i = 2; i <= NF; i++){
		if($i !~ "[+=-].*")
			obj[$i]++;
	}
}
$0 ~ /^[^ \t]/{
	if($1 ~ "dev"){
		isdev = 1;
		collect = 1;
	}
	else if($1 ~ "misc" || $1 ~ "link" || $1 ~ "ip")
		collect = 1;
	next;
}

END{
	for(i in obj)
		print i ".'$O'"
}' $*