home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 January / Chip_2001-01_cd1.bin / tema / mysql / mysql-3.23.28g-win-source.exe / extra / comp_err.c next >
C/C++ Source or Header  |  2000-08-31  |  7KB  |  276 lines
  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    
  3.    This library is free software; you can redistribute it and/or
  4.    modify it under the terms of the GNU Library General Public
  5.    License as published by the Free Software Foundation; either
  6.    version 2 of the License, or (at your option) any later version.
  7.    
  8.    This library is distributed in the hope that it will be useful,
  9.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11.    Library General Public License for more details.
  12.    
  13.    You should have received a copy of the GNU Library General Public
  14.    License along with this library; if not, write to the Free
  15.    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  16.    MA 02111-1307, USA */
  17.  
  18. /* Saves all errmesg in a header file, updated by me, in a compact file  */
  19.  
  20. #include <global.h>
  21. #include <m_ctype.h>
  22. #include <my_sys.h>
  23. #include <m_string.h>
  24.  
  25. #define MAXLENGTH 1000
  26. #define MAX_ROWS  1000
  27. #define MAX_FILES 10
  28.  
  29. int    row_count;
  30. uint    file_pos[MAX_ROWS],file_row_pos[MAX_FILES];
  31. my_string saved_row[MAX_ROWS];
  32. uchar   file_head[]= { 254,254,2,1 };
  33.  
  34. static void get_options(int *argc,char **argv[]);
  35. static int count_rows(FILE *from,pchar c, pchar c2);
  36. static int remember_rows(FILE *from,pchar c);
  37. static int copy_rows(FILE *to);
  38.  
  39.  
  40.     /* Functions defined in this file */
  41.  
  42. int main(int argc,char *argv[])
  43. {
  44.   int i,error,files,length;
  45.   uchar head[32];
  46.   FILE *from,*to;
  47.   MY_INIT(argv[0]);
  48.  
  49.   get_options(&argc,&argv);
  50.   error=1;
  51.   row_count=files=0;
  52.  
  53.   to=0;
  54.   for ( ; argc-- > 1 ; argv++)
  55.   {
  56.     file_row_pos[files++] = row_count;
  57.  
  58.     if ((from = fopen(*argv,"r")) == NULL)
  59.     {
  60.       fprintf(stderr,"Can't open file '%s'\n",*argv);
  61.       return(1);
  62.     }
  63.  
  64.     VOID(count_rows(from,'"','}'));    /* Calculate start-info */
  65.     if (remember_rows(from,'}') < 0)    /* Remember rows */
  66.     {
  67.       fprintf(stderr,"Can't find textrows in '%s'\n",*argv);
  68.       fclose(from);
  69.       goto end;
  70.     }
  71.     fclose(from);
  72.   }
  73.  
  74.   if ((to=my_fopen(*argv,O_WRONLY | FILE_BINARY,MYF(0))) == NULL)
  75.   {
  76.     fprintf(stderr,"Can't create file '%s'\n",*argv);
  77.     return(1);
  78.   }
  79.  
  80.   fseek(to,(long) (32+row_count*2),0);
  81.   if (copy_rows(to))
  82.     goto end;
  83.  
  84.   length=ftell(to)-32-row_count*2;
  85.  
  86.   bzero((gptr) head,32);        /* Save Header & pointers */
  87.   bmove((byte*) head,(byte*) file_head,4);
  88.   head[4]=files;
  89.   int2store(head+6,length);
  90.   int2store(head+8,row_count);
  91.   for (i=0 ; i<files ; i++)
  92.   {
  93.     int2store(head+10+i+i,file_row_pos[i]);
  94.   }
  95.  
  96.   fseek(to,0l,0);
  97.   if (fwrite(head,1,32,to) != 32)
  98.     goto end;
  99.  
  100.   for (i=0 ; i<row_count ; i++)
  101.   {
  102.     int2store(head,file_pos[i]);
  103.     if (fwrite(head,1,2,to) != 2)
  104.       goto end;
  105.   }
  106.   error=0;
  107.   printf("Found %d messages in language file %s\n",row_count,*argv);
  108.  
  109.  end:
  110.   if (to)
  111.     fclose(to);
  112.   if (error)
  113.     fprintf(stderr,"Can't uppdate messagefile %s, errno: %d\n",*argv,errno);
  114.  
  115.   exit(error);
  116.   return(0);
  117. } /* main */
  118.  
  119.  
  120.     /* Read options */
  121.  
  122. static void get_options(argc,argv)
  123. register int *argc;
  124. register char **argv[];
  125. {
  126.   int help=0;
  127.   char *pos,*progname;
  128.  
  129.   progname= (*argv)[0];
  130.   while (--*argc >0 && *(pos = *(++*argv)) == '-' ) {
  131.     while (*++pos)
  132.     switch(*pos) {
  133.     case '#':
  134.       DBUG_PUSH (++pos);
  135.       *(pos--) = '\0';            /* Skippa argument */
  136.       break;
  137.     case 'V':
  138.       printf("%s  (Compile errormessage)  Ver 1.3\n",progname);
  139.       break;
  140.     case 'I':
  141.     case '?':
  142.       printf("         %s  (Compile errormessage)  Ver 1.3\n",progname);
  143.       puts("This software comes with ABSOLUTELY NO WARRANTY. This is free software,\nand you are welcome to modify and redistribute it under the GPL license\n");
  144.       printf("Usage:   %s [-?] [-I] [-V] fromfile[s] tofile\n",progname);
  145.       puts("Options: -Info -Version\n");
  146.       help=1;
  147.       break;
  148.    default:
  149.      fprintf(stderr,"illegal option: -%c\n",*pos);
  150.      fprintf(stderr,"legal options:  -?IV\n");
  151.      break;
  152.     }
  153.   }
  154.   if (*argc < 2)
  155.   {
  156.     if (!help)
  157.       printf("Usage: %s [-?] [-I] [-V] fromfile[s] tofile\n",progname);
  158.     exit(-1);
  159.   }
  160.   return;
  161. } /* get_options */
  162.  
  163.  
  164.     /* Count rows in from-file until row that start with char is found */
  165.  
  166. static int count_rows(from,c,c2)
  167. FILE *from;
  168. pchar c,c2;
  169. {
  170.   int count;
  171.   long pos;
  172.   char rad[MAXLENGTH];
  173.   DBUG_ENTER("count_rows");
  174.  
  175.   pos=ftell(from); count=0;
  176.   while (fgets(rad,MAXLENGTH,from) != NULL)
  177.   {
  178.     if (rad[0] == c || rad[0] == c2)
  179.       break;
  180.     count++;
  181.     pos=ftell(from);
  182.   }
  183.   fseek(from,pos,0);        /* Position to beginning of last row */
  184.   DBUG_PRINT("exit",("count: %d",count));
  185.   DBUG_RETURN(count);
  186. } /* count_rows */
  187.  
  188.  
  189.     /* Read rows and remember them until row that start with char */
  190.     /* Converts row as a C-compiler would convert a textstring */
  191.  
  192. static int remember_rows(from,c)
  193. FILE *from;
  194. pchar c;
  195. {
  196.   int i,nr,start_count,found_end;
  197.   char row[MAXLENGTH],*pos;
  198.   DBUG_ENTER("remember_rows");
  199.  
  200.   start_count=row_count; found_end=0;
  201.   while (fgets(row,MAXLENGTH,from) != NULL)
  202.   {
  203.     if (row[0] == c)
  204.     {
  205.       found_end=1;
  206.       break;
  207.     }
  208.     for (pos=row ; *pos ;)
  209.     {
  210.       if (*pos == '\\')
  211.       {
  212.     switch (*++pos) {
  213.     case '\\':
  214.     case '"':
  215.       VOID(strmov(pos-1,pos));
  216.       break;
  217.     case 'n':
  218.       pos[-1]='\n';
  219.       VOID(strmov(pos,pos+1));
  220.       break;
  221.     default:
  222.       if (*pos >= '0' && *pos <'8')
  223.       {
  224.         nr=0;
  225.         for (i=0 ; i<3 && (*pos >= '0' && *pos <'8' ) ; i++)
  226.           nr=nr*8+ (*(pos++) -'0');
  227.         pos-=i;
  228.         pos[-1]=nr;
  229.         VOID(strmov(pos,pos+i));
  230.       }
  231.       else if (*pos)
  232.         VOID(strmov(pos-1,pos));            /* Remove '\' */
  233.     }
  234.       }
  235.       else pos++;
  236.     }
  237.     while (pos >row+1 && *pos != '"')
  238.       pos--;
  239.  
  240.     if (!(saved_row[row_count] = (my_string) my_malloc((uint) (pos-row),
  241.                                MYF(MY_WME))))
  242.       DBUG_RETURN(-1);
  243.     *pos=0;
  244.     VOID(strmov(saved_row[row_count],row+1));
  245.     row_count++;
  246.   }
  247.   if (row_count-start_count == 0 && ! found_end)
  248.     DBUG_RETURN(-1);                /* Found nothing */
  249.   DBUG_RETURN(row_count-start_count);
  250. } /* remember_rows */
  251.  
  252.  
  253.     /* Copy rows from memory to file and remember position */
  254.  
  255.  
  256. static int copy_rows(to)
  257. FILE *to;
  258. {
  259.   int row_nr;
  260.   long start_pos;
  261.   DBUG_ENTER("copy_rows");
  262.  
  263.   start_pos=ftell(to);
  264.   for (row_nr =0 ; row_nr < row_count; row_nr++)
  265.   {
  266.     file_pos[row_nr]= (int) (ftell(to)-start_pos);
  267.     if (fputs(saved_row[row_nr],to) == EOF || fputc('\0',to) == EOF)
  268.     {
  269.       fprintf(stderr,"Can't write to outputfile\n");
  270.       DBUG_RETURN(1);
  271.     }
  272.     my_free((gptr) saved_row[row_nr],MYF(0));
  273.   }
  274.   DBUG_RETURN(0);
  275. } /* copy_rows */
  276.