eventmachine-maglev- 0.12.10

data/ext/eventmachine.h

@@ -0,0 +1,122 @@
+/*****************************************************************************
+
+$Id$
+
+File:     eventmachine.h
+Date:     15Apr06
+
+Copyright (C) 2006-07 by Francis Cianfrocca. All Rights Reserved.
+Gmail: blackhedd
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of either: 1) the GNU General Public License
+as published by the Free Software Foundation; either version 2 of the
+License, or (at your option) any later version; or 2) Ruby's License.
+
+See the file COPYING for complete licensing information.
+
+*****************************************************************************/
+
+#ifndef __EVMA_EventMachine__H_
+#define __EVMA_EventMachine__H_
+
+#if __cplusplus
+extern "C" {
+#endif
+
+	enum { // Event names
+		EM_TIMER_FIRED = 100,
+		EM_CONNECTION_READ = 101,
+		EM_CONNECTION_UNBOUND = 102,
+		EM_CONNECTION_ACCEPTED = 103,
+		EM_CONNECTION_COMPLETED = 104,
+		EM_LOOPBREAK_SIGNAL = 105,
+		EM_CONNECTION_NOTIFY_READABLE = 106,
+		EM_CONNECTION_NOTIFY_WRITABLE = 107,
+		EM_SSL_HANDSHAKE_COMPLETED = 108,
+		EM_SSL_VERIFY = 109,
+		EM_PROXY_TARGET_UNBOUND = 110
+
+	};
+
+	void evma_initialize_library (void(*)(const unsigned long, int, const char*, const unsigned long));
+	void evma_run_machine();
+	void evma_release_library();
+	const unsigned long evma_install_oneshot_timer (int seconds);
+	const unsigned long evma_connect_to_server (const char *bind_addr, int bind_port, const char *server, int port);
+	const unsigned long evma_connect_to_unix_server (const char *server);
+
+	const unsigned long evma_attach_fd (int file_descriptor, int watch_mode);
+	int evma_detach_fd (const unsigned long binding);
+	int evma_get_file_descriptor (const unsigned long binding);
+	int evma_is_notify_readable (const unsigned long binding);
+	void evma_set_notify_readable (const unsigned long binding, int mode);
+	int evma_is_notify_writable (const unsigned long binding);
+	void evma_set_notify_writable (const unsigned long binding, int mode);
+
+	int evma_pause(const unsigned long binding);
+	int evma_is_paused(const unsigned long binding);
+	int evma_resume(const unsigned long binding);
+
+	void evma_stop_tcp_server (const unsigned long signature);
+	const unsigned long evma_create_tcp_server (const char *address, int port);
+	const unsigned long evma_create_unix_domain_server (const char *filename);
+	const unsigned long evma_open_datagram_socket (const char *server, int port);
+	const unsigned long evma_open_keyboard();
+	void evma_set_tls_parms (const unsigned long binding, const char *privatekey_filename, const char *certchain_filenane, int verify_peer);
+	void evma_start_tls (const unsigned long binding);
+
+	#ifdef WITH_SSL
+	X509 *evma_get_peer_cert (const unsigned long binding);
+	void evma_accept_ssl_peer (const unsigned long binding);
+	#endif
+
+	int evma_get_peername (const unsigned long binding, struct sockaddr*);
+	int evma_get_sockname (const unsigned long binding, struct sockaddr*);
+	int evma_get_subprocess_pid (const unsigned long binding, pid_t*);
+	int evma_get_subprocess_status (const unsigned long binding, int*);
+	int evma_get_connection_count();
+	int evma_send_data_to_connection (const unsigned long binding, const char *data, int data_length);
+	int evma_send_datagram (const unsigned long binding, const char *data, int data_length, const char *address, int port);
+	float evma_get_comm_inactivity_timeout (const unsigned long binding);
+	int evma_set_comm_inactivity_timeout (const unsigned long binding, float value);
+	float evma_get_pending_connect_timeout (const unsigned long binding);
+	int evma_set_pending_connect_timeout (const unsigned long binding, float value);
+	int evma_get_outbound_data_size (const unsigned long binding);
+	int evma_send_file_data_to_connection (const unsigned long binding, const char *filename);
+
+	void evma_close_connection (const unsigned long binding, int after_writing);
+	int evma_report_connection_error_status (const unsigned long binding);
+	void evma_signal_loopbreak();
+	void evma_set_timer_quantum (int);
+	int evma_get_max_timer_count();
+	void evma_set_max_timer_count (int);
+	void evma_setuid_string (const char *username);
+	void evma_stop_machine();
+	float evma_get_heartbeat_interval();
+	int evma_set_heartbeat_interval(float);
+
+	const unsigned long evma__write_file (const char *filename);
+	const unsigned long evma_popen (char * const*cmd_strings);
+
+	const unsigned long evma_watch_filename (const char *fname);
+	void evma_unwatch_filename (const unsigned long);
+
+	const unsigned long evma_watch_pid (int);
+	void evma_unwatch_pid (const unsigned long);
+
+	void evma_start_proxy(const unsigned long, const unsigned long, const unsigned long);
+	void evma_stop_proxy(const unsigned long);
+
+	int evma_set_rlimit_nofile (int n_files);
+
+	void evma_set_epoll (int use);
+	void evma_set_kqueue (int use);
+
+#if __cplusplus
+}
+#endif
+
+
+#endif // __EventMachine__H_
+

data/ext/eventmachine_cpp.h

@@ -0,0 +1,96 @@
+/*****************************************************************************
+
+$Id$
+
+File:     eventmachine_cpp.h
+Date:     27Jul07
+
+Copyright (C) 2006-07 by Francis Cianfrocca. All Rights Reserved.
+Gmail: blackhedd
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of either: 1) the GNU General Public License
+as published by the Free Software Foundation; either version 2 of the
+License, or (at your option) any later version; or 2) Ruby's License.
+
+See the file COPYING for complete licensing information.
+
+*****************************************************************************/
+
+
+#ifndef __EVMA_EventmachineCpp__H_
+#define __EVMA_EventmachineCpp__H_
+
+
+// This material is only for directly integrating EM into C++ programs.
+
+namespace EM {
+
+	void Callback (const unsigned long sig, int event, const char *data, const unsigned long length);
+	void Run (void(*)(void));
+	void AddTimer (int, void(*)());
+	void StopReactor();
+
+	/***************
+	class Eventable
+	***************/
+
+	class Eventable {
+		public:
+			Eventable() {}
+			virtual ~Eventable() {}
+
+			unsigned long Signature;
+
+			// Called by the framework
+			virtual void ReceiveData (const char *data, int length) {}
+			virtual void ConnectionCompleted() {}
+			virtual void Accept (const unsigned long) {}
+			virtual void Unbind() {}
+			virtual void PostInit() {}
+			virtual void SslHandshakeCompleted() {}
+
+			void StopReactor() {EM::StopReactor();}
+	};
+
+	/****************
+	class Connection
+	****************/
+
+	class Connection: public Eventable {
+		public:
+			Connection() {}
+			virtual ~Connection() {}
+
+			virtual void Connect (const char*, int);
+			virtual void BindConnect (const char *, int, const char*, int);
+
+			void SendData (const char *data);
+			void SendData (const char *data, int length);
+			void Close (bool afterWriting);
+	};
+
+
+	/**************
+	class Acceptor
+	**************/
+
+	class Acceptor: public Eventable {
+		public:
+			Acceptor() {PostInit();}
+			virtual ~Acceptor() {}
+
+			void Start (const char*, int);
+			void Accept (const unsigned long);
+
+			virtual Connection *MakeConnection() {return new Connection();}
+	};
+
+
+};
+
+
+
+
+
+#endif // __EVMA_EventmachineCpp__H_

data/ext/extconf.rb

@@ -0,0 +1,152 @@
+require 'mkmf'
+
+def check_libs libs = [], fatal = false
+  libs.all? { |lib| have_library(lib) || (abort("could not find library: #{lib}") if fatal) }
+end
+
+def check_heads heads = [], fatal = false
+  heads.all? { |head| have_header(head) || (abort("could not find header: #{head}") if fatal)}
+end
+
+def add_define(name)
+  $defs.push("-D#{name}")
+end
+
+add_define 'BUILD_FOR_RUBY'
+add_define 'HAVE_RBTRAP' if have_var('rb_trap_immediate', ['ruby.h', 'rubysig.h'])
+add_define "HAVE_TBR" if have_func('rb_thread_blocking_region')# and have_macro('RUBY_UBF_IO', 'ruby.h')
+add_define "HAVE_INOTIFY" if inotify = have_func('inotify_init', 'sys/inotify.h')
+add_define "HAVE_OLD_INOTIFY" if !inotify && have_macro('__NR_inotify_init', 'sys/syscall.h')
+add_define 'HAVE_WRITEV' if have_func('writev', 'sys/uio.h')
+have_func('rb_thread_check_ints')
+have_func('rb_time_new')
+
+# Minor platform details between *nix and Windows:
+
+if defined? RUBY_ENGINE and RUBY_ENGINE =~ /maglev/
+  add_define 'BUILD_FOR_MAGLEV'
+end
+
+if RUBY_PLATFORM =~ /(mswin|mingw|bccwin)/
+  GNU_CHAIN = $1 == 'mingw'
+  OS_WIN32 = true
+  add_define "OS_WIN32"
+else
+  GNU_CHAIN = true
+  OS_UNIX = true
+  add_define 'OS_UNIX'
+
+  add_define "HAVE_KQUEUE" if have_header("sys/event.h") and have_header("sys/queue.h")
+end
+
+# Main platform invariances:
+
+case RUBY_PLATFORM
+when /mswin32/, /mingw32/, /bccwin32/
+  check_heads(%w[windows.h winsock.h], true)
+  check_libs(%w[kernel32 rpcrt4 gdi32], true)
+
+  if GNU_CHAIN
+    CONFIG['LDSHARED'] = "$(CXX) -shared -lstdc++"
+  else
+    $defs.push "-EHs"
+    $defs.push "-GR"
+  end
+
+when /solaris/
+  add_define 'OS_SOLARIS8'
+  check_libs(%w[nsl socket], true)
+
+  # Patch by Tim Pease, fixes SUNWspro compile problems.
+  if CONFIG['CC'] == 'cc'
+    # SUN CHAIN
+    $CFLAGS = CONFIG['CFLAGS'] = "-KPIC -G"
+    CONFIG['CCDLFLAGS'] = "-KPIC"
+  else
+    # GNU CHAIN
+    # on Unix we need a g++ link, not gcc.
+    CONFIG['LDSHARED'] = "$(CXX) -shared"
+  end
+
+when /openbsd/
+  # OpenBSD branch contributed by Guillaume Sellier.
+
+  # on Unix we need a g++ link, not gcc. On OpenBSD, linking against libstdc++ have to be explicitly done for shared libs
+  CONFIG['LDSHARED'] = "$(CXX) -shared -lstdc++ -fPIC"
+  CONFIG['LDSHAREDXX'] = "$(CXX) -shared -lstdc++ -fPIC"
+
+when /darwin/
+  # on Unix we need a g++ link, not gcc.
+  # Ff line contributed by Daniel Harple.
+  CONFIG['LDSHARED'] = "$(CXX) " + CONFIG['LDSHARED'].split[1..-1].join(' ')
+
+when /linux/
+  add_define 'HAVE_EPOLL' if have_func('epoll_create', 'sys/epoll.h')
+
+  # Original epoll test is inadequate because 2.4 kernels have the header
+  # but not the code.
+  # add_define 'HAVE_EPOLL' if have_header('sys/epoll.h')
+  # if have_header('sys/epoll.h')
+  #   File.open("hasEpollTest.c", "w") {|f|
+  #     f.puts "#include <sys/epoll.h>"
+  #     f.puts "int main() { epoll_create(1024); return 0;}"
+  #   }
+  #   (e = system( "gcc hasEpollTest.c -o hasEpollTest " )) and (e = $?.to_i)
+  #   `rm -f hasEpollTest.c hasEpollTest`
+  #   add_define 'HAVE_EPOLL' if e == 0
+  # end
+
+  # on Unix we need a g++ link, not gcc.
+  CONFIG['LDSHARED'] = "$(CXX) -shared"
+
+when /aix/
+  CONFIG['LDSHARED'] = "$(CXX) -shared -Wl,-G -Wl,-brtl"
+
+else
+  # on Unix we need a g++ link, not gcc.
+  CONFIG['LDSHARED'] = "$(CXX) -shared"
+end
+
+# OpenSSL:
+
+def manual_ssl_config
+  ssl_libs_heads_args = {
+    :unix => [%w[ssl crypto], %w[openssl/ssl.h openssl/err.h]],
+    :darwin => [%w[ssl crypto C], %w[openssl/ssl.h openssl/err.h]],
+    # openbsd and linux:
+    :crypto_hack => [%w[crypto ssl crypto], %w[openssl/ssl.h openssl/err.h]],
+    :mswin => [%w[ssleay32 libeay32], %w[openssl/ssl.h openssl/err.h]],
+  }
+
+  dc_flags = ['ssl']
+  dc_flags += ["#{ENV['OPENSSL']}/include", ENV['OPENSSL']] if /linux/ =~ RUBY_PLATFORM
+
+  libs, heads = case RUBY_PLATFORM
+  when /mswin/    ; ssl_libs_heads_args[:mswin]
+  when /mingw/    ; ssl_libs_heads_args[:unix]
+  when /darwin/   ; ssl_libs_heads_args[:darwin]
+  when /openbsd/  ; ssl_libs_heads_args[:crypto_hack]
+  when /linux/    ; ssl_libs_heads_args[:crypto_hack]
+  else              ssl_libs_heads_args[:unix]
+  end
+  dir_config(*dc_flags)
+  check_libs(libs) and check_heads(heads)
+end
+
+# Try to use pkg_config first, fixes #73
+if pkg_config('openssl') || manual_ssl_config
+  add_define "WITH_SSL"
+else
+  add_define "WITHOUT_SSL"
+end
+
+# solaris c++ compiler doesn't have make_pair()
+TRY_LINK.sub!('$(CC)', '$(CXX)')
+add_define 'HAVE_MAKE_PAIR' if try_link(<<SRC, '-lstdc++')
+  #include <utility>
+  using namespace std;
+  int main(){ pair<int,int> tuple = make_pair(1,2); }
+SRC
+TRY_LINK.sub!('$(CXX)', '$(CC)')
+
+create_makefile "rubyeventmachine"

data/ext/fastfilereader/extconf.rb

@@ -0,0 +1,83 @@
+require 'mkmf'
+
+def check_libs libs = [], fatal = false
+  libs.all? { |lib| have_library(lib) || (abort("could not find library: #{lib}") if fatal) }
+end
+
+def check_heads heads = [], fatal = false
+  heads.all? { |head| have_header(head) || (abort("could not find header: #{head}") if fatal)}
+end
+
+def add_define(name)
+  $defs.push("-D#{name}")
+end
+
+add_define 'BUILD_FOR_RUBY'
+
+# Minor platform details between *nix and Windows:
+
+if RUBY_PLATFORM =~ /(mswin|mingw|bccwin)/
+  GNU_CHAIN = $1 == 'mingw'
+  OS_WIN32 = true
+  add_define "OS_WIN32"
+else
+  GNU_CHAIN = true
+  OS_UNIX = true
+  add_define 'OS_UNIX'
+end
+
+# Main platform invariances:
+
+case RUBY_PLATFORM
+when /mswin32/, /mingw32/, /bccwin32/
+  check_heads(%w[windows.h winsock.h], true)
+  check_libs(%w[kernel32 rpcrt4 gdi32], true)
+
+  if GNU_CHAIN
+    CONFIG['LDSHARED'] = "$(CXX) -shared -lstdc++"
+  else
+    $defs.push "-EHs"
+    $defs.push "-GR"
+  end
+
+when /solaris/
+  add_define 'OS_SOLARIS8'
+  check_libs(%w[nsl socket], true)
+
+  # Patch by Tim Pease, fixes SUNWspro compile problems.
+  if CONFIG['CC'] == 'cc'
+    # SUN CHAIN
+    $CFLAGS = CONFIG['CFLAGS'] = "-KPIC -G"
+    CONFIG['CCDLFLAGS'] = "-KPIC"
+  else
+    # GNU CHAIN
+    # on Unix we need a g++ link, not gcc.
+    CONFIG['LDSHARED'] = "$(CXX) -shared"
+  end
+
+when /openbsd/
+  # OpenBSD branch contributed by Guillaume Sellier.
+
+  # on Unix we need a g++ link, not gcc. On OpenBSD, linking against libstdc++ have to be explicitly done for shared libs
+  CONFIG['LDSHARED'] = "$(CXX) -shared -lstdc++ -fPIC"
+  CONFIG['LDSHAREDXX'] = "$(CXX) -shared -lstdc++ -fPIC"
+
+when /darwin/
+  # on Unix we need a g++ link, not gcc.
+  # Ff line contributed by Daniel Harple.
+  CONFIG['LDSHARED'] = "$(CXX) " + CONFIG['LDSHARED'].split[1..-1].join(' ')
+
+when /linux/
+  # on Unix we need a g++ link, not gcc.
+  CONFIG['LDSHARED'] = "$(CXX) -shared"
+
+when /aix/
+  # on Unix we need a g++ link, not gcc.
+  CONFIG['LDSHARED'] = "$(CXX) -shared -Wl,-G"
+
+else
+  # on Unix we need a g++ link, not gcc.
+  CONFIG['LDSHARED'] = "$(CXX) -shared"
+end
+
+create_makefile "fastfilereaderext"

data/ext/fastfilereader/mapper.cpp

@@ -0,0 +1,214 @@
+/*****************************************************************************
+
+$Id: mapper.cpp 4527 2007-07-04 10:21:34Z francis $
+
+File:     mapper.cpp
+Date:     02Jul07
+
+Copyright (C) 2007 by Francis Cianfrocca. All Rights Reserved.
+Gmail: garbagecat10
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of either: 1) the GNU General Public License
+as published by the Free Software Foundation; either version 2 of the
+License, or (at your option) any later version; or 2) Ruby's License.
+
+See the file COPYING for complete licensing information.
+
+*****************************************************************************/
+
+
+//////////////////////////////////////////////////////////////////////
+// UNIX implementation
+//////////////////////////////////////////////////////////////////////
+
+
+#ifdef OS_UNIX
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/mman.h>
+#include <fcntl.h>
+#include <errno.h>
+
+#include <iostream>
+#include "unistd.h"
+#include <string>
+#include <cstring>
+#include <stdexcept>
+using namespace std;
+
+#include "mapper.h"
+
+/******************
+Mapper_t::Mapper_t
+******************/
+
+Mapper_t::Mapper_t (const string &filename)
+{
+	/* We ASSUME we can open the file.
+	 * (More precisely, we assume someone else checked before we got here.)
+	 */
+
+	Fd = open (filename.c_str(), O_RDONLY);
+	if (Fd < 0)
+		throw runtime_error (strerror (errno));
+
+	struct stat st;
+	if (fstat (Fd, &st))
+		throw runtime_error (strerror (errno));
+	FileSize = st.st_size;
+
+	#ifdef OS_WIN32
+	MapPoint = (char*) mmap (0, FileSize, PROT_READ, MAP_SHARED, Fd, 0);
+	#else
+	MapPoint = (const char*) mmap (0, FileSize, PROT_READ, MAP_SHARED, Fd, 0);
+	#endif
+	if (MapPoint == MAP_FAILED)
+		throw runtime_error (strerror (errno));
+}
+
+
+/*******************
+Mapper_t::~Mapper_t
+*******************/
+
+Mapper_t::~Mapper_t()
+{
+	Close();
+}
+
+
+/***************
+Mapper_t::Close
+***************/
+
+void Mapper_t::Close()
+{
+	// Can be called multiple times.
+	// Calls to GetChunk are invalid after a call to Close.
+	if (MapPoint) {
+		#ifdef OS_SOLARIS8
+		munmap ((char*)MapPoint, FileSize);
+		#else
+		munmap ((void*)MapPoint, FileSize);
+		#endif
+		MapPoint = NULL;
+	}
+	if (Fd >= 0) {
+		close (Fd);
+		Fd = -1;
+	}
+}
+
+/******************
+Mapper_t::GetChunk
+******************/
+
+const char *Mapper_t::GetChunk (unsigned start)
+{
+	return MapPoint + start;
+}
+
+
+
+#endif // OS_UNIX
+
+
+//////////////////////////////////////////////////////////////////////
+// WINDOWS implementation
+//////////////////////////////////////////////////////////////////////
+
+#ifdef OS_WIN32
+
+#include <windows.h>
+
+#include <iostream>
+#include <string>
+#include <stdexcept>
+using namespace std;
+
+#include "mapper.h"
+
+/******************
+Mapper_t::Mapper_t
+******************/
+
+Mapper_t::Mapper_t (const string &filename)
+{
+	/* We ASSUME we can open the file.
+	 * (More precisely, we assume someone else checked before we got here.)
+	 */
+
+	hFile = INVALID_HANDLE_VALUE;
+	hMapping = NULL;
+	MapPoint = NULL;
+	FileSize = 0;
+
+	hFile = CreateFile (filename.c_str(), GENERIC_READ|GENERIC_WRITE, FILE_SHARE_DELETE|FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
+
+	if (hFile == INVALID_HANDLE_VALUE)
+		throw runtime_error ("File not found");
+
+	BY_HANDLE_FILE_INFORMATION i;
+	if (GetFileInformationByHandle (hFile, &i))
+		FileSize = i.nFileSizeLow;
+
+	hMapping = CreateFileMapping (hFile, NULL, PAGE_READWRITE, 0, 0, NULL);
+	if (!hMapping)
+		throw runtime_error ("File not mapped");
+
+	#ifdef OS_WIN32
+	MapPoint = (char*) MapViewOfFile (hMapping, FILE_MAP_WRITE, 0, 0, 0);
+	#else
+	MapPoint = (const char*) MapViewOfFile (hMapping, FILE_MAP_WRITE, 0, 0, 0);
+	#endif
+	if (!MapPoint)
+		throw runtime_error ("Mappoint not read");
+}
+
+
+/*******************
+Mapper_t::~Mapper_t
+*******************/
+
+Mapper_t::~Mapper_t()
+{
+	Close();
+}
+
+/***************
+Mapper_t::Close
+***************/
+
+void Mapper_t::Close()
+{
+	// Can be called multiple times.
+	// Calls to GetChunk are invalid after a call to Close.
+	if (MapPoint) {
+		UnmapViewOfFile (MapPoint);
+		MapPoint = NULL;
+	}
+	if (hMapping != NULL) {
+		CloseHandle (hMapping);
+		hMapping = NULL;
+	}
+	if (hFile != INVALID_HANDLE_VALUE) {
+		CloseHandle (hFile);
+		hMapping = INVALID_HANDLE_VALUE;
+	}
+}
+
+
+/******************
+Mapper_t::GetChunk
+******************/
+
+const char *Mapper_t::GetChunk (unsigned start)
+{
+	return MapPoint + start;
+}
+
+
+
+#endif // OS_WINDOWS