Bell 32V development

[unix-history] / usr / src / cmd / sp.c

/*
* Print horizontally as possible, thus saving paper
*/
#include <stdio.h>
int tab[8] = {8,7,6,5,4,3,2,1};
int next;       /*next output position on line*/
int slen;       /*length at start of line*/
int alen;       /*actual length*/
int elen;       /*length on current line*/
char buf[256];
getit()
{       register int i;
       register c;
       slen=alen=elen=0;
       for(i=0;;i++)
       {       buf[i]=c=getchar();
               switch(c)
               {
               case '\n':      if(i==0) continue;
               case EOF:
                       alen=i;
                       return(i);
               case '\t':
                       elen+= tab[(next+elen)%8];
                       slen += tab[slen%8];
                       continue;
               default:
                       elen++;
                       slen++;
                       continue;
               }
       }
}
putit(ntab)
{       register int i;
       for(i=0;i<ntab;i++) putchar('\t');
       for(i=0;i<alen;i++) putchar(buf[i]);
}
clean()
{
       putchar('\n');
}
main(argc,argv) char *argv[];
{       int len,ntab;
       int i;
       len=80;
       if(argc>1)
       {       i=atoi(argv[1]);
               if(i<0) i= -i;
               len=(i<1?1:i);
       }
       else len=80;
       for(;;)
       {       if(next==0) ntab=0;
               else if(tab[next%8]<1)
                       {       ntab=2;
                               next+= tab[next%8];
                               next += tab[next%8];
                       }
                       else
                       {       ntab=1;
                               next += tab[next%8];
                       }
               if(getit()<=0) {clean(); exit(0);}
               if(elen+next>=len)
               {       clean();
                       next=slen;
                       putit(0);
               }
               else
               {       next += elen;
                       putit(ntab);
               }
       }
}