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
)
40 image
= RCreateImage(w
, h
, 0);
53 for (y
= 0; y
< h
; y
++) {
54 if (!fread(buf
, w
, 1, file
)) {
56 RErrorCode
= RERR_BADIMAGEFILE
;
60 for (x
= 0; x
< w
; x
++) {
72 static RImage
*load_pixmap(FILE *file
, int w
, int h
, int max
, int raw
)
79 image
= RCreateImage(w
, h
, 0);
90 if (fread(buf
, 1, 3, file
) != 3) {
91 RErrorCode
= RERR_BADIMAGEFILE
;
105 RImage
*RLoadPPM(const char *file_name
)
108 RImage
*image
= NULL
;
113 file
= fopen(file_name
, "rb");
115 RErrorCode
= RERR_OPEN
;
120 if (!fgets(buffer
, 255, file
)) {
121 RErrorCode
= RERR_BADIMAGEFILE
;
126 /* only accept raw pixmaps or graymaps */
127 if (buffer
[0] != 'P' || (buffer
[1] != '5' && buffer
[1] != '6')) {
128 RErrorCode
= RERR_BADFORMAT
;
137 if (!fgets(buffer
, 255, file
)) {
138 RErrorCode
= RERR_BADIMAGEFILE
;
143 if (buffer
[0] != '#')
148 if (sscanf(buffer
, "%i %i", &w
, &h
) != 2 || w
< 1 || h
< 1) {
150 RErrorCode
= RERR_BADIMAGEFILE
;
155 if (!fgets(buffer
, 255, file
)) {
156 RErrorCode
= RERR_BADIMAGEFILE
;
161 if (sscanf(buffer
, "%i", &m
) != 1 || m
< 1) {
163 RErrorCode
= RERR_BADIMAGEFILE
;
169 image
= load_graymap(file
, w
, h
, m
, type
== '5');
170 else if (type
== '6')
171 image
= load_pixmap(file
, w
, h
, m
, type
== '6');