Source/pack.c

   1 /*
   2 Copyright (C) 2003, 2010 - Wolfire Games
   3
   4 This file is part of Lugaru.
   5
   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.
  10
  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.
  14
  15 See the GNU General Public License for more details.
  16
  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.
  20 */
  21
  22 #include <stdlib.h>
  23
  24 #include "binio.h"
  25 #include "private.h"
  26 #include "pack_private.h"
  27
  28 extern void packf(const char *format, ...)
  29 {
  30     va_list args;
  31     va_start(args, format);
  32     vfpackf(stdout, format, args);
  33     va_end(args);
  34 }
  35
  36 extern void spackf(void *buffer, const char *format, ...)
  37 {
  38     va_list args;
  39     va_start(args, format);
  40     vspackf(buffer, format, args);
  41     va_end(args);
  42 }
  43
  44 extern void fpackf(FILE *file, const char *format, ...)
  45 {
  46     va_list args;
  47     va_start(args, format);
  48     vfpackf(file, format, args);
  49     va_end(args);
  50 }
  51
  52 extern void vspackf(void *buffer, const char *format, va_list args)
  53 {
  54     struct BinIOFormatCursor cursor;
  55     struct BinIOPackContext context;
  56
  57     BinIOInitFormatCursor(&cursor, format);
  58
  59     context.buffer = (unsigned char *)buffer;
  60     va_copy(context.args, args);
  61
  62     while (BinIONextChar(&context, &cursor, BinIOPack)) {}
  63
  64     va_end(context.args);
  65 }
  66
  67 extern void vfpackf(FILE *file, const char *format, va_list args)
  68 {
  69     size_t n_bytes = BinIOFormatByteCount(format);
  70     void* buffer = malloc(n_bytes);
  71
  72     vspackf(buffer, format, args);
  73
  74     fwrite(buffer, n_bytes, 1, file);
  75     free(buffer);
  76 }