rake-builder 0.0.19 → 0.7.0

data/examples/04_zlib/vendor/bundle/gems/debugger-1.2.4/ext/ruby_debug/ruby_debug.h

@@ -0,0 +1,148 @@
+/* Context info */
+enum ctx_stop_reason {CTX_STOP_NONE, CTX_STOP_STEP, CTX_STOP_BREAKPOINT, 
+		      CTX_STOP_CATCHPOINT};
+
+/* Context flags */
+#define CTX_FL_SUSPEND      (1<<1)
+#define CTX_FL_TRACING      (1<<2)
+#define CTX_FL_SKIPPED      (1<<3)
+#define CTX_FL_IGNORE       (1<<4)
+#define CTX_FL_DEAD         (1<<5)
+#define CTX_FL_WAS_RUNNING  (1<<6)
+#define CTX_FL_ENABLE_BKPT  (1<<7)
+#define CTX_FL_STEPPED      (1<<8)
+#define CTX_FL_FORCE_MOVE   (1<<9)
+#define CTX_FL_CATCHING     (1<<10)
+
+#define CTX_FL_TEST(c,f)  ((c)->flags & (f))
+#define CTX_FL_SET(c,f)   do { (c)->flags |= (f); } while (0)
+#define CTX_FL_UNSET(c,f) do { (c)->flags &= ~(f); } while (0)
+
+typedef struct {
+    struct iseq_catch_table_entry tmp_catch_table;
+    struct iseq_catch_table_entry *old_catch_table;
+    int old_catch_table_size;
+    VALUE mod_name;
+    VALUE errinfo;
+} debug_catch_t;
+
+typedef struct {
+    struct rb_iseq_struct *iseq;
+    struct iseq_catch_table_entry *catch_table;
+    int catch_table_size;
+} iseq_catch_t;
+
+typedef struct {
+    int argc;         /* Number of arguments a frame should have. */
+    VALUE binding;
+    ID id;
+    ID orig_id;
+    int line;
+    const char * file;
+    short dead;
+    VALUE self;
+    VALUE arg_ary;
+    union {
+        struct {
+			rb_control_frame_t *cfp;
+			VALUE *bp;
+			struct rb_iseq_struct *block_iseq;
+			VALUE *block_pc;
+            VALUE *last_pc;
+        } runtime;
+        struct {
+            VALUE args;
+            VALUE locals;
+	        VALUE arg_ary;
+        } copy;
+    } info;
+} debug_frame_t;
+
+typedef struct {
+    VALUE thread_id;
+    int thnum;
+    int flags;
+    enum ctx_stop_reason stop_reason;
+    int stop_next;
+    int dest_frame;
+    int stop_line;
+    int stop_frame;
+    int stack_size;
+    int stack_len;
+    debug_frame_t *frames;
+    const char * last_file;
+    int last_line;
+    VALUE breakpoint;
+    debug_catch_t catch_table;
+    VALUE saved_jump_ins[2];
+    rb_control_frame_t *jump_cfp;
+    VALUE *jump_pc;
+    iseq_catch_t *old_iseq_catch;
+    volatile int thread_pause;
+} debug_context_t;
+
+/* variables in ruby_debug.c */
+extern VALUE mDebugger;
+extern VALUE rdebug_breakpoints;
+extern VALUE rdebug_catchpoints;
+extern VALUE rdebug_threads_tbl;
+
+/* routines in ruby_debug.c */
+extern int  filename_cmp(VALUE source, char *file);
+
+#define IS_STARTED  (rdebug_threads_tbl != Qnil)
+static inline void
+debug_check_started()
+{
+    if(!IS_STARTED)
+    {
+        rb_raise(rb_eRuntimeError, "Debugger.start is not called yet.");
+    }
+}
+
+static inline int
+classname_cmp(VALUE name, VALUE klass)
+{
+    VALUE mod_name;
+    VALUE class_name = (Qnil == name) ? rb_str_new2("main") : name;
+    if (klass == Qnil) return(0);
+    mod_name = rb_mod_name(klass);
+    return (mod_name != Qnil 
+	    && rb_str_cmp(class_name, mod_name) == 0);
+}
+
+/* Breakpoint information */
+enum bp_type {BP_POS_TYPE, BP_METHOD_TYPE};
+enum hit_condition {HIT_COND_NONE, HIT_COND_GE, HIT_COND_EQ, HIT_COND_MOD};
+
+typedef struct {
+    int   id;
+    enum bp_type type;
+    VALUE source;
+    union
+    {
+        int line;
+        ID  mid;
+    } pos;
+    VALUE expr;
+    VALUE enabled;
+    int hit_count;
+    int hit_value;
+    enum hit_condition hit_condition;
+} debug_breakpoint_t;
+
+/* routines in breakpoint.c */
+extern int   check_breakpoint_expression(VALUE breakpoint, VALUE binding);
+extern int   check_breakpoint_hit_condition(VALUE breakpoint);
+extern VALUE check_breakpoints_by_method(debug_context_t *debug_context, 
+    VALUE klass, ID mid, VALUE self);
+extern VALUE check_breakpoints_by_pos(debug_context_t *debug_context, 
+    char *file, int line);
+extern VALUE create_breakpoint_from_args(int argc, VALUE *argv, int id);
+extern VALUE context_breakpoint(VALUE self);
+extern VALUE context_set_breakpoint(int argc, VALUE *argv, VALUE self);
+extern VALUE rdebug_add_catchpoint(VALUE self, VALUE value);
+extern VALUE debug_catchpoints(VALUE self);
+extern VALUE rdebug_remove_breakpoint(VALUE self, VALUE id_value);
+
+extern void Init_breakpoint();

data/examples/04_zlib/vendor/bundle/gems/debugger-linecache-1.1.2/Rakefile

@@ -0,0 +1,71 @@
+# -*- Ruby -*-
+require 'rubygems/package_task'
+require 'rake/testtask'
+require 'rake/extensiontask'
+
+Rake::ExtensionTask.new('trace_nums')
+
+SO_NAME = "trace_nums.so"
+
+desc "Test everything."
+test_task = task :test => :lib do
+  Rake::TestTask.new(:test) do |t|
+    # TODO: fix test-lnum
+    t.test_files = Dir['test/test-*.rb'] - ['test/test-lnum.rb']
+    t.verbose = true
+  end
+end
+
+desc "Create the core ruby-debug shared library extension"
+task :lib do
+  Dir.chdir("ext") do
+    system("#{Gem.ruby} extconf.rb && make")
+  end
+end
+
+desc "Test everything - same as test."
+task :check => :test
+
+base_spec = eval(File.read('debugger-linecache.gemspec'), binding, 'debugger-linecache.gemspec')
+
+Gem::PackageTask.new(base_spec) do |pkg|
+  pkg.need_tar = true
+end
+
+# Windows specification
+win_spec = base_spec.clone
+win_spec.extensions = []
+## win_spec.platform = Gem::Platform::WIN32 # deprecated
+win_spec.platform = 'mswin32'
+win_spec.files += ["lib/#{SO_NAME}"]
+
+desc "Create Windows Gem"
+task :win32_gem do
+  # Copy the win32 extension the top level directory.
+  current_dir = File.expand_path(File.dirname(__FILE__))
+  source = File.join(current_dir, "ext", "win32", SO_NAME)
+  target = File.join(current_dir, "lib", SO_NAME)
+  cp(source, target)
+
+  # Create the gem, then move it to pkg.
+  Gem::Builder.new(win_spec).build
+  gem_file = "#{win_spec.name}-#{win_spec.version}-#{win_spec.platform}.gem"
+  mv(gem_file, "pkg/#{gem_file}")
+
+  # Remove win extension from top level directory.
+  rm(target)
+end
+
+desc "Remove built files"
+task :clean => [:clobber_package, :clobber_rdoc] do
+  cd "ext" do
+    if File.exists?("Makefile")
+      sh "make clean"
+      rm  "Makefile"
+    end
+    derived_files = Dir.glob(".o") + Dir.glob("*.so")
+    rm derived_files unless derived_files.empty?
+  end
+end
+
+task :default => [:test]

data/examples/04_zlib/vendor/bundle/gems/debugger-linecache-1.1.2/ext/trace_nums/trace_nums.c

@@ -0,0 +1,105 @@
+/*
+Ruby 1.9 version: (7/20/2009, Mark Moseley, mark@fast-software.com)
+
+   Now works with Ruby-1.9.1. Tested with p129 and p243.
+
+   This does not (and can not) function identically to the 1.8 version. 
+   Line numbers are ordered differently. But ruby-debug doesn't seem 
+   to mind the difference.
+
+   Also, 1.9 does not number lines with a "begin" statement.
+
+   All this 1.9 version does is compile into bytecode, disassemble it
+   using rb_iseq_disasm(), and parse the text output. This isn't a
+   great solution; it will break if the disassembly format changes.
+   Walking the iseq tree and decoding each instruction is pretty hairy,
+   though, so until I have a really compelling reason to go that route, 
+   I'll leave it at this.
+*/
+#include <ruby.h>
+#include <version.h>
+#include <vm_core.h>
+#include "trace_nums.h"
+
+VALUE mTraceLineNumbers;
+
+static inline const rb_data_type_t *
+threadptr_data_type(void)
+{
+        static const rb_data_type_t *thread_data_type;
+        if (!thread_data_type)
+        {
+                VALUE current_thread = rb_thread_current();
+                thread_data_type = RTYPEDDATA_TYPE(current_thread);
+        }
+        return thread_data_type;
+}
+
+#define ruby_threadptr_data_type *threadptr_data_type()
+#define ruby_current_thread ((rb_thread_t *)RTYPEDDATA_DATA(rb_thread_current()))
+
+/* Return a list of trace hook line numbers for the string in Ruby source src*/
+static VALUE 
+lnums_for_str(VALUE self, VALUE src)
+{
+  VALUE result = rb_ary_new(); /* The returned array of line numbers. */
+  int len;
+  char *token;
+  char *disasm;
+  rb_thread_t *th;
+  VALUE iseqval;
+  VALUE disasm_val;
+
+  StringValue(src); /* Check that src is a string. */
+  th = GET_THREAD();
+
+  /* First compile to bytecode, using the method in eval_string_with_cref() in vm_eval.c */
+  th->parse_in_eval++;
+  th->mild_compile_error++;
+  iseqval = rb_iseq_compile(src, rb_str_new_cstr("(numbers_for_str)"), INT2FIX(1));
+  th->mild_compile_error--;
+  th->parse_in_eval--;
+
+  /* Disassemble the bytecode into text and parse into lines */
+  disasm_val = rb_iseq_disasm(iseqval);
+  if (disasm_val == Qnil)
+    return(result);
+
+  disasm = (char*)malloc(strlen(RSTRING_PTR(disasm_val))+1);
+  strcpy(disasm, RSTRING_PTR(disasm_val));
+
+  for (token = strtok(disasm, "\n"); token != NULL; token = strtok(NULL, "\n")) 
+  {
+    /* look only for lines tracing RUBY_EVENT_LINE (1) */
+    if (strstr(token, "trace            1 ") == NULL)
+      continue;
+    len = strlen(token) - 1;
+    if (token[len] != ')') 
+      continue;
+    len--;
+    if ((token[len] == '(') || (token[len] == ' '))
+      continue;
+      
+    for (; len > 0; len--)
+    {
+      if (token[len] == ' ') 
+        continue;
+      if ((token[len] >= '0') && (token[len] <= '9')) 
+        continue;
+      if (token[len] == '(')
+        rb_ary_push(result, INT2NUM(atoi(token + len + 1))); /* trace found */
+
+      break;
+    }
+  }
+
+  free(disasm);
+  return result;
+}
+
+void Init_trace_nums(void)
+{
+    mTraceLineNumbers = rb_define_module("TraceLineNumbers");
+    rb_define_module_function(mTraceLineNumbers, "lnums_for_str", 
+			      lnums_for_str, 1);
+}

data/examples/04_zlib/vendor/bundle/gems/debugger-linecache-1.1.2/ext/trace_nums/trace_nums.h

@@ -0,0 +1,111 @@
+/* Order is in C enum order. The below is correct for Ruby 1.8.6.
+   Possibly others, but there may need some adjustment here.
+  */
+const char *NODE2NAME[] = 
+  {
+    "method",
+    "fbody",
+    "cfunc",
+    "scope",
+    "block",
+    "if",
+    "case",
+    "when",
+    "opt_n (-n)",
+    "while",
+    "until",
+    "iter",
+    "for",
+    "break",
+    "next",
+    "redo",
+    "retry",
+    "begin",
+    "rescue",
+    "resbody",
+    "ensure",
+    "and",
+    "or",
+    "not",
+    "masgn",
+    "lasgn (x=)",
+    "dasgn",
+    "dasgn_curr",
+    "gasgn",
+    "iasgn",
+    "cdecl",
+    "cvasgn",
+    "cvdecl",
+    "op_asgn1",
+    "op_asgn2",
+    "op_asgn_and",
+    "op_asgn_or",
+    "call",
+    "fcall",
+    "vcall",
+    "super",
+    "zsuper",
+    "array",
+    "zarray",
+    "hash",
+    "return",
+    "yield",
+    "lvar",
+    "dvar",
+    "gvar",
+    "ivar",
+    "const",
+    "cvar",
+    "nth_ref",
+    "back_ref",
+    "match",
+    "match2 (~=, !~)",
+    "match3 (~=, !~)",
+    "lit",
+    "str",
+    "dstr",
+    "xstr",
+    "dxstr",
+    "evstr",
+    "dregx",
+    "dregx_once",
+    "args",
+    "argscat",
+    "argspush",
+    "splat (*args)",
+    "to_ary",
+    "svalue",
+    "block_arg",
+    "block_pass",
+    "defn",
+    "defs",
+    "alias",
+    "valias",
+    "undef",
+    "class",
+    "module",
+    "sclass",
+    "colon2 (::)",
+    "colon3",
+    "cref",
+    "dot2 (..)",
+    "dot3 (...)",
+    "flip2",
+    "flip3",
+    "attrset",
+    "self",
+    "nil",
+    "true",
+    "false",
+    "defined?",
+    "newline (; or \\n)",
+    "postexe",
+    "alloca",
+    "dmethod",
+    "bmethod",
+    "memo",
+    "ifunc",
+    "dsym",
+    "attrasgn",
+    "last"
+};

data/examples/04_zlib/vendor/bundle/gems/debugger-ruby_core_source-1.1.7/Rakefile

@@ -0,0 +1,32 @@
+require 'tmpdir'
+require 'open-uri'
+require 'archive/tar/minitar'
+require 'zlib'
+require 'fileutils'
+require 'rubygems/package_task'
+
+desc 'Add ruby headers under lib for a given VERSION'
+task :add_source do
+  version = ENV['VERSION'] or abort "Need a $VERSION"
+  ruby_dir = "ruby-#{version}"
+  uri_path = "http://ftp.ruby-lang.org/pub/ruby/1.9/#{ruby_dir}.tar.gz"
+  dest_dir = File.dirname(__FILE__) + "/lib/debugger/ruby_core_source/#{ruby_dir}"
+
+  puts "Downloading #{uri_path}..."
+  temp = open(uri_path)
+  puts "Unpacking #{uri_path}..."
+  tgz = Zlib::GzipReader.new(File.open(temp, "rb"))
+
+  FileUtils.mkdir_p(dest_dir)
+  Dir.mktmpdir do |dir|
+    inc_dir = dir + "/" + ruby_dir + "/*.inc"
+    hdr_dir = dir + "/" + ruby_dir + "/*.h"
+    Archive::Tar::Minitar.unpack(tgz, dir)
+    FileUtils.cp(Dir.glob([ inc_dir, hdr_dir ]), dest_dir)
+  end
+end
+
+base_spec = eval(File.read('debugger-ruby_core_source.gemspec'), binding, 'debugger-ruby_core_source.gemspec')
+Gem::PackageTask.new(base_spec) do |pkg|
+  pkg.need_tar = true
+end

data/examples/04_zlib/vendor/bundle/gems/debugger-ruby_core_source-1.1.7/lib/debugger/ruby_core_source/ruby-1.9.2-p290/debug.h

@@ -0,0 +1,36 @@
+/**********************************************************************
+
+  debug.h - YARV Debug function interface
+
+  $Author: akr $
+  created at: 04/08/25 02:33:49 JST
+
+  Copyright (C) 2004-2007 Koichi Sasada
+
+**********************************************************************/
+
+#ifndef RUBY_DEBUG_H
+#define RUBY_DEBUG_H
+
+#include "ruby/ruby.h"
+#include "node.h"
+
+#define dpv(h,v) ruby_debug_print_value(-1, 0, h, v)
+#define dp(v)    ruby_debug_print_value(-1, 0, "", v)
+#define dpi(i)   ruby_debug_print_id(-1, 0, "", i)
+#define dpn(n)   ruby_debug_print_node(-1, 0, "", n)
+
+#define bp()     ruby_debug_breakpoint()
+
+VALUE ruby_debug_print_value(int level, int debug_level, const char *header, VALUE v);
+ID    ruby_debug_print_id(int level, int debug_level, const char *header, ID id);
+NODE *ruby_debug_print_node(int level, int debug_level, const char *header, const NODE *node);
+int   ruby_debug_print_indent(int level, int debug_level, int indent_level);
+void  ruby_debug_breakpoint(void);
+void  ruby_debug_gc_check_func(void);
+
+#ifdef RUBY_DEBUG_ENV
+void ruby_set_debug_option(const char *str);
+#endif
+
+#endif /* RUBY_DEBUG_H */

data/examples/04_zlib/vendor/bundle/gems/debugger-ruby_core_source-1.1.7/lib/debugger/ruby_core_source/ruby-1.9.2-p290/dln.h

@@ -0,0 +1,41 @@
+/**********************************************************************
+
+  dln.h -
+
+  $Author: akr $
+  created at: Wed Jan 19 16:53:09 JST 1994
+
+  Copyright (C) 1993-2007 Yukihiro Matsumoto
+
+**********************************************************************/
+
+#ifndef DLN_H
+#define DLN_H
+
+#ifdef __cplusplus
+# ifndef  HAVE_PROTOTYPES
+#  define HAVE_PROTOTYPES 1
+# endif
+# ifndef  HAVE_STDARG_PROTOTYPES
+#  define HAVE_STDARG_PROTOTYPES 1
+# endif
+#endif
+
+#undef _
+#ifdef HAVE_PROTOTYPES
+# define _(args) args
+#else
+# define _(args) ()
+#endif
+
+DEPRECATED(char *dln_find_exe(const char*,const char*));
+DEPRECATED(char *dln_find_file(const char*,const char*));
+char *dln_find_exe_r(const char*,const char*,char*,size_t);
+char *dln_find_file_r(const char*,const char*,char*,size_t);
+
+#ifdef USE_DLN_A_OUT
+extern char *dln_argv0;
+#endif
+
+void *dln_load(const char*);
+#endif