igraph_wrapper 0.0.1

data/ext/IgraphWrapper/extconf.rb

@@ -0,0 +1,88 @@
+require 'mkmf'
+require 'rbconfig'
+require 'find'
+
+extension_name = 'IgraphWrapper/IgraphWrapper'
+dir_config(extension_name)
+
+parts = RUBY_DESCRIPTION.split(' ')
+type = parts[0]
+type = type[4..-1] if type.start_with?('tcs-')
+type = 'ree' if 'ruby' == type && RUBY_DESCRIPTION.include?('Ruby Enterprise Edition')
+is_windows = RbConfig::CONFIG['host_os'] =~ /(mingw|mswin)/
+is_linux = RbConfig::CONFIG['host_os'] =~ /(linux)/
+is_darwin = RbConfig::CONFIG['host_os'] =~ /(darwin??)/
+platform = RUBY_PLATFORM
+version = RUBY_VERSION.split('.')
+
+
+if is_darwin
+    puts "DEFINE Darwin"
+    $defs.push("-DDarwin")
+    else
+    puts "Unknown platform"
+    $defs.push("-DUnknownPlatform")
+end
+puts ">>>>> Creating Makefile for #{type} version #{RUBY_VERSION} on #{platform} (#{RbConfig::CONFIG['host_os']}) <<<<<"
+
+
+puts "#{CONFIG["dldflags"]}"
+CONFIG["DLDFLAGS"].gsub!(/-multiply_definedsuppress/, '')
+$DLDFLAGS = CONFIG["DLDFLAGS"]
+puts "#{CONFIG["DLDFLAGS"]}, #{$DLDFLAGS}"
+
+puts CONFIG['CPPOUTFILE']
+
+CONFIG["CFLAGS"] = '-O2 -Wall -pthread -fmessage-length=0 -fPIC -std=c++0x'
+
+sep = File::PATH_SEPARATOR
+is_igraph = true
+if is_darwin
+    search_path = "/usr/local/Cellar/igraph/0.7.0/include/igraph"
+    search_file = "/igraph.h"
+    puts "Looking for igraph.h in "+search_path+"/*"
+    file_exist = nil
+    if File.exist?(search_path)
+        Find.find(search_path) do |path|
+            if (FileTest.directory?(path))
+                puts path+search_file
+                temp_name = (path).gsub(/\/usr\/local\/Cellar\/igraph.h\//,'')
+                count = temp_name.count('/')
+                if ((count == 0) && (File.exist?(path+search_file)))
+                    file_exist = "-I#{path}"
+                    break
+                end
+            end
+        end
+    end
+   
+   
+    if(is_igraph && file_exist != nil)
+        $INCFLAGS << " " << file_exist.quote
+        puts "found"
+    else
+        puts "not found"
+        is_igraph = false
+    end
+    
+    path = "/usr/lib:/usr/local/lib/"
+    puts "Looking for igraph (function main) in "+path
+    if(is_igraph && find_library("igraph",nil,path))
+        puts "found"
+    else
+        puts "not found"
+        is_igraph = false
+    end
+else
+    is_igraph = false;
+end
+
+
+if(is_igraph)
+    puts "*** With IGRAPH_MODULE ***"
+    $defs.push("-DIGRAPH_MODULE")
+end
+
+#swig -ruby -o IgraphWrapper.cpp -c++ ../../src/IgraphWrapper.i
+
+create_makefile (extension_name)

data/ext/IgraphWrapper/igraph_wrap.cpp

@@ -0,0 +1,96 @@
+//
+//  myGraph.cpp
+//  
+//
+//  Created by Mathieu Bouchard on 2014-06-06.
+//
+//
+
+#include "igraph_wrap.h"
+
+vector<vector<double> > SolveAllPairsShortestPath(vector<vector<size_t> > pairs)
+{
+    int n = 0;
+    map<size_t, size_t> id2zid;
+    vector<size_t> zid2id;
+
+    size_t* _pairs = new size_t[2*pairs.size()];
+
+    for(size_t i = 0; i < pairs.size(); ++i)
+    {
+        if(id2zid.count(pairs[i][0]) == 0)
+        {
+            id2zid[pairs[i][0]] = n;
+            zid2id.push_back(pairs[i][0]);
+            ++n;
+        }
+        if(id2zid.count(pairs[i][1]) == 0)
+        {
+            id2zid[pairs[i][1]] = n;
+            zid2id.push_back(pairs[i][1]);
+            ++n;
+        }
+    }
+
+    char* _error = NULL;
+    void* graph_lib = NULL;
+
+    dlerror();
+
+    
+    for(size_t i = 0; i < pairs.size(); ++i)
+    {
+        _pairs[i*2] = id2zid[pairs[i][0]];
+        _pairs[i*2+1] = id2zid[pairs[i][1]];
+    }
+    
+    graph_lib = dlopen("/usr/local/lib/libigraphwrap.dylib", RTLD_LAZY);
+    if(graph_lib == NULL)
+    {    
+         if ((_error = dlerror()) != NULL) 
+         {
+            printf("Cannot load function %s\n", _error);
+         }
+    }
+
+    double* (*allsp)(size_t*, size_t, size_t);
+    *(void **) (&allsp) = dlsym(graph_lib, "SolveAllPairsShortestPath");
+
+   if ((_error = dlerror()) != NULL)  {
+        fprintf(stderr, "%s\n", _error);
+        exit(EXIT_FAILURE);
+    }
+
+
+    double* _out = (*allsp)(_pairs, pairs.size(), zid2id.size());
+    
+    vector<vector<double> > out(n+1);
+    vector<double> temp(n,0.0); 
+
+
+    for(size_t i = 0; i < n; ++i)
+    {
+        out[i] = temp;    
+        //out.push_back(temp);
+        for(size_t j = 0; j < n; ++j)
+        {
+            //printf("%ld, %ld = %f ", i, j, _out[i*n+j]);
+            out[i][j] = _out[i*n+j];
+            //out.back().push_back(n);
+        }
+    }
+    out[n] = temp;
+    for(size_t i = 0; i < n; ++i)
+        out[n][i] = zid2id[i];   
+
+    printf("Cleaning stuff\n");
+
+    delete[] _out;
+    delete[] _pairs;
+
+    dlclose(graph_lib);
+    
+    printf("Success\n");
+    
+    return out;
+}

data/ext/IgraphWrapper/igraph_wrap.h

@@ -0,0 +1,24 @@
+//
+//  myGraph.h
+//  
+//
+//  Created by Mathieu Bouchard on 2014-03-21.
+//
+//
+
+#ifndef IgraphWrapper_h
+#define IgraphWrapper_h
+
+#include <dlfcn.h>
+#include <string>
+#include <iostream>
+#include <unistd.h>
+#include <vector>
+#include <map>
+#include <string>
+
+using namespace std;
+
+vector<vector<double> > SolveAllPairsShortestPath(vector<vector<size_t> > pairs);
+
+#endif

data/lib/IgraphWrapper.rb

@@ -0,0 +1,5 @@
+module IgraphWrapper
+    
+end
+
+require "IgraphWrapper/IgraphWrapper"

metadata

@@ -0,0 +1,49 @@
+--- !ruby/object:Gem::Specification
+name: igraph_wrapper
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Mathieu Bouchard
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-03-20 00:00:00.000000000 Z
+dependencies: []
+description: A ruby wrapper on the iGraph library
+email: mathbouchard@gmail.com
+executables: []
+extensions:
+- ext/IgraphWrapper/extconf.rb
+extra_rdoc_files: []
+files:
+- ext/IgraphWrapper/IgraphWrapper.cpp
+- ext/IgraphWrapper/extconf.rb
+- ext/IgraphWrapper/igraph_wrap.cpp
+- ext/IgraphWrapper/igraph_wrap.h
+- lib/IgraphWrapper.rb
+homepage: http://igraph.org
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: iGraph Wrapper Gem
+test_files: []