codegraph 0.7.5 → 0.7.7

data/bin/codegraph

@@ -54,6 +54,7 @@ end
 # Which options are availabile ------------------------------------------------
 options = GetoptLong.new(
    ["--help",          "-h", GetoptLong::NO_ARGUMENT],
+   ["--debug",          "-y", GetoptLong::NO_ARGUMENT],
 #   ["--local",         "-l", GetoptLong::NO_ARGUMENT],
 #   ["--source",        "-s", GetoptLong::NO_ARGUMENT],
 #   ["--with-internal", "-w", GetoptLong::NO_ARGUMENT],
@@ -83,6 +84,7 @@ function = ""
 depth = nil
 exclude  = Array.new
 files    = Array.new
+debug    = false
 # option parsing --------------------------------------------------------------
 options.each do |opt, arg|
    case opt
@@ -122,6 +124,8 @@ options.each do |opt, arg|
          output = "txt"
       when "--exclude"
          exclude = arg.split(/ /)
+      when "--debug"
+        debug = true
       else
          show_usage
          exit
@@ -148,6 +152,9 @@ case mode
       g = FunctionGraph.new
 end
 
+# Set debug mode
+g.debug = debug
+
 # Include the internal functions of the language?
 g.internal = internal
 

data/gemspec

@@ -2,7 +2,7 @@ require 'rubygems'
 
 spec = Gem::Specification.new do |s|
   s.name              = "codegraph"
-  s.version           = "0.7.5"
+  s.version           = "0.7.7"
   s.date              = Time.new.to_s
   s.platform          = Gem::Platform::RUBY
   s.bindir            = 'bin'
@@ -12,7 +12,7 @@ spec = Gem::Specification.new do |s|
   s.add_dependency('asciify')
   s.rubyforge_project = "codegraph"
   s.description       = "Display functional dependencies in source code (C, Fortran, PHP, Perl).\n" +
-    "Changes (#{s.version}): Use Asciify to get around non-ASCII chars"
+    "Changes (#{s.version}): --debug opton added"
   s.summary           = "Display functional dependencies in source code (C, Fortran, PHP, Perl)"
   s.author            = "Ralf Mueller"
   s.email             = "stark.dreamdetective@gmail.com"

data/lib/codegraph.rb

@@ -1,4 +1,3 @@
-require 'rubygems'
 require 'pp'
 require 'rgl/adjacency'
 require 'rgl/dot'
@@ -7,11 +6,8 @@ require 'rgl/traversal'
 require 'thread'
 require 'asciify'
 
-
-DEBUG = false
-
 class FunctionGraph < RGL::DirectedAdjacencyGraph
-   attr_accessor :funx, :internal
+   attr_accessor :funx, :internal, :debug
 
    # Theses Parameters are used by interactive representation and for the file
    # generation function to_dot and to_type. They can only be given for the
@@ -51,12 +47,12 @@ class FunctionGraph < RGL::DirectedAdjacencyGraph
 
    def initialize
       super
+      @debug = false
       # the following attribute will hold the functionnames and their bodies
       @funx = Hash.new
       @lock = Mutex.new
       # Should the internal functions be displayed?
       @internal = false
-
    end
    
    # Generates the necessary files:
@@ -71,7 +67,7 @@ class FunctionGraph < RGL::DirectedAdjacencyGraph
           funxFile   = "funxnames"
           ctagsKinds = '--c-kinds=f --fortran-kinds=fsp --php-kinds=f --perl-kinds=f'
 
-          puts "Processing #{file} ..." if DEBUG
+          puts "Processing #{file} ..." if @debug
           basefile   = File.basename(file)
           temfile    = "_" + basefile
           case File.extname(file)
@@ -89,14 +85,14 @@ class FunctionGraph < RGL::DirectedAdjacencyGraph
           gen4ctags  = "ctags -x #{ctagsKinds}  #{codehomedir}/#{basefile} | sort -n -k 3"
           command    = [cppCommand,grep].join(";")
 
-          puts command if DEBUG
+          puts command if @debug
           system(command)
 
           code = open(codehomedir+'/'+ File.basename(file)).readlines
           funxLocations = IO.popen(gen4ctags).readlines.map {|l| l.split[0,4]}
           funxLocations.each_with_index {|ary,i|
             name, kind, line, file = ary
-            puts name if DEBUG
+            puts name if @debug
             line           = line.to_i
             startLineIndex = line - 1
             endLineIndex   = (i+1 < funxLocations.size) ? funxLocations[i+1][2].to_i - 2 : -1
@@ -126,10 +122,10 @@ class FunctionGraph < RGL::DirectedAdjacencyGraph
       names = @funx.keys
       @funx.each_pair {|name,body|
 #        threads << Threads.new(name,body,names) {|name,body|
-          puts "Add func: #{name}" if DEBUG
+          puts "Add func: #{name}" if @debug
           add_vertex(name)
           (names - [name] + @@internal_funx).each { |func|
-            puts body if DEBUG
+            puts body if @debug
             add_edge("#{name}","#{func}") if/#@@matchBeforFuncName#{func}#@@matchAfterFuncName/.match(body)
           }
         }
@@ -246,8 +242,8 @@ class UpperFunctionGraph < SingleFunctionGraph
          graph.funx.each_pair {|g,gbody|
             # dont scan a function for itself
             next if g == func
-            puts g if DEBUG
-            puts gbody if DEBUG
+            puts g if @debug
+            puts gbody if @debug
             if/#@@matchBeforFuncName#{func}#@@matchAfterFuncName/.match(Asciify.new(@@map).convert(gbody))
                graph.add_edge(g,func)
                scan(graph,g)

metadata

@@ -5,8 +5,8 @@ version: !ruby/object:Gem::Version
   segments: 
   - 0
   - 7
-  - 5
-  version: 0.7.5
+  - 7
+  version: 0.7.7
 platform: ruby
 authors: 
 - Ralf Mueller
@@ -14,7 +14,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-01-11 14:26:53 +01:00
+date: 2011-01-14 12:02:48 +01:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -45,7 +45,7 @@ dependencies:
   version_requirements: *id002
 description: |-
   Display functional dependencies in source code (C, Fortran, PHP, Perl).
-  Changes (0.7.5): Use Asciify to get around non-ASCII chars
+  Changes (0.7.7): --debug opton added
 email: stark.dreamdetective@gmail.com
 executables: 
 - codegraph