#! /bin/bash
# build index of functions/procedures and links (examples...)
# mtx09.inc  --> idx.txt and idu.txt
awk -v FS='"' '
/^procedure/||/^function/ { printf("\t%s\n",$0) }
/href/ { printf("\t%s",$2) }' mtx09.inc | awk -v FS="\t" '{
  printf("%s",$NF);
  for (i=2;i<NF;i++) { printf("\t%s",$i) };
  printf("\n");
}' | sort -k 2 > idx.txt
echo '' > idu.txt
for u in $(
  awk -v FS="\t" '
  {
    for (i=2;i<=NF;i++) { printf("%s\n",$i) }
  }
  ' idx.txt | sort | uniq
)
do
  echo "$u" >> idu.txt
  grep "$u" idx.txt | cut -f 1 >> idu.txt
  echo >> idu.txt
done
