#!/usr/bin/awk -f

################################################################################
#
#  Deve ser habilitada a execucao com "chmod +x ./format001.awk"
#  O nome do programa deve ser alterado no codigo em caso de ser renomeado.
#
#  Uso:
#
#   $ ./format001.awk -v header=nnn1 -v footer=nnn2 -v step=nnn3 <arquivo>
# ou   $ ./format001.awk --assign=header=nnn1 --assign=header=footer=nnn2 --assign=header=step=nnn3 <arquivo>
#
#   -v eh opcao para passar valores a variaveis de script por linha de comando
#   --assign eh equivalente a opcao -v
#
#   * header eh o numero de linhas de cabecalho
#   * footer eh o numero de linhas de rodape
#   * step eh o numero de linhas a ser escrito como unica linha antes de uma quebra de linha
#
#   nnn1, nnn2, nnn3 sao valores numericos diferentes a serem passados
#   <arquivo> eh o arquivo a ser formatado pelo script
#
#   Em caso de omissao de um dos valores, o dafault eh 0.
#
#
#
################################################################################


BEGIN   {

      if (header=="") header = 0;
      if (footer=="") footer = 0;
      if (step=="") step = 0;

      h_=header;
      f_=footer;
      s_=step;

      gsub(/[[:digit:]]/,"",h_);
      gsub(/[[:digit:]]/,"",f_);
      gsub(/[[:digit:]]/,"",s_);

      if (h_ || f_ || s_) {

         print "\n\tErro: uma das variaveis eh negativa ou eh um numero.\n\n\tUso:\n\n\
      $ ./format001.awk -v header=nnn1 -v footer=nnn2 -v step=nnn3 <arquivo>\n\
    ou   $ ./format001.awk --assign=header=nnn1 --assign=footer=nnn2 --assign=step=nnn3 <arquivo>\n\n\
      -v eh opcao para passar valores a variaveis de script por linha de comando\n\
      --assign eh equivalente a opcao -v\n\n\
      * header eh o numero de linhas de cabecalho\n\
      * footer eh o numero de linhas de rodape\n\
      * step eh o numero de linhas a ser escrito como unica linha antes de uma quebra de linha\n\n\
      nnn1, nnn2, nnn3 sao valores numericos diferentes a serem passados\n\
      <arquivo> eh o arquivo a ser formatado pelo script\n\n\
      Em caso de omissao de um dos valores, o dafault eh 0.\n";

         exit;
      }


   }

   {

      if (!$0) exit;
      linhas[cont++]=$0;
   }

END   {


      for(i=0;i<cont;i++){

         printf ("%s",linhas[i]);

         if (i<header || i>=cont-footer-1) printf ("%c","\n");

         else {
            if (step==0)
               printf ("%c",(i<=cont-footer-1)?" ":"");
            else
               printf ("%c",(i-header)%step<step-1?" ":"\n");

         }

      }

   }