RubyGems - rhodes - Versions diffs - 2.4.1 → 3.0.0.beta.1 - Mend

rhodes 2.4.1 → 3.0.0.beta.1

Files changed (395) hide show

data/lib/extensions/barcode/ext/barcode/platform/iphone/ZBarSDK/README ADDED Viewed

@@ -0,0 +1,59 @@
+ZBar iPhone SDK
+===============
+ZBar Bar Code Reader is an open source software suite for reading bar
+codes from various sources, such as video streams, image files and raw
+intensity sensors. It supports EAN-13/UPC-A, UPC-E, EAN-8, DataBar,
+Code 128, Code 93, Code 39, Interleaved 2 of 5 and QR Code.  These are
+the Objective C wrappers and integrated widget for developing with the
+library on the iPhone platform.
+Check the ZBar project home page for the latest release, forums, etc.
+* http://zbar.sourceforge.net/iphone
+Installation
+------------
+If you are migrating from a pre-SDK source version of the library,
+first make sure you remove all of the old references to zbar.xcodeproj
+and libzbar.a and revert any related build settings.
+To add the SDK to an Xcode project:
+   1. Drag ZBarSDK into your Xcode project.
+   3. Add these system frameworks to your project:
+      * AVFoundation.framework (weak)
+      * CoreMedia.framework (weak)
+      * CoreVideo.framework (weak)
+      * QuartzCore.framework
+      * libiconv.dylib
+Documentation
+-------------
+See Documentation.html for complete SDK documentation.
+Examples
+--------
+A tutorial that walks through installing and using the SDK is
+available in the documentation.  The SDK disk image also contains the
+resulting Xcode project at Examples/ReaderSample.
+Examples/readertest demonstrates most of the configuration options
+available for the reader.
+You should be able to open and build the examples directly from the
+disk image.  If not, please copy them to your local drive and build
+from there.
+Copyright and License
+---------------------
+Licensed under the GNU Lesser General Public License, version 2.1.
+http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt
+Copyright 2008-2010 � Jeff Brown <spadix@users.sourceforge.net> et al
+See the included files COPYING and LICENSE for details

data/lib/extensions/barcode/ext/barcode/platform/iphone/ZBarSDK/Resources/zbar-back.png ADDED Viewed

Binary file

data/lib/extensions/barcode/ext/barcode/platform/iphone/ZBarSDK/Resources/zbar-help.html ADDED Viewed

@@ -0,0 +1,88 @@
+<?xml version="1.0"?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
+"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<!--
+Copyright 2009-2010 (c) Jeff Brown <spadix@users.sourceforge.net>
+All Rights Reserved
+-->
+<html>
+<head>
+<title>Barcode Reader Help</title>
+<style type="text/css">
+html, body { margin: 0; padding: 0; background: black; color: white; font-family: sans-serif; font-size: 16px }
+h1 { margin: .5em 0; text-align: center; font-size: 28px }
+h2 { font-size: 24px }
+hr { margin: 1em 0; height: 0; border: none; border-top: solid 1px #666 }
+.smaller { font-size: 85% }
+p { margin: .5em }
+a { color: #8af }
+p.cen { text-align: center }
+p.title { margin: 1em; clear: both; text-align: center }
+div.col { width: 50% }
+.clear { clear: both }
+.iconlist { position: relative; clear: both; margin: 4px 0; padding: 1px 0 }
+.icon { width: 64px; height: 64px; overflow: hidden; margin: 12px 16px; padding: 0; background: url("zbar-helpicons.png") no-repeat; font: bold 56px "Marker Felt"; text-align: center }
+.sample { display: block; height: 96px; overflow: hidden; margin: 12px auto; padding: 0; background: url("zbar-samples.png") no-repeat; text-align: center}
+.left { float: left }
+.right { float: right }
+.iconlist > p { margin: 10px }
+.iconlist > h2 { margin: 10px }
+</style>
+</head>
+<body>
+<h1 id="title" style="color: #f88">Barcode Reader Help</h1>
+<hr/>
+<p class="title">Recognized barcodes should look like</p>
+<div class="col left">
+<a class="sample" style="width: 118px; background-position: -96px" href="http://wikipedia.org/wiki/EAN-13"></a>
+<p class="cen"><a href="http://wikipedia.org/wiki/EAN-13">EAN/UPC<br/>Product Codes</a></p>
+</div>
+<div class="col right">
+<a class="sample" style="width: 96px" href="http://wikipedia.org/wiki/QR_Code"></a>
+<p class="cen"><a href="http://wikipedia.org/wiki/QR_Code">QR Codes</a></p>
+</div>
+<p class="clear cen smaller">Also recognized, but not shown:
+<a href="http://wikipedia.org/wiki/Code_128">Code 128</a>,
+<a href="http://wikipedia.org/wiki/DataBar">DataBar (RSS)</a>,
+<a href="http://en.wikipedia.org/wiki/Code_93">Code 93</a>,
+<a href="http://wikipedia.org/wiki/Code_39">Code 39</a> and
+<a href="http://wikipedia.org/wiki/Interleaved_2_of_5">Interleaved 2 of 5</a></p>
+<hr/>
+<p class="clear title">Hints for successful scanning</p>
+<div class="iconlist">
+<div class="icon left"></div>
+<p>Ensure there is plenty of</p>
+<h2 style="color: #ff4">Light</h2>
+</div>
+<div class="iconlist">
+<div class="icon left" style="background: none; color: #2d4">4"</div>
+<h2 style="color: #4f6">Distance</h2>
+<p>should be about 3 to 5 inches</p>
+</div>
+<div class="iconlist">
+<div class="icon left" style="background-position: 0 -64px"></div>
+<h2 style="color: #3ee">Shake</h2>
+<p>to force the camera to focus</p>
+</div>
+<div class="iconlist">
+<div class="icon left" style="background-position: 0 -128px"></div>
+<h2 style="color: #59f">Wait</h2>
+<p>for the autofocus to finish</p>
+</div>
+<div class="iconlist">
+<div class="icon left" style="background-position: 0 -192px"></div>
+<h2 style="color: #d5f">Hold Still</h2>
+<p>while the barcode is scanned</p>
+</div>
+<script type="text/javascript">
+function onZBarHelp(argv) {
+var title;
+switch(argv.reason) {
+case "INFO": break;
+case "FAIL": title = "No Barcode Detected"; break;
+}
+if(title) document.getElementById('title').textContent = title;
+}
+</script>
+</body>
+</html>

data/lib/extensions/barcode/ext/barcode/platform/iphone/ZBarSDK/Resources/zbar-helpicons.png ADDED Viewed

Binary file

data/lib/extensions/barcode/ext/barcode/platform/iphone/ZBarSDK/Resources/zbar-samples.png ADDED Viewed

Binary file

data/lib/extensions/barcode/ext/barcode/platform/iphone/ZBarSDK/libzbar.a ADDED Viewed

Binary file

data/lib/extensions/debugger/debugger.rb CHANGED Viewed

@@ -1,80 +1,212 @@
+require 'uri'
+require 'timeout'
-require 'net/http'
-def debug_read_cmd(io)
-    outbuf = ""
-    begin
-      r,w,e = IO.select([io],nil,nil,0)
-       while r
-         outbuf << io.read(1)
-         r,w,e = IO.select([io],nil,nil,0)
-       end
-    rescue
-      puts $!.inspect
+def debug_read_cmd(io,wait)
+  begin
+    if wait
+      cmd = io.readpartial(4096)
+      $_cmd << cmd if cmd !~ /^\s*$/
+    else
+      cmd = io.read_nonblock(4096)
+      $_cmd << cmd if cmd !~ /^\s*$/
     end
-    outbuf
+  rescue
+    # puts $!.inspect
+  end
 end
-def execute_cmd(cmd)
-  puts "executing: #{cmd}"
+def execute_cmd(cmd, advanced)
+  cmd = URI.unescape(cmd.gsub(/\+/,' ')) if advanced
+  puts "[Debugger] Executing: #{cmd}"
   result = ""
+  error = '0';
   begin
     result = eval(cmd, $_binding).inspect
-  rescue
-    result = "ERROR: #{$!}"
+  rescue Exception => exc
+    error = '1';
+    result = "#{$!}".inspect
   end
-  result = result.gsub(/\n/,"\\n")
-  $_s.write("EV:" + result + "\n")
+  cmd = URI.escape(cmd.sub(/[\n\r]+$/, ''), Regexp.new("[^#{URI::PATTERN::UNRESERVED}]")) if advanced
+  $_s.write("EV" + (advanced ? "L:#{error}:#{cmd}:" : ':'+(error.to_i != 0 ? 'ERROR: ':'')) + result + "\n")
 end
-def debug_handle_cmd(cmd)
-  puts "Received command: #{cmd}"
-  wait = true
-  if cmd =~/CONNECTED/
-    puts "Connected to debugger"
-    wait = false
-  elsif cmd =~/^BP/
-    ary = cmd.split(":")
-    $_file = ary[1]
-    $_line = ary[2].chomp
-    wait = true
-    puts "Breakpoint received:#{$_file}:#{$_line}"
-  elsif cmd =~ /STEP/
-    $_step = true
-    wait = false
-    puts "Received STEP"
-  elsif cmd =~ /CONT/
-    wait = false
-    $_step = false
-  elsif cmd =~ /^EV:/
-    cmd = cmd.gsub(/^EV:/,"")
-    execute_cmd cmd
+def get_variables(scope)
+  if (scope =~ /^GVARS/)
+   cmd = "global_variables"
+   prefix = ""
+   vartype = "G"
+  elsif (scope =~ /^LVARS/)
+   cmd = "local_variables"
+   prefix = ""
+   vartype = "L"
+  elsif (scope =~ /^CVARS/)
+   if $_classname =~ /^\s*$/
+     return
+   end
+   cmd = "class_variables"
+   prefix = "#{$_classname}."
+   vartype = "C"
+  elsif (scope =~ /^IVARS/)
+   if ($_classname =~ /^\s*$/) or ($_methodname =~ /^\s*$/)
+     return
+   end
+   cmd = "instance_variables"
+   prefix = "self."
+   vartype = "I"
+  end
+  begin
+    vars = eval(prefix + cmd, $_binding)
+    $_s.write("VSTART:#{vartype}\n")
+    vars.each do |v|
+      $_s.write("V:#{vartype}:#{v}:#{eval(v,$_binding).inspect}\n")
+    end
+    $_s.write("VEND:#{vartype}\n")
+  rescue
   end
+end
+def log_command(cmd)
+  puts "[Debugger] Received command: #{cmd}"
+end
-  wait
+def debug_handle_cmd(inline)
+  cmd = $_cmd.match(/^([^\n\r]*)([\n\r]+|$)/)[0]
+  processed = false
+  wait = inline
+  if cmd != ""
+    if cmd =~/^CONNECTED/
+      log_command(cmd)
+      puts "[Debugger] Connected to debugger"
+      processed = true
+    elsif cmd =~/^(BP|RM):/
+      log_command(cmd)
+      ary = cmd.split(":")
+      bp = ary[1].gsub(/\|/,':') + ':' + ary[2].chomp
+      if (cmd =~/^RM:/)
+        $_breakpoint.delete(bp)
+        puts "[Debugger] Breakpoint removed: #{bp}"
+      else
+        $_breakpoint.store(bp,1)
+        puts "[Debugger] Breakpoint added: #{bp}"
+      end
+      processed = true
+    elsif cmd =~ /^RMALL/
+      log_command(cmd)
+      $_breakpoint.clear
+      puts "[Debugger] All breakpoints removed"
+      processed = true
+    elsif cmd =~ /^ENABLE/
+      log_command(cmd)
+      $_breakpoints_enabled = true
+      puts "[Debugger] Breakpoints enabled"
+      processed = true
+    elsif cmd =~ /^DISABLE/
+      log_command(cmd)
+      $_breakpoints_enabled = false
+      puts "[Debugger] Breakpoints disabled"
+      processed = true
+    elsif inline and (cmd =~ /^STEPOVER/)
+      log_command(cmd)
+      $_step = true
+      $_step_level = $_call_stack
+      wait = false
+      puts "[Debugger] Step over"
+      processed = true
+    elsif inline and (cmd =~ /^STEPRET/)
+      log_command(cmd)
+      $_step = true
+      $_step_level = $_call_stack-1
+      wait = false
+      puts "[Debugger] Step return"
+      processed = true
+    elsif inline and (cmd =~ /^STEP/)
+      log_command(cmd)
+      $_step = true
+      $_step_level = -1
+      wait = false
+      puts "[Debugger] Step into"
+      processed = true
+    elsif inline and (cmd =~ /^CONT/)
+      log_command(cmd)
+      wait = false
+      $_step = false
+      $_resumed = true
+      puts "[Debugger] Resuming"
+      processed = true
+    elsif cmd =~ /^SUSP/
+      log_command(cmd)
+      $_step = true
+      $_step_level = -1
+      wait = true
+      puts "[Debugger] Suspend"
+      processed = true
+    elsif cmd =~ /^KILL/
+      log_command(cmd)
+      puts "[Debugger] Terminating..."
+      processed = true
+      System.exit
+    elsif inline and (cmd =~ /^EVL?:/)
+      log_command(cmd)
+      processed = true
+      execute_cmd cmd.sub(/^EVL?:/,""), (cmd =~ /^EVL:/ ? true : false)
+    elsif inline and (cmd =~ /^[GLCI]VARS/)
+      log_command(cmd)
+      get_variables cmd
+      processed = true
+    elsif inline
+      log_command(cmd)
+      puts "[Debugger] Unknown command"
+      processed = true
+    end
+  end
+  if processed
+    $_cmd = $_cmd.sub(/^([^\n\r]*)[\n\r]+(.*$)/, "\\2")
+    $_wait = wait if inline
+  end
+  processed
 end
 $_tracefunc = lambda{|event, file, line, id, bind, classname|
-  $_self = self;
+  return if eval('Thread.current!=Thread.main', bind)
   $_binding = bind;
-  if event =~ /line/
-    if ($_file or $_step)
-      if ((file =~ Regexp.new(Regexp.escape($_file) + '$') and line.to_i == $_line.to_i) or $_step)
-        $_s.write("BP:#{file}:#{line}\n")
-        wait = true
-        while wait
-          cmd = debug_read_cmd $_s
-          wait = debug_handle_cmd(cmd) if cmd != ""
+  $_classname = classname;
+  $_methodname = id;
+  if event =~ /^line/
+    unhandled = true
+    step_stop = $_step and (($_step_level < 0) or ($_call_stack <= $_step_level))
+    if (step_stop or ($_breakpoints_enabled and (not $_breakpoint.empty?)))
+      filename = file.sub(/^(.*?[\\\/]|)app[\\\/](.*)$/,'\\2')
+      ln = line.to_i.to_s
+      if (step_stop or ($_breakpoints_enabled and ($_breakpoint.has_key?(filename + ':' + ln))))
+        fn = filename.gsub(/:/, '|')
+        cl = classname.to_s.gsub(/:/,'#')
+        $_s.write((step_stop ? "STEP" : "BP") + ":#{fn}:#{ln}:#{cl}:#{id}\n")
+        puts "[Debugger] " + (step_stop ? "Stop" : "Breakpoint") + " in #{fn} at #{ln}"
+        $_wait = true
+        while $_wait
+          while debug_handle_cmd(true) do end
+          sleep if $_wait
         end
+        unhandled = false
       end
     end
-    cmd = debug_read_cmd $_s
-    debug_handle_cmd(cmd) if cmd != ""
+    if unhandled
+      debug_handle_cmd(true)
+    end
+  elsif event =~ /^call/
+    $_call_stack += 1
+  elsif event =~ /^return/
+    $_call_stack -= 1
+  end
+  if $_resumed
+    $_resumed = false
+    $_s.write("RESUMED\n")
   end
 }
@@ -82,24 +214,40 @@ $_tracefunc = lambda{|event, file, line, id, bind, classname|
 $_s = nil
 begin
-  puts "opening connection"
-  raise "debug host not set" if (Rho::RhoConfig.debug_host.nil? or Rho::RhoConfig.debug_host == "")
-  $_s = timeout(30) { TCPSocket.open(Rho::RhoConfig.debug_host, 9000) }
+  puts "[Debugger] Opening connection"
+  debug_host = (Rho::RhoConfig.debug_host.nil? or Rho::RhoConfig.debug_host == "") ? '127.0.0.1' : Rho::RhoConfig.debug_host
+  debug_port = (Rho::RhoConfig.debug_port.nil? or Rho::RhoConfig.debug_port == "") ? 9000 : Rho::RhoConfig.debug_port
+  $_s = timeout(30) { TCPSocket.open(debug_host, debug_port) }
-  puts "connected: " + $_s.to_s
+  puts "[Debugger] Connected: " + $_s.to_s
   $_s.write("CONNECT\n")
-  $_file = nil
-  $_line = nil
+  $_breakpoint = Hash.new
+  $_breakpoints_enabled = true
   $_step = false
+  $_step_level = -1
+  $_call_stack = 0
+  $_resumed = false
+  $_cmd = ""
+  at_exit {
+    $_s.write("QUIT\n") if (not $_s.nil?)
+  }
   set_trace_func $_tracefunc
+  Thread.new {
+    while true
+      debug_read_cmd($_s,true)
+      while debug_handle_cmd(false) do end
+      if ($_cmd !~ /^\s*$/) and (Thread.main.stop?)
+        $_wait = true
+        Thread.main.wakeup
+      end
+    end
+  }
 rescue
-  puts "Unable to open connection to debugger:" + $!.inspect
+  puts "[Debugger] Unable to open connection to debugger: " + $!.inspect
   $_s = nil
 end