Switching from cvs to svn, initial import

git-svn-id: https://svn.kvirc.de/svn/trunk/kvirc@14 17fca916-40b9-46aa-a4ea-0a15b648b75c

1 files changed, 143 insertions, 0 deletions

diff --git a/src/modules/objects/class_image.cpp b/src/modules/objects/class_image.cpp
new file mode 100644
index 000000000..14ae64078
--- /dev/null
+++ b/src/modules/objects/class_image.cpp
@@ -0,0 +1,143 @@
+//mdm:
+//   Image : class_image.h
+//   Creation date : Fri Jan 13 18:30:48 CEST 2005 
+//	 by Alessandro Carbone(Noldor) and Tonino Imbesi(Grifisx)
+//   This file is part of the KVirc irc client distribution
+//   Copyright (C) 1999-2006 Szymon Stefanek (pragma at kvirc dot net)
+//
+//   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 opinion) 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. If not, write to the Free Software Foundation,
+//   Inc. ,59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+//
+
+#include "class_image.h"
+#include "kvi_debug.h"
+
+#include "kvi_locale.h"
+#include <qfile.h>
+
+/*
+	@doc:	image
+	@keyterms:
+	    image object class
+	@title:
+		image class
+	@type:
+		class
+	@short:
+	@inherits:
+		[class]object[/class]
+	@description:
+		Image class provides functions that can modify the image itself.
+	@functions:
+	!fn: $load(<file_name:string>)
+	Load a image from the <file>.
+	!fn: <integer> $height()
+	Return the height of the image.
+	!fn: <integer> $width()
+	Return the width of the image.
+	!fn: $setOpacity(opacity_value:integer)
+	Set the image opacity; valid value are:from 0 (full transparency) to 255 (full opacity).
+	*/
+
+
+//===========================================================================================
+
+KVSO_BEGIN_REGISTERCLASS(KviKvsObject_image,"image","object")
+
+	KVSO_REGISTER_HANDLER(KviKvsObject_image,"load",functionload)
+	KVSO_REGISTER_HANDLER(KviKvsObject_image,"height",functionheight)
+	KVSO_REGISTER_HANDLER(KviKvsObject_image,"width",functionwidth)
+	KVSO_REGISTER_HANDLER(KviKvsObject_image,"setOpacity",functionsetOpacity)
+
+KVSO_END_REGISTERCLASS(KviKvsObject_image)
+
+
+KVSO_BEGIN_CONSTRUCTOR(KviKvsObject_image,KviKvsObject)
+
+	m_pImage = new QImage(341,341,32);
+
+KVSO_END_CONSTRUCTOR(KviKvsObject_image)
+
+
+KVSO_BEGIN_DESTRUCTOR(KviKvsObject_image)
+	
+	if (m_pImage) delete m_pImage;
+KVSO_END_CONSTRUCTOR(KviKvsObject_image)
+
+
+bool KviKvsObject_image::functionload(KviKvsObjectFunctionCall *c)
+{
+	QString szFile;
+	KVSO_PARAMETERS_BEGIN(c)
+		KVSO_PARAMETER("file",KVS_PT_STRING,0,szFile)
+	KVSO_PARAMETERS_END(c)
+	
+	if(!m_pImage)return true; 
+	if(!QFile::exists(szFile))
+	{
+		c->warning(__tr2qs("I can't find the specified file %Q."),&szFile);
+        return true;
+	}
+
+	m_pImage->load( szFile );
+	return true;
+}
+
+bool KviKvsObject_image::functionsetOpacity(KviKvsObjectFunctionCall *c)
+{
+	if(!m_pImage)return true; 
+	kvs_uint_t iOpacity;
+
+	KVSO_PARAMETERS_BEGIN(c)
+			KVSO_PARAMETER("opacity_value",KVS_PT_INT,0,iOpacity)	
+	KVSO_PARAMETERS_END(c)
+	if (!m_pImage->hasAlphaBuffer()) m_pImage->setAlphaBuffer(true);
+	for(int y = 0;y < m_pImage->height();y++)
+	{
+		QRgb * dst = (QRgb *)m_pImage->scanLine(y);
+		QRgb * end = dst + m_pImage->width();		
+		while(dst < end)
+		{
+			if (qRgba((int)(qRed(*dst)),(int)(qGreen(*dst)),(int)(qBlue(*dst)),(int)(qAlpha(*dst))))
+			{
+				*dst = qRgba((int)(qRed(*dst)),
+							(int)(qGreen(*dst)),
+							(int)(qBlue(*dst)),
+							(int)(iOpacity));
+			}
+			dst++;
+		}
+
+	}
+		return true;
+	}
+
+bool KviKvsObject_image::functionheight(KviKvsObjectFunctionCall *c)
+{
+	if(!m_pImage)return true; 
+	c->returnValue()->setInteger(m_pImage->height());	
+	return true;
+}
+bool KviKvsObject_image::functionwidth(KviKvsObjectFunctionCall *c)
+{
+	if(!m_pImage)return true; 
+	c->returnValue()->setInteger(m_pImage->width());	
+	return true;
+}
+QImage KviKvsObject_image::getImage() const
+{
+	QImage ret(*m_pImage);
+	return ret;
+}
+#include "m_class_image.moc"