home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 January / Chip_2001-01_cd1.bin / tema / mysql / mysql-3.23.28g-win-source.exe / merge / create.c < prev    next >
C/C++ Source or Header  |  2000-08-31  |  2KB  |  63 lines
  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    
  3.    This program is free software; you can redistribute it and/or modify
  4.    it under the terms of the GNU General Public License as published by
  5.    the Free Software Foundation; either version 2 of the License, or
  6.    (at your option) any later version.
  7.    
  8.    This program 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
  11.    GNU General Public License for more details.
  12.    
  13.    You should have received a copy of the GNU General Public License
  14.    along with this program; if not, write to the Free Software
  15.    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  16.  
  17. /* Create a MERGE-file */
  18.  
  19. #include "mrgdef.h"
  20.  
  21.     /* create file named 'name' and save filenames in it
  22.        table_names should be NULL or a vector of string-pointers with
  23.        a NULL-pointer last
  24.        */
  25.  
  26. int mrg_create(name,table_names)
  27. const char *name,**table_names;
  28. {
  29.   int save_errno;
  30.   uint errpos;
  31.   File file;
  32.   char buff[FN_REFLEN],*end;
  33.   DBUG_ENTER("mrg_create");
  34.  
  35.   errpos=0;
  36.   if ((file = my_create(fn_format(buff,name,"",MRG_NAME_EXT,4),0,
  37.        O_RDWR | O_TRUNC,MYF(MY_WME))) < 0)
  38.     goto err;
  39.   errpos=1;
  40.   if (table_names)
  41.     for ( ; *table_names ; table_names++)
  42.     {
  43.       strmov(buff,*table_names);
  44.       fn_same(buff,name,4);
  45.       *(end=strend(buff))='\n';
  46.       if (my_write(file,*table_names,(uint) (end-buff+1),
  47.            MYF(MY_WME | MY_NABP)))
  48.     goto err;
  49.     }
  50.   if (my_close(file,MYF(0)))
  51.     goto err;
  52.   DBUG_RETURN(0);
  53.  
  54. err:
  55.   save_errno=my_errno;
  56.   switch (errpos) {
  57.   case 1:
  58.     VOID(my_close(file,MYF(0)));
  59.   }
  60.   my_errno=save_errno;            /* Return right errocode */
  61.   DBUG_RETURN(-1);
  62. } /* mrg_create */
  63.