dmlib: dmfile.c annotate

annotate dmfile.c @ 789:8b727fa3f529

Cleanup.

author	Matti Hamalainen <ccr@tnsp.org>
date	Tue, 06 Aug 2013 14:59:44 +0300
parents	b2b461829c61
children

rev	line source
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	1 /*
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	2 * DMLib
414 c452a459e552 Clear up the file descriptions. Matti Hamalainen <ccr@tnsp.org> parents: 405 diff changeset	3 * -- Standard I/O (stdio) file write/read endianess helpers
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	4 * Programmed and designed by Matti 'ccr' Hamalainen
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	5 * (C) Copyright 2011 Tecnic Software productions (TNSP)
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	6 */
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	7 #include "dmfile.h"
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	8
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	9
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	10 BOOL dm_fread_str(FILE f, void buf, const size_t len)
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	11 {
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	12 return fread(buf, len, 1, f) == 1;
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	13 }
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	14
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	15
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	16 BOOL dm_fread_byte(FILE f, Uint8 val)
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	17 {
438 c1f6def0c1da Adjust dm_fread_byte() and dm_fwrite_byte() stdio helper functions to match Matti Hamalainen <ccr@tnsp.org> parents: 414 diff changeset	18 int tmp = fgetc(f);
c1f6def0c1da Adjust dm_fread_byte() and dm_fwrite_byte() stdio helper functions to match Matti Hamalainen <ccr@tnsp.org> parents: 414 diff changeset	19 *val = tmp;
c1f6def0c1da Adjust dm_fread_byte() and dm_fwrite_byte() stdio helper functions to match Matti Hamalainen <ccr@tnsp.org> parents: 414 diff changeset	20 return tmp != EOF;
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	21 }
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	22
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	23
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	24 #define DM_DEFINE_FFUNC(xname, xtype, xmacro) \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	25 BOOL dm_fread_ ## xname (FILE f, xtype v) { \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	26 xtype result; \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	27 if (fread(&result, sizeof( xtype ), 1, f) != 1) \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	28 return FALSE; \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	29 *v = DM_ ## xmacro ## _TO_NATIVE (result); \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	30 return TRUE; \
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	31 }
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	32
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	33 #include "dmfiletmpl.h"
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	34
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	35
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	36 #undef DM_DEFINE_FFUNC
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	37
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	38
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	39 BOOL dm_fwrite_str(FILE f, const void buf, const size_t len)
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	40 {
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	41 return fwrite(buf, len, 1, f) == 1;
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	42 }
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	43
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	44
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	45 BOOL dm_fwrite_byte(FILE *f, const Uint8 val)
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	46 {
438 c1f6def0c1da Adjust dm_fread_byte() and dm_fwrite_byte() stdio helper functions to match Matti Hamalainen <ccr@tnsp.org> parents: 414 diff changeset	47 return fputc(val, f) == val;
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	48 }
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	49
d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	50
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	51 #define DM_DEFINE_FFUNC(xname, xtype, xmacro) \
405 d0257d0004f6 Implement dm_{read,write}_byte() and constify. Matti Hamalainen <ccr@tnsp.org> parents: 0 diff changeset	52 BOOL dm_fwrite_ ## xname (FILE *f, const xtype v) { \
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	53 xtype result = DM_NATIVE_TO_ ## xmacro (v); \
789 8b727fa3f529 Cleanup. Matti Hamalainen <ccr@tnsp.org> parents: 567 diff changeset	54 return fwrite(&result, sizeof( xtype ), 1, f) == 1; \
0 32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	55 }
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	56
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	57 #include "dmfiletmpl.h"
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	58
32250b436bca Initial re-import. Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	59 #undef DM_DEFINE_FFUNC
567 b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	60
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	61
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	62 #define BUF_SIZE_INITIAL (16*1024)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	63 #define BUF_SIZE_GROW (4*1024)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	64
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	65 int dmReadDataFile(FILE inFile, const char filename, Uint8 *pbuf, size_t pbufSize)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	66 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	67 FILE *f;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	68 int res = DMERR_OK;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	69 Uint8 *dataBuf = NULL;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	70 size_t readSize, dataSize, dataRead, dataPos;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	71
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	72 if (inFile != NULL)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	73 f = inFile;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	74 else
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	75 if (filename != NULL)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	76 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	77 if ((f = fopen(filename, "rb")) == NULL)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	78 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	79 dmError("Could not open '%s' for reading.\n", filename);
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	80 return DMERR_FOPEN;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	81 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	82 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	83 else
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	84 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	85 dmError("NULL filename and stream pointers.\n");
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	86 return DMERR_NULLPTR;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	87 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	88
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	89 // Allocate initial data buffer
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	90 readSize = dataSize = BUF_SIZE_INITIAL;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	91 if ((dataBuf = dmMalloc(dataSize)) == NULL)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	92 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	93 dmError("Error allocating memory for data, %d bytes.\n", dataSize);
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	94 res = DMERR_MALLOC;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	95 goto error;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	96 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	97
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	98 dataPos = 0;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	99 dataRead = 0;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	100
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	101 while (!feof(f) && !ferror(f))
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	102 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	103 size_t read = fread(dataBuf + dataPos, 1, readSize, f);
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	104 dataPos += read;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	105 dataRead += read;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	106
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	107 if (dataRead >= dataSize)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	108 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	109 readSize = BUF_SIZE_GROW;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	110 dataSize += BUF_SIZE_GROW;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	111 if ((dataBuf = dmRealloc(dataBuf, dataSize)) == NULL)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	112 {
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	113 dmError("Error reallocating memory for data, %d bytes.\n", dataSize);
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	114 res = DMERR_MALLOC;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	115 goto error;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	116 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	117 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	118 else
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	119 break;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	120 }
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	121
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	122 *pbufSize = dataRead;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	123 *pbuf = dataBuf;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	124
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	125 error:
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	126 if (f != inFile)
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	127 fclose(f);
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	128
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	129 return res;
b2b461829c61 Move utility function dmReadDataFile() to dmfile module instead. Matti Hamalainen <ccr@tnsp.org> parents: 438 diff changeset	130 }

Mercurial > hg > dmlib

annotate dmfile.c @ 789:8b727fa3f529