re-added file natives
This commit is contained in:
David Anderson
parent
66c278c64b
commit
85f14422cb
652
amxmodx/file.cpp
652
amxmodx/file.cpp
@ -378,250 +378,273 @@ static cell AMX_NATIVE_CALL file_size(AMX *amx, cell *params) /* 1 param */
|
|||||||
return -1;
|
return -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
//ported from Sanji's file access module by BAILOPAN
|
|
||||||
// Important update - now uses new handles
|
|
||||||
static cell AMX_NATIVE_CALL amx_fopen(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_fopen(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
unsigned int i;
|
|
||||||
int len, j = -1;
|
int len, j = -1;
|
||||||
char *file = build_pathname("%s", get_amxstring(amx, params[1], 1, len));
|
char *file = build_pathname("%s", get_amxstring(amx, params[1], 1, len));
|
||||||
char *flags = get_amxstring(amx, params[2], 0, len);
|
char *flags = get_amxstring(amx, params[2], 0, len);
|
||||||
|
|
||||||
FILE *fp = fopen(file, flags);
|
FILE *fp = fopen(file, flags);
|
||||||
|
|
||||||
if (fp == NULL)
|
|
||||||
{
|
|
||||||
// Failed
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (i = 0; i < FileList.size(); i++)
|
return (cell)fp;
|
||||||
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fwrite_blocks(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
cell *addr = get_amxaddr(amx, params[2]);
|
||||||
|
size_t blocks = params[3];
|
||||||
|
size_t btmp = blocks;
|
||||||
|
cell mode = params[4];
|
||||||
|
switch (mode)
|
||||||
{
|
{
|
||||||
if (FileList.at(i) == NULL)
|
case 1:
|
||||||
{
|
{
|
||||||
j = i;
|
char *a = new char[blocks];
|
||||||
break;
|
char *ptr = a;
|
||||||
|
while (btmp--)
|
||||||
|
*a++ = static_cast<char>(*addr++);
|
||||||
|
size_t res = fwrite(a, sizeof(char), blocks, fp);
|
||||||
|
delete [] a;
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
case 2:
|
||||||
|
{
|
||||||
|
short *a = new short[blocks];
|
||||||
|
short *ptr = a;
|
||||||
|
while (btmp--)
|
||||||
|
*a++ = static_cast<short>(*addr++);
|
||||||
|
size_t res = fwrite(a, sizeof(short), blocks, fp);
|
||||||
|
delete [] a;
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
case 4:
|
||||||
|
{
|
||||||
|
int *a = new int[blocks];
|
||||||
|
int *ptr = a;
|
||||||
|
while (btmp--)
|
||||||
|
*a++ = static_cast<int>(*addr++);
|
||||||
|
size_t res = fwrite(a, sizeof(int), blocks, fp);
|
||||||
|
delete [] a;
|
||||||
|
return res;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
if (j == -1)
|
|
||||||
{
|
|
||||||
FileList.push_back(fp);
|
|
||||||
j = FileList.size() - 1;
|
|
||||||
} else {
|
|
||||||
FileList.at(j) = fp;
|
|
||||||
}
|
|
||||||
|
|
||||||
return j + 1;
|
return 0;
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fclose(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fclose(fp);
|
|
||||||
} else {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fread(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
char *buffer;
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
buffer = new char[params[3]]; // SLOW!!! :TODO: Find a better way (auto pointers?)
|
|
||||||
fread(buffer, sizeof(char), params[3], fp);
|
|
||||||
set_amxstring(amx, params[2], buffer, params[3]);
|
|
||||||
delete [] buffer;
|
|
||||||
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef UNUSED
|
|
||||||
static cell AMX_NATIVE_CALL amx_fgetc(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fgetc(fp);
|
|
||||||
} else {
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fwrite(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_fwrite(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
unsigned int id = params[1] - 1;
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
if (!fp)
|
||||||
return 0;
|
return 0;
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
size_t mode = params[3];
|
||||||
char *buf;
|
switch (mode)
|
||||||
int len;
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
{
|
||||||
buf = format_amxstring(amx, params, 2, len);
|
case 1:
|
||||||
return fwrite(buf, sizeof(char), strlen(buf), fp);
|
{
|
||||||
|
char a = static_cast<char>(params[2]);
|
||||||
|
return fwrite(&a, sizeof(char), 1, fp);
|
||||||
|
}
|
||||||
|
case 2:
|
||||||
|
{
|
||||||
|
short b = static_cast<short>(params[2]);
|
||||||
|
return fwrite(&b, sizeof(short), 1, fp);
|
||||||
|
}
|
||||||
|
case 4:
|
||||||
|
{
|
||||||
|
int c = static_cast<int>(params[2]);
|
||||||
|
return fwrite(&c, sizeof(short), 1, fp);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
return -1;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_feof(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_fwrite_raw(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
unsigned int id = params[1] - 1;
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
if (!fp)
|
||||||
return 0;
|
return 0;
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
cell *addr = get_amxaddr(amx, params[2]);
|
||||||
|
return fwrite(addr, params[3], params[4], fp);
|
||||||
if (fp)
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fread_raw(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
cell *addr = get_amxaddr(amx, params[2]);
|
||||||
|
size_t size = static_cast<cell>(params[3]);
|
||||||
|
size_t blocks = static_cast<cell>(params[4]);
|
||||||
|
|
||||||
|
return fread(addr, size, blocks, fp);
|
||||||
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fread(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
cell *addr = get_amxaddr(amx, params[2]);
|
||||||
|
switch (params[3])
|
||||||
{
|
{
|
||||||
if (feof(fp))
|
case 1: //char
|
||||||
{
|
{
|
||||||
return 1;
|
char a;
|
||||||
|
size_t res = fread(&a, sizeof(char), 1, fp);
|
||||||
|
*addr = static_cast<cell>(a);
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
case 2: //short
|
||||||
|
{
|
||||||
|
short a;
|
||||||
|
size_t res = fread(&a, sizeof(short), 1, fp);
|
||||||
|
*addr = static_cast<cell>(a);
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
case 4: //int
|
||||||
|
default:
|
||||||
|
{
|
||||||
|
int a;
|
||||||
|
size_t res = fread(&a, sizeof(int), 1, fp);
|
||||||
|
*addr = static_cast<cell>(a);
|
||||||
|
return res;
|
||||||
}
|
}
|
||||||
return 0;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
return -1;
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fread_blocks(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
cell *addr = get_amxaddr(amx, params[2]);
|
||||||
|
size_t blocks = params[3];
|
||||||
|
switch (params[3])
|
||||||
|
{
|
||||||
|
case 1: //char
|
||||||
|
{
|
||||||
|
char *a = new char[blocks];
|
||||||
|
char *ptr = a;
|
||||||
|
size_t res = fread(a, sizeof(char), blocks, fp);
|
||||||
|
while (blocks--)
|
||||||
|
*addr++ = static_cast<cell>(*ptr++);
|
||||||
|
delete [] a;
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
case 2: //short
|
||||||
|
{
|
||||||
|
short *a = new short[blocks];
|
||||||
|
short *ptr = a;
|
||||||
|
size_t res = fread(a, sizeof(short), blocks, fp);
|
||||||
|
while (blocks--)
|
||||||
|
*addr++ = static_cast<cell>(*ptr++);
|
||||||
|
delete [] a;
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
case 4: //int
|
||||||
|
default:
|
||||||
|
{
|
||||||
|
int *a = new int[blocks];
|
||||||
|
int *ptr = a;
|
||||||
|
size_t res = fread(a, sizeof(int), blocks, fp);
|
||||||
|
while (blocks--)
|
||||||
|
*addr++ = static_cast<cell>(*ptr++);
|
||||||
|
delete [] a;
|
||||||
|
return res;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fgets(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
static char buffer[4096];
|
||||||
|
buffer[0] = '\0';
|
||||||
|
fgets(buffer, sizeof(buffer)-1, fp);
|
||||||
|
return set_amxstring(amx, params[2], buffer, params[3]);
|
||||||
}
|
}
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fseek(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_fseek(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
unsigned int id = params[1] - 1;
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
if (!fp)
|
||||||
return 0;
|
return 0;
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
return fseek(fp, params[2], params[3]);
|
||||||
{
|
|
||||||
return fseek(fp, (long)params[2], params[3]);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fputc(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fputc(params[2], fp);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_rewind(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
rewind(fp);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fflush(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fflush(fp);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fscanf(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
char *buf;
|
|
||||||
int len;
|
|
||||||
buf = format_amxstring(amx, params, 2, len);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fscanf(fp, "%s", buf);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_ftell(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_ftell(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
unsigned int id = params[1] - 1;
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
if (fp)
|
if (!fp)
|
||||||
{
|
return 0;
|
||||||
return ftell(fp);
|
|
||||||
}
|
return ftell(fp);
|
||||||
|
}
|
||||||
return -1;
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fprintf(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
int len;
|
||||||
|
char *str = format_amxstring(amx, params, 2, len);
|
||||||
|
return fprintf(fp, "%s", str);
|
||||||
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_feof(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)params[1];
|
||||||
|
|
||||||
|
if (!fp)
|
||||||
|
return 1;
|
||||||
|
|
||||||
|
return feof(fp);
|
||||||
|
}
|
||||||
|
|
||||||
|
static cell AMX_NATIVE_CALL amx_fclose(AMX *amx, cell *params)
|
||||||
|
{
|
||||||
|
cell *addr = get_amxaddr(amx, params[1]);
|
||||||
|
if (*addr)
|
||||||
|
{
|
||||||
|
FILE *fp = (FILE *)*addr;
|
||||||
|
fclose(fp);
|
||||||
|
*addr = 0;
|
||||||
|
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
}
|
}
|
||||||
#endif //UNUSED
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_filesize(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_filesize(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
@ -642,164 +665,6 @@ static cell AMX_NATIVE_CALL amx_filesize(AMX *amx, cell *params)
|
|||||||
return -1;
|
return -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
#ifdef UNUSED
|
|
||||||
static cell AMX_NATIVE_CALL amx_fgetl(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
long t;
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
fread(&t, sizeof(long), 1, fp);
|
|
||||||
return t;
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fgeti(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
int t;
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
fread(&t, sizeof(int), 1, fp);
|
|
||||||
return t;
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fgets(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
short t;
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
fread(&t, sizeof(short), 1, fp);
|
|
||||||
return t;
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fputs(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
short size = params[2];
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fwrite(&size, sizeof(short), 1, fp);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fputl(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
long size = params[2];
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fwrite(&size, sizeof(long), 1, fp);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fputi(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
int size = params[2];
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fwrite(&size, sizeof(int), 1, fp);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fgetf(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
float t;
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
fread(&t, sizeof(float), 1, fp);
|
|
||||||
return *(cell*)&t;
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_fputf(AMX *amx, cell *params)
|
|
||||||
{
|
|
||||||
unsigned int id = params[1] - 1;
|
|
||||||
|
|
||||||
if (id >= FileList.size() || FileList.at(id) == NULL)
|
|
||||||
return 0;
|
|
||||||
|
|
||||||
FILE *fp = FileList.at(id);
|
|
||||||
|
|
||||||
float size = *(float *)((void *)¶ms[2]);
|
|
||||||
|
|
||||||
if (fp)
|
|
||||||
{
|
|
||||||
return fwrite(&size, sizeof(float), 1, fp);
|
|
||||||
}
|
|
||||||
|
|
||||||
return -1;
|
|
||||||
}
|
|
||||||
#endif //UNUSED
|
|
||||||
|
|
||||||
static cell AMX_NATIVE_CALL amx_build_pathname(AMX *amx, cell *params)
|
static cell AMX_NATIVE_CALL amx_build_pathname(AMX *amx, cell *params)
|
||||||
{
|
{
|
||||||
int len;
|
int len;
|
||||||
@ -901,41 +766,32 @@ static cell AMX_NATIVE_CALL amx_get_dir(AMX *amx, cell *params)
|
|||||||
|
|
||||||
AMX_NATIVE_INFO file_Natives[] =
|
AMX_NATIVE_INFO file_Natives[] =
|
||||||
{
|
{
|
||||||
{"delete_file", delete_file},
|
{"delete_file", delete_file},
|
||||||
{"file_exists", file_exists},
|
{"file_exists", file_exists},
|
||||||
{"file_size", file_size},
|
{"file_size", file_size},
|
||||||
{"read_dir", read_dir},
|
{"read_dir", read_dir},
|
||||||
{"read_file", read_file},
|
{"read_file", read_file},
|
||||||
{"write_file", write_file},
|
{"write_file", write_file},
|
||||||
//Sanji's File Natives
|
//new, sane file natives
|
||||||
{"fopen", amx_fopen},
|
{"fopen", amx_fopen},
|
||||||
{"fclose", amx_fclose},
|
{"fclose", amx_fclose},
|
||||||
{"fread", amx_fread},
|
{"fread", amx_fread},
|
||||||
{"filesize", amx_filesize},
|
{"fread_blocks", amx_fread_blocks},
|
||||||
#ifdef UNUSED
|
{"fread_raw", amx_fread_raw},
|
||||||
{"fgetc", amx_fgetc},
|
{"fwrite", amx_fwrite},
|
||||||
{"fwrite", amx_fwrite},
|
{"fwrite_blocks", amx_fwrite_blocks},
|
||||||
{"feof", amx_feof},
|
{"fwrite_raw", amx_fwrite_raw},
|
||||||
{"fseek", amx_fseek},
|
{"feof", amx_feof},
|
||||||
{"fputc", amx_fputc},
|
{"fprintf", amx_fprintf},
|
||||||
{"rewind", amx_rewind},
|
{"fgets", amx_fgets},
|
||||||
{"fflush", amx_fflush},
|
{"fseek", amx_fseek},
|
||||||
{"fscanf", amx_fscanf},
|
{"ftell", amx_ftell},
|
||||||
{"ftell", amx_ftell},
|
{"filesize", amx_filesize},
|
||||||
{"fgetl", amx_fgetl},
|
{"unlink", delete_file},
|
||||||
{"fgeti", amx_fgeti},
|
|
||||||
{"fgets", amx_fgets},
|
|
||||||
{"fputs", amx_fputs},
|
|
||||||
{"fputl", amx_fputl},
|
|
||||||
{"fputi", amx_fputi},
|
|
||||||
{"fgetf", amx_fgetf},
|
|
||||||
{"fputf", amx_fputf},
|
|
||||||
#endif
|
|
||||||
{"unlink", delete_file},
|
|
||||||
{"build_pathname", amx_build_pathname},
|
{"build_pathname", amx_build_pathname},
|
||||||
{"dir_exists", dir_exists},
|
{"dir_exists", dir_exists},
|
||||||
{"open_dir", amx_open_dir},
|
{"open_dir", amx_open_dir},
|
||||||
{"close_dir", amx_close_dir},
|
{"close_dir", amx_close_dir},
|
||||||
{"next_file", amx_get_dir},
|
{"next_file", amx_get_dir},
|
||||||
{NULL, NULL}
|
{NULL, NULL}
|
||||||
};
|
};
|
||||||
|
|||||||
@ -41,15 +41,45 @@ native file_size(const file[], flag=0);
|
|||||||
#define SEEK_CUR 1
|
#define SEEK_CUR 1
|
||||||
#define SEEK_END 2
|
#define SEEK_END 2
|
||||||
|
|
||||||
// These are C style file access functions
|
//Open a file, returns a handle or 0 on vailure
|
||||||
// Code ported from Sanji's File module
|
|
||||||
|
|
||||||
//Open a file
|
|
||||||
native fopen(const filename[],const mode[]);
|
native fopen(const filename[],const mode[]);
|
||||||
//Close a file
|
|
||||||
|
//Closes a file handle
|
||||||
native fclose(file);
|
native fclose(file);
|
||||||
//Read a file for ret_size length
|
|
||||||
native fread(file,ret[],ret_size);
|
#define BLOCK_INT 4
|
||||||
|
#define BLOCK_SHORT 2
|
||||||
|
#define BLOCK_CHAR 1
|
||||||
|
#define BLOCK_BYTE 1
|
||||||
|
|
||||||
|
//The following functions work as such:
|
||||||
|
// RAW - means the array you pass is a raw bytestream, for experts only
|
||||||
|
// BLOCK - means you are passing in an array where each element will be written
|
||||||
|
// NORMAL - means you are writing only one element
|
||||||
|
// RAW and BLOCK return the number of blocks acted upon successfully
|
||||||
|
// NORMAL returns 1 on success
|
||||||
|
|
||||||
|
native fread(file, &data, mode);
|
||||||
|
native fread_blocks(file, data[], blocks, mode);
|
||||||
|
native fread_raw(file, stream[], blocksize, blocks);
|
||||||
|
native fwrite(file, data, mode);
|
||||||
|
native fwrite_blocks(file, const data[], blocks, mode);
|
||||||
|
native fwrite_raw(file, const stream[], blocksize, mode);
|
||||||
|
|
||||||
|
//Returns 1 if the file is ended, 0 otherwise
|
||||||
|
native feof(file);
|
||||||
|
|
||||||
|
//Reads a line from a text file -- includes newline!
|
||||||
|
native fgets(file, buffer[], maxlength);
|
||||||
|
|
||||||
|
//Writes a line to the file
|
||||||
|
native fprintf(file, const fmt[], {Float,Sql,Result_}:...);
|
||||||
|
|
||||||
|
//Sets the current position in a file (see SEEK_ values above)
|
||||||
|
native fseek(file, position, start);
|
||||||
|
|
||||||
|
//Returns the current position in a file
|
||||||
|
native ftell(file);
|
||||||
|
|
||||||
//Return the size of a file
|
//Return the size of a file
|
||||||
native filesize(const filename[],{Float,Sql,Result,_}:...);
|
native filesize(const filename[],{Float,Sql,Result,_}:...);
|
||||||
@ -61,37 +91,3 @@ native unlink(const filename[],{Float,Sql,Result,_}:...);
|
|||||||
native open_dir(dir[], firstfile[], length);
|
native open_dir(dir[], firstfile[], length);
|
||||||
native next_file(dirh, buffer[], length);
|
native next_file(dirh, buffer[], length);
|
||||||
native close_dir(dirh);
|
native close_dir(dirh);
|
||||||
|
|
||||||
stock bool:file_copy(const SOURCE[], const TARGET[], error[], const ERRORLEN, const bool:REPLACE_TARGET = false) {
|
|
||||||
if (!file_exists(SOURCE)) {
|
|
||||||
format(error, ERRORLEN, "File copy error: Source ^"%s^" doesn't exist!", SOURCE)
|
|
||||||
return false
|
|
||||||
}
|
|
||||||
if (!REPLACE_TARGET && file_exists(TARGET)) {
|
|
||||||
format(error, ERRORLEN, "File copy error: Target ^"%s^" exists!", TARGET)
|
|
||||||
return false
|
|
||||||
}
|
|
||||||
|
|
||||||
new source = fopen(SOURCE, "rb")
|
|
||||||
if (!source) {
|
|
||||||
format(error, ERRORLEN, "File copy error: Opening source ^"%s^" failed!", SOURCE)
|
|
||||||
return false
|
|
||||||
}
|
|
||||||
|
|
||||||
new target = fopen(TARGET, "wb")
|
|
||||||
if (!target) {
|
|
||||||
format(error, ERRORLEN, "File copy error: Opening target ^"%s^" failed!", TARGET)
|
|
||||||
fclose(source)
|
|
||||||
return false
|
|
||||||
}
|
|
||||||
|
|
||||||
for (new buffer, eof = feof(source); !eof; !eof && fputc(target, buffer)) {
|
|
||||||
buffer = fgetc(source)
|
|
||||||
eof = feof(source)
|
|
||||||
}
|
|
||||||
|
|
||||||
fclose(source)
|
|
||||||
fclose(target)
|
|
||||||
|
|
||||||
return true
|
|
||||||
}
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user