open_image 0.0.1

data/ext/open_image/image.h

@@ -0,0 +1,36 @@
+
+#ifndef RB_OPEN_IMAGE_IMAGE_H
+#define RB_OPEN_IMAGE_IMAGE_H 1
+
+#include "common.h"
+
+void Init_open_image_image(VALUE module);
+static inline void open_image_free(void *data);
+VALUE open_image_alloc(VALUE klass);
+VALUE open_image_initialize(int argc, VALUE *argv, VALUE self);
+VALUE open_image_dispose(VALUE self);
+VALUE open_image_disposed_p(VALUE self);
+
+VALUE open_image_width(VALUE self);
+VALUE open_image_height(VALUE self);
+VALUE open_image_pixels(VALUE self);
+VALUE open_image_ptr(VALUE self);
+
+VALUE open_image_save_png(VALUE self, VALUE path);
+VALUE open_image_save_jpg(int argc, VALUE *argv, VALUE self);
+VALUE open_image_save_tga(VALUE self, VALUE path);
+VALUE open_image_save_bmp(VALUE self, VALUE path);
+
+VALUE open_image_get_pixel(int argc, VALUE *argv, VALUE self);
+VALUE open_image_set_pixel(int argc, VALUE *argv, VALUE self);
+VALUE open_image_fill_rect(int argc, VALUE *argv, VALUE self);
+VALUE open_image_subimage(int argc, VALUE *argv, VALUE self);
+
+VALUE open_image_split(VALUE self, VALUE rows, VALUE columns);
+
+VALUE open_image_size(VALUE self);
+VALUE open_image_rect(VALUE self);
+VALUE open_image_to_s(VALUE self);
+VALUE open_image_dup(VALUE self);
+
+#endif /* RB_OPEN_IMAGE_IMAGE_H */

data/ext/open_image/open_image.c

@@ -0,0 +1,16 @@
+#include "open_image.h"
+
+VALUE rb_mOpenImage;
+VALUE rb_cOpenImage;
+VALUE rb_eOpenImageError;
+
+void Init_open_image(void) {
+    rb_mOpenImage = rb_define_module("OpenImage");
+    rb_eOpenImageError = rb_define_class_under(rb_mOpenImage, "Error", rb_eStandardError);
+
+    Init_open_image_point(rb_mOpenImage);
+    Init_open_image_size(rb_mOpenImage);
+    Init_open_image_rect(rb_mOpenImage);
+    Init_open_image_color(rb_mOpenImage);
+    Init_open_image_image(rb_mOpenImage);
+}

data/ext/open_image/open_image.h

@@ -0,0 +1,10 @@
+#ifndef RB_OPEN_IMAGE_H
+#define RB_OPEN_IMAGE_H 1
+
+#include "image.h"
+#include "point.h"
+#include "size.h"
+#include "rect.h"
+#include "color.h"
+
+#endif /* RB_OPEN_IMAGE_H */

data/ext/open_image/point.c

@@ -0,0 +1,96 @@
+
+#include "point.h"
+
+VALUE rb_cOpenImagePoint;
+
+void Init_open_image_point(VALUE module) {
+    rb_cOpenImagePoint = rb_define_class_under(module, "Point", rb_cObject);
+
+    rb_define_method(rb_cOpenImagePoint, "x", open_image_point_get_x, 0);
+    rb_define_method(rb_cOpenImagePoint, "y", open_image_point_get_y, 0);
+    rb_define_method(rb_cOpenImagePoint, "x=", open_image_point_set_x, 1);
+    rb_define_method(rb_cOpenImagePoint, "y=", open_image_point_set_y, 1);
+
+    rb_define_method(rb_cOpenImagePoint, "to_a", open_image_point_to_a, 0);
+    rb_define_method(rb_cOpenImagePoint, "to_h", open_image_point_to_h, 0);
+    rb_define_method(rb_cOpenImagePoint, "to_s", open_image_point_to_s, 0);
+    rb_define_alias(rb_cOpenImagePoint, "to_str", "to_s");
+    rb_define_method(rb_cOpenImagePoint, "dup", open_image_point_dup, 0);
+}
+
+VALUE open_image_point_alloc(VALUE klass) {
+    Point *point = ALLOC(Point);
+    memset(point, 0, sizeof(Point));
+    RETURN_WRAP_STRUCT(klass, point);
+}
+
+VALUE open_image_point_initialize(int argc, VALUE *argv, VALUE self) {
+    POINT();
+    switch (argc) {
+        case 0:
+            break;
+        case 1: {
+            Size *size;
+            Data_Get_Struct(argv[0], Size, size);
+            point->x = size->width;
+            point->y = size->height;
+        }
+        case 2: {
+            point->x = NUM2INT(argv[0]);
+            point->y = NUM2INT(argv[1]);
+        }
+        default:
+            rb_raise(rb_eArgError, "wrong number of arguments (given %d, expected 0, 1, 2)", argc);
+    }
+    return Qnil;
+}
+
+VALUE open_image_point_get_x(VALUE self) {
+    POINT();
+    return INT2NUM(point->x);
+}
+
+VALUE open_image_point_get_y(VALUE self) {
+    POINT();
+    return INT2NUM(point->y);
+}
+
+VALUE open_image_point_set_x(VALUE self, VALUE value) {
+    POINT();
+    point->x = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_point_set_y(VALUE self, VALUE value) {
+    POINT();
+    point->y = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_point_to_a(VALUE self) {
+    POINT();
+    VALUE ary = rb_ary_new_capa(2);
+    rb_ary_store(ary, 0, INT2NUM(point->x));
+    rb_ary_store(ary, 1, INT2NUM(point->y));
+    return ary;
+}
+
+VALUE open_image_point_to_h(VALUE self) {
+    POINT();
+    VALUE hash = rb_hash_new();
+    rb_hash_aset(hash, STR2SYM("x"), INT2NUM(point->x));
+    rb_hash_aset(hash, STR2SYM("y"), INT2NUM(point->y));
+    return hash;
+}
+
+VALUE open_image_point_to_s(VALUE self) {
+    POINT();
+    return rb_sprintf("<Point: x:%d, y:%d>", point->x, point->y);
+}
+
+VALUE open_image_point_dup(VALUE self) {
+    struct RData *rdata = RDATA(self);
+    Point *clone = ALLOC(Point);
+    memcpy(clone, rdata->data, sizeof(Point));
+    RETURN_WRAP_STRUCT(rdata->basic.klass, clone);
+}

data/ext/open_image/point.h

@@ -0,0 +1,24 @@
+#ifndef OPEN_IMAGE_POINT_H
+#define OPEN_IMAGE_POINT_H 1
+
+#include "common.h"
+
+#define POINT()   \
+    Point *point; \
+    Data_Get_Struct(self, Point, point)
+
+void Init_open_image_point(VALUE module);
+VALUE open_image_point_alloc(VALUE klass);
+VALUE open_image_point_initialize(int argc, VALUE *argv, VALUE self);
+
+VALUE open_image_point_get_x(VALUE self);
+VALUE open_image_point_get_y(VALUE self);
+VALUE open_image_point_set_x(VALUE self, VALUE value);
+VALUE open_image_point_set_y(VALUE self, VALUE value);
+
+VALUE open_image_point_to_a(VALUE self);
+VALUE open_image_point_to_h(VALUE self);
+VALUE open_image_point_to_s(VALUE self);
+VALUE open_image_point_dup(VALUE self);
+
+#endif /* OPEN_IMAGE_POINT_H */

data/ext/open_image/rect.c

@@ -0,0 +1,192 @@
+
+#include "rect.h"
+
+VALUE rb_cOpenImageRect;
+
+#define RECT()  \
+    Rect *rect; \
+    Data_Get_Struct(self, Rect, rect)
+
+void Init_open_image_rect(VALUE module) {
+    rb_cOpenImageRect = rb_define_class_under(module, "Rect", rb_cObject);
+
+    rb_define_method(rb_cOpenImageRect, "x", open_image_rect_get_x, 0);
+    rb_define_method(rb_cOpenImageRect, "y", open_image_rect_get_y, 0);
+    rb_define_method(rb_cOpenImageRect, "width", open_image_rect_get_width, 0);
+    rb_define_method(rb_cOpenImageRect, "height", open_image_rect_get_height, 0);
+    rb_define_method(rb_cOpenImageRect, "x=", open_image_rect_set_x, 1);
+    rb_define_method(rb_cOpenImageRect, "y=", open_image_rect_set_y, 1);
+    rb_define_method(rb_cOpenImageRect, "width=", open_image_rect_set_width, 1);
+    rb_define_method(rb_cOpenImageRect, "height=", open_image_rect_set_height, 1);
+
+    rb_define_method(rb_cOpenImageRect, "location", open_image_rect_get_location, 0);
+    rb_define_method(rb_cOpenImageRect, "size", open_image_rect_get_size, 0);
+    rb_define_method(rb_cOpenImageRect, "location=", open_image_rect_set_location, 1);
+    rb_define_method(rb_cOpenImageRect, "size=", open_image_rect_set_size, 1);
+
+    rb_define_method(rb_cOpenImageRect, "to_a", open_image_rect_to_a, 0);
+    rb_define_method(rb_cOpenImageRect, "to_h", open_image_rect_to_h, 0);
+    rb_define_method(rb_cOpenImageRect, "to_s", open_image_rect_to_s, 0);
+    rb_define_alias(rb_cOpenImageRect, "to_str", "to_s");
+    rb_define_method(rb_cOpenImageRect, "dup", open_image_rect_dup, 0);
+}
+
+VALUE open_image_rect_alloc(VALUE klass) {
+    Rect *rect = ALLOC(Rect);
+    memset(rect, 0, sizeof(Rect));
+    RETURN_WRAP_STRUCT(klass, rect);
+}
+
+VALUE open_image_rect_initialize(int argc, VALUE *argv, VALUE self) {
+    RECT();
+    switch (argc) {
+        case 0:
+            break;
+        case 2: {
+            Point *point;
+            Size *size;
+            Data_Get_Struct(argv[0], Point, point);
+            Data_Get_Struct(argv[1], Size, size);
+            rect->x = point->x;
+            rect->y = point->y;
+            rect->width = size->width;
+            rect->height = size->height;
+        }
+        case 3: {
+            if (FIXNUM_P(argv[0])) {
+                Size *s;
+                Data_Get_Struct(argv[2], Size, s);
+                rect->x = NUM2INT(argv[0]);
+                rect->y = NUM2INT(argv[1]);
+                rect->width = s->width;
+                rect->height = s->height;
+            } else {
+                Point *p;
+                Data_Get_Struct(argv[0], Point, p);
+                rect->x = p->x;
+                rect->y = p->y;
+                rect->width = NUM2INT(argv[1]);
+                rect->height = NUM2INT(argv[2]);
+            }
+        }
+        case 4: {
+            rect->x = NUM2INT(argv[0]);
+            rect->y = NUM2INT(argv[1]);
+            rect->width = NUM2INT(argv[2]);
+            rect->height = NUM2INT(argv[3]);
+        }
+        default:
+            rb_raise(rb_eArgError, "wrong number of arguments (given %d, expected 0, 2, 3, 4)", argc);
+    }
+    return Qnil;
+}
+
+VALUE open_image_rect_get_x(VALUE self) {
+    RECT();
+    return INT2NUM(rect->x);
+}
+
+VALUE open_image_rect_get_y(VALUE self) {
+    RECT();
+    return INT2NUM(rect->y);
+}
+
+VALUE open_image_rect_get_width(VALUE self) {
+    RECT();
+    return INT2NUM(rect->width);
+}
+
+VALUE open_image_rect_get_height(VALUE self) {
+    RECT();
+    return INT2NUM(rect->height);
+}
+
+VALUE open_image_rect_set_x(VALUE self, VALUE value) {
+    RECT();
+    rect->x = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_rect_set_y(VALUE self, VALUE value) {
+    RECT();
+    rect->y = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_rect_set_width(VALUE self, VALUE value) {
+    RECT();
+    rect->width = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_rect_set_height(VALUE self, VALUE value) {
+    RECT();
+    rect->height = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_rect_get_location(VALUE self) {
+    RECT();
+    Point *point = ALLOC(Point);
+    point->x = rect->x;
+    point->y = rect->y;
+    RETURN_WRAP_STRUCT(rb_cOpenImagePoint, point);
+}
+
+VALUE open_image_rect_get_size(VALUE self) {
+    RECT();
+    Size *size = ALLOC(Size);
+    size->width = rect->width;
+    size->height = rect->height;
+    RETURN_WRAP_STRUCT(rb_cOpenImageSize, size);
+}
+
+VALUE open_image_rect_set_location(VALUE self, VALUE value) {
+    RECT();
+    Point *point;
+    Data_Get_Struct(value, Point, point);
+    rect->x = point->x;
+    rect->y = point->y;
+    return value;
+}
+
+VALUE open_image_rect_set_size(VALUE self, VALUE value) {
+    RECT();
+    Size *size;
+    Data_Get_Struct(value, Size, size);
+    rect->width = size->width;
+    rect->height = size->height;
+    return value;
+}
+
+VALUE open_image_rect_to_a(VALUE self) {
+    RECT();
+    VALUE ary = rb_ary_new_capa(4);
+    rb_ary_store(ary, 0, INT2NUM(rect->x));
+    rb_ary_store(ary, 1, INT2NUM(rect->y));
+    rb_ary_store(ary, 2, INT2NUM(rect->width));
+    rb_ary_store(ary, 3, INT2NUM(rect->height));
+    return ary;
+}
+
+VALUE open_image_rect_to_h(VALUE self) {
+    RECT();
+    VALUE hash = rb_hash_new();
+    rb_hash_aset(hash, STR2SYM("x"), INT2NUM(rect->x));
+    rb_hash_aset(hash, STR2SYM("y"), INT2NUM(rect->y));
+    rb_hash_aset(hash, STR2SYM("width"), INT2NUM(rect->width));
+    rb_hash_aset(hash, STR2SYM("height"), INT2NUM(rect->height));
+    return hash;
+}
+
+VALUE open_image_rect_to_s(VALUE self) {
+    RECT();
+    return rb_sprintf("<Rect: x:%d, y:%d, width:%d, height:%d>", rect->x, rect->y, rect->width, rect->height);
+}
+
+VALUE open_image_rect_dup(VALUE self) {
+    struct RData *rdata = RDATA(self);
+    Rect *clone = ALLOC(Rect);
+    memcpy(clone, rdata->data, sizeof(Rect));
+    RETURN_WRAP_STRUCT(rdata->basic.klass, clone);
+}

data/ext/open_image/rect.h

@@ -0,0 +1,29 @@
+#ifndef OPEN_IMAGE_RECT_H
+#define OPEN_IMAGE_RECT_H 1
+
+#include "common.h"
+
+void Init_open_image_rect(VALUE module);
+VALUE open_image_rect_alloc(VALUE klass);
+VALUE open_image_rect_initialize(int argc, VALUE *argv, VALUE self);
+
+VALUE open_image_rect_get_x(VALUE self);
+VALUE open_image_rect_get_y(VALUE self);
+VALUE open_image_rect_get_width(VALUE self);
+VALUE open_image_rect_get_height(VALUE self);
+VALUE open_image_rect_set_x(VALUE self, VALUE value);
+VALUE open_image_rect_set_y(VALUE self, VALUE value);
+VALUE open_image_rect_set_width(VALUE self, VALUE value);
+VALUE open_image_rect_set_height(VALUE self, VALUE value);
+
+VALUE open_image_rect_get_location(VALUE self);
+VALUE open_image_rect_get_size(VALUE self);
+VALUE open_image_rect_set_location(VALUE self, VALUE value);
+VALUE open_image_rect_set_size(VALUE self, VALUE value);
+
+VALUE open_image_rect_to_a(VALUE self);
+VALUE open_image_rect_to_h(VALUE self);
+VALUE open_image_rect_to_s(VALUE self);
+VALUE open_image_rect_dup(VALUE self);
+
+#endif /* OPEN_IMAGE_RECT_H */

data/ext/open_image/size.c

@@ -0,0 +1,100 @@
+
+#include "size.h"
+
+VALUE rb_cOpenImageSize;
+
+#define SIZE()  \
+    Size *size; \
+    Data_Get_Struct(self, Size, size)
+
+void Init_open_image_size(VALUE module) {
+    rb_cOpenImageSize = rb_define_class_under(module, "Size", rb_cObject);
+
+    rb_define_method(rb_cOpenImageSize, "width", open_image_size_get_width, 0);
+    rb_define_method(rb_cOpenImageSize, "height", open_image_size_get_height, 0);
+    rb_define_method(rb_cOpenImageSize, "width=", open_image_size_set_width, 1);
+    rb_define_method(rb_cOpenImageSize, "height=", open_image_size_set_height, 1);
+
+    rb_define_method(rb_cOpenImageSize, "to_a", open_image_size_to_a, 0);
+    rb_define_method(rb_cOpenImageSize, "to_h", open_image_size_to_h, 0);
+    rb_define_method(rb_cOpenImageSize, "to_s", open_image_size_to_s, 0);
+    rb_define_alias(rb_cOpenImageSize, "to_str", "to_s");
+    rb_define_method(rb_cOpenImageSize, "dup", open_image_size_dup, 0);
+}
+
+VALUE open_image_size_alloc(VALUE klass) {
+    Size *size = ALLOC(Size);
+    memset(size, 0, sizeof(Size));
+    RETURN_WRAP_STRUCT(klass, size);
+}
+
+VALUE open_image_size_initialize(int argc, VALUE *argv, VALUE self) {
+    SIZE();
+    switch (argc) {
+        case 0:
+            break;
+        case 1: {
+            Point *point;
+            Data_Get_Struct(argv[0], Point, point);
+            size->width = point->x;
+            size->height = point->y;
+        }
+        case 2: {
+            size->width = NUM2INT(argv[0]);
+            size->height = NUM2INT(argv[1]);
+        }
+        default:
+            rb_raise(rb_eArgError, "wrong number of arguments (given %d, expected 0, 1, 2)", argc);
+    }
+    return Qnil;
+}
+
+VALUE open_image_size_get_width(VALUE self) {
+    SIZE();
+    return INT2NUM(size->width);
+}
+
+VALUE open_image_size_get_height(VALUE self) {
+    SIZE();
+    return INT2NUM(size->height);
+}
+
+VALUE open_image_size_set_width(VALUE self, VALUE value) {
+    SIZE();
+    size->width = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_size_set_height(VALUE self, VALUE value) {
+    SIZE();
+    size->height = NUM2INT(value);
+    return value;
+}
+
+VALUE open_image_size_to_a(VALUE self) {
+    SIZE();
+    VALUE ary = rb_ary_new_capa(2);
+    rb_ary_store(ary, 0, INT2NUM(size->width));
+    rb_ary_store(ary, 1, INT2NUM(size->height));
+    return ary;
+}
+
+VALUE open_image_size_to_h(VALUE self) {
+    SIZE();
+    VALUE hash = rb_hash_new();
+    rb_hash_aset(hash, STR2SYM("width"), INT2NUM(size->width));
+    rb_hash_aset(hash, STR2SYM("height"), INT2NUM(size->height));
+    return hash;
+}
+
+VALUE open_image_size_to_s(VALUE self) {
+    SIZE();
+    return rb_sprintf("<Size: width:%d, height:%d>", size->width, size->height);
+}
+
+VALUE open_image_size_dup(VALUE self) {
+    struct RData *rdata = RDATA(self);
+    Size *clone = ALLOC(Size);
+    memcpy(clone, rdata->data, sizeof(Size));
+    RETURN_WRAP_STRUCT(rdata->basic.klass, clone);
+}