f6bcfd974e
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@7748 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
304 lines
6.9 KiB
C
304 lines
6.9 KiB
C
/* ------------------------------------------------------------------------ */
|
|
/* */
|
|
/* Creates/Replaces files or directories. */
|
|
/* */
|
|
/* ------------------------------------------------------------------------ */
|
|
|
|
#include "os.h"
|
|
|
|
#ifdef __EMX__
|
|
#include <sys/types.h>
|
|
#include <sys/dirent.h>
|
|
#include <stdlib.h>
|
|
#endif
|
|
#include <fcntl.h>
|
|
#include <stdio.h> // printf() remove()
|
|
#include <string.h> // strncpy()
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h> // struct stat
|
|
#include <time.h>
|
|
#include "install.h"
|
|
|
|
#if defined(DOS) || defined(WINNT) || defined(WIN16)
|
|
#include <io.h> // access()
|
|
#endif
|
|
#if defined(__CYGWIN__)
|
|
#include <Windows32/Base.h>
|
|
#endif
|
|
|
|
#include "attribs.h"
|
|
#include "globals.h"
|
|
#include "uac_crt.h"
|
|
#include "uac_sys.h"
|
|
|
|
#ifdef ENABLE_LOGGING
|
|
extern FILE *logfile;
|
|
#endif
|
|
extern char installdir[400];
|
|
|
|
/* Undocumented functions */
|
|
#if defined(__OS2__) || defined(__EMX__)
|
|
APIRET APIENTRY DosReplaceModule(PSZ pszOldModule,PSZ pszNewModule,PSZ pszBackupModule);
|
|
#endif
|
|
|
|
|
|
/* 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));
|
|
}
|
|
#ifdef __UNIX__
|
|
else
|
|
{ // by current OS seperator
|
|
cp=s;
|
|
while ((cp=strchr(cp, '\\'))!=NULL)
|
|
*cp++='/';
|
|
}
|
|
#endif
|
|
|
|
return s;
|
|
}
|
|
|
|
void check_ext_dir(CHAR * f) // checks/creates path of file
|
|
{
|
|
char d[1024];
|
|
char buffer[1024];
|
|
int z, flag = 0, len = strlen(f);
|
|
|
|
strcpy(buffer, f);
|
|
for(z=len;z>-1;z--)
|
|
{
|
|
if(buffer[z] == '\\')
|
|
{
|
|
buffer[z+1] = 0;
|
|
flag = 1;
|
|
z = -1;
|
|
}
|
|
}
|
|
if(!flag)
|
|
return;
|
|
for(z=0;z<strlen(buffer);z++)
|
|
{
|
|
if(buffer[z] == '\\')
|
|
{
|
|
if(!(z == 2 && buffer[1] == ':'))
|
|
{
|
|
strcpy(d, buffer);
|
|
d[z] = 0;
|
|
if (!fileexists(d))
|
|
{
|
|
#if (defined(__OS2__) && !defined(__EMX__)) || (defined(WINNT) && !defined(__CYGWIN__))
|
|
if (mkdir(d))
|
|
#else
|
|
if (mkdir(d, 0))
|
|
#endif
|
|
|
|
{
|
|
#if 0
|
|
f_err = ERR_WRITE;
|
|
error("Error while creating directory \"%s\".", d);
|
|
}
|
|
else
|
|
#else
|
|
}
|
|
#endif
|
|
{
|
|
#ifdef ENABLE_LOGGING
|
|
if(logfile)
|
|
{
|
|
if(strlen(d) > 1 && d[1] == ':')
|
|
fprintf(logfile, "<NewDir>,%s\r\n", d);
|
|
else
|
|
{
|
|
if(installdir[strlen(installdir)-1] == '\\')
|
|
fprintf(logfile, "<NewDir>,%s%s\r\n", installdir, d);
|
|
else
|
|
fprintf(logfile, "<NewDir>,%s\\%s\r\n", installdir, d);
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
INT ovr_delete(CHAR * n) // deletes directory or file
|
|
{
|
|
if (remove(n) && rmdir(n))
|
|
{
|
|
#if defined(__OS2__) || defined(__EMX__)
|
|
DosReplaceModule(n, NULL, NULL);
|
|
#endif
|
|
if (remove(n) && rmdir(n))
|
|
{
|
|
error("Could not delete file or directory: \"%s\" 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;
|
|
extern int no_update;
|
|
|
|
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
|
|
{
|
|
error("Could not create directory %s.");
|
|
return (-1);
|
|
}
|
|
else
|
|
{ /* I wonder why it never gets here... :/ BS */
|
|
#ifdef ENABLE_LOGGIN
|
|
if(logfile)
|
|
fprintf(logfile, "<NewDir>,%s\\%s\r\n", installdir, file);
|
|
#endif
|
|
}
|
|
|
|
#ifdef DOS
|
|
_dos_setfileattr(file, a); // set directory attributes
|
|
#endif
|
|
return (-1);
|
|
}
|
|
else
|
|
{
|
|
if (ex)
|
|
{ // does the file already exist
|
|
#if defined(__OS2_) || defined(__EMX__)
|
|
static int sddall = 0;
|
|
FILESTATUS3 fileinfo;
|
|
|
|
f_ovrall = 1;
|
|
|
|
DosQueryPathInfo(file, FIL_STANDARD, &fileinfo, sizeof(FILESTATUS3));
|
|
if(!sddall)
|
|
{
|
|
FDATE fdate;
|
|
FTIME ftime;
|
|
struct tm tc, tc2;
|
|
time_t tt, tt2;
|
|
|
|
*((USHORT*)&fdate) = (USHORT)(fhead.FTIME >> 16);
|
|
*((USHORT*)&ftime) = (USHORT)fhead.FTIME;
|
|
|
|
tc.tm_year = fileinfo.fdateLastWrite.year + 80;
|
|
tc.tm_mon = fileinfo.fdateLastWrite.month - 1;
|
|
tc.tm_mday = fileinfo.fdateLastWrite.day;
|
|
tc.tm_hour = fileinfo.ftimeLastWrite.hours;
|
|
tc.tm_min = fileinfo.ftimeLastWrite.minutes;
|
|
tc.tm_sec = fileinfo.ftimeLastWrite.twosecs * 2;
|
|
|
|
tc2.tm_year = fdate.year + 80;
|
|
tc2.tm_mon = fdate.month - 1;
|
|
tc2.tm_mday = fdate.day;
|
|
tc2.tm_hour = ftime.hours;
|
|
tc2.tm_min = ftime.minutes;
|
|
tc2.tm_sec = ftime.twosecs * 2;
|
|
|
|
if((tt = mktime(&tc)) == -1 || (tt2 = mktime(&tc2)) == -1 || tt > tt2)
|
|
{
|
|
|
|
if(file[1] == ':')
|
|
i = confirm("File \"%s\" has a newer modification time. Overwrite?", file); // prompt for overwrite
|
|
else
|
|
{
|
|
if(installdir[strlen(installdir)-1] == '\\')
|
|
i = confirm("File \"%s%s\" has a newer modification time. Overwrite?", installdir, file); // prompt for overwrite
|
|
else
|
|
i = confirm("File \"%s\\%s\" has a newer modification time. Overwrite?", installdir, file); // prompt for overwrite
|
|
}
|
|
if(i == 1)
|
|
{
|
|
sddall = 1;
|
|
i = 0;
|
|
}
|
|
if (i == 3)
|
|
f_err = ERR_USER;
|
|
if(i)
|
|
return -1;
|
|
}
|
|
}
|
|
fileinfo.attrFile = FILE_NORMAL;
|
|
DosSetPathInfo(file, FIL_STANDARD, (PVOID)&fileinfo, sizeof(FILESTATUS3), 0);
|
|
#endif
|
|
if (!f_ovrall)
|
|
{
|
|
if(installdir[strlen(installdir)-1] == '\\')
|
|
i = confirm("Overwrite file \"%s%s\"?", installdir, file); // prompt for overwrite
|
|
else
|
|
i = confirm("Overwrite file \"%s\\%s\"?", installdir, 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
|
|
error("Could not create destination file \"%s\".", file);
|
|
else
|
|
{
|
|
#ifdef ENABLE_LOGGING
|
|
if(logfile)
|
|
{
|
|
if(!no_update)
|
|
{
|
|
if(strlen(file) > 1 && file[1] == ':')
|
|
fprintf(logfile, "<FileInst>,%s\r\n", file);
|
|
else
|
|
{
|
|
if(installdir[strlen(installdir)-1] == '\\')
|
|
fprintf(logfile, "<FileInst>,%s%s\r\n", installdir, file);
|
|
else
|
|
fprintf(logfile, "<FileInst>,%s\\%s\r\n", installdir, file);
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
|
|
return (han);
|
|
}
|
|
}
|
|
|