source: app/src/cor/main.cc @ 25ae32e

#include <stdlib.h>
#include <ctype.h>
#include "../lib/iotools.h"
#define _CMDLINE_FILE "../cor/cmdline.h"
#include "../common/common.h"
#include "common_cor.h"
#include "corr.hh"
#include "cmdline.h"
#include <locale.h>


int main(int argc, char** argv) {

//   setlocale(LC_CTYPE,"");
//   setlocale(LC_COLLATE,"");

  gengetopt_args_info args;

  if(cmdline_parser(argc, argv, &args) != 0)
    exit(1);

  process_config_files(&args,argv[0]);
  process_common_options(&args,argv[0]);
  process_cor_options(&args);

  Corr cor;

  cor.load(dictionary);
  cor.t=args.distance_arg;

  char line[MAX_LINE+1];
  long line_count = 0;

  Segment seg;
  Words tab;
  char form1[MAX_LINE];
  char* form;
  int formcasing;
  char corfield[MAX_LINE]="";

  while (fgets(line, MAX_LINE, inputf))
    {
//       strcpy(outline,line);
      ++line_count;

//       if(!seg.parse(line))
//         {
//           fprintf(stderr,"Input error in line %d.\n",line_count);
//           exit(1);
//         }

      char outline[128];
      //printf("Starting cor... searching for %d fields\n", args.input_field_given);
      //for (int i=0; i<args.input_field_given; ++i) {
      //        printf("\t%d. %s\n", i, args.input_field_arg[i]);
      //}

      if (!process_seg(line, args))
        fputs(line, outputf);
      else
        {
          char form[MAX_FORM];
          
          tab.clear();
          getfield(line,input_field_prefix,form);
          if (form==NULL) continue;
          
          formcasing=3;
          cor.correct(form, tab);
          
          if( tab.count() == 0 )
            {
              formcasing=casing(form);
              if( formcasing == 1 || formcasing == 2)
                tolowers(form, form1), cor.correct(form1, tab);
            }
          
          if ( tab.count() == 0)
            fputs(line, failedf);
          else 
            {
              if(args.replace_flag)
                {
                  char corfield[128];
                  strcpy(corfield, input_field_prefix);
                  strcat(corfield, form);
                  seg.aux[seg.auxn]=corfield;
                  ++seg.auxn;
                  for(int i=0; i<tab.count(); ++i)
                    {
                      seg.form=tab[i].form();
                      restorecasing(seg.form,seg.form,formcasing);
                      seg.print(outline);
                      fputs(outline, outputf);
                    }
                  --seg.auxn;
                }
              else
                {
                  if(one_line)
                    {
                      char* p=corfield;
                      for(int i=0; i<tab.count(); ++i)
                        {
                          restorecasing(tab[i].form(),tab[i].form(),formcasing);
                          p += sprintf(p," %s%s",output_field_prefix,tab[i].form());
                        }
                      sprintf(p,"\n");

                      strcpy(outline,line);
                      outline[strlen(outline)-1]='\0';
                      strcat(outline,corfield);
                      fputs(outline, outputf);
                    }
                  else if(one_field)
                    {
                      char* p=corfield;
                      p += sprintf(p," %s",output_field_prefix);
                      for(int i=0; i<tab.count(); ++i)
                        {
                          restorecasing(tab[i].form(),tab[i].form(),formcasing);
                          p += sprintf(p,(i==0)?"%s":";%s",tab[i].form());
                        }
                      
                      sprintf(p,"\n");

                      strcpy(outline,line);
                      outline[strlen(outline)-1]='\0';
                      strcat(outline,corfield);
                      fputs(outline, outputf);
                    }
                  else
                    {
                      for(int i=0; i<tab.count(); ++i)
                        {
                          restorecasing(tab[i].form(),tab[i].form(),formcasing);
                          sprintf(corfield," %s%s\n",output_field_prefix,tab[i].form());
                          strcpy(outline,line);
                          outline[strlen(outline)-1]='\0';
                          strcat(outline,corfield);
                          fputs(outline, outputf);
                        }
                    }
                }
            }
        }
      
      if(args.interactive_flag)
        {
        fflush(outputf);
        fflush(failedf);
      }
    }
  cmdline_parser_free(&args);
}