xsettings-ruby 0.0.1

data/ext/xsettings/xsettings-manager.h

@@ -0,0 +1,68 @@
+/*
+ * Copyright © 2001 Red Hat, Inc.
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of Red Hat not be used in advertising or
+ * publicity pertaining to distribution of the software without specific,
+ * written prior permission.  Red Hat makes no representations about the
+ * suitability of this software for any purpose.  It is provided "as is"
+ * without express or implied warranty.
+ *
+ * RED HAT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL RED HAT
+ * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
+ * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN 
+ * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Author:  Owen Taylor, Red Hat, Inc.
+ */
+#ifndef XSETTINGS_MANAGER_H
+#define XSETTINGS_MANAGER_H
+
+#include <X11/Xlib.h>
+#include "xsettings-common.h"
+
+#ifdef __cplusplus
+extern "C" {
+#endif /* __cplusplus */
+
+typedef struct _XSettingsManager XSettingsManager;
+
+typedef void (*XSettingsTerminateFunc)  (void *cb_data);
+
+Bool xsettings_manager_check_running (Display *display,
+				      int      screen);
+
+XSettingsManager *xsettings_manager_new (Display                *display,
+					 int                     screen,
+					 XSettingsTerminateFunc  terminate,
+					 void                   *cb_data);
+
+void   xsettings_manager_destroy       (XSettingsManager *manager);
+Window xsettings_manager_get_window    (XSettingsManager *manager);
+Bool   xsettings_manager_process_event (XSettingsManager *manager,
+					XEvent           *xev);
+
+XSettingsResult xsettings_manager_set_setting (XSettingsManager *manager,
+					       XSettingsSetting *setting);
+XSettingsResult xsettings_manager_set_int     (XSettingsManager *manager,
+					       const char       *name,
+					       int               value);
+XSettingsResult xsettings_manager_set_string  (XSettingsManager *manager,
+					       const char       *name,
+					       const char       *value);
+XSettingsResult xsettings_manager_set_color   (XSettingsManager *manager,
+					       const char       *name,
+					       XSettingsColor   *value);
+XSettingsResult xsettings_manager_notify      (XSettingsManager *manager);
+
+
+#ifdef __cplusplus
+}
+#endif /* __cplusplus */
+
+#endif /* XSETTINGS_MANAGER_H */

data/ext/xsettings/xsettings.c

@@ -0,0 +1,170 @@
+#pragma GCC diagnostic ignored "-Wunused-but-set-variable"
+/* Includes */
+#include <ruby.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include "gtk/gtk.h"
+#include "gdk/gdk.h"
+#include "gdk/gdkx.h"
+
+/* Setup types */
+/* Try not to clash with other definitions of bool... */
+typedef int rubber_bool;
+#define bool rubber_bool
+
+/* Prototypes */
+#include "rbglib.h"
+
+#include "rbgtk.h"
+
+#if defined(G_PLATFORM_WIN32) && !defined(RUBY_GTK2_STATIC_COMPILATION)
+#  ifdef RUBY_GTK2_COMPILATION
+#    define RUBY_GTK2_VAR __declspec(dllexport)
+#  else
+#    define RUBY_GTK2_VAR extern __declspec(dllimport)
+#  endif
+#else
+#  define RUBY_GTK2_VAR extern
+#endif
+
+RUBY_GTK2_VAR VALUE mGtk;
+RUBY_GTK2_VAR VALUE mGdk;
+
+#define RBGTK_INITIALIZE(obj,gtkobj) (rbgtk_initialize_gtkobject(obj, GTK_OBJECT(gtkobj)))
+static VALUE mXSettings;
+static VALUE cManager;
+static VALUE
+Manager_CLASS_exists_query(VALUE self);
+static VALUE
+Manager_CLASS___alloc__(VALUE self);
+static VALUE
+Manager_terminated(VALUE self);
+static VALUE
+Manager_destroy(VALUE self);
+static VALUE
+Manager_notify(VALUE self);
+static VALUE
+Manager__brace_brace_equals(VALUE self, VALUE __v_name, VALUE value);
+
+/* Inline C code */
+
+#include "xsettings-manager.h"
+
+static XSettingsManager *
+manager_unwrap(VALUE obj)
+{
+	XSettingsManager *manager;
+	Data_Get_Struct(obj, XSettingsManager, manager);
+	return manager;
+}
+
+static void terminate_xsettings(void *value)
+{
+	if (value)
+	{
+		VALUE obj = (VALUE)value;
+		rb_funcall(obj, rb_intern("terminated"),0);
+	}
+}
+
+
+/* Code */
+static VALUE
+Manager_CLASS_exists_query(VALUE self)
+{
+  VALUE __p_retval = Qnil;
+
+#line 33 "/home/geoff/Projects/xsettings/ext/xsettings/xsettings.cr"
+  do { __p_retval =  ((xsettings_manager_check_running(GDK_DISPLAY(), DefaultScreen(GDK_DISPLAY()))) ? Qtrue : Qfalse); goto out; } while(0);
+out:
+  return __p_retval;
+}
+
+static VALUE
+Manager_CLASS___alloc__(VALUE self)
+{
+  VALUE __p_retval = Qnil;
+
+#line 37 "/home/geoff/Projects/xsettings/ext/xsettings/xsettings.cr"
+  do { __p_retval = Data_Wrap_Struct(self, NULL, xsettings_manager_destroy, xsettings_manager_new(GDK_DISPLAY(), DefaultScreen(GDK_DISPLAY()), terminate_xsettings, (void*)self)); goto out; } while(0);
+out:
+  return __p_retval;
+}
+
+static VALUE
+Manager_terminated(VALUE self)
+{
+XSettingsManager *_self = manager_unwrap(self); 
+
+#line 44 "/home/geoff/Projects/xsettings/ext/xsettings/xsettings.cr"
+  _self = _self;
+ 
+  return Qnil;
+}
+
+static VALUE
+Manager_destroy(VALUE self)
+{
+XSettingsManager *_self = manager_unwrap(self); 
+
+#line 47 "/home/geoff/Projects/xsettings/ext/xsettings/xsettings.cr"
+  xsettings_manager_destroy(_self);
+ 
+  return Qnil;
+}
+
+static VALUE
+Manager_notify(VALUE self)
+{
+XSettingsManager *_self = manager_unwrap(self); 
+
+#line 50 "/home/geoff/Projects/xsettings/ext/xsettings/xsettings.cr"
+  xsettings_manager_notify(_self);
+ 
+  return Qnil;
+}
+
+static VALUE
+Manager__brace_brace_equals(VALUE self, VALUE __v_name, VALUE value)
+{
+  char * name; char * __orig_name;
+XSettingsManager *_self = manager_unwrap(self); 
+  __orig_name = name = ( NIL_P(__v_name) ? NULL : StringValuePtr(__v_name) );
+
+#line 53 "/home/geoff/Projects/xsettings/ext/xsettings/xsettings.cr"
+
+  do {
+  switch(TYPE(value)) { case T_NIL: case T_TRUE: case T_FALSE: xsettings_manager_set_int(_self, name, RTEST(value));
+  break;
+  case T_FIXNUM: xsettings_manager_set_int(_self, name, NUM2INT(value));
+  break;
+  case T_STRING: xsettings_manager_set_string(_self, name, StringValuePtr(value));
+  break;
+  case T_ARRAY: if (RARRAY_LEN(value) == 4) { XSettingsColor  col  ;
+ col.red = NUM2INT(RARRAY_PTR(value)[0]);
+  col.green = NUM2INT(RARRAY_PTR(value)[1]);
+  col.blue = NUM2INT(RARRAY_PTR(value)[2]);
+  col.alpha = NUM2INT(RARRAY_PTR(value)[3]);
+  xsettings_manager_set_color(_self, name, &col);
+  } break;
+  }
+
+  } while(0);
+
+  return Qnil;
+}
+
+/* Init */
+void
+Init_xsettings(void)
+{
+  mXSettings = rb_define_module("XSettings");
+  cManager = rb_define_class_under(mXSettings, "Manager", rb_cObject);
+  rb_define_singleton_method(cManager, "exists?", Manager_CLASS_exists_query, 0);
+ rb_define_alloc_func(cManager, Manager_CLASS___alloc__);
+  rb_define_method(cManager, "terminated", Manager_terminated, 0);
+  rb_define_method(cManager, "destroy", Manager_destroy, 0);
+  rb_define_method(cManager, "notify", Manager_notify, 0);
+  rb_define_method(cManager, "[]=", Manager__brace_brace_equals, 2);
+}

data/ext/xsettings/xsettings.cr

@@ -0,0 +1,81 @@
+%pkg-config gtk+-2.0
+%include gtk/gtk.h
+%include gdk/gdk.h
+%include gdk/gdkx.h
+
+%{
+#include "xsettings-manager.h"
+
+static XSettingsManager *
+manager_unwrap(VALUE obj)
+{
+	XSettingsManager *manager;
+	Data_Get_Struct(obj, XSettingsManager, manager);
+	return manager;
+}
+
+static void terminate_xsettings(void *value)
+{
+	if (value)
+	{
+		VALUE obj = (VALUE)value;
+		rb_funcall(obj, rb_intern("terminated"),0);
+	}
+}
+
+%}
+
+%map VALUE > XSettingsManager* : manager_unwrap(%%)
+
+module XSettings
+class Manager
+	pre_func XSettingsManager *_self = manager_unwrap(self); 
+	def bool:self.exists?
+		return xsettings_manager_check_running(GDK_DISPLAY(),
+					    DefaultScreen(GDK_DISPLAY()));
+	end
+	def self.__alloc__()
+		return Data_Wrap_Struct(self, NULL, 
+		xsettings_manager_destroy, 
+		xsettings_manager_new(GDK_DISPLAY(), 
+			DefaultScreen(GDK_DISPLAY()),
+			terminate_xsettings, (void*)self));
+	end
+	def terminated()
+		_self = _self;
+	end
+	def destroy()
+		xsettings_manager_destroy(_self);
+	end
+	def notify
+		xsettings_manager_notify(_self);
+	end
+	def []=(char *name, value)
+		switch(TYPE(value))
+		{
+		case T_NIL:
+		case T_TRUE:
+		case T_FALSE:
+			xsettings_manager_set_int(_self, name, RTEST(value));
+			break;
+		case T_FIXNUM:
+			xsettings_manager_set_int(_self, name, NUM2INT(value));
+			break;
+		case T_STRING:
+			xsettings_manager_set_string(_self, name, StringValuePtr(value));
+			break;
+		case T_ARRAY:
+			if (RARRAY_LEN(value) == 4) {
+				XSettingsColor col;
+				col.red   = NUM2INT(RARRAY_PTR(value)[0]);
+				col.green = NUM2INT(RARRAY_PTR(value)[1]);
+				col.blue  = NUM2INT(RARRAY_PTR(value)[2]);
+				col.alpha = NUM2INT(RARRAY_PTR(value)[3]);
+				xsettings_manager_set_color(_self, name, &col);
+			}
+			break;
+		}
+	end
+end
+end
+

data/ext/xsettings/xsettings.rd

@@ -0,0 +1,16 @@
+= module XSettings
+== class XSettings::Manager
+--- XSettings::Manager.exists?
+
+--- XSettings::Manager__alloc__()
+
+
+--- XSettings::Manager#terminated
+
+--- XSettings::Manager#destroy
+
+--- XSettings::Manager#notify
+
+--- XSettings::Manager#[]=(String name, value)
+
+

data/lib/xsettings.rb

@@ -0,0 +1,4 @@
+require 'xsettings/version'
+require 'xsettings.so'
+
+

data/lib/xsettings/version.rb

@@ -0,0 +1,3 @@
+module XSettings
+  VERSION = "0.0.1"
+end

metadata

@@ -0,0 +1,75 @@
+--- !ruby/object:Gem::Specification
+name: xsettings-ruby
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Geoff Youngs
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-07-22 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rubber-generate
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: 0.0.17
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: 0.0.17
+description: |+
+  XSettings Manager bindings for ruby
+
+  e.g
+  require 'gtk2'
+  require 'xsettings-ruby'
+
+email: git@intersect-uk.co.uk
+executables: []
+extensions:
+- ext/xsettings/extconf.rb
+extra_rdoc_files: []
+files:
+- ext/xsettings/xsettings-common.c
+- ext/xsettings/xsettings-common.h
+- ext/xsettings/xsettings-manager.c
+- ext/xsettings/xsettings-manager.h
+- ext/xsettings/xsettings.c
+- ext/xsettings/xsettings.cr
+- ext/xsettings/xsettings.rd
+- Rakefile
+- README.md
+- lib/xsettings.rb
+- lib/xsettings/version.rb
+- ext/xsettings/extconf.rb
+homepage: http://github.com/geoffyoungs/xsettings-ruby
+licenses: []
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.0.3
+signing_key: 
+specification_version: 4
+summary: xsettings bindings using rubber-generate
+test_files: []