diff options
author | unknown <monty@donna.mysql.com> | 2000-10-04 23:20:16 +0300 |
---|---|---|
committer | unknown <monty@donna.mysql.com> | 2000-10-04 23:20:16 +0300 |
commit | fc78fef7968a652d2bf96ac5ee6d5f35faf7fcd9 (patch) | |
tree | f355b0229e2ae229e8311da676b61658f1b0a052 /mysys/mf_tempfile.c | |
parent | 63b7b45ff7f79a08a673e8b759a69f5ee7e67902 (diff) | |
download | mariadb-git-fc78fef7968a652d2bf96ac5ee6d5f35faf7fcd9.tar.gz |
Portability fixes
Docs/manual.texi:
Updates in the links sections
config.guess:
Added fixes for Darwin
config.sub:
Added fixes for Darwin
configure.in:
Added fixes for Darwin
extra/my_print_defaults.c:
Fixed typo
include/my_pthread.h:
Added fixes for Darwin
ltconfig:
Portability fix
myisam/mi_check.c:
Make myisamchk more silent
mysys/Makefile.am:
Added mf_tempfile.c
mysys/mf_cache.c:
Remove not used parts
mysys/mf_tempfile.c:
Fix for Solaris
sql/log.cc:
Fix for Windows
sql/sql_cache.cc:
Fix for Darwin
sql/sql_show.cc:
Fix for temporary tables
strings/strtol.c:
Fix for Darwin
support-files/mysql.spec.sh:
Fix for documentation files that are installed compressed
BitKeeper/etc/logging_ok:
Logging to logging@openlogging.org accepted
Diffstat (limited to 'mysys/mf_tempfile.c')
-rw-r--r-- | mysys/mf_tempfile.c | 173 |
1 files changed, 173 insertions, 0 deletions
diff --git a/mysys/mf_tempfile.c b/mysys/mf_tempfile.c new file mode 100644 index 00000000000..a202dd13d8b --- /dev/null +++ b/mysys/mf_tempfile.c @@ -0,0 +1,173 @@ +/* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB + + This library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public + License as published by the Free Software Foundation; either + version 2 of the License, or (at your option) any later version. + + This library 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 + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with this library; if not, write to the Free + Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, + MA 02111-1307, USA */ + +#include "mysys_priv.h" +#include <m_string.h> +#include "my_static.h" +#include "mysys_err.h" +#include <errno.h> +#ifdef HAVE_PATH_H +#include <paths.h> +#endif + +#ifdef HAVE_TEMPNAM +#ifndef MSDOS +extern char **environ; +#endif +#endif + +/* + Create a temporary file in a given directory + This function should be used instead of my_tempnam() ! +*/ + +File create_temp_file(char *to, const char *dir, const char *prefix, + int mode, myf MyFlags) +{ + File file= -1; + DBUG_ENTER("open_temp_file"); +#if defined(_MSC_VER) + { + char *end,*res,**old_env,*temp_env[1]; + old_env=environ; + if (dir) + { + end=strend(dir)-1; + if (!dir[0]) + { /* Change empty string to current dir */ + to[0]= FN_CURLIB; + to[1]= 0; + dir=to; + } + else if (*end == FN_DEVCHAR) + { /* Get current dir for drive */ + _fullpath(temp,dir,FN_REFLEN); + dir=to; + } + else if (*end == FN_LIBCHAR && dir < end && end[-1] != FN_DEVCHAR) + { + strmake(to,dir,(uint) (end-dir)); /* Copy and remove last '\' */ + dir=to; + } + environ=temp_env; /* Force use of dir (dir not checked) */ + temp_env[0]=0; + } + if ((res=tempnam((char*) dir,(char *) prefix))) + { + strnmov(to,res,FN_REFLEN); + (*free)(res); + file=my_create(to,0, mode, MyFlags); + } + environ=old_env; + } +#elif defined(_ZTC__) + if (!dir) + dir=getenv("TMPDIR"); + if ((res=tempnam((char*) dir,(char *) prefix))) + { + strnmov(to,res,FN_REFLEN); + (*free)(res); + file=my_create(to, 0, mode, MyFlags); + } +#elif defined(HAVE_MKSTEMP) + { + char prefix[30]; + uint pfx_len; + + pfx_len=(strmov(strnmov(prefix, + prefix ? prefix : "tmp.", + sizeof(prefix)-7),"XXXXXX") - prefix); + if (!dir && ! (dir =getenv("TMPDIR"))) + dir=P_tmpdir; + if (strlen(dir)+ pfx_len > FN_REFLEN-2) + { + errno=my_errno= ENAMETOOLONG; + return 1; + } + strmov(to,dir); + strmov(convert_dirname(to),prefix); + file=mkstemp(to); + } +#elif defined(HAVE_TEMPNAM) + { + char *res,**old_env,*temp_env[1]; + if (dir && !dir[0]) + { /* Change empty string to current dir */ + to[0]= FN_CURLIB; + to[1]= 0; + dir=to; + } + old_env=environ; + if (dir) + { /* Don't use TMPDIR if dir is given */ + environ=temp_env; + temp_env[0]=0; + } + if ((res=tempnam((char*) dir, (char*) prefix))) + { + strnmov(to,res,FN_REFLEN); + (*free)(res); + file=my_create(to,0, + (int) (O_RDWR | O_BINARY | O_TRUNC | + O_TEMPORARY | O_SHORT_LIVED), + MYF(MY_WME)); + + } + else + { + DBUG_PRINT("error",("Got error: %d from tempnam",errno)); + } + environ=old_env; + } +#else + { + register long uniq; + register int length; + my_string pos,end_pos; + /* Make an unique number */ + pthread_mutex_lock(&THR_LOCK_open); + uniq= ((long) getpid() << 20) + (long) _my_tempnam_used++ ; + pthread_mutex_unlock(&THR_LOCK_open); + if (!dir && !(dir=getenv("TMPDIR"))) /* Use this if possibly */ + dir=P_tmpdir; /* Use system default */ + length=strlen(dir)+strlen(pfx)+1; + + DBUG_PRINT("test",("mallocing %d byte",length+8+sizeof(TMP_EXT)+1)); + if (length+8+sizeof(TMP_EXT)+1 > FN_REFLENGTH) + errno=my_errno= ENAMETOOLONG; + else + { + end_pos=strmov(to,dir); + if (end_pos != to && end_pos[-1] != FN_LIBCHAR) + *end_pos++=FN_LIBCHAR; + end_pos=strmov(end_pos,pfx); + + for (length=0 ; length < 8 && uniq ; length++) + { + *end_pos++= _dig_vec[(int) (uniq & 31)]; + uniq >>= 5; + } + (void) strmov(end_pos,TMP_EXT); + file=my_create(to,0, + (int) (O_RDWR | O_BINARY | O_TRUNC | + O_TEMPORARY | O_SHORT_LIVED), + MYF(MY_WME)); + } + } +#endif + DBUG_RETURN(file); +} |