# (trivial) DIR to HTML convertor
# source file MUST be already in KOI-8R, NOT in CP-866

BEGIN { FS = "\201"; print "<PRE>"; }

{
    sub(/[ ]*$/, "", $1);

    gsub(/\&/, "\&amp;", $1);
    gsub(/\>/, "\&gt;", $1);
    gsub(/\</, "\&lt;", $1);

    gsub(/\200/, "-", $1);
    gsub(/\201/, "|", $1);
    gsub(/[\201-\212]/,"+", $1);

    sub(/[ ]*$/, "", $3);
    sub(/\.dir$/, ".html", $3);

    print $3 ?  ("<A HREF=\"" $3 "\">" $1"</A>") : $1;
}

END { print "</PRE>"; }