outvim2html

   1 #!/usr/bin/awk -f
   2 # Released under GPLv3
   3 #    (C)opyright Gerolf Ziegenhain <gerolf@ziegenhain.com> 2008
   4
   5 BEGIN{
   6    print"<html>";
   7    print"<head>";
   8    print"<link href=style.css rel=stylesheet type=text/css>";
   9    print"</head>";
  10    print"<body>";
  11    print"<h1>"title"</h1>";
  12 }
  13 {
  14    status="";
  15 }
  16 /_tag_/{
  17    tag=1;
  18 }
  19 /^[ \t]*\./{status="waiting";sub("\\. ","",$0);}
  20 /^[ \t]*\*/{status="doable";sub("\\* ","",$0);}
  21 /^[ \t]*\|/{status="comment";sub("\\| ","",$0);}
  22 NF>0&&tag==0&&!/_tag_/{
  23    plevel=level;
  24    level=0;
  25    while(index($0,"\t")==1){
  26       level++;sub("\t","");
  27    }
  28    gsub("\\[.\\] ","");
  29    if(plevel<level){
  30       print"<ul>";
  31    }else if(plevel>level){
  32       for (i=plevel;i>level;i--)
  33          print"</ul>";
  34    }
  35    class="l"level;
  36    if (/^>/) {
  37       if (pre==0) {
  38          print "<pre>";
  39          pre=1;
  40       }
  41       print $0;
  42    } else {
  43       if (pre==1) {
  44          print "</pre>";
  45          pre=0;
  46       }
  47       print "<li class="class">";
  48       print "<div class="status">";
  49       print $0;;
  50       print "</div>";
  51       print "</li>";
  52    }
  53 }
  54 END{
  55    print"</body>";
  56    print"</html>";
  57 }
  58 tag==1&&!/_tag_/{
  59    tag=0;
  60    gsub(".otl",".html");
  61    file=$1;
  62    print "<a href="file">"file"</a>"
  63 }