datadog-ruby_core_source 3.3.6

data/Rakefile

@@ -0,0 +1,73 @@
+require 'tmpdir'
+require 'open-uri'
+require 'archive/tar/minitar'
+require 'zlib'
+require 'fileutils'
+require 'bundler'
+Bundler::GemHelper.install_tasks
+
+def get_dest_dir(ruby_dir, version, tempdir)
+  dest_dir = File.dirname(__FILE__) + "/lib/datadog/ruby_core_source/#{ruby_dir}"
+  return dest_dir if version.include?('-p')
+
+  patchlevel = ENV['PATCHLEVEL']
+  if !patchlevel
+    puts "extracting patchlevel from version.h"
+    patchlevel = File.new("#{tempdir}/#{ruby_dir}/version.h").each_line.map do |li|
+      if /#define RUBY_PATCHLEVEL (-?\d+)/ =~ li
+        break $1
+      else
+        nil
+      end
+    end#.find { |p| not p.nil?}
+    puts "extracted patchlevel '#{patchlevel}'"
+  end
+  if patchlevel
+    dest_dir = dest_dir + "-p" + patchlevel unless patchlevel == '-1'
+  else
+    warn "Unable to extract patchlevel from verion.h assuming there is no patchlevel please use a $PATCHLEVEL to specify one"
+  end
+  dest_dir
+end
+
+desc <<DESCR
+Add ruby headers under lib for a given VERSION and (optional) PATCHLEVEL,
+\t\t\tif patchlevel is not provided it will be extracted from version.h.
+\t\t\tTGZ_FILE_NAME can be used to provide pre-downloaded tgz file
+DESCR
+task :add_source do
+  version = ENV['VERSION'] or abort "Need a $VERSION"
+  ruby_dir = "ruby-#{version}"
+
+  if ENV['TGZ_FILE_NAME']
+    temp = ENV['TGZ_FILE_NAME']
+    puts "Using pre-downloaded bundle #{temp}"
+  else
+    minor_version = version.split('.')[0..1].join('.')
+    uri_path = "http://ftp.ruby-lang.org/pub/ruby/#{minor_version}/#{ruby_dir}.tar.gz"
+    puts "Downloading #{uri_path}..."
+    temp = URI.open(uri_path)
+  end
+  puts "Unpacking #{uri_path}..."
+  tgz = Zlib::GzipReader.new(File.open(temp, "rb"))
+
+  Dir.mktmpdir do |dir|
+    inc_dir = dir + "/" + ruby_dir + "/*.inc"
+    hdr_dir = dir + "/" + ruby_dir + "/*.h"
+    more_hdr_dir = [
+      dir + "/" + ruby_dir + "/ccan/**/*.h",
+      dir + "/" + ruby_dir + "/internal/**/*.h",
+      dir + "/" + ruby_dir + "/prism/**/*.h"
+    ]
+    Archive::Tar::Minitar.unpack(tgz, dir)
+
+    dest_dir = get_dest_dir(ruby_dir, version, dir)
+    puts dest_dir
+    FileUtils.mkdir_p(dest_dir)
+    Dir.glob([ inc_dir, hdr_dir, more_hdr_dir ].flatten).each do |file|
+      target = file.sub(dir + '/' + ruby_dir, dest_dir)
+      FileUtils.mkdir_p(File.dirname(target))
+      FileUtils.cp(file, target, verbose: false)
+    end
+  end
+end

data/datadog-ruby_core_source.gemspec

@@ -0,0 +1,21 @@
+# encoding: utf-8 -*-
+require 'rubygems' unless defined? Gem
+require File.dirname(__FILE__) + "/lib/datadog/ruby_core_source/version"
+
+Gem::Specification.new do |s|
+  s.name = "datadog-ruby_core_source"
+  s.version = Datadog::RubyCoreSource::VERSION
+  s.authors = ["Mark Moseley", "Gabriel Horner", "JetBrains RubyMine Team"]
+  s.email = "dev@datadoghq.com"
+  s.homepage = "https://github.com/DataDog/datadog-ruby_core_source"
+  s.summary = %q{Provide Ruby core source files}
+  s.description = %q{Provide Ruby core source files for C extensions that need them.}
+  s.license = "MIT"
+  s.required_rubygems_version = ">= 1.3.6"
+  s.required_ruby_version = '>= 2.0.0'
+  s.extra_rdoc_files = [ "README.md"]
+  s.files = `git ls-files`.split("\n")
+  s.add_development_dependency "archive-tar-minitar", ">= 0.5.2"
+  s.add_development_dependency 'rake', '>= 0.9.2'
+  s.add_development_dependency 'minitar-cli'
+end

data/lib/datadog/ruby_core_source/ruby-2.5.0-p0/addr2line.h

@@ -0,0 +1,21 @@
+/**********************************************************************
+
+  addr2line.h -
+
+  $Author$
+
+  Copyright (C) 2010 Shinichiro Hamaji
+
+**********************************************************************/
+
+#ifndef RUBY_ADDR2LINE_H
+#define RUBY_ADDR2LINE_H
+
+#ifdef USE_ELF
+
+void
+rb_dump_backtrace_with_lines(int num_traces, void **traces);
+
+#endif /* USE_ELF */
+
+#endif /* RUBY_ADDR2LINE_H */

data/lib/datadog/ruby_core_source/ruby-2.5.0-p0/ccan/build_assert/build_assert.h

@@ -0,0 +1,40 @@
+/* CC0 (Public domain) - see ccan/licenses/CC0 file for details */
+#ifndef CCAN_BUILD_ASSERT_H
+#define CCAN_BUILD_ASSERT_H
+
+/**
+ * BUILD_ASSERT - assert a build-time dependency.
+ * @cond: the compile-time condition which must be true.
+ *
+ * Your compile will fail if the condition isn't true, or can't be evaluated
+ * by the compiler.  This can only be used within a function.
+ *
+ * Example:
+ *	#include <stddef.h>
+ *	...
+ *	static char *foo_to_char(struct foo *foo)
+ *	{
+ *		// This code needs string to be at start of foo.
+ *		BUILD_ASSERT(offsetof(struct foo, string) == 0);
+ *		return (char *)foo;
+ *	}
+ */
+#define BUILD_ASSERT(cond) \
+	do { (void) sizeof(char [1 - 2*!(cond)]); } while(0)
+
+/**
+ * BUILD_ASSERT_OR_ZERO - assert a build-time dependency, as an expression.
+ * @cond: the compile-time condition which must be true.
+ *
+ * Your compile will fail if the condition isn't true, or can't be evaluated
+ * by the compiler.  This can be used in an expression: its value is "0".
+ *
+ * Example:
+ *	#define foo_to_char(foo)					\
+ *		 ((char *)(foo)						\
+ *		  + BUILD_ASSERT_OR_ZERO(offsetof(struct foo, string) == 0))
+ */
+#define BUILD_ASSERT_OR_ZERO(cond) \
+	(sizeof(char [1 - 2*!(cond)]) - 1)
+
+#endif /* CCAN_BUILD_ASSERT_H */

data/lib/datadog/ruby_core_source/ruby-2.5.0-p0/ccan/check_type/check_type.h

@@ -0,0 +1,63 @@
+/* CC0 (Public domain) - see ccan/licenses/CC0 file for details */
+#ifndef CCAN_CHECK_TYPE_H
+#define CCAN_CHECK_TYPE_H
+
+/**
+ * check_type - issue a warning or build failure if type is not correct.
+ * @expr: the expression whose type we should check (not evaluated).
+ * @type: the exact type we expect the expression to be.
+ *
+ * This macro is usually used within other macros to try to ensure that a macro
+ * argument is of the expected type.  No type promotion of the expression is
+ * done: an unsigned int is not the same as an int!
+ *
+ * check_type() always evaluates to 0.
+ *
+ * If your compiler does not support typeof, then the best we can do is fail
+ * to compile if the sizes of the types are unequal (a less complete check).
+ *
+ * Example:
+ *	// They should always pass a 64-bit value to _set_some_value!
+ *	#define set_some_value(expr)			\
+ *		_set_some_value((check_type((expr), uint64_t), (expr)))
+ */
+
+/**
+ * check_types_match - issue a warning or build failure if types are not same.
+ * @expr1: the first expression (not evaluated).
+ * @expr2: the second expression (not evaluated).
+ *
+ * This macro is usually used within other macros to try to ensure that
+ * arguments are of identical types.  No type promotion of the expressions is
+ * done: an unsigned int is not the same as an int!
+ *
+ * check_types_match() always evaluates to 0.
+ *
+ * If your compiler does not support typeof, then the best we can do is fail
+ * to compile if the sizes of the types are unequal (a less complete check).
+ *
+ * Example:
+ *	// Do subtraction to get to enclosing type, but make sure that
+ *	// pointer is of correct type for that member.
+ *	#define container_of(mbr_ptr, encl_type, mbr)			\
+ *		(check_types_match((mbr_ptr), &((encl_type *)0)->mbr),	\
+ *		 ((encl_type *)						\
+ *		  ((char *)(mbr_ptr) - offsetof(enclosing_type, mbr))))
+ */
+#if HAVE_TYPEOF
+#define check_type(expr, type)			\
+	((typeof(expr) *)0 != (type *)0)
+
+#define check_types_match(expr1, expr2)		\
+	((typeof(expr1) *)0 != (typeof(expr2) *)0)
+#else
+#include "ccan/build_assert/build_assert.h"
+/* Without typeof, we can only test the sizes. */
+#define check_type(expr, type)					\
+	BUILD_ASSERT_OR_ZERO(sizeof(expr) == sizeof(type))
+
+#define check_types_match(expr1, expr2)				\
+	BUILD_ASSERT_OR_ZERO(sizeof(expr1) == sizeof(expr2))
+#endif /* HAVE_TYPEOF */
+
+#endif /* CCAN_CHECK_TYPE_H */

data/lib/datadog/ruby_core_source/ruby-2.5.0-p0/ccan/container_of/container_of.h

@@ -0,0 +1,142 @@
+/* CC0 (Public domain) - see ccan/licenses/CC0 file for details */
+#ifndef CCAN_CONTAINER_OF_H
+#define CCAN_CONTAINER_OF_H
+#include "ccan/check_type/check_type.h"
+
+/**
+ * container_of - get pointer to enclosing structure
+ * @member_ptr: pointer to the structure member
+ * @containing_type: the type this member is within
+ * @member: the name of this member within the structure.
+ *
+ * Given a pointer to a member of a structure, this macro does pointer
+ * subtraction to return the pointer to the enclosing type.
+ *
+ * Example:
+ *	struct foo {
+ *		int fielda, fieldb;
+ *		// ...
+ *	};
+ *	struct info {
+ *		int some_other_field;
+ *		struct foo my_foo;
+ *	};
+ *
+ *	static struct info *foo_to_info(struct foo *foo)
+ *	{
+ *		return container_of(foo, struct info, my_foo);
+ *	}
+ */
+#define container_of(member_ptr, containing_type, member)		\
+	 ((containing_type *)						\
+	  ((char *)(member_ptr)						\
+	   - container_off(containing_type, member))			\
+	  + check_types_match(*(member_ptr), ((containing_type *)0)->member))
+
+
+/**
+ * container_of_or_null - get pointer to enclosing structure, or NULL
+ * @member_ptr: pointer to the structure member
+ * @containing_type: the type this member is within
+ * @member: the name of this member within the structure.
+ *
+ * Given a pointer to a member of a structure, this macro does pointer
+ * subtraction to return the pointer to the enclosing type, unless it
+ * is given NULL, in which case it also returns NULL.
+ *
+ * Example:
+ *	struct foo {
+ *		int fielda, fieldb;
+ *		// ...
+ *	};
+ *	struct info {
+ *		int some_other_field;
+ *		struct foo my_foo;
+ *	};
+ *
+ *	static struct info *foo_to_info_allowing_null(struct foo *foo)
+ *	{
+ *		return container_of_or_null(foo, struct info, my_foo);
+ *	}
+ */
+static inline char *container_of_or_null_(void *member_ptr, size_t offset)
+{
+	return member_ptr ? (char *)member_ptr - offset : NULL;
+}
+#define container_of_or_null(member_ptr, containing_type, member)	\
+	((containing_type *)						\
+	 container_of_or_null_(member_ptr,				\
+			       container_off(containing_type, member))	\
+	 + check_types_match(*(member_ptr), ((containing_type *)0)->member))
+
+/**
+ * container_off - get offset to enclosing structure
+ * @containing_type: the type this member is within
+ * @member: the name of this member within the structure.
+ *
+ * Given a pointer to a member of a structure, this macro does
+ * typechecking and figures out the offset to the enclosing type.
+ *
+ * Example:
+ *	struct foo {
+ *		int fielda, fieldb;
+ *		// ...
+ *	};
+ *	struct info {
+ *		int some_other_field;
+ *		struct foo my_foo;
+ *	};
+ *
+ *	static struct info *foo_to_info(struct foo *foo)
+ *	{
+ *		size_t off = container_off(struct info, my_foo);
+ *		return (void *)((char *)foo - off);
+ *	}
+ */
+#define container_off(containing_type, member)	\
+	offsetof(containing_type, member)
+
+/**
+ * container_of_var - get pointer to enclosing structure using a variable
+ * @member_ptr: pointer to the structure member
+ * @container_var: a pointer of same type as this member's container
+ * @member: the name of this member within the structure.
+ *
+ * Given a pointer to a member of a structure, this macro does pointer
+ * subtraction to return the pointer to the enclosing type.
+ *
+ * Example:
+ *	static struct info *foo_to_i(struct foo *foo)
+ *	{
+ *		struct info *i = container_of_var(foo, i, my_foo);
+ *		return i;
+ *	}
+ */
+#if HAVE_TYPEOF
+#define container_of_var(member_ptr, container_var, member) \
+	container_of(member_ptr, typeof(*container_var), member)
+#else
+#define container_of_var(member_ptr, container_var, member)	\
+	((void *)((char *)(member_ptr)	-			\
+		  container_off_var(container_var, member)))
+#endif
+
+/**
+ * container_off_var - get offset of a field in enclosing structure
+ * @container_var: a pointer to a container structure
+ * @member: the name of a member within the structure.
+ *
+ * Given (any) pointer to a structure and a its member name, this
+ * macro does pointer subtraction to return offset of member in a
+ * structure memory layout.
+ *
+ */
+#if HAVE_TYPEOF
+#define container_off_var(var, member)		\
+	container_off(typeof(*var), member)
+#else
+#define container_off_var(var, member)			\
+	((const char *)&(var)->member - (const char *)(var))
+#endif
+
+#endif /* CCAN_CONTAINER_OF_H */