Remove ancient trunk folder from svn repository
[synfig.git] / synfig-core / src / modules / mod_bmp / mptr_bmp.cpp
diff --git a/synfig-core/src/modules/mod_bmp/mptr_bmp.cpp b/synfig-core/src/modules/mod_bmp/mptr_bmp.cpp
new file mode 100644 (file)
index 0000000..9151cfe
--- /dev/null
@@ -0,0 +1,235 @@
+/* === S Y N F I G ========================================================= */
+/*!    \file mptr_bmp.cpp
+**     \brief bmp Target Module
+**
+**     $Id$
+**
+**     \legal
+**     Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
+**
+**     This package is free software; you can redistribute it and/or
+**     modify it under the terms of the GNU General Public License as
+**     published by the Free Software Foundation; either version 2 of
+**     the License, or (at your option) any later version.
+**
+**     This package 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
+**     General Public License for more details.
+**     \endlegal
+**
+** === N O T E S ===========================================================
+**
+** ========================================================================= */
+
+/* === H E A D E R S ======================================================= */
+
+#define SYNFIG_NO_ANGLE
+
+#ifdef USING_PCH
+#      include "pch.h"
+#else
+#ifdef HAVE_CONFIG_H
+#      include <config.h>
+#endif
+
+#include "mptr_bmp.h"
+#include <synfig/general.h>
+#include <synfig/surface.h>
+
+#include <algorithm>
+#include <functional>
+#endif
+
+/* === U S I N G =========================================================== */
+
+using namespace synfig;
+using namespace std;
+using namespace etl;
+
+/* === G L O B A L S ======================================================= */
+
+SYNFIG_IMPORTER_INIT(bmp_mptr);
+SYNFIG_IMPORTER_SET_NAME(bmp_mptr,"bmp");
+SYNFIG_IMPORTER_SET_EXT(bmp_mptr,"bmp");
+SYNFIG_IMPORTER_SET_VERSION(bmp_mptr,"0.1");
+SYNFIG_IMPORTER_SET_CVS_ID(bmp_mptr,"$Id$");
+
+/* === M E T H O D S ======================================================= */
+namespace synfig {
+
+struct BITMAPFILEHEADER
+{
+       unsigned char   bfType[2];
+       unsigned long   bfSize;
+       unsigned short  bfReserved1;
+       unsigned short  bfReserved2;
+       unsigned long   bfOffsetBits;
+};
+
+struct BITMAPINFOHEADER
+{
+       unsigned long   biSize;
+       long                    biWidth;
+       long                    biHeight;
+       unsigned short  biPlanes;
+       unsigned short  biBitCount;
+       unsigned long   biCompression;
+       unsigned long   biSizeImage;
+       long                    biXPelsPerMeter;
+       long                    biYPelsPerMeter;
+       unsigned long   biClrUsed;
+       unsigned long   biClrImportant;
+};
+
+}
+
+#ifdef WORDS_BIGENDIAN
+inline long little_endian(const long &x)
+{
+       long ret;
+       char *big_e=(char *)&ret;
+       char *lit_e=(char *)&x;
+       big_e[0]=lit_e[3];
+       big_e[1]=lit_e[2];
+       big_e[2]=lit_e[1];
+       big_e[3]=lit_e[0];
+       return ret;
+}
+inline short little_endian_short(const short &x)
+{
+       short ret;
+       char *big_e=(char *)&ret;
+       char *lit_e=(char *)&x;
+       big_e[0]=lit_e[1];
+       big_e[1]=lit_e[0];
+       return ret;
+}
+#else
+#define little_endian(x)       (x)
+#define little_endian_short(x) (x)
+#endif
+
+
+
+
+
+
+bmp_mptr::bmp_mptr(const char *file)
+{
+       filename=file;
+}
+
+bmp_mptr::~bmp_mptr()
+{
+}
+
+bool
+bmp_mptr::get_frame(synfig::Surface &surface,Time /*time*/, synfig::ProgressCallback *cb)
+{
+       FILE *file=fopen(filename.c_str(),"rb");
+       if(!file)
+       {
+               if(cb)cb->error("bmp_mptr::GetFrame(): "+strprintf(_("Unable to open %s"),filename.c_str()));
+               else synfig::error("bmp_mptr::GetFrame(): "+strprintf(_("Unable to open %s"),filename.c_str()));
+               return false;
+       }
+
+       synfig::BITMAPFILEHEADER fileheader;
+       synfig::BITMAPINFOHEADER infoheader;
+       char b_char=fgetc(file);
+       char m_char=fgetc(file);
+
+       if(b_char!='B' || m_char!='M')
+       {
+               if(cb)cb->error("bmp_mptr::GetFrame(): "+strprintf(_("%s is not in BMP format"),filename.c_str()));
+               else synfig::error("bmp_mptr::GetFrame(): "+strprintf(_("%s is not in BMP format"),filename.c_str()));
+               return false;
+       }
+
+       if(fread(&fileheader.bfSize, 1, sizeof(synfig::BITMAPFILEHEADER)-4, file)!=sizeof(synfig::BITMAPFILEHEADER)-4)
+       {
+               String str("bmp_mptr::get_frame(): "+strprintf(_("Failure while reading BITMAPFILEHEADER from %s"),filename.c_str()));
+               if(cb)cb->error(str);
+               else synfig::error(str);
+               return false;
+       }
+
+       if(fread(&infoheader, 1, sizeof(synfig::BITMAPINFOHEADER), file)!=sizeof(synfig::BITMAPINFOHEADER))
+       {
+               String str("bmp_mptr::get_frame(): "+strprintf(_("Failure while reading BITMAPINFOHEADER from %s"),filename.c_str()));
+               if(cb)cb->error(str);
+               else synfig::error(str);
+               return false;
+       }
+
+       int offset=little_endian(fileheader.bfOffsetBits);
+
+       if(offset!=sizeof(synfig::BITMAPFILEHEADER)+sizeof(synfig::BITMAPINFOHEADER)-2)
+       {
+               String str("bmp_mptr::get_frame(): "+strprintf(_("Bad BITMAPFILEHEADER in %s. (bfOffsetBits=%d, should be %d)"),filename.c_str(),offset,sizeof(synfig::BITMAPFILEHEADER)+sizeof(synfig::BITMAPINFOHEADER)-2));
+               if(cb)cb->error(str);
+               else synfig::error(str);
+               return false;
+       }
+
+       if(little_endian(infoheader.biSize)!=little_endian(40))
+       {
+               String str("bmp_mptr::get_frame(): "+strprintf(_("Bad BITMAPINFOHEADER in %s. (biSize=%d, should be 40)"),filename.c_str(),little_endian(infoheader.biSize)));
+               if(cb)cb->error(str);
+               else synfig::error(str);
+               return false;
+       }
+
+       int w,h,bit_count;
+
+       w=little_endian(infoheader.biWidth);
+       h=little_endian(infoheader.biHeight);
+       bit_count=little_endian_short(infoheader.biBitCount);
+
+       synfig::warning("w:%d\n",w);
+       synfig::warning("h:%d\n",h);
+       synfig::warning("bit_count:%d\n",bit_count);
+
+       if(little_endian(infoheader.biCompression))
+       {
+               if(cb)cb->error("bmp_mptr::GetFrame(): "+string(_("Reading compressed bitmaps is not supported")));
+               else synfig::error("bmp_mptr::GetFrame(): "+string(_("Reading compressed bitmaps is not supported")));
+               return false;
+       }
+
+       if(bit_count!=24 && bit_count!=32)
+       {
+               if(cb)cb->error("bmp_mptr::GetFrame(): "+strprintf(_("Unsupported bit depth (bit_count=%d, should be 24 or 32)"),bit_count));
+               else synfig::error("bmp_mptr::GetFrame(): "+strprintf(_("Unsupported bit depth (bit_count=%d, should be 24 or 32)"),bit_count));
+               return false;
+       }
+
+       int x;
+       int y;
+       surface.set_wh(w,h);
+       for(y=0;y<surface.get_h();y++)
+               for(x=0;x<surface.get_w();x++)
+               {
+//                     float b=(float)(unsigned char)fgetc(file)*(1.0/255.0);
+//                     float g=(float)(unsigned char)fgetc(file)*(1.0/255.0);
+//                     float r=(float)(unsigned char)fgetc(file)*(1.0/255.0);
+                       float b=gamma().b_U8_to_F32((unsigned char)fgetc(file));
+                       float g=gamma().g_U8_to_F32((unsigned char)fgetc(file));
+                       float r=gamma().r_U8_to_F32((unsigned char)fgetc(file));
+
+                       surface[h-y-1][x]=Color(
+                               r,
+                               g,
+                               b,
+                               1.0
+                       );
+                       if(bit_count==32)
+                               fgetc(file);
+               }
+
+
+       fclose(file);
+       return true;
+}
+