Initial commit

2013-09-01 16:27:21 +02:00 · 2013-09-01 16:27:21 +02:00 · ff25887f41
commit ff25887f41
119 changed files with 24901 additions and 0 deletions
--- a/binding-mri/font-binding.cpp
+++ b/binding-mri/font-binding.cpp
@ -0,0 +1,173 @@
+/*
+** font-binding.cpp
+**
+** This file is part of mkxp.
+**
+** Copyright (C) 2013 Jonas Kulla <Nyocurio@gmail.com>
+**
+** mkxp 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.
+**
+** mkxp 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 mkxp.  If not, see <http://www.gnu.org/licenses/>.
+*/
+
+#include "font.h"
+#include "binding-util.h"
+#include "binding-types.h"
+#include "exception.h"
+
+DEF_TYPE(Font);
+
+RB_METHOD(fontDoesExist)
+{
+	RB_UNUSED_PARAM;
+
+	const char *name;
+	rb_get_args(argc, argv, "z", &name);
+
+	return rb_bool_new(Font::doesExist(name));
+}
+
+RB_METHOD(fontInitialize)
+{
+	const char *name = 0;
+	int size = 0;
+
+	rb_get_args(argc, argv, "|zi", &name, &size);
+
+	Font *f = new Font(name, size);
+
+	setPrivateData(self, f, FontType);
+
+	/* Wrap property objects */
+	f->setColor(new Color(*f->getColor()));
+	wrapProperty(self, f->getColor(), "color", ColorType);
+
+	return self;
+}
+
+RB_METHOD(FontGetName)
+{
+	RB_UNUSED_PARAM;
+
+	Font *f = getPrivateData<Font>(self);
+
+	return rb_str_new_cstr(f->getName());
+}
+
+RB_METHOD(FontSetName)
+{
+	Font *f = getPrivateData<Font>(self);
+
+	VALUE name;
+	rb_get_args(argc, argv, "S", &name);
+
+	f->setName(RSTRING_PTR(name));
+
+	return name;
+}
+
+#undef DEF_PROP_CHK_DISP
+#define DEF_PROP_CHK_DISP
+
+DEF_PROP_I(Font, Size)
+DEF_PROP_B(Font, Bold)
+DEF_PROP_B(Font, Italic)
+DEF_PROP_OBJ(Font, Color, Color, "color")
+
+#define DEF_KLASS_PROP(Klass, type, PropName, param_t_s, value_fun) \
+	RB_METHOD(Klass##Get##PropName) \
+	{ \
+		RB_UNUSED_PARAM; \
+		return value_fun(Klass::get##PropName()); \
+	} \
+	RB_METHOD(Klass##Set##PropName) \
+	{ \
+		RB_UNUSED_PARAM; \
+		type value; \
+		rb_get_args(argc, argv, param_t_s, &value); \
+		Klass::set##PropName(value); \
+		return value_fun(value); \
+	}
+
+DEF_KLASS_PROP(Font, int, DefaultSize, "i", rb_fix_new)
+DEF_KLASS_PROP(Font, bool, DefaultBold, "b", rb_bool_new)
+DEF_KLASS_PROP(Font, bool, DefaultItalic, "b", rb_bool_new)
+
+RB_METHOD(FontGetDefaultName)
+{
+	RB_UNUSED_PARAM;
+	return rb_str_new_cstr(Font::getDefaultName());
+}
+
+RB_METHOD(FontSetDefaultName)
+{
+	RB_UNUSED_PARAM;
+	VALUE nameObj;
+	rb_get_args(argc, argv, "S", &nameObj);
+
+	Font::setDefaultName(RSTRING_PTR(nameObj));
+
+	return nameObj;
+}
+
+RB_METHOD(FontGetDefaultColor)
+{
+	RB_UNUSED_PARAM;
+	return rb_iv_get(self, "default_color");
+}
+
+
+RB_METHOD(FontSetDefaultColor)
+{
+	VALUE colorObj;
+	rb_get_args(argc, argv, "o", &colorObj);
+
+	Color *c = getPrivateDataCheck<Color>(colorObj, ColorType);
+
+	Font::setDefaultColor(c);
+	rb_iv_set(self, "default_color", colorObj);
+
+	return colorObj;
+}
+
+#define INIT_KLASS_PROP_BIND(Klass, PropName, prop_name_s) \
+{ \
+	rb_define_class_method(klass, prop_name_s, Klass##Get##PropName); \
+	rb_define_class_method(klass, prop_name_s "=", Klass##Set##PropName); \
+}
+
+void
+fontBindingInit()
+{
+	INIT_TYPE(Font);
+
+	VALUE klass = rb_define_class("Font", rb_cObject);
+
+	Font::setDefaultColor(new Color(*Font::getDefaultColor()));
+	wrapProperty(klass, Font::getDefaultColor(), "default_color", ColorType);
+
+	INIT_KLASS_PROP_BIND(Font, DefaultName, "default_name");
+	INIT_KLASS_PROP_BIND(Font, DefaultSize, "default_size");
+	INIT_KLASS_PROP_BIND(Font, DefaultBold, "default_bold");
+	INIT_KLASS_PROP_BIND(Font, DefaultItalic, "default_italic");
+	INIT_KLASS_PROP_BIND(Font, DefaultColor, "default_color");
+
+	rb_define_class_method(klass, "exist?", fontDoesExist);
+
+	_rb_define_method(klass, "initialize", fontInitialize);
+
+	INIT_PROP_BIND(Font, Name, "name");
+	INIT_PROP_BIND(Font, Size, "size");
+	INIT_PROP_BIND(Font, Bold, "bold");
+	INIT_PROP_BIND(Font, Italic, "italic");
+	INIT_PROP_BIND(Font, Color, "color");
+}