2 Copyright (C) 2003, 2010 - Wolfire Games
4 This file is part of Lugaru.
6 Lugaru is free software; you can redistribute it and/or
7 modify it under the terms of the GNU General Public License
8 as published by the Free Software Foundation; either version 2
9 of the License, or (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
15 See the GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
27 struct BinIOUnpackContext
33 static void BinIOUnpack(void *context, int type, int byte_order, int count)
35 struct BinIOUnpackContext *ctx = (struct BinIOUnpackContext*)context;
43 case BinIO_TYPE_IGNORE_BYTE: ctx->data += 1 * count; break;
44 case BinIO_TYPE_BYTE: BinIOConvert1(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count); ctx->data += 1 * count; break;
45 case BinIO_TYPE_INT16: BinIOConvert2(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count); ctx->data += 2 * count; break;
46 case BinIO_TYPE_INT32: BinIOConvert4(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count); ctx->data += 4 * count; break;
47 case BinIO_TYPE_INT64: BinIOConvert8(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count); ctx->data += 8 * count; break;
48 case BinIO_TYPE_FLOAT32: BinIOConvert4(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count); ctx->data += 4 * count; break;
49 case BinIO_TYPE_FLOAT64: BinIOConvert8(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count); ctx->data += 8 * count; break;
53 void unpackf(const char *format, ...)
56 va_start(args, format);
57 vfunpackf(stdin, format, args);
61 void sunpackf(const void *buffer, const char *format, ...)
64 va_start(args, format);
65 vsunpackf(buffer, format, args);
69 void funpackf(FILE *file, const char *format, ...)
72 va_start(args, format);
73 vfunpackf(file, format, args);
77 void vsunpackf(const void *buffer, const char *format, va_list args)
79 struct BinIOFormatCursor cursor;
80 struct BinIOUnpackContext context;
82 BinIOInitFormatCursor(&cursor, format);
84 context.data = (const unsigned char*)buffer;
85 va_copy(context.args, args);
87 while (BinIONextChar(&context, &cursor, BinIOUnpack)) {}
92 void vfunpackf(FILE *file, const char *format, va_list args)
94 size_t n_bytes = BinIOFormatByteCount(format);
95 void* buffer = malloc(n_bytes);
96 fread(buffer, n_bytes, 1, file);
98 vsunpackf(buffer, format, args);