150 lines
3.3 KiB
C
150 lines
3.3 KiB
C
|
/* ------------------------------------------------------------------------ */
|
||
|
|
/* */
|
||
|
|
/* Creates/Replaces files or directories. */
|
||
|
|
/* */
|
||
|
|
/* ------------------------------------------------------------------------ */
|
||
|
|
|
||
|
|
#include "os.h"
|
||
|
|
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <fcntl.h> // AMIGA: open()
|
||
|
|
#include <stdio.h> // pipeit() remove()
|
||
|
|
#include <string.h> // strncpy()
|
||
|
|
#include <sys/types.h>
|
||
|
|
#include <sys/stat.h> // struct stat
|
||
|
|
#include <string.h>
|
||
|
|
|
||
|
|
|
||
|
|
#if defined(DOS) || defined(WINNT) || defined(WIN16)
|
||
|
|
#include <io.h> // access()
|
||
|
|
#endif
|
||
|
|
#if defined(__IBMC__)
|
||
|
|
#include <direct.h>
|
||
|
|
#endif
|
||
|
|
|
||
|
|
#define DIRSEP '\\'
|
||
|
|
|
||
|
|
#include "attribs.h"
|
||
|
|
#include "globals.h"
|
||
|
|
#include "uac_crt.h"
|
||
|
|
#include "uac_sys.h"
|
||
|
|
|
||
|
|
/* gets file name from header
|
||
|
|
*/
|
||
|
|
CHAR *ace_fname(CHAR * s, thead * head, INT nopath)
|
||
|
|
{
|
||
|
|
INT i;
|
||
|
|
char *cp;
|
||
|
|
|
||
|
|
strncpy(s, (CHAR *)(*(tfhead *) head).FNAME, i = (*(tfhead *) head).FNAME_SIZE);
|
||
|
|
s[i] = 0;
|
||
|
|
|
||
|
|
if (nopath)
|
||
|
|
{
|
||
|
|
cp=strrchr(s, '\\');
|
||
|
|
if (cp)
|
||
|
|
memmove(s, cp+1, strlen(cp));
|
||
|
|
}
|
||
|
|
|
||
|
|
return s;
|
||
|
|
}
|
||
|
|
|
||
|
|
void check_ext_dir(CHAR * f) // checks/creates path of file
|
||
|
|
{
|
||
|
|
CHAR *cp,
|
||
|
|
d[PATH_MAX];
|
||
|
|
INT i;
|
||
|
|
|
||
|
|
d[0] = 0;
|
||
|
|
|
||
|
|
for (;;)
|
||
|
|
{
|
||
|
|
if ((cp = (CHAR *) strchr(&f[strlen(d) + 1], DIRSEP))!=NULL)
|
||
|
|
{
|
||
|
|
i = cp - f;
|
||
|
|
strncpy(d, f, i);
|
||
|
|
d[i] = 0;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
return;
|
||
|
|
|
||
|
|
if (!fileexists(d))
|
||
|
|
#if (defined(__OS2__) && !defined(__EMX__)) || (defined(WINNT) && !defined(__CYGWIN__))
|
||
|
|
if (mkdir(d))
|
||
|
|
#else
|
||
|
|
if (mkdir(d, 0))
|
||
|
|
#endif
|
||
|
|
{
|
||
|
|
f_err = ERR_WRITE;
|
||
|
|
pipeit("\n Error while creating directory.\n");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
INT ovr_delete(CHAR * n) // deletes directory or file
|
||
|
|
{
|
||
|
|
if (remove(n) && rmdir(n))
|
||
|
|
{
|
||
|
|
pipeit("\n Could not delete file or directory. Access denied.\n");
|
||
|
|
return (1);
|
||
|
|
}
|
||
|
|
return (0);
|
||
|
|
}
|
||
|
|
|
||
|
|
INT create_dest_file(CHAR * file, INT a) // creates file or directory
|
||
|
|
{
|
||
|
|
INT han,
|
||
|
|
i = 0,
|
||
|
|
ex = fileexists(file);
|
||
|
|
struct stat st;
|
||
|
|
|
||
|
|
check_ext_dir(file);
|
||
|
|
if (f_err)
|
||
|
|
return (-1);
|
||
|
|
if (a & _A_SUBDIR)
|
||
|
|
{ // create dir or file?
|
||
|
|
if (ex)
|
||
|
|
stat(file, &st);
|
||
|
|
#if (defined(__OS2__) && !defined(__EMX__)) || (!defined(__CYGWIN__) && defined(WINNT))
|
||
|
|
if ((!ex && mkdir(file)) || (ex && (st.st_mode & S_IFDIR)))
|
||
|
|
#else
|
||
|
|
if ((!ex && mkdir(file, 0)) || (ex && (st.st_mode & S_IFDIR)))
|
||
|
|
#endif
|
||
|
|
{
|
||
|
|
pipeit("\n Could not create directory.\n");
|
||
|
|
return (-1);
|
||
|
|
}
|
||
|
|
#ifdef DOS
|
||
|
|
_dos_setfileattr(file, a); // set directory attributes
|
||
|
|
#endif
|
||
|
|
return (-1);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (ex)
|
||
|
|
{ // does the file already exist
|
||
|
|
if (!f_ovrall)
|
||
|
|
{
|
||
|
|
i = wrask("Overwrite existing file?"); // prompt for overwrite
|
||
|
|
f_ovrall = (i == 1);
|
||
|
|
if (i == 3)
|
||
|
|
f_err = ERR_USER;
|
||
|
|
}
|
||
|
|
if ((i && !f_ovrall) || ovr_delete(file))
|
||
|
|
return (-1); // delete?
|
||
|
|
}
|
||
|
|
#if defined(__OS2_) || defined(__EMX__) || defined(WIN32)
|
||
|
|
if ((han = open(file, O_WRONLY | O_TRUNC | O_CREAT | O_BINARY,
|
||
|
|
S_IREAD | S_IWRITE | S_IEXEC | S_IDELETE |
|
||
|
|
S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH )) < 0)
|
||
|
|
#else
|
||
|
|
if ((han = open(file, O_WRONLY | O_TRUNC | O_CREAT,
|
||
|
|
S_IREAD | S_IWRITE | S_IEXEC | S_IDELETE |
|
||
|
|
S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH )) < 0)
|
||
|
|
#endif
|
||
|
|
pipeit("\n Could not create destination file.\n");
|
||
|
|
return (han);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|