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 {
32 static void BinIOUnpack(void *context, int type, int byte_order, int count)
34 struct BinIOUnpackContext *ctx = (struct BinIOUnpackContext*)context;
40 case BinIO_TYPE_IGNORE_BYTE:
41 ctx->data += 1 * count;
44 BinIOConvert1(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count);
45 ctx->data += 1 * count;
47 case BinIO_TYPE_INT16:
48 BinIOConvert2(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count);
49 ctx->data += 2 * count;
51 case BinIO_TYPE_INT32:
52 BinIOConvert4(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count);
53 ctx->data += 4 * count;
55 case BinIO_TYPE_INT64:
56 BinIOConvert8(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count);
57 ctx->data += 8 * count;
59 case BinIO_TYPE_FLOAT32:
60 BinIOConvert4(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count);
61 ctx->data += 4 * count;
63 case BinIO_TYPE_FLOAT64:
64 BinIOConvert8(byte_order, BinIO_HOST_BYTE_ORDER, ctx->data, va_arg(ctx->args, uint8_t *), count);
65 ctx->data += 8 * count;
70 void unpackf(const char *format, ...)
73 va_start(args, format);
74 vfunpackf(stdin, format, args);
78 void sunpackf(const void *buffer, const char *format, ...)
81 va_start(args, format);
82 vsunpackf(buffer, format, args);
86 void funpackf(FILE *file, const char *format, ...)
89 va_start(args, format);
90 vfunpackf(file, format, args);
94 void vsunpackf(const void *buffer, const char *format, va_list args)
96 struct BinIOFormatCursor cursor;
97 struct BinIOUnpackContext context;
99 BinIOInitFormatCursor(&cursor, format);
101 context.data = (const unsigned char*)buffer;
102 va_copy(context.args, args);
104 while (BinIONextChar(&context, &cursor, BinIOUnpack)) {}
106 va_end(context.args);
109 void vfunpackf(FILE *file, const char *format, va_list args)
111 size_t n_bytes = BinIOFormatByteCount(format);
112 void* buffer = malloc(n_bytes);
113 fread(buffer, n_bytes, 1, file);
115 vsunpackf(buffer, format, args);