1 files changed, 230 insertions, 0 deletions
diff --git a/twin/clients/keramik/embedtool.cpp b/twin/clients/keramik/embedtool.cpp
new file mode 100644
index 000000000..d1cbd78fd
--- /dev/null
+++ b/twin/clients/keramik/embedtool.cpp
@@ -0,0 +1,230 @@
+/*
+ * Keramik KWin embed tool (version 1.0)
+ *
+ * Copyright (C) 2002 Fredrik H�glund <fredrik@kde.org>
+ *
+ * This program 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 program 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.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; see the file COPYING.  If not, write to
+ * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#include <tqimage.h>
+#include <tqtextstream.h>
+#include <tqregexp.h>
+#include <tqfile.h>
+#include <tqfileinfo.h>
+#include <tqdatetime.h>
+
+#include <iostream>
+
+static int primes[] = {
+	   2,   3,   5,   7,  11,  13,  17,  19,  23,  29,
+	  31,  37,  41,  43,  47,  53,  59,  61,  67,  71,
+	  73,  79,  83,  89,  97, 101, 103, 107, 109, 113,
+	 127, 131, 137, 139, 149, 151, 157, 163, 167, 173,
+	 179, 181, 191, 193, 197, 199, 211, 223, 227, 229
+};
+
+struct EmbedImage {
+	TQString string;
+	int width;
+	int height;
+	bool alpha;
+	TQString name;
+};
+
+class KeramikEmbedder {
+public:
+	KeramikEmbedder();
+	~KeramikEmbedder();
+	
+	void embed( const char * );
+	void writeIndex();
+	
+private:
+	TQFile *file;
+	TQPtrList<EmbedImage> *index;
+	TQTextStream stream;
+};
+
+KeramikEmbedder::KeramikEmbedder()
+{
+	TQDateTime date( TQDateTime::tqcurrentDateTime() );
+	TQString datestring( date.toString() );
+	
+	file = new TQFile( "tiles.h" );
+	file->open( IO_WriteOnly | IO_Truncate );
+
+	stream.setDevice( TQT_TQIODEVICE(file) );
+	
+	stream << "/*\n";
+	stream << " * Generated by embedtool 1.0 on " << datestring << endl;
+	stream << " */\n\n";
+	
+	stream << "#ifndef __TILES_H\n";
+	stream << "#define __TILES_H\n\n";
+	stream << "#include <tqimage.h>\n"; 
+	stream << "#include <tqdict.h>\n\n";
+	stream << "namespace Keramik {\n\n";
+	
+	index = new TQPtrList<EmbedImage>;
+	index->setAutoDelete( true );
+}
+
+KeramikEmbedder::~KeramikEmbedder()
+{	
+	stream << "} // namespace Keramik\n\n";
+	stream << "#endif // __TILES_H\n\n";
+	stream << "// vim: set noet ts=4 sw=4:\n";
+
+	file->close();
+	delete file;
+	delete index;
+}
+
+void KeramikEmbedder::embed( const char *name )
+{
+	TQFileInfo   fileinfo( name );
+	TQString     basename( fileinfo.baseName() );
+	TQString     codename( basename );
+	TQImage      image( name );
+	
+	codename = codename.replace( TQRegExp("[^a-zA-Z0-9]"), "_" );
+	
+	stream << "\tstatic const QRgb " << codename << "_data[] = {" << endl << "\t\t";
+	stream.setf( TQTextStream::hex | TQTextStream::right );
+	stream.fill( '0' );
+	
+	int pixels = image.width() * image.height();
+	TQ_UINT32 *data = reinterpret_cast<TQ_UINT32*>( image.bits() );
+	bool hasAlpha = false;
+
+	
+	for ( int i = 0, j = 0; i < pixels; i++ ) {
+		if ( tqAlpha( *data ) && tqAlpha( *data ) != 0xff )
+			hasAlpha = true;
+		
+		stream << "0x" << qSetW(8) << *(data++);
+		
+		if ( i != pixels-1 ) {
+			stream << ',';
+		
+			if ( j++ > 4 ) {
+				j = 0;
+				stream << endl << "\t\t";
+			} else
+				stream << ' ';
+		}
+	}
+
+	stream.reset();
+	
+	stream << endl << "\t}; // " << codename << "_data" << endl << endl;
+
+	EmbedImage *imginfo = new EmbedImage;
+	imginfo->width = image.width();
+	imginfo->height = image.height();
+	imginfo->alpha = hasAlpha;
+	imginfo->name = codename;
+	imginfo->string = basename;
+	index->append( imginfo ); 
+}
+
+void KeramikEmbedder::writeIndex()
+{
+	stream << "\tstruct EmbedImage {\n";
+	stream << "\t\tconst char *name;\n";
+	stream << "\t\tint width;\n";
+	stream << "\t\tint height;\n";
+	stream << "\t\tbool alpha;\n";
+	stream << "\t\tconst QRgb *data;\n";
+	stream << "\t};\n\n";
+
+	uint i = 0;
+	stream << "\tstatic const EmbedImage image_db[] = {\n";
+	for ( EmbedImage *image = index->first(); image; image = index->next() )
+	{
+		stream << "\t\t{ \"" << image->string << "\", "
+			<< image->width << ", " << image->height <<
+			", " << (image->alpha ? "true" : "false")
+			<< ", " << image->name << "_data }";
+		if ( i++ < index->count() - 1 )
+			stream << ',';
+		stream << endl;
+	}
+	stream << "\t};\n\n";
+
+	uint prime = 0;
+	
+	for ( i = 0; i < 50; i++ )
+		if ( (prime = primes[i]) >= index->count() )
+			break;
+	
+	stream << "\tclass KeramikImageDb {\n";
+	stream << "\tprivate:\n";
+	stream << "\t\tstatic KeramikImageDb *m_inst;\n";
+	stream << "\t\tTQDict<TQImage> *db;\n\n";
+	stream << "\t\tKeramikImageDb() {\n";
+	stream << "\t\t\tdb = new TQDict<TQImage>( " << prime << " );\n";
+	stream << "\t\t\tdb->setAutoDelete( true );\n\n";
+	stream << "\t\t\tfor ( int i = 0; i < " << index->count() << "; i++ ) {\n";
+	stream << "\t\t\t\tTQImage *img = new TQImage( (uchar*)image_db[i].data,\n";
+	stream << "\t\t\t\t\t\timage_db[i].width, image_db[i].height,\n";
+	stream << "\t\t\t\t\t\t32, NULL, 0, TQImage::LittleEndian );\n\n";
+	stream << "\t\t\t\tif ( image_db[i].alpha )\n";
+	stream << "\t\t\t\t\timg->setAlphaBuffer( true );\n\n";
+	stream << "\t\t\t\tdb->insert( image_db[i].name, img );\n";
+	stream << "\t\t\t}\n";
+	stream << "\t\t}\n\n";
+	stream << "\t\t~KeramikImageDb() {\n";
+	stream << "\t\t\tdelete db;\n";
+	stream << "\t\t}\n\n";
+	stream << "\tpublic:\n";
+	stream << "\t\tstatic KeramikImageDb* instance() {\n";	
+	stream << "\t\t\tif ( ! m_inst ) m_inst = new KeramikImageDb;\n";
+	stream << "\t\t\treturn m_inst;\n";
+	stream << "\t\t}\n\n";
+	stream << "\t\tstatic void release() {\n";
+	stream << "\t\t\tif ( m_inst ) delete m_inst;\n";
+	stream << "\t\t\tm_inst = NULL;\n";
+	stream << "\t\t}\n\n";
+	stream << "\t\tTQImage *image( const TQString &name ) const {\n";
+	stream << "\t\t\treturn db->find( name );\n";
+	stream << "\t\t}\n\n";
+	stream << "\t}; // class KeramikImageDb\n\n";
+	stream << "\tKeramikImageDb *KeramikImageDb::m_inst = NULL;\n\n";
+}
+
+int main( int argv, char **argc )
+{
+	if ( argv < 2 ) {
+		std::cout << "Insufficient arguments" << std::endl;
+		return 1;
+	}
+
+	KeramikEmbedder embedder;
+
+	for ( int i = 1; i < argv; i++ )
+	{
+		std::cout << argc[i] << std::endl;
+		embedder.embed( argc[i] );
+	}
+
+	embedder.writeIndex();
+	
+	return 0;
+}
+
+// vim: set noet ts=4 sw=4:
+