1 /* ppm.c - load PPM image from file
3 * Raster graphics library
5 * Copyright (c) 1997-2003 Alfredo K. Kojima
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Library General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Library General Public License for more details.
17 * You should have received a copy of the GNU Library General Public
18 * License along with this library; if not, write to the Free
19 * Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
31 #include "imgformat.h"
33 static RImage
*load_graymap(FILE * file
, int w
, int h
, int max
, int raw
)
37 image
= RCreateImage(w
, h
, 0);
55 for (y
= 0; y
< h
; y
++) {
56 if (!fread(buf
, w
, 1, file
)) {
60 for (x
= 0; x
< w
; x
++) {
75 RErrorCode
= RERR_BADIMAGEFILE
;
79 static RImage
*load_pixmap(FILE * file
, int w
, int h
, int max
, int raw
)
86 image
= RCreateImage(w
, h
, 0);
97 if (fread(buf
, 1, 3, file
) != 3)
112 RErrorCode
= RERR_BADIMAGEFILE
;
116 RImage
*RLoadPPM(const char *file_name
)
119 RImage
*image
= NULL
;
124 #define GETL() if (!fgets(buffer, 255, file)) goto short_file
126 file
= fopen(file_name
, "rb");
128 RErrorCode
= RERR_OPEN
;
135 /* only accept raw pixmaps or graymaps */
136 if (buffer
[0] != 'P' || (buffer
[1] != '5' && buffer
[1] != '6')) {
137 RErrorCode
= RERR_BADFORMAT
;
148 if (buffer
[0] != '#')
153 if (sscanf(buffer
, "%i %i", &w
, &h
) != 2 || w
< 1 || h
< 1)
157 if (sscanf(buffer
, "%i", &m
) != 1 || m
< 1)
161 image
= load_graymap(file
, w
, h
, m
, type
== '5');
162 else if (type
== '6')
163 image
= load_pixmap(file
, w
, h
, m
, type
== '6');
170 RErrorCode
= RERR_BADIMAGEFILE
;