~drizzle-trunk/drizzle/development

/* Copyright (C) 2000 MySQL AB

   This program is free software; you can redistribute it and/or modify

   it under the terms of the GNU General Public License as published by

   the Free Software Foundation; version 2 of the License.

   This program is distributed in the hope that it will be useful,

   but WITHOUT ANY WARRANTY; without even the implied warranty of

   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License

   along with this program; if not, write to the Free Software

   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */

/* Open a temporary file and cache it with io_cache. Delete it on close */

#include "mysys/mysys_priv.h"

#include <mystrings/m_string.h>

#include <mysys/my_static.h>

#include <mysys/mysys_err.h>

#include <mysys/iocache.h>

	/*

	** Open tempfile cached by IO_CACHE

	** Should be used when no seeks are done (only reinit_io_buff)

	** Return false if cache is inited ok

	** The actual file is created when the IO_CACHE buffer gets filled

	** If dir is not given, use TMPDIR.

	*/

bool open_cached_file(IO_CACHE *cache, const char* dir, const char *prefix,

                         size_t cache_size, myf cache_myflags)

{

  cache->dir=	 dir ? strdup(dir) : (char*) 0;

  cache->prefix= (prefix ? strdup(prefix) :

		 (char*) 0);

  if ((cache->dir == NULL) || (cache->prefix == NULL))

    return true;

  cache->file_name=0;

  cache->buffer=0;				/* Mark that not open */

  if (!init_io_cache(cache,-1,cache_size,WRITE_CACHE,0L,0,

		     MYF(cache_myflags | MY_NABP)))

  {

    return false;

  }

  free(cache->dir);

  free(cache->prefix);

  return true;

}

	/* Create the temporary file */

bool real_open_cached_file(IO_CACHE *cache)

{

  char name_buff[FN_REFLEN];

  int error=1;

  if ((cache->file=create_temp_file(name_buff, cache->dir, cache->prefix,

				    (O_RDWR | O_TRUNC),

				    MYF(MY_WME))) >= 0)

  {

    error=0;

    my_delete(name_buff,MYF(MY_WME | ME_NOINPUT));

  }

  return(error);

}

void close_cached_file(IO_CACHE *cache)

{

  if (my_b_inited(cache))

  {

    File file=cache->file;

    cache->file= -1;				/* Don't flush data */

    (void) end_io_cache(cache);

    if (file >= 0)

    {

      (void) my_close(file,MYF(0));

#ifdef CANT_DELETE_OPEN_FILES

      if (cache->file_name)

      {

	(void) my_delete(cache->file_name,MYF(MY_WME | ME_NOINPUT));

	free(cache->file_name);

      }

#endif

    }

    free(cache->dir);

    free(cache->prefix);

  }

  return;

}