Filters INDEX file to remove entries irrelevant to package manager

pkgindex.awk

#!/usr/bin/awk -f

# Filters INDEX file to remove entries irrelevant to package manager

BEGIN {
    FS="|"
    # descrfile|bdeps|edeps|pdeps|fdeps
    skip="^(5|8|11|12|13)$"
}

{
    for (i = 1; i <= NF; i++) {
        if (i !~ skip) printf("%s", $i)
        printf("|")
    }
    print("")
}

pkgindex.sh

#!/bin/sh

# XXX removes columns instead of leaving them empty
cut -d\| -f 1-4,6,7,9,10 < INDEX-8 > INDEX-8.PKG
for c in gzip bzip2 xz; do
    $c -vk9 INDEX-8{,.PKG}
done