texplay 0.2.800 → 0.2.900

data/ext/texplay/object2module.h

@@ -1,11 +1,11 @@
-/* object2module.h */
-
-#ifndef GUARD_OBJECT2MODULE_H
-#define GUARD_OBJECT2MODULE_H
-        
-VALUE rb_gen_include(int argc, VALUE * argv, VALUE self);
-VALUE rb_gen_extend(int argc, VALUE * argv, VALUE self);
-VALUE rb_to_module(VALUE self);
-VALUE rb_reset_tbls(VALUE self);
-
-#endif
+/* object2module.h */
+
+#ifndef GUARD_OBJECT2MODULE_H
+#define GUARD_OBJECT2MODULE_H
+        
+VALUE rb_gen_include(int argc, VALUE * argv, VALUE self);
+VALUE rb_gen_extend(int argc, VALUE * argv, VALUE self);
+VALUE rb_to_module(VALUE self);
+VALUE rb_reset_tbls(VALUE self);
+
+#endif

data/ext/texplay/texplay.c

@@ -1,169 +1,169 @@
-/* texplay.c, light-weight alternative to rmagick for ruby */
-/* (C) John Mair 2009
- * This program is distributed under the terms of the MIT License
- *                                                                */
-
-#include <ruby.h>
-#include <stdio.h>
-#include <time.h>
-#include "texplay.h"
-#include "actions.h"
-#include "utils.h"
-#include "bindings.h"
-#include "object2module.h"
-#include "gen_eval.h"
-#ifdef __APPLE__
-# include <glut.h>
-#else
-# include <GL/glut.h>
-#endif
-
-
-/* setup ruby bindings */
-
-/** constructor for TPPoint class **/
-static VALUE m_init_TPPoint(int argc, VALUE * argv, VALUE self);
-static void monkey_patch_gosu(void);
-
-void
-Init_texplay() {
-
-    VALUE jm_Module = rb_define_module("TexPlay");
-    VALUE TPPoint = rb_define_class_under(jm_Module, "TPPoint", rb_cObject);
-
-    /** define basic point class TPPoint **/
-    rb_attr(TPPoint, rb_intern("x"), 1, 1, Qtrue);
-    rb_attr(TPPoint, rb_intern("y"), 1, 1, Qtrue);
-    rb_define_method(TPPoint, "initialize", m_init_TPPoint, -1);
-    /** end of TPPoint definition **/
-
-    /* TexPlay methods */
-    rb_define_method(jm_Module, "paint", m_paint, -1);
-    rb_define_method(jm_Module, "get_pixel", m_getpixel, -1);
-    rb_define_method(jm_Module, "circle", m_circle, -1);
-    rb_define_method(jm_Module, "line", m_line, -1);
-    rb_define_method(jm_Module, "rect", m_rect, -1);
-    rb_define_method(jm_Module, "clear", m_clear, -1);
-    rb_define_method(jm_Module, "pixel", m_pixel, -1);
-    rb_define_method(jm_Module, "fill", m_flood_fill, -1);
-    rb_define_method(jm_Module, "bezier", m_bezier, -1);
-    rb_define_method(jm_Module, "polyline", m_polyline, -1);
-    rb_define_method(jm_Module, "ngon", m_ngon, -1);
-    
-    rb_define_method(jm_Module, "splice", m_splice, -1);
-    
-    rb_define_method(jm_Module, "color", m_color, -1);
-    rb_define_method(jm_Module, "offset", m_offset, -1);
-    rb_define_method(jm_Module, "method_missing", m_missing, -1);
-    rb_define_method(jm_Module, "quad_cached?", m_quad_cached, 0);
-
-    rb_define_method(jm_Module, "each", m_each, -1);
-    
-    /* needs to be updated, not yet done **/
-    /* rb_define_method(jm_Module, "bitmask", m_bitmask, -1); */
-    /* rb_define_method(jm_Module, "leftshift", m_lshift, -1); */
-    /* rb_define_method(jm_Module, "rightshift", m_rshift, -1); */
-    /* rb_define_method(jm_Module, "[]=", m_special_pixel, -1); */
-
-    rb_define_method(jm_Module, "dup", m_dup_image, 0);
-    rb_define_method(jm_Module, "clone", m_clone_image, 0);
-    rb_define_method(jm_Module, "to_blob", m_to_blob, 0);
-    rb_define_method(jm_Module, "force_sync", m_force_sync, 1);
-    rb_define_method(jm_Module, "set_options", m_user_set_options, 1);
-    rb_define_method(jm_Module, "get_options", m_get_options, 0);
-    rb_define_method(jm_Module, "delete_options", m_user_delete_options, 0);
-
-    rb_define_method(jm_Module, "refresh_cache", m_cache_refresh, 0);
-    
-    /* a constant containing the sidelength of largest allowable quad */
-    rb_define_const(jm_Module, "TP_MAX_QUAD_SIZE", INT2FIX(max_quad_size() - 2));
-
-    /* singleton method for creating & removing macros */
-    rb_define_singleton_method(jm_Module, "create_macro", M_create_macro, 1);
-    rb_define_singleton_method(jm_Module, "remove_macro", M_remove_macro, 1);
-    rb_define_singleton_method(jm_Module, "refresh_cache_all", M_refresh_cache_all, 0);
-    rb_define_singleton_method(jm_Module, "create_blank_image", M_create_blank, 3);
-
-    /** aliases; must be made on singleton class because we're using class methods **/
-    rb_define_method(jm_Module, "box", m_rect, -1);
-    rb_define_method(jm_Module, "colour", m_color, -1);
-    rb_define_method(jm_Module, "composite", m_splice, -1);
-    rb_define_method(jm_Module, "set_pixel", m_pixel, -1);
-    rb_define_method(jm_Module, "[]", m_getpixel, 2);
-    /** end of aliases **/
-
-    /** associated with gen_eval **/
-    rb_define_method(rb_cObject, "gen_eval", rb_gen_eval, -1);
-    rb_define_method(rb_cObject, "capture", rb_capture, 0);
-    
-    rb_define_method(rb_cObject, "to_module", rb_to_module , 0);
-    rb_define_method(rb_cObject, "reset_tbls", rb_reset_tbls , 0);
-    rb_define_method(rb_cObject, "gen_extend", rb_gen_extend, -1);
-    rb_define_method(rb_cModule, "gen_include", rb_gen_include, -1);
-
-    rb_define_alias(rb_cObject, "gen_eval_with", "gen_eval");
-    /** end of gen_eval defs **/
-
-
-    /** basic setup **/
-
-    /* seed the random number generator */
-    srand(time(NULL));
-
-    monkey_patch_gosu();
-    /** end basic setup **/
-}
-
-/** constructor for TPPoint class **/
-static VALUE
-m_init_TPPoint(int argc, VALUE * argv, VALUE self)
-{
-    if(argc == 0) {
-        rb_iv_set(self, "@x", INT2FIX(0));
-        rb_iv_set(self, "@y", INT2FIX(0));
-    }
-    else if(argc == 2){
-        if(is_a_num(argv[0]) && is_a_num(argv[1])) {
-            rb_iv_set(self, "@x", argv[0]);
-            rb_iv_set(self, "@y", argv[1]);
-        }
-        else
-            rb_raise(rb_eArgError, "must provide two numbers");
-    }
-    else
-        rb_raise(rb_eArgError, "please provide x and y args only");
-
-    return Qnil;
-    
-}
-/** end constructor for TPPoint **/
-
-
-static VALUE
-gosu_window_to_blob(VALUE self)
-{
-    int width, height;
-    VALUE blob;
-
-    width = rb_funcall(self, rb_intern("width"), 0);
-    height = rb_funcall(self, rb_intern("height"), 0);
-
-    blob = rb_str_new(NULL, 4 * width * height);
-
-    glReadPixels(0, 0, width, height, GL_RGBA, GL_UNSIGNED_BYTE, RSTRING_PTR(blob));
-
-    return blob;
-}
-
-static void
-monkey_patch_gosu(void)
-{
-    VALUE Gosu = rb_const_get(rb_cObject, rb_intern("Gosu"));
-    VALUE GosuWindow = rb_const_get(Gosu, rb_intern("Window"));
-    
-    rb_define_method(GosuWindow, "to_blob", gosu_window_to_blob, 0);
-}    
-
-
-
-
+/* texplay.c, light-weight alternative to rmagick for ruby */
+/* (C) John Mair 2009
+ * This program is distributed under the terms of the MIT License
+ *                                                                */
+
+#include <ruby.h>
+#include <stdio.h>
+#include <time.h>
+#include "texplay.h"
+#include "actions.h"
+#include "utils.h"
+#include "bindings.h"
+#include "object2module.h"
+#include "gen_eval.h"
+#ifdef __APPLE__
+# include <glut.h>
+#else
+# include <GL/glut.h>
+#endif
+
+
+/* setup ruby bindings */
+
+/** constructor for TPPoint class **/
+static VALUE m_init_TPPoint(int argc, VALUE * argv, VALUE self);
+static void monkey_patch_gosu(void);
+
+void
+Init_texplay() {
+
+    VALUE jm_Module = rb_define_module("TexPlay");
+    VALUE TPPoint = rb_define_class_under(jm_Module, "TPPoint", rb_cObject);
+
+    /** define basic point class TPPoint **/
+    rb_attr(TPPoint, rb_intern("x"), 1, 1, Qtrue);
+    rb_attr(TPPoint, rb_intern("y"), 1, 1, Qtrue);
+    rb_define_method(TPPoint, "initialize", m_init_TPPoint, -1);
+    /** end of TPPoint definition **/
+
+    /* TexPlay methods */
+    rb_define_method(jm_Module, "paint", m_paint, -1);
+    rb_define_method(jm_Module, "get_pixel", m_getpixel, -1);
+    rb_define_method(jm_Module, "circle", m_circle, -1);
+    rb_define_method(jm_Module, "line", m_line, -1);
+    rb_define_method(jm_Module, "rect", m_rect, -1);
+    rb_define_method(jm_Module, "clear", m_clear, -1);
+    rb_define_method(jm_Module, "pixel", m_pixel, -1);
+    rb_define_method(jm_Module, "fill", m_flood_fill, -1);
+    rb_define_method(jm_Module, "bezier", m_bezier, -1);
+    rb_define_method(jm_Module, "polyline", m_polyline, -1);
+    rb_define_method(jm_Module, "ngon", m_ngon, -1);
+    
+    rb_define_method(jm_Module, "splice", m_splice, -1);
+    
+    rb_define_method(jm_Module, "color", m_color, -1);
+    rb_define_method(jm_Module, "offset", m_offset, -1);
+    rb_define_method(jm_Module, "method_missing", m_missing, -1);
+    rb_define_method(jm_Module, "quad_cached?", m_quad_cached, 0);
+
+    rb_define_method(jm_Module, "each", m_each, -1);
+    
+    /* needs to be updated, not yet done **/
+    /* rb_define_method(jm_Module, "bitmask", m_bitmask, -1); */
+    /* rb_define_method(jm_Module, "leftshift", m_lshift, -1); */
+    /* rb_define_method(jm_Module, "rightshift", m_rshift, -1); */
+    /* rb_define_method(jm_Module, "[]=", m_special_pixel, -1); */
+
+    rb_define_method(jm_Module, "dup", m_dup_image, 0);
+    rb_define_method(jm_Module, "clone", m_clone_image, 0);
+    rb_define_method(jm_Module, "to_blob", m_to_blob, 0);
+    rb_define_method(jm_Module, "force_sync", m_force_sync, 1);
+    rb_define_method(jm_Module, "set_options", m_user_set_options, 1);
+    rb_define_method(jm_Module, "get_options", m_get_options, 0);
+    rb_define_method(jm_Module, "delete_options", m_user_delete_options, 0);
+
+    rb_define_method(jm_Module, "refresh_cache", m_cache_refresh, 0);
+    
+    /* a constant containing the sidelength of largest allowable quad */
+    rb_define_const(jm_Module, "TP_MAX_QUAD_SIZE", INT2FIX(max_quad_size() - 2));
+
+    /* singleton method for creating & removing macros */
+    rb_define_singleton_method(jm_Module, "create_macro", M_create_macro, 1);
+    rb_define_singleton_method(jm_Module, "remove_macro", M_remove_macro, 1);
+    rb_define_singleton_method(jm_Module, "refresh_cache_all", M_refresh_cache_all, 0);
+    /* rb_define_singleton_method(jm_Module, "create_blank_image", M_create_blank, 3); */
+
+    /** aliases; must be made on singleton class because we're using class methods **/
+    rb_define_method(jm_Module, "box", m_rect, -1);
+    rb_define_method(jm_Module, "colour", m_color, -1);
+    rb_define_method(jm_Module, "composite", m_splice, -1);
+    rb_define_method(jm_Module, "set_pixel", m_pixel, -1);
+    rb_define_method(jm_Module, "[]", m_getpixel, 2);
+    /** end of aliases **/
+
+    /** associated with gen_eval **/
+    rb_define_method(rb_cObject, "gen_eval", rb_gen_eval, -1);
+    rb_define_method(rb_cObject, "capture", rb_capture, 0);
+    
+    rb_define_method(rb_cObject, "to_module", rb_to_module , 0);
+    rb_define_method(rb_cObject, "reset_tbls", rb_reset_tbls , 0);
+    rb_define_method(rb_cObject, "gen_extend", rb_gen_extend, -1);
+    rb_define_method(rb_cModule, "gen_include", rb_gen_include, -1);
+
+    rb_define_alias(rb_cObject, "gen_eval_with", "gen_eval");
+    /** end of gen_eval defs **/
+
+
+    /** basic setup **/
+
+    /* seed the random number generator */
+    srand(time(NULL));
+
+    monkey_patch_gosu();
+    /** end basic setup **/
+}
+
+/** constructor for TPPoint class **/
+static VALUE
+m_init_TPPoint(int argc, VALUE * argv, VALUE self)
+{
+    if(argc == 0) {
+        rb_iv_set(self, "@x", INT2FIX(0));
+        rb_iv_set(self, "@y", INT2FIX(0));
+    }
+    else if(argc == 2){
+        if(is_a_num(argv[0]) && is_a_num(argv[1])) {
+            rb_iv_set(self, "@x", argv[0]);
+            rb_iv_set(self, "@y", argv[1]);
+        }
+        else
+            rb_raise(rb_eArgError, "must provide two numbers");
+    }
+    else
+        rb_raise(rb_eArgError, "please provide x and y args only");
+
+    return Qnil;
+    
+}
+/** end constructor for TPPoint **/
+
+
+static VALUE
+gosu_window_to_blob(VALUE self)
+{
+    int width, height;
+    VALUE blob;
+
+    width = rb_funcall(self, rb_intern("width"), 0);
+    height = rb_funcall(self, rb_intern("height"), 0);
+
+    blob = rb_str_new(NULL, 4 * width * height);
+
+    glReadPixels(0, 0, width, height, GL_RGBA, GL_UNSIGNED_BYTE, RSTRING_PTR(blob));
+
+    return blob;
+}
+
+static void
+monkey_patch_gosu(void)
+{
+    VALUE Gosu = rb_const_get(rb_cObject, rb_intern("Gosu"));
+    VALUE GosuWindow = rb_const_get(Gosu, rb_intern("Window"));
+    
+    rb_define_method(GosuWindow, "to_blob", gosu_window_to_blob, 0);
+}    
+
+
+
+

data/ext/texplay/texplay.h

@@ -1,130 +1,147 @@
-/* texplay.h (C) John Mair 2008 
- * This program is distributed under the terms of the MIT License
- *   
- *            
- *                                                   */
-
-#ifndef GUARD_TEXPLAY_H
-#define GUARD_TEXPLAY_H
-
-#include <ruby.h>
-
-/* #defines */
-#define OOB_VAL 9999
-#define XMAX_OOB OOB_VAL
-#define YMAX_OOB OOB_VAL
-#define XMIN_OOB -OOB_VAL
-#define YMIN_OOB -OOB_VAL
-
-#define PI 3.14159265358979
-
-/* macros */
-#define SWAP(X, Y)  {(X) ^= (Y); (Y) ^= (X); (X) ^= (Y);} 
-#define ROUND(X) (int)((X) + 0.5)
-#define ARY_SIZE(X) sizeof(X) / sizeof(*X)
-#define SGN(X) ((X) >= 0 ? 1 : -1)
-#define MAX(X, Y) ((X) > (Y)) ? (X) :(Y)
-#define MIN(X, Y) ((X) < (Y)) ? (X) : (Y)
-#define ABS(X) ((X) >= 0 ? (X) : -(X))
-
-/* enums */
-typedef enum e_bool {
-    false, true
-} bool;
-
-typedef enum e_color {
-    red, green, blue, alpha
-} color_t;
-
-typedef enum e_sync_mode {
-    lazy_sync, eager_sync, no_sync
-} sync;
-
-typedef enum {
-  clear, copy, noop,
-  set, copy_inverted,
-  invert, and_reverse, and,
-  or, nand, nor, xor,
-  equiv, and_inverted,
-  or_inverted, additive,
-  multiply, screen, overlay,
-  darken, lighten, colordodge,
-  colorburn, hardlight, softlight,
-  difference, exclusion
-} draw_mode;
-
-/* structs */
-typedef struct s_rgba {
-    float red, green, blue, alpha;
-} rgba;
-
-/* stores image data */
-typedef struct {
-    int width, height;    
-    float top, left;    
-    int tname;
-    float * td_array;
-    int yincr, firstpixel;
-    int x_offset, y_offset;
-    VALUE image;
-} texture_info;
-
-
-/* convenience macro */
-#define IMAGE_BOUNDS(X) ((image_bounds *) (X))
-typedef struct {
-    int xmin;
-    int ymin;
-    int xmax;
-    int ymax;
-} image_bounds;
-
-
-typedef struct action_struct {
-    int xmin, ymin, xmax, ymax;
-    sync sync_mode;
-
-    /* pointer to associated texture */
-    /* a bit of a kludge having this here
-       since it's only being used by convert_image_local_color_to_rgba */
-    texture_info * tex;
-    
-    VALUE hash_arg;
-
-    /* action color */
-    rgba color;
-
-    /* pen data */
-    struct {
-
-        /* color control, dynamic */
-        bool has_color_control_proc;
-        VALUE color_control_proc;
-        int color_control_arity;
-
-        /* color control, static */
-        bool has_color_control_transform;
-        rgba color_mult;
-        rgba color_add;
-
-        /* texture fill */
-        bool has_source_texture;
-        texture_info source_tex;
-
-        /* lerp */
-        bool has_lerp;
-        float lerp;
-
-        /* alpha blend */
-        bool alpha_blend;
-
-        /* drawing mode */
-        bool has_drawing_mode;
-        draw_mode drawing_mode;
-      
-    } pen;
-
-} action_struct;
-
-
-#endif
+/* texplay.h (C) John Mair 2008 
+ * This program is distributed under the terms of the MIT License
+ *   
+ *            
+ *                                                   */
+
+#ifndef GUARD_TEXPLAY_H
+#define GUARD_TEXPLAY_H
+
+#include <ruby.h>
+
+/* #defines */
+#define OOB_VAL 9999
+#define XMAX_OOB OOB_VAL
+#define YMAX_OOB OOB_VAL
+#define XMIN_OOB -OOB_VAL
+#define YMIN_OOB -OOB_VAL
+#define RGBA_LIST_SIZE 100
+#define PI 3.14159265358979
+
+/* macros */
+#define SWAP(X, Y)  {(X) ^= (Y); (Y) ^= (X); (X) ^= (Y);} 
+#define ROUND(X) (int)((X) + 0.5)
+#define ARY_SIZE(X) sizeof(X) / sizeof(*X)
+#define SGN(X) ((X) >= 0 ? 1 : -1)
+#define MAX(X, Y) ((X) > (Y)) ? (X) :(Y)
+#define MIN(X, Y) ((X) < (Y)) ? (X) : (Y)
+#define ABS(X) ((X) >= 0 ? (X) : -(X))
+
+/* enums */
+typedef enum e_bool {
+    false, true
+} bool;
+
+typedef enum e_color {
+    red, green, blue, alpha
+} color_t;
+
+typedef enum e_sync_mode {
+    lazy_sync, eager_sync, no_sync
+} sync;
+
+
+typedef enum {
+  clear, copy, noop,
+  set, copy_inverted,
+  invert, and_reverse, and,
+  or, nand, nor, xor,
+  equiv, and_inverted,
+  or_inverted, additive,
+  multiply, screen, overlay,
+  darken, lighten, color_dodge,
+  color_burn, hard_light, soft_light,
+  difference, exclusion
+} draw_mode;
+
+/* structs */
+typedef struct s_rgba {
+    float red, green, blue, alpha;
+} rgba;
+
+typedef struct {
+  rgba colors[RGBA_LIST_SIZE];
+  int size;
+} rgba_list;  
+
+
+/* stores image data */
+typedef struct {
+    int width, height;    
+    float top, left;    
+    int tname;
+    float * td_array;
+    int yincr, firstpixel;
+    int x_offset, y_offset;
+    VALUE image;
+} texture_info;
+
+
+/* convenience macro */
+#define IMAGE_BOUNDS(X) ((image_bounds *) (X))
+typedef struct {
+    int xmin;
+    int ymin;
+    int xmax;
+    int ymax;
+} image_bounds;
+
+
+typedef struct action_struct {
+    int xmin, ymin, xmax, ymax;
+    sync sync_mode;
+
+    /* pointer to associated texture */
+    /* a bit of a kludge having this here
+       since it's only being used by convert_image_local_color_to_rgba */
+    texture_info * tex;
+    
+    VALUE hash_arg;
+
+    /* action color */
+    rgba color;
+
+    /* pen data */
+    struct {
+
+        /* color control, dynamic */
+        bool has_color_control_proc;
+        VALUE color_control_proc;
+        int color_control_arity;
+
+        /* color control, static */
+        bool has_color_control_transform;
+        rgba color_mult;
+        rgba color_add;
+
+        /* texture fill */
+        bool has_source_texture;
+        texture_info source_tex;
+
+        /* lerp */
+        bool has_lerp;
+        float lerp;
+
+        /* alpha blend */
+        bool alpha_blend;
+
+        /* drawing mode */
+        bool has_drawing_mode;
+        draw_mode drawing_mode;
+
+        
+
+        /* color selection */
+      
+        bool has_color_select;
+        rgba_list source_select;
+        rgba_list source_ignore;
+        rgba_list dest_select;
+        rgba_list dest_ignore;
+      
+    } pen;
+
+} action_struct;
+
+
+#endif