Simplify and clean awk script

Suggested by:	dteske
This commit is contained in:
Baptiste Daroussin 2015-03-05 00:18:32 +00:00
parent ca0abefb74
commit f1d1786e24
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/projects/release-pkg/; revision=279608

View File

@ -1,35 +1,31 @@
#!/usr/bin/awk #!/usr/bin/awk
/^[^#]/ { /^[^#]/ {
gsub(/^\./,"", $1) gsub(/^\./,"", $1)
uname="" uname = gname = mode = flags = tags = ""
gname=""
mode=""
flags=""
tags=""
for (i=2; i<=NF; i++) { for (i=2; i<=NF; i++) {
if ($i ~ /^uname=/) { if ($i ~ /^uname=/) {
uname=$i uname=$i
gsub(/uname=/, "", uname); gsub(/uname=/, "", uname)
} else if ($i ~ /^gname=/) { } else if ($i ~ /^gname=/) {
gname=$i gname=$i
gsub(/gname=/, "", gname); gsub(/gname=/, "", gname)
} else if ($i ~ /^mode=/) { } else if ($i ~ /^mode=/) {
mode=$i mode=$i
gsub(/mode=/,"", mode); gsub(/mode=/,"", mode)
} else if ($i ~ /^flags=/) { } else if ($i ~ /^flags=/) {
flags=$i flags=$i
gsub(/flags=/, "", flags); gsub(/flags=/, "", flags)
} else if ($i ~ /^tags=/) { } else if ($i ~ /^tags=/) {
tags=$i tags=$i
gsub(/tags=/, "", tags); gsub(/tags=/, "", tags)
} }
} }
if (length(tags) == 0) if (length(tags) == 0)
next next
if (tags ~ /package=/) { if (tags ~ /package=/) {
gsub(/package=/,"",tags); gsub(/package=/,"",tags)
gsub(/,/, "-", tags); gsub(/,/, "-", tags)
gsub(/runtime-/, "", tags); gsub(/runtime-/, "", tags)
pkg=tags pkg=tags
} else { } else {
pkg=tags pkg=tags