include_any 0.0.1

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in include_any.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2012 J. Andrew Marshall <http://johnandrewmarshall.com>
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,65 @@
+# IncludeAny
+
+Allows including any object, not just modules. Of course, this is just in
+theory—see “Bugs & Caveats” below.
+
+## Installation
+
+Simply run
+
+    $ gem install include_any
+
+or include it in your Gemfile as usual.
+
+## Usage
+
+The method of interest here is `IncludeAny.include_any`. By default this is not
+mixed-in anywhere, but doing
+
+    require 'include_any/core_ext'
+
+will `include IncludeAny` into `Class` and `Module`.
+
+Then we can get going:
+
+    class C
+      def foo
+        'bar!'
+      end
+    end
+
+    class D
+      include_any C
+    end
+
+    D.ancestors
+    #=> [C, Object, Kernel, BasicObject]
+
+    D.new.f
+    #=> "bar!"
+
+Well would you look at that! We’ve included a `Class`. Magical!
+
+## Bugs & Caveats
+
+Use at your own risk, kids.
+
+- Currently seg faults if passed anything but a `Class` or `Module`. It should
+  accept (most) any object.
+- Will probably fail to install or seg fault under anything but MRI 1.9.3
+
+## Contributing
+
+Patches and improvements welcome. Especially if they fix a seg fault. Note that
+there is no intention to support Ruby 1.8.
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request
+
+## Credits
+
+© 2012 J. Andrew Marshall. All rights reserved. See the LICENSE file for more
+information.

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/ext/include_any/extconf.rb

@@ -0,0 +1,6 @@
+require 'mkmf'
+
+$CFLAGS += ' -std=c99 -Wall -pedantic '
+
+ext_name = 'include_any/include_any'
+create_makefile(ext_name)

data/ext/include_any/include_any.c

@@ -0,0 +1,112 @@
+#include <ruby.h>
+#include "include_any.h"
+
+#define KLASS_OF(c) (RBASIC(c)->klass)
+#define RCLASS_EXT(c) (RCLASS(c)->ptr)
+#define RCLASS_SUPER(c) (RCLASS_EXT(c)->super)
+#define RCLASS_IV_TBL(c) (RCLASS_EXT(c)->iv_tbl)
+#define RCLASS_CONST_TBL(c) (RCLASS_EXT(c)->const_tbl)
+#define RCLASS_M_TBL(c) (RCLASS(c)->m_tbl)
+#define RCLASS_IV_INDEX_TBL(c) (RCLASS(c)->iv_index_tbl)
+
+struct rb_classext_struct {
+    VALUE super;
+    struct st_table *iv_tbl;
+    struct st_table *const_tbl;
+};
+
+static VALUE
+class_alloc(VALUE flags, VALUE klass)
+{
+    rb_classext_t *ext = ALLOC(rb_classext_t);
+    NEWOBJ(obj, struct RClass);
+    OBJSETUP(obj, klass, flags);
+    obj->ptr = ext;
+    RCLASS_IV_TBL(obj) = 0;
+    RCLASS_CONST_TBL(obj) = 0;
+    RCLASS_M_TBL(obj) = 0;
+    RCLASS_SUPER(obj) = 0;
+    RCLASS_IV_INDEX_TBL(obj) = 0;
+    return (VALUE)obj;
+}
+
+static VALUE
+include_class_new(VALUE module, VALUE super)
+{
+    VALUE klass = class_alloc(T_ICLASS, rb_cClass);
+
+    if (BUILTIN_TYPE(module) == T_ICLASS) {
+	module = RBASIC(module)->klass;
+    }
+    if (!RCLASS_IV_TBL(module)) {
+	RCLASS_IV_TBL(module) = st_init_numtable();
+    }
+    if (!RCLASS_CONST_TBL(module)) {
+	RCLASS_CONST_TBL(module) = st_init_numtable();
+    }
+    RCLASS_IV_TBL(klass) = RCLASS_IV_TBL(module);
+    RCLASS_CONST_TBL(klass) = RCLASS_CONST_TBL(module);
+    RCLASS_M_TBL(klass) = RCLASS_M_TBL(module);
+    RCLASS_SUPER(klass) = super;
+    if (TYPE(module) == T_ICLASS) {
+	RBASIC(klass)->klass = RBASIC(module)->klass;
+    }
+    else {
+	RBASIC(klass)->klass = module;
+    }
+    OBJ_INFECT(klass, module);
+    OBJ_INFECT(klass, super);
+
+    return (VALUE)klass;
+}
+
+VALUE rb_include_any(VALUE klass, VALUE module)
+{
+    VALUE p, c;
+    int changed = 0;
+
+    rb_frozen_class_p(klass);
+    if (!OBJ_UNTRUSTED(klass)) {
+        rb_secure(4);
+    }
+
+    OBJ_INFECT(klass, module);
+    c = klass;
+    while (module) {
+        int superclass_seen = 0;
+
+        if (RCLASS_M_TBL(klass) == RCLASS_M_TBL(module))
+            rb_raise(rb_eArgError, "cyclic include detected");
+        /* ignore if the module included already in superclasses */
+        for (p = RCLASS_SUPER(klass); p; p = RCLASS_SUPER(p)) {
+            switch (BUILTIN_TYPE(p)) {
+              case T_ICLASS:
+                if (RCLASS_M_TBL(p) == RCLASS_M_TBL(module)) {
+                    if (!superclass_seen) {
+                        c = p;  /* move insertion point */
+                    }
+                    goto skip;
+                }
+                break;
+              case T_CLASS:
+                superclass_seen = 1;
+                break;
+            }
+        }
+        c = RCLASS_SUPER(c) = include_class_new(module, RCLASS_SUPER(c));
+        if (RMODULE_M_TBL(module) && RMODULE_M_TBL(module)->num_entries)
+            changed = 1;
+      skip:
+        module = RCLASS_SUPER(module);
+    }
+    if (changed) rb_clear_cache();
+
+    return Qnil;
+}
+
+VALUE mIncludeAny;
+
+void Init_include_any() {
+  mIncludeAny = rb_define_module("IncludeAny");
+  rb_define_method(mIncludeAny, "include_any", rb_include_any, 1);
+}

data/ext/include_any/include_any.h

@@ -0,0 +1,6 @@
+#ifndef JAM_INCLUDE_ANY
+#define JAM_INCLUDE_ANY
+
+void Init_include_any(void);
+
+#endif

data/include_any.gemspec

@@ -0,0 +1,20 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'include_any/version'
+
+Gem::Specification.new do |gem|
+  gem.name          = "include_any"
+  gem.version       = IncludeAny::VERSION
+  gem.authors       = ["Andrew Marshall"]
+  gem.email         = ["andrew@johnandrewmarshall.com"]
+  gem.description   = %q{Allows including any object}
+  gem.summary       = %q{Allows including any object}
+  gem.homepage      = "http://johnandrewmarshall.com/projects/include_any"
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ["lib"]
+  gem.extensions    = ['ext/include_any/extconf.rb']
+end

data/lib/include_any/core_ext.rb

@@ -0,0 +1,9 @@
+require 'include_any'
+
+class Class
+  include IncludeAny
+end
+
+class Module
+  include IncludeAny
+end

data/lib/include_any/version.rb

@@ -0,0 +1,3 @@
+module IncludeAny
+  VERSION = '0.0.1'
+end

data/lib/include_any.rb

@@ -0,0 +1,2 @@
+require 'include_any/version'
+require 'include_any/include_any'

metadata

@@ -0,0 +1,59 @@
+--- !ruby/object:Gem::Specification
+name: include_any
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Andrew Marshall
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-10-19 00:00:00.000000000 Z
+dependencies: []
+description: Allows including any object
+email:
+- andrew@johnandrewmarshall.com
+executables: []
+extensions:
+- ext/include_any/extconf.rb
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- ext/include_any/extconf.rb
+- ext/include_any/include_any.c
+- ext/include_any/include_any.h
+- include_any.gemspec
+- lib/include_any.rb
+- lib/include_any/core_ext.rb
+- lib/include_any/version.rb
+homepage: http://johnandrewmarshall.com/projects/include_any
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.24
+signing_key: 
+specification_version: 3
+summary: Allows including any object
+test_files: []
+has_rdoc: