libs/loaders/GP_PBM.c

   1 /*****************************************************************************
   2  * This file is part of gfxprim library.                                     *
   3  *                                                                           *
   4  * Gfxprim is free software; you can redistribute it and/or                  *
   5  * modify it under the terms of the GNU Lesser General Public                *
   6  * License as published by the Free Software Foundation; either              *
   7  * version 2.1 of the License, or (at your option) any later version.        *
   8  *                                                                           *
   9  * Gfxprim is distributed in the hope that it will be useful,                *
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of            *
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU         *
  12  * Lesser General Public License for more details.                           *
  13  *                                                                           *
  14  * You should have received a copy of the GNU Lesser General Public          *
  15  * License along with gfxprim; if not, write to the Free Software            *
  16  * Foundation, Inc., 51 Franklin Street, Fifth Floor,                        *
  17  * Boston, MA  02110-1301  USA                                               *
  18  *                                                                           *
  19  * Copyright (C) 2009-2010 Jiri "BlueBear" Dluhos                            *
  20  *                         <jiri.bluebear.dluhos@gmail.com>                  *
  21  *                                                                           *
  22  * Copyright (C) 2009-2010 Cyril Hrubis <metan@ucw.cz>                       *
  23  *                                                                           *
  24  *****************************************************************************/
  25
  26 /*
  27
  28   PBM portable bitmap loader/saver.
  29
  30   Format:
  31
  32   a magick number value of 'P' and '1'
  33   whitespace (blanks, TABs, CRs, LFs).
  34   ascii width
  35   whitespace
  36   ascii height
  37   whitespace
  38   width * height symbols '1' or '0' ('1' == black, '0' == white)
  39
  40   lines starting with '#' are comments to the end of line
  41
  42  */
  43
  44 #include <stdio.h>
  45 #include <stdint.h>
  46 #include <inttypes.h>
  47
  48 #include "GP_PXMCommon.h"
  49 #include "GP_PBM.h"
  50
  51 GP_RetCode GP_LoadPBM(const char *src_path, GP_Context **res)
  52 {
  53         FILE *f = fopen(src_path, "r");
  54         uint32_t w, h;
  55
  56         if (f == NULL)
  57                 return GP_EBADFILE;
  58
  59         if (fgetc(f) != 'P' || fgetc(f) != '1')
  60                 goto err1;
  61
  62         if (fscanf(f, "%"PRIu32"%"PRIu32, &w, &h) < 2)
  63                 goto err1;
  64
  65         *res = GP_ContextAlloc(w, h, GP_PIXEL_G1);
  66
  67         if (*res == NULL) {
  68                 fclose(f);
  69                 return GP_ENOMEM;
  70         }
  71
  72         if (GP_PXMLoad1bpp(f, *res))
  73                 goto err2;
  74
  75         fclose(f);
  76         return GP_ESUCCESS;
  77 err2:
  78         free(*res);
  79 err1:
  80         fclose(f);
  81         return GP_EBADFILE;
  82 }
  83
  84 GP_RetCode GP_SavePBM(const char *res_path, GP_Context *src)
  85 {
  86         FILE *f;
  87
  88         if (src->pixel_type != GP_PIXEL_G1)
  89                 return GP_ENOIMPL;
  90
  91         f = fopen(res_path, "w");
  92
  93         if (f == NULL)
  94                 return GP_EBADFILE;
  95
  96         if (fprintf(f, "P1\n%u %u\n# Generated by gfxprim\n",
  97                     (unsigned int) src->w, (unsigned int) src->h) < 2)
  98                 goto err;
  99
 100         if (GP_PXMSave1bpp(f, src))
 101                 goto err;
 102
 103         if (fclose(f))
 104                 return GP_EBADFILE;
 105
 106         return GP_ESUCCESS;
 107 err:
 108         fclose(f);
 109         return GP_EBADFILE;
 110 }