nuttx-apps/graphics/traveler/tools/libwld/wld_loadppm.c
2016-11-09 12:29:30 -06:00

144 lines
4.2 KiB
C

/****************************************************************************
* apps/graphics/traveler/tools/libwld/wld_loadppm.c
*
* Copyright (C) 2016 Gregory Nutt. All rights reserved.
* Author: Gregory Nutt <gnutt@nuttx.org>
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
*
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in
* the documentation and/or other materials provided with the
* distribution.
* 3. Neither the name NuttX nor the names of its contributors may be
* used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
* COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*
****************************************************************************/
/*************************************************************************
* Included files
*************************************************************************/
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include "trv_types.h"
#include "wld_mem.h"
#include "wld_bitmaps.h"
#include "wld_graphicfile.h"
#include "wld_utils.h"
/*************************************************************************
* Private Functions
*************************************************************************/
/*************************************************************************
* Name:
* Description:
* Skip white space and comments.
************************************************************************/
static void skip_cruft(FILE *fp)
{
int c;
c = getc(fp);
for (;;)
{
if (c == '#')
{
while (c != '\n')
{
c = getc(fp);
}
}
else if (c == EOF)
{
return;
}
else if (!isspace(c))
{
ungetc(c, fp);
return;
}
else
{
c = getc(fp);
}
}
}
/*************************************************************************
* Public Functions
*************************************************************************/
/*************************************************************************
* Name:
* Description:
************************************************************************/
GraphicFileType *wld_LoadPPM(FILE *fp, char *filename)
{
int width, height;
int unknown;
GraphicFileType *gfile;
skip_cruft(fp);
if (getc(fp) != 'P' || getc(fp) != '6')
{
wld_fatal_error("%s is not a ppm file.", filename);
}
skip_cruft(fp);
if (fscanf(fp, "%d", &width) != 1)
{
wld_fatal_error("%s: bad ppm file.", filename);
}
skip_cruft(fp);
if (fscanf(fp, "%d", &height) != 1)
{
wld_fatal_error("%s: bad ppm file.", filename);
}
skip_cruft(fp);
if (fscanf(fp, "%d\n", &unknown) != 1)
{
wld_fatal_error("%s: bad ppm file.", filename);
}
gfile = wld_new_graphicfile();
gfile->type = gfTrueColor;
gfile->palette = NULL;
gfile->width = width;
gfile->height = height;
gfile->bitmap = (uint8_t*)wld_malloc(height * width * 3);
if (fread(gfile->bitmap, height * width * 3, 1, fp) != 1)
{
wld_fatal_error("%s: incomplete data", filename);
}
return gfile;
}