You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
libksquirrel/kernel/kls_bmp/fmt_codec_bmp.cpp

446 lines
9.3 KiB

/* This file is part of ksquirrel-libs (http://ksquirrel.sf.net)
Copyright (c) 2004 Dmitry Baryshev <ksquirrel@tut.by>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation;
either version 2 of the License, or (at your option) any later
version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public License
as32 with this library; see the file COPYING. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.
*/
#include <iostream>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "ksquirrel-libs/fmt_types.h"
#include "ksquirrel-libs/fileio.h"
#include "ksquirrel-libs/error.h"
#include "ksquirrel-libs/fmt_utils.h"
#include "fmt_codec_bmp_defs.h"
#include "fmt_codec_bmp.h"
#include "../xpm/codec_bmp.xpm"
/*
*
* This library works with the graphics-file formats used by the Microsoft Windows(tm)
* operating system.
*
*/
fmt_codec::fmt_codec() : fmt_codec_base()
{}
fmt_codec::~fmt_codec()
{}
void fmt_codec::options(codec_options *o)
{
o->version = "1.1.2";
o->name = "Windows Bitmap";
o->filter = "*.bmp *.dib ";
o->config = "";
o->mime = "";
o->mimetype = "image/x-bmp";
o->pixmap = codec_bmp;
o->readable = true;
o->canbemultiple = false;
o->writestatic = true;
o->writeanimated = false;
o->needtempfile = false;
}
s32 fmt_codec::read_init(const std::string &file)
{
frs.open(file.c_str(), ios::binary | ios::in);
if(!frs.good())
return SQE_R_NOFILE;
pal_entr = 0;
currentImage = -1;
read_error = false;
if(!frs.readK(&bfh, sizeof(BITMAPFILE_HEADER)))
return SQE_R_BADFILE;
if(!frs.readK(&bih, sizeof(BITMAPINFO_HEADER)))
return SQE_R_BADFILE;
if(bfh.Type != BMP_IDENTIFIER || bih.Size != 40)
return SQE_R_BADFILE;
if(bih.Compression != BI_RGB)
return SQE_R_NOTSUPPORTED;
finfo.animated = false;
return SQE_OK;
}
s32 fmt_codec::read_next()
{
currentImage++;
if(currentImage)
return SQE_NOTOK;
fmt_image image;
RGBA rgba;
s32 i, j, scanShouldBe;
if(bih.BitCount < 16)
pal_entr = 1 << bih.BitCount;
else
pal_entr = 0;
image.w = bih.Width;
image.h = bih.Height;
image.bpp = bih.BitCount;
scanShouldBe = bih.Width;
switch(image.bpp)
{
case 1:
{
s32 _tmp = scanShouldBe;
scanShouldBe /= 8;
scanShouldBe = scanShouldBe + ((_tmp%8)?1:0);
}
break;
case 4: scanShouldBe = ((image.w)%2)?((scanShouldBe+1)/2):(scanShouldBe/2); break;
case 8: break;
case 16: scanShouldBe *= 2; break;
case 24: scanShouldBe *= 3; break;
case 32: break;
default:
return SQE_R_BADFILE;
}
for(j = 0;j < 4;j++)
if((scanShouldBe+j)%4 == 0)
{
filler = j;
break;
}
if(image.bpp < 16)
{
/* read palette */
for(i = 0;i < pal_entr;i++)
{
if(!frs.readK(&rgba, sizeof(RGBA)))
return SQE_R_BADFILE;
(pal)[i].r = rgba.b;
(pal)[i].g = rgba.g;
(pal)[i].b = rgba.r;
}
}
/* fseek to image bits */
frs.seekg(bfh.OffBits, ios::beg);
image.needflip = true;
image.colorspace = (pal_entr ? "Color indexed":"RGB");
image.compression = "-";
finfo.image.push_back(image);
return SQE_OK;
}
s32 fmt_codec::read_next_pass()
{
return SQE_OK;
}
s32 fmt_codec::read_scanline(RGBA *scan)
{
u16 remain, scanShouldBe, j, counter = 0;
u8 bt, dummy;
fmt_image *im = image(currentImage);
fmt_utils::fillAlpha(scan, im->w);
switch(im->bpp)
{
case 1:
{
u8 index;
remain=((im->w)<=8)?(0):((im->w)%8);
scanShouldBe = im->w;
s32 _tmp = scanShouldBe;
scanShouldBe /= 8;
scanShouldBe = scanShouldBe + ((_tmp%8)?1:0);
// @todo get rid of miltiple 'if'
for(j = 0;j < scanShouldBe;j++)
{
if(!frs.readK(&bt, 1))
return SQE_R_BADFILE;
if(j==scanShouldBe-1 && (remain-0)<=0 && remain)break; index = (bt & 128) >> 7; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-1)<=0 && remain)break; index = (bt & 64) >> 6; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-2)<=0 && remain)break; index = (bt & 32) >> 5; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-3)<=0 && remain)break; index = (bt & 16) >> 4; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-4)<=0 && remain)break; index = (bt & 8) >> 3; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-5)<=0 && remain)break; index = (bt & 4) >> 2; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-6)<=0 && remain)break; index = (bt & 2) >> 1; memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
if(j==scanShouldBe-1 && (remain-7)<=0 && remain)break; index = (bt & 1); memcpy(scan+(counter++), (pal)+index, sizeof(RGB));
}
for(j = 0;j < filler;j++)
{
if(!frs.readK(&dummy, 1))
return SQE_R_BADFILE;
}
}
break;
case 4:
{
u8 index;
remain = (im->w)%2;
s32 ck = (im->w%2)?(im->w + 1):(im->w);
ck /= 2;
for(j = 0;j < ck-1;j++)
{
if(!frs.readK(&bt, 1))
return SQE_R_BADFILE;
index = (bt & 0xf0) >> 4;
memcpy(scan+(counter++), (pal)+index, 3);
index = bt & 0xf;
memcpy(scan+(counter++), (pal)+index, 3);
}
if(!frs.readK(&bt, 1))
return SQE_R_BADFILE;
index = (bt & 0xf0) >> 4;
memcpy(scan+(counter++), (pal)+index, 3);
if(!remain)
{
index = bt & 0xf;
memcpy(scan+(counter++), (pal)+index, 3);
}
for(j = 0;j < filler;j++)
{
if(!frs.readK(&dummy, 1))
return SQE_R_BADFILE;
}
}
break;
case 8:
{
for(j = 0;j < im->w;j++)
{
if(!frs.readK(&bt, 1))
return SQE_R_BADFILE;
memcpy(scan+(counter++), (pal)+bt, 3);
}
for(j = 0;j < filler;j++)
{
if(!frs.readK(&dummy, 1))
return SQE_R_BADFILE;
}
}
break;
case 16:
{
u16 word;
for(j = 0;j < im->w;j++)
{
if(!frs.readK(&word, 2))
return SQE_R_BADFILE;
scan[counter].b = (word&0x1f) << 3;
scan[counter].g = ((word&0x3e0) >> 5) << 3;
scan[counter++].r = ((word&0x7c00)>>10) << 3;
}
for(j = 0;j < filler;j++)
{
if(!frs.readK(&dummy, 1))
return SQE_R_BADFILE;
}
}
break;
case 24:
{
RGB rgb;
for(j = 0;j < im->w;j++)
{
if(!frs.readK(&rgb, sizeof(RGB)))
return SQE_R_BADFILE;
scan[counter].r = rgb.b;
scan[counter].g = rgb.g;
scan[counter].b = rgb.r;
counter++;
}
for(j = 0;j < filler;j++)
{
if(!frs.readK(&dummy, 1))
return SQE_R_BADFILE;
}
}
break;
case 32:
{
RGBA rgba;
for(j = 0;j < im->w;j++)
{
if(!frs.readK(&rgba, sizeof(RGBA)))
return SQE_R_BADFILE;
scan[j].r = rgba.b;
scan[j].g = rgba.g;
scan[j].b = rgba.r;
}
}
break;
}
return SQE_OK;
}
void fmt_codec::read_close()
{
frs.close();
finfo.meta.clear();
finfo.image.clear();
}
void fmt_codec::getwriteoptions(fmt_writeoptionsabs *opt)
{
opt->interlaced = false;
opt->compression_scheme = CompressionNo;
opt->compression_min = 0;
opt->compression_max = 0;
opt->compression_def = 0;
opt->passes = 1;
opt->needflip = true;
opt->palette_flags = 0 | fmt_image::pure32;
}
s32 fmt_codec::write_init(const std::string &file, const fmt_image &image, const fmt_writeoptions &opt)
{
if(!image.w || !image.h || file.empty())
return SQE_W_WRONGPARAMS;
writeimage = image;
writeopt = opt;
fws.open(file.c_str(), ios::binary | ios::out);
if(!fws.good())
return SQE_W_NOFILE;
m_FILLER = (image.w < 4) ? (4-image.w) : image.w%4;
return SQE_OK;
}
s32 fmt_codec::write_next()
{
m_bfh.Type = BMP_IDENTIFIER;
m_bfh.Size = 0;
m_bfh.Reserved1 = 0;
m_bfh.OffBits = sizeof(BITMAPFILE_HEADER) + sizeof(BITMAPINFO_HEADER);
m_bih.Size = 40;
m_bih.Width = writeimage.w;
m_bih.Height = writeimage.h;
m_bih.Planes = 1;
m_bih.BitCount = 24;
m_bih.Compression = BI_RGB;
m_bih.SizeImage = 0;
m_bih.XPelsPerMeter = 0;
m_bih.YPelsPerMeter = 0;
m_bih.ClrUsed = 0;
m_bih.ClrImportant = 0;
if(!fws.writeK(&m_bfh, sizeof(BITMAPFILE_HEADER)))
return SQE_W_ERROR;
if(!fws.writeK(&m_bih, sizeof(BITMAPINFO_HEADER)))
return SQE_W_ERROR;
return SQE_OK;
}
s32 fmt_codec::write_next_pass()
{
return SQE_OK;
}
s32 fmt_codec::write_scanline(RGBA *scan)
{
s8 fillchar = '0';
RGB rgb;
for(s32 x = 0;x < writeimage.w;x++)
{
rgb.r = scan[x].b;
rgb.g = scan[x].g;
rgb.b = scan[x].r;
if(!fws.writeK(&rgb, sizeof(RGB)))
return SQE_W_ERROR;
}
if(m_FILLER)
{
for(s32 s = 0;s < m_FILLER;s++)
fws.writeK(&fillchar, sizeof(s8));
}
return SQE_OK;
}
void fmt_codec::write_close()
{
fws.close();
}
std::string fmt_codec::extension(const s32 /*bpp*/)
{
return std::string("bmp");
}
#include "fmt_codec_cd_func.h"