From e062af51f3b2fa5c5539ed6d3173c3a2273e2e3f Mon Sep 17 00:00:00 2001
From: rmalizia44 <rmalizia44@gmail.com>
Date: Wed, 28 Dec 2022 22:27:25 -0300
Subject: [PATCH] Add cdata example

Fix trailing-whitespace and tabs
---
 .../mrbgems/cdata_extension_example/README.md |  3 +
 .../cdata_extension_example/mrbgem.rake       | 23 ++++++
 .../cdata_extension_example/src/example.c     | 77 +++++++++++++++++++
 .../cdata_extension_example/test/example.c    |  7 ++
 4 files changed, 110 insertions(+)
 create mode 100644 examples/mrbgems/cdata_extension_example/README.md
 create mode 100644 examples/mrbgems/cdata_extension_example/mrbgem.rake
 create mode 100644 examples/mrbgems/cdata_extension_example/src/example.c
 create mode 100644 examples/mrbgems/cdata_extension_example/test/example.c

diff --git a/examples/mrbgems/cdata_extension_example/README.md b/examples/mrbgems/cdata_extension_example/README.md
new file mode 100644
index 000000000..1739b63e1
--- /dev/null
+++ b/examples/mrbgems/cdata_extension_example/README.md
@@ -0,0 +1,3 @@
+# C Data Extension Example
+
+This is an example gem which implements a C extension with Data.
diff --git a/examples/mrbgems/cdata_extension_example/mrbgem.rake b/examples/mrbgems/cdata_extension_example/mrbgem.rake
new file mode 100644
index 000000000..b642d0fa7
--- /dev/null
+++ b/examples/mrbgems/cdata_extension_example/mrbgem.rake
@@ -0,0 +1,23 @@
+MRuby::Gem::Specification.new('cdata_extension_example') do |spec|
+  spec.license = 'MIT'
+  spec.author  = 'mruby developers'
+
+  # Add compile flags
+  # spec.cc.flags << '-g'
+
+  # Add cflags to all
+  # spec.mruby.cc.flags << '-g'
+
+  # Add libraries
+  # spec.linker.libraries << 'external_lib'
+
+  # Default build files
+  # spec.rbfiles = Dir.glob("#{dir}/mrblib/*.rb")
+  # spec.objs = Dir.glob("#{dir}/src/*.{c,cpp,m,asm,S}").map { |f| objfile(f.relative_path_from(dir).pathmap("#{build_dir}/%X")) }
+  # spec.test_rbfiles = Dir.glob("#{dir}/test/*.rb")
+  # spec.test_objs = Dir.glob("#{dir}/test/*.{c,cpp,m,asm,S}").map { |f| objfile(f.relative_path_from(dir).pathmap("#{build_dir}/%X")) }
+  # spec.test_preload = 'test/assert.rb'
+
+  # Values accessible as TEST_ARGS inside test scripts
+  # spec.test_args = {'tmp_dir' => Dir::tmpdir}
+end
diff --git a/examples/mrbgems/cdata_extension_example/src/example.c b/examples/mrbgems/cdata_extension_example/src/example.c
new file mode 100644
index 000000000..ac5593e71
--- /dev/null
+++ b/examples/mrbgems/cdata_extension_example/src/example.c
@@ -0,0 +1,77 @@
+#include <mruby.h>
+#include <mruby/string.h>
+#include <mruby/class.h>
+#include <mruby/data.h>
+#include <stdio.h>
+
+static void mrb_foo_free(mrb_state *mrb, void *ptr) {
+  /* custom destructor */
+  mrb_free(mrb, ptr);
+}
+struct mrb_data_type mrb_foo_type = { "Foo", mrb_foo_free };
+
+struct Foo {
+  int bar;
+  char baz[32];
+};
+
+static mrb_value
+mrb_foo_initialize(mrb_state *mrb, mrb_value self)
+{
+  struct Foo *f;
+
+  f = (struct Foo*)mrb_malloc(mrb, sizeof(struct Foo));
+  f->bar = 0;
+
+  DATA_PTR(self) = f;
+  DATA_TYPE(self) = &mrb_foo_type;
+
+  return self;
+}
+
+static mrb_value
+mrb_foo_get_bar(mrb_state *mrb, mrb_value self)
+{
+  struct Foo *f;
+
+  f = (struct Foo*)mrb_data_get_ptr(mrb, self, &mrb_foo_type);
+  if(f == NULL) {
+    mrb_raise(mrb, E_RUNTIME_ERROR, "uninitialized data");
+  }
+
+  return mrb_fixnum_value(f->bar);
+}
+
+static mrb_value
+mrb_foo_set_bar(mrb_state *mrb, mrb_value self)
+{
+  struct Foo *f;
+  int v;
+
+  f = (struct Foo*)mrb_data_get_ptr(mrb, self, &mrb_foo_type);
+  if(f == NULL) {
+    mrb_raise(mrb, E_RUNTIME_ERROR, "uninitialized data");
+  }
+
+  mrb_get_args(mrb, "i", &v);
+
+  f->bar = v;
+
+  return mrb_fixnum_value(f->bar);
+}
+
+void
+mrb_cdata_extension_example_gem_init(mrb_state* mrb) {
+  struct RClass *class_foo;
+
+  class_foo = mrb_define_class(mrb, "Foo", mrb->object_class);
+  MRB_SET_INSTANCE_TT(class_foo, MRB_TT_CDATA);
+  mrb_define_method(mrb, class_foo, "initialize", mrb_foo_initialize, MRB_ARGS_NONE());
+  mrb_define_method(mrb, class_foo, "bar", mrb_foo_get_bar, MRB_ARGS_NONE());
+  mrb_define_method(mrb, class_foo, "bar=", mrb_foo_set_bar, MRB_ARGS_REQ(1));
+}
+
+void
+mrb_cdata_extension_example_gem_final(mrb_state* mrb) {
+  /* gem finalizer */
+}
diff --git a/examples/mrbgems/cdata_extension_example/test/example.c b/examples/mrbgems/cdata_extension_example/test/example.c
new file mode 100644
index 000000000..271de6260
--- /dev/null
+++ b/examples/mrbgems/cdata_extension_example/test/example.c
@@ -0,0 +1,7 @@
+#include <mruby.h>
+
+void
+mrb_cdata_extension_example_gem_test(mrb_state *mrb)
+{
+  /* test initializer in C */
+}