#!/bin/sh
# fix subclasses
gawk -F\: '{
cmd="./getsubclass " $1
cmd | getline subclasses
close(cmd)

nsc=split(subclasses, sc, ";");
subclassnames=""
for (i=1; i<=nsc; i++) {
  subclassname="OOPS";
  cmd="./getsubclassname " sc[i];
  cmd | getline subclassname;
  close(cmd);
  subclassnames=subclassnames (i>1?";":"") subclassname;
}
print $1 ":" $2 ":" $3 ":" subclasses ":" subclassnames;
}