X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=tab_c99.sh;fp=tab_c99.sh;h=80001c276b4b2eac539dd9428408ad421fd433c2;hb=a4341ee7277caff8b3334c87541f6d093d225b86;hp=0000000000000000000000000000000000000000;hpb=2953a1653ec29b89943000f2ca6067d21bf87f19;p=musl-tables

diff --git a/tab_c99.sh b/tab_c99.sh
new file mode 100755
index 0000000..80001c2
--- /dev/null
+++ b/tab_c99.sh
@@ -0,0 +1,100 @@
+#!/bin/sh
+
+export LC_ALL=C
+MUSL=../musl
+
+( cd $MUSL; git log -n1 ) | awk '
+BEGIN {
+	getline
+	hash = $2
+	getline
+
+	commit = "<h4>commit</h4><p>commit <a href=\"http://git.etalabs.net/cgi-bin/gitweb.cgi?p=musl;a=commit;h=" hash "\">" hash "</a>"
+	while (getline == 1)
+		commit = commit "<br>" $0
+
+	FS = "\t"
+
+	c99 = "data/c99"
+	syms = "data/musl.syms"
+	tags = "data/musl.tags"
+
+	while (getline < syms == 1)
+		sym[$2] = $1
+	while (getline < tags == 1) {
+		if ($2 ~ /bits\//)
+			s = $3 " "
+		else
+			s = "<a href=\"http://git.etalabs.net/cgi-bin/gitweb.cgi?p=musl;a=blob;f=include/" $2 ";hb=" hash "#l" $4 "\">" $3 "</a> "
+		kind[$1] = kind[$1] $3
+		kindstr[$1] = kindstr[$1] s
+	}
+
+	legend = "<h4>legend</h4><ul><li>status: musl implementation status summary<ul>"
+	legend = legend "<li>(empty) - implemented"
+	legend = legend "<li>nosym - prototype found in include files (see decl) but not in libc.a (see sym)"
+	legend = legend "<li>nodecl - symbol is in libc.a but not declared in a public header"
+	legend = legend "<li>missing - neither in include files (see decl) nor in libc.a (see sym)"
+	legend = legend "</ul><li>sym: external symbol kind as found by `nm libc.a` (symbol kind only reported once)<ul>"
+#	legend = legend "<li>A - symbol value is absolute"
+#	legend = legend "<li>B - symbol is in the uninitialized data section (known as BSS)"
+	legend = legend "<li>C - symbol is common (uninitialized data)"
+	legend = legend "<li>D - symbol is in the initialized data section"
+#	legend = legend "<li>G - symbol is in the initialized data section for small objects"
+#	legend = legend "<li>I - indirect reference to another symbol"
+#	legend = legend "<li>N - debugging symbol"
+	legend = legend "<li>R - symbol is in the read only data section"
+#	legend = legend "<li>S - symbol is in the uninitialized data section for small objects"
+	legend = legend "<li>T - symbol is in the text section"
+#	legend = legend "<li>U - undefined symbol"
+	legend = legend "<li>V - weak object"
+	legend = legend "<li>W - weak symbol"
+	legend = legend "</ul><li>decl: kind of declaration as found by `ctags -R include` (every occurance is reported, arch specific definitions are not linked)<ul>"
+	legend = legend "<li>d - macro definition"
+	legend = legend "<li>t - typedef"
+	legend = legend "<li>s - struct declaration"
+	legend = legend "<li>u - union declaration"
+	legend = legend "<li>p - function prototype"
+	legend = legend "<li>x - external and forward variable declaration"
+	legend = legend "</ul></ul>"
+
+	print "<h3>musl vs c99 api</h3>"
+	print commit
+	print legend
+	print "<h4>table</h4><table border=1><tr><th colspan=3>musl<th colspan=4>c99<tr><th>status<th>sym<th>decl<th>name<th>header<th>proto<th>section"
+	nodecl = nosym = missing = 0
+	while (getline < c99 == 1) {
+		s = "<tr><td>"
+		if (sym[$1] && kind[$1]) {
+			s = s "&#160;"
+		} else if (sym[$1]) {
+			s = s "nodecl"
+			nodecl++
+		} else if (kind[$1] ~ /[dtsu]/) {
+			s = s "&#160;"
+		} else if (kind[$1]) {
+			s = s "nosym"
+			nosym++
+		} else {
+			s = s "missing"
+			missing++
+		}
+		s = s "<td>" sym[$1]
+		if (!sym[$1])
+			s = s "&#160;"
+		s = s "<td>" kindstr[$1]
+		if (!kind[$1])
+			s = s "&#160;"
+
+		s = s "<td>" $1
+		s = s "<td>" $3
+		if ($2)
+			s = s "<td>" $2
+		else
+			s = s "<td>&#160;"
+		s = s "<td>" $4
+		print s
+	}
+	print "</table>"
+	print "<h4>stats</h4><ul><li>missing: " missing "<li>nosym: " nosym "<li>nodecl: " nodecl "</ul>"
+}' >tab_c99.html