123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473 |
- #include <stdio.h>
- #include <string.h>
- #include "Apak.h"
- #define APAKMAKEWORD(a, b) ((unsigned short)(((unsigned char)(a)) | ((unsigned short)((unsigned char)(b))) << 8))
- extern void apakError(APAK_HANDLE * pHandle, char *cError);
- extern int apakReadError(int iError, APAK_HANDLE * pHandle);
- int apakDir(APAK_HANDLE * pHandle, char *cFileName)
- {
- char buffer[256];
- int j, i = strlen(cFileName);
- for (j = i; j >= 0; j--)
- // if(cFileName[j] == '\\') - DIR?
- if (cFileName[j] == '/')
- break;
- if (j <= 0)
- return 1;
- strncpy(buffer, cFileName, j);
- buffer[j] = '\0';
- if (achdir(pHandle, buffer) == -1)
- return 0;
- strncpy(buffer, &cFileName[j + 1], strlen(cFileName) - j);
- buffer[strlen(cFileName) - j] = '\0';
- strcpy(cFileName, buffer);
- return 1;
- }
- APAKFILE *apakFile(APAK_HANDLE * pHandle, char *cFileName)
- {
- int i;
- if (!pHandle->pActualNode->apuLSizeofFile)
- return NULL;
- for (i = 0; (unsigned) i < pHandle->pActualNode->apuLSizeofFile; i++)
- if (!strcasecmp(cFileName, pHandle->pActualNode->apakFile[i].cName))
- return &pHandle->pActualNode->apakFile[i];
- return NULL;
- }
- int fillbuffer(APAK_FILE_HANDLE * pFHandle)
- {
- int err = 0;
- char *pTmp;
- uLongf rsize, size;
- rsize = pFHandle->pFileInfo->apuLRealSizeofFile;
- size = pFHandle->pFileInfo->apuLSizeofFile;
- pTmp = (char *) malloc(size);
- if (!pTmp)
- return 0;
- fseek(pFHandle->pArchive->pFILE, pFHandle->apuLfStartofFile, SEEK_SET);
- fread(pTmp, size, 1, pFHandle->pArchive->pFILE);
- if (pFHandle->pFileInfo->bNotCompressed)
- memcpy(pFHandle->pBuffer, pTmp, size);
- else
- err =
- uncompress((Bytef *) pFHandle->pBuffer, &rsize, (Bytef *) pTmp, size);
- free((void *) pTmp);
- if (err == Z_MEM_ERROR || err == Z_BUF_ERROR || err == Z_DATA_ERROR)
- return 0;
- return 1;
- }
- FILE *aopen(APAK_HANDLE * pHandle, const char *filename, const char *mode)
- {
- APAKNODE *pNode;
- APAK_FILE_HANDLE *pFHandle = NULL;
- APAK_STREAM_TYPE *pAStream = NULL;
- pAStream = (APAK_STREAM_TYPE *) malloc(sizeof(APAK_STREAM_TYPE));
- if (!pAStream)
- return 0;
- memset(pAStream, 0, sizeof(APAK_STREAM_TYPE));
- // strandard i/o stream (fopen, fclose, ....)
- if (!pHandle) {
- pAStream->pFile = fopen(filename, mode);
- if (!pAStream->pFile) {
- free((void *) pAStream);
- pAStream = NULL;
- }
- return (FILE *) pAStream;
- }
- // APAK stream (aread, agets, aclose, ....)
- if (mode[0] == 'w') {
- apakError(pHandle, "It's impossible to write into archive");
- free((void *) pAStream);
- return 0;
- }
- if (!filename) {
- apakError(pHandle, "filename = NULL");
- free((void *) pAStream);
- return 0;
- }
- if (!strlen(filename)) {
- apakError(pHandle, "filename length = 0");
- free((void *) pAStream);
- return 0;
- }
- pNode = pHandle->pActualNode;
- if (!apakDir(pHandle, (char *) filename)) {
- apakError(pHandle, "File not found");
- free((void *) pAStream);
- return 0;
- }
- pFHandle = (APAK_FILE_HANDLE *) malloc(sizeof(APAK_FILE_HANDLE));
- if (!pFHandle) {
- apakError(pHandle, "Unable to allocate memory for file handle");
- return 0;
- free((void *) pAStream);
- }
- memset(pFHandle, 0, sizeof(APAK_FILE_HANDLE));
- pFHandle->pFileInfo = apakFile(pHandle, (char *) filename);
- if (!pFHandle->pFileInfo) {
- free((void *) pFHandle);
- free((void *) pAStream);
- apakError(pHandle, "File not found");
- pHandle->pActualNode = pNode;
- return 0;
- }
- pFHandle->apuLfCursor = 0;
- pFHandle->apuLfStartofFile = pFHandle->pFileInfo->apuLFileLocation;
- pFHandle->apuLfEndofFile =
- pFHandle->pFileInfo->apuLFileLocation +
- pFHandle->pFileInfo->apuLSizeofFile;
- pFHandle->pArchive = pHandle;
- pFHandle->bEof = 0;
- pHandle->pActualNode = pNode;
- pFHandle->pBuffer =
- (char *) malloc(pFHandle->pFileInfo->apuLRealSizeofFile);
- if (!pFHandle->pBuffer) {
- free((void *) pFHandle);
- free((void *) pAStream);
- apakError(pHandle, "Can't allocate memory for internal buffer");
- pHandle->pActualNode = pNode;
- return 0;
- }
- memset(pFHandle->pBuffer, 0, pFHandle->pFileInfo->apuLSizeofFile);
- if (!fillbuffer(pFHandle)) {
- free((void *) pFHandle);
- free((void *) pFHandle->pBuffer);
- free((void *) pAStream);
- apakError(pHandle, "Can't fill internal buffer");
- pHandle->pActualNode = pNode;
- return 0;
- }
- pAStream->pAHandle = pFHandle;
- return (FILE *) pAStream;
- }
- int aclose(FILE * stream)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- APAK_FILE_HANDLE *pFHandle;
- if (!pAStream)
- return 0;
- if (pAStream->pFile) {
- free((void *) pAStream);
- return fclose(pAStream->pFile);
- }
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return EOF;
- if (pFHandle->pBuffer)
- free((void *) pFHandle->pBuffer);
- free((void *) pFHandle);
- free((void *) pAStream);
- return 0;
- }
- size_t aread(void *buffer, size_t size, size_t count, FILE * stream)
- {
- char *cbuffer = (char *) buffer;
- char *cbCursor = NULL;
- int iAddSize = 0;
- unsigned int readsize, iSize = 0;
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- APAK_FILE_HANDLE *pFHandle;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return fread(buffer, size, count, pAStream->pFile);
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return 0;
- iSize = pFHandle->pFileInfo->apuLRealSizeofFile;
- if (pFHandle->apuLfCursor >= iSize) {
- pFHandle->bEof = 1;
- return 0;
- }
- cbCursor = &pFHandle->pBuffer[pFHandle->apuLfCursor];
- readsize = size * count;
- if (pFHandle->apuLfCursor + readsize > iSize) {
- readsize = iSize - pFHandle->apuLfCursor;
- pFHandle->bEof = 1;
- }
- memcpy(buffer, cbCursor, readsize);
- pFHandle->apuLfCursor += readsize;
- return readsize;
- }
- size_t awrite(const void *buffer, size_t size, size_t count, FILE * stream)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return fwrite(buffer, size, count, pAStream->pFile);
- return 0;
- }
- int aeof(FILE * stream)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- APAK_FILE_HANDLE *pFHandle;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return feof(pAStream->pFile);
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return 0;
- return pFHandle->bEof;
- }
- char *agets(char *string, int n, FILE * stream)
- {
- int iRet = 0, readsize, i;
- unsigned int iSize;
- char *cbCursor, cLast = 0, *Tmp;
- APAK_FILE_HANDLE *pFHandle;
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return fgets(string, n, pAStream->pFile);
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return NULL;
- cbCursor = &pFHandle->pBuffer[pFHandle->apuLfCursor];
- iSize = pFHandle->pFileInfo->apuLRealSizeofFile;
- if (pFHandle->apuLfCursor >= iSize) {
- pFHandle->bEof = 1;
- return 0;
- }
- // memset(string, 0, n);
- n--;
- if (n < 1)
- return 0;
- if (iSize - pFHandle->apuLfCursor > (unsigned) n)
- readsize = n;
- else
- readsize = iSize - pFHandle->apuLfCursor;
- Tmp = string;
- for (i = 0; i < readsize; i++) {
- if ((*cbCursor == 13 && !(*(cbCursor + 1)) && pFHandle->bUni) ||
- (*cbCursor == 13 && !pFHandle->bUni)) {
- if (pFHandle->bUni) {
- cbCursor += 2;
- i += 2;
- }
- else {
- cbCursor++;
- i++;
- }
- }
- if (*cbCursor == 10)
- cLast = 1;
- *string = *cbCursor;
- cbCursor++;
- string++;
- if (cLast)
- break;
- }
- if (pFHandle->bUni) {
- *string = 0;
- string++;
- }
- *string = '\0';
- if (pFHandle->bUni)
- pFHandle->apuLfCursor += i + 2;
- else
- pFHandle->apuLfCursor += i + 1;
- /* if(pFHandle->apuLfCursor >= iSize)
- pFHandle->bEof = 1;*/
- return Tmp;
- }
- int aputs(const char *string, FILE * stream)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return fputs(string, pAStream->pFile);
- return EOF;
- }
- long atell(FILE * stream)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- APAK_FILE_HANDLE *pFHandle;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return ftell(pAStream->pFile);
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return 0;
- return pFHandle->apuLfCursor;
- }
- int aseek(FILE * stream, long offset, int origin)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- APAK_FILE_HANDLE *pFHandle;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return fseek(pAStream->pFile, offset, origin);
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return 1;
- switch (origin) {
- case SEEK_CUR:
- pFHandle->apuLfCursor = pFHandle->apuLfCursor + offset;
- break;
- case SEEK_END:
- pFHandle->apuLfCursor =
- pFHandle->pFileInfo->apuLRealSizeofFile + offset;
- break;
- case SEEK_SET:
- pFHandle->apuLfCursor = offset;
- break;
- }
- if (pFHandle->apuLfCursor < 0)
- pFHandle->apuLfCursor = 0;
- if (pFHandle->apuLfCursor > pFHandle->pFileInfo->apuLRealSizeofFile)
- pFHandle->apuLfCursor = pFHandle->pFileInfo->apuLRealSizeofFile;
- pFHandle->bEof = 0;
- return 0;
- }
- int aunicode(FILE * stream)
- {
- APAK_STREAM_TYPE *pAStream = (APAK_STREAM_TYPE *) stream;
- APAK_FILE_HANDLE *pFHandle;
- if (!pAStream)
- return 0;
- if (pAStream->pFile)
- return 0;
- pFHandle = (APAK_FILE_HANDLE *) pAStream->pAHandle;
- if (!pFHandle)
- return 0;
- if (APAKMAKEWORD(pFHandle->pBuffer[0], pFHandle->pBuffer[1]) == 0xFEFF) {
- pFHandle->bUni = 1;
- return 1;
- }
- return 0;
- }
|