cuikmergeboxes.c

Go to the documentation of this file.

#include "cuiksystem.h"
#include "parameters.h"

#include "defines.h"
#include "error.h"
#include "filename.h"

#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <unistd.h>


int main(int argc, char **arg)
{
  Tbox bin,bout;

  Tfilename fsol;
  
  unsigned int i,n;
  FILE **fs,*fout;
  int token;
  
  if (argc>2)
    {
      n=argc-2;
      NEW(fs,n,FILE *);

      for(i=0;i<n;i++)
        {
          CreateFileName(NULL,arg[2+i],NULL,SOL_EXT,&fsol);
          #if (_DEBUG>0)
            printf("Reading sol file               : %s\n",GetFileFullName(&fsol));
          #endif
          fs[i]=fopen(GetFileFullName(&fsol),"r");
          if (!fs[i])
            Error("Sol file does not exists in cuikmergeboxes");
          DeleteFileName(&fsol);
        }

      CreateFileName(NULL,arg[2],arg[1],SOL_EXT,&fsol);
      fout=fopen(GetFileFullName(&fsol),"w");
      if (!fout)
        Error("Could not open the output file for the merged cuiksystem.");
      #if (_DEBUG>0)
        printf("Generating merged sol file     : %s\n",GetFileFullName(&fsol));
      #endif
      DeleteFileName(&fsol);
        
      token=~EOF;
      while(token!=EOF)
        {
          i=0;
          while((i<n)&&(token!=EOF))
            {
              token=ReadBox(fs[i],&bin);
              if (token!=EOF)
                {
                  if (i==0)
                    CopyBox(&bout,&bin);
                  else
                    MergeBoxes(&bout,&bin,&bout);
                  DeleteBox(&bin);
                  i++;
                }
            }
          if (i==n)
            PrintBox(fout,&bout);
          if (i>0)
            DeleteBox(&bout);
        }

      for(i=0;i<n;i++)
        fclose(fs[i]);
      fclose(fout);
    }
 else
   {
     fprintf(stderr,"  Wrong number of parameters.\n");
     fprintf(stderr,"  Use:\n");   
     fprintf(stderr,"      cuikmergeboxes <suffx> <problem filenames>.sol \n");
     fprintf(stderr,"  where <problem filenames> contains the kinematic equations to merge\n");
     fprintf(stderr,"    (the '.cuik' extension is not required)\n");
   }
  return(EXIT_SUCCESS);
}