1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86
|
#if !defined(lint) && !defined(DOS)
static char rcsid[] = "$Id: tempfile.c 745 2007-10-11 18:03:32Z hubert@u.washington.edu $";
#endif
/*
* ========================================================================
* Copyright 2006-2007 University of Washington
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* ========================================================================
*/
#include "../pith/headers.h"
#include "../pith/tempfile.h"
/*
* Return the name of a file in the same directory as filename.
* Same as temp_nam except it figures out a name in the same directory.
* It also returns the name of the directory in ret_dir if ret_dir is
* not NULL. That has to be freed by caller. If return is not NULL the
* empty file has been created.
*/
char *
tempfile_in_same_dir(char *filename, char *prefix, char **ret_dir)
{
#ifndef MAXPATH
#define MAXPATH 1000 /* Longest file path we can deal with */
#endif
char dir[MAXPATH+1];
char *dirp = NULL;
char *ret_file = NULL;
if(filename){
char *lc;
if((lc = last_cmpnt(filename)) != NULL){
int to_copy;
to_copy = (lc - filename > 1) ? (lc - filename - 1) : 1;
strncpy(dir, filename, MIN(to_copy, sizeof(dir)-1));
dir[MIN(to_copy, sizeof(dir)-1)] = '\0';
}
else{
dir[0] = '.';
dir[1] = '\0';
}
dirp = dir;
}
/* temp_nam creates ret_file */
ret_file = temp_nam(dirp, prefix);
/*
* If temp_nam can't write in dirp it puts the file in a temp directory
* anyway. We don't want that to happen to us.
*/
if(dirp && ret_file && !in_dir(dirp, ret_file)){
our_unlink(ret_file);
fs_give((void **)&ret_file); /* sets it to NULL */
}
if(ret_file && ret_dir && dirp)
*ret_dir = cpystr(dirp);
return(ret_file);
}
/*
* Returns non-zero if dir is a prefix of path.
* zero if dir is not a prefix of path, or if dir is empty.
*/
int
in_dir(char *dir, char *path)
{
return(*dir ? !strncmp(dir, path, strlen(dir)) : 0);
}
|