mirror of
https://github.com/ZDoom/raze-gles.git
synced 2024-12-25 03:00:46 +00:00
Defs: Add token "renamefile", which renames a file in a GRP or SSI file, in memory. 8.3 restrictions apply.
git-svn-id: https://svn.eduke32.com/eduke32@5061 1a8010ca-5511-0410-912e-c29ae57300e0
This commit is contained in:
parent
2f0f38b6e6
commit
ddf7720451
3 changed files with 47 additions and 0 deletions
|
@ -39,6 +39,8 @@ int32_t kfilelength(int32_t handle);
|
|||
int32_t ktell(int32_t handle);
|
||||
void kclose(int32_t handle);
|
||||
|
||||
void krename(const char *filename, const char *newname);
|
||||
|
||||
typedef struct { intptr_t *hand; int32_t leng; char *lock ; } cactype;
|
||||
|
||||
enum {
|
||||
|
|
|
@ -1039,6 +1039,40 @@ static int32_t kopen_internal(const char *filename, char **lastpfn, char searchf
|
|||
return -1;
|
||||
}
|
||||
|
||||
void krename(const char *filename, const char *newname)
|
||||
{
|
||||
int32_t i, j, k;
|
||||
char bad, *gfileptr;
|
||||
|
||||
for (k=numgroupfiles-1; k>=0; k--)
|
||||
{
|
||||
if (groupfil[k] >= 0)
|
||||
{
|
||||
for (i=gnumfiles[k]-1; i>=0; i--)
|
||||
{
|
||||
gfileptr = (char *)&gfilelist[k][i<<4];
|
||||
|
||||
bad = 0;
|
||||
for (j=0; j<13; j++)
|
||||
{
|
||||
if (!filename[j]) break;
|
||||
if (toupperlookup[filename[j]] != toupperlookup[gfileptr[j]])
|
||||
{
|
||||
bad = 1;
|
||||
break;
|
||||
}
|
||||
}
|
||||
if (bad) continue;
|
||||
if (j<13 && gfileptr[j]) continue; // JBF: because e1l1.map might exist before e1l1
|
||||
if (j==13 && filename[j]) continue; // JBF: long file name
|
||||
|
||||
Bstrncpy(gfileptr, newname, 12);
|
||||
return;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
int32_t kopen4load(const char *filename, char searchfirst)
|
||||
{
|
||||
int32_t newhandle = MAXOPENFILES-1;
|
||||
|
|
|
@ -93,6 +93,7 @@ enum scripttoken_t
|
|||
T_MAPINFO, T_MAPFILE, T_MAPTITLE, T_MAPMD4, T_MHKFILE,
|
||||
T_ECHO,
|
||||
T_GLOBALFLAGS,
|
||||
T_RENAMEFILE,
|
||||
};
|
||||
|
||||
static int32_t lastmodelid = -1, lastvoxid = -1, modelskin = -1, lastmodelskin = -1, seenframe = 0;
|
||||
|
@ -279,6 +280,7 @@ static int32_t defsparser(scriptfile *script)
|
|||
{ "mapinfo", T_MAPINFO },
|
||||
{ "echo", T_ECHO },
|
||||
{ "globalflags", T_GLOBALFLAGS },
|
||||
{ "renamefile", T_RENAMEFILE },
|
||||
};
|
||||
|
||||
while (1)
|
||||
|
@ -2218,6 +2220,15 @@ static int32_t defsparser(scriptfile *script)
|
|||
}
|
||||
break;
|
||||
|
||||
case T_RENAMEFILE:
|
||||
{
|
||||
char *filename = NULL, *newname = NULL;
|
||||
if (scriptfile_getstring(script,&filename)) break;
|
||||
if (scriptfile_getstring(script,&newname)) break;
|
||||
krename(filename, newname);
|
||||
}
|
||||
break;
|
||||
|
||||
default:
|
||||
initprintf("Unknown token.\n"); break;
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue