added the remainder of the files (or almost) from GF 0.8.0

svn path=/trunk/; revision=3651

4 files changed, 90 insertions, 0 deletions

diff --git a/externals/gridflow/bin/backtrace b/externals/gridflow/bin/backtrace
new file mode 100755
index 00000000..ac1358af
--- /dev/null
+++ b/externals/gridflow/bin/backtrace
@@ -0,0 +1,18 @@
+#!/usr/bin/env ruby
+if ARGV.length != 1
+  puts "usage: core.rb <corefile>"
+  exit 1
+end
+qfile=ARGV[0].gsub /'/, "\\\\'"
+x=`gdb --batch -c '#{qfile}'`.split"\n"
+m=/`([^']+)/.match x[0]
+f=File.open("/tmp/backtrace_#{$$}.gdb","w")
+f.puts"bt"
+f.puts"quit"
+f.close
+cmd="gdb #{m[1]} #{qfile} --command=/tmp/backtrace_#{$$}.gdb"
+x=`#{cmd}`.split("\n")
+i=nil
+x.each_with_index {|line,i| break if /^#0/ =~ line }
+x[0..i]=[]
+puts x
diff --git a/externals/gridflow/bin/demangle b/externals/gridflow/bin/demangle
new file mode 100755
index 00000000..923bca25
--- /dev/null
+++ b/externals/gridflow/bin/demangle
@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+f = File.popen "gdb", "r+"
+f.puts "maintenance demangle #{ARGV[0]}", "quit"
+puts f.read.split("\n")[-2].sub(/^\(gdb\) /,"")
diff --git a/externals/gridflow/bin/jmax2pd b/externals/gridflow/bin/jmax2pd
new file mode 100755
index 00000000..5510656a
--- /dev/null
+++ b/externals/gridflow/bin/jmax2pd
@@ -0,0 +1,29 @@
+#!/usr/bin/env ruby
+
+require "gridflow"
+require "gridflow/extra/jmax_format.rb"
+require "gridflow/extra/puredata_format.rb"
+include GridFlow
+#GridFlow.verbose = true
+
+iname,oname = ARGV
+if not iname
+  raise "usage: jmax2pd <input.jmax> [<output.pd>]"
+end
+if not oname
+  oname = iname.sub(/\.jmax$/,".pd")
+end
+keep=["broken","jpatcher","button","slider","messbox"]
+GridFlow.instance_eval{@fclasses_set.delete_if {|k,v|
+  not keep.include? k
+}}
+#p GridFlow.instance_eval{@fclasses_set.keys.sort}
+	
+jfr = JMaxFileReader.new(File.open(iname),FObject)
+FObject.broken_ok = true
+FObject.do_loadbangs = false
+my_patcher = jfr.parse
+pfw = PureDataFileWriter.new(oname)
+pfw.write_patcher my_patcher
+pfw.close
+
diff --git a/externals/gridflow/bin/plusminus b/externals/gridflow/bin/plusminus
new file mode 100755
index 00000000..685014ce
--- /dev/null
+++ b/externals/gridflow/bin/plusminus
@@ -0,0 +1,39 @@
+#!/usr/bin/env ruby
+# NOTE: this works with diff -u only!!!
+
+puts "-"*64
+
+$plustot=0
+$minustot=0
+
+def show
+  printf "%20s %+5d %+5d (net %+5d)\n", $file, $plus, -$minus, $plus-$minus
+end
+
+loop{
+  line = gets
+  break if not line
+  if /^diff/.match line then
+    x = line.split(/\s+/)
+    $plustot+=$plus if $plus
+    $minustot+=$minus if $minus
+    show if $file
+    $file = x[-1]
+    $on=false
+    $plus=0
+    $minus=0
+  elsif /^\@\@/ =~ line then $on=true
+  elsif $on and /^\+/ =~ line then $plus+=1
+  elsif $on and /^\-/ =~ line then $minus+=1
+  end
+}
+
+$plustot+=$plus if $plus
+$minustot+=$minus if $minus
+show if $file
+
+$file="total"
+$plus=$plustot
+$minus=$minustot
+puts "-"*64
+show