green_shoes 1.0.337 → 1.1.348

data/lib/shoes/shy.rb

@@ -0,0 +1,130 @@
+#
+# lib/shoes/shy.rb
+# Shy, the Shoes YAML archive format
+#
+require 'digest/md5'
+require 'zlib'
+require 'find'
+require 'tmpdir'
+require 'yaml'
+
+class Shy
+  VERSION = 0x0001
+  MAGIC   = "_shy".freeze
+  LAYOUT = "A4vV".freeze #Force to Little Endian for all platforms
+
+  yaml_as 'tag:hackety.org,2007:shy'
+  attr_accessor :name, :creator, :version, :launch
+
+  def self.launchable(d)
+    if File.directory? d
+      Dir["#{d}/**/*.rb"].map do |path|
+        path.gsub(%r!#{Regexp::quote(d)}/!, '')
+      end
+    else
+      [File.basename(d)]
+    end
+  end
+
+  def self.__hdr__(f)
+    hdr = f.read(10).unpack(LAYOUT)
+    raise IOError, "Invalid header" if hdr[0] != MAGIC and hdr[1] > VERSION
+    YAML.load(f.read(hdr[2]))
+  end
+
+
+  def self.du(root)
+    size = 0
+    Find.find(root) do |path|
+      if FileTest.directory?(path)
+        if File.basename(path)[0] == ?.
+          Find.prune
+        else
+          next
+        end
+      else
+        size += FileTest.size(path)
+      end
+    end
+    size
+  end
+
+  def self.meta(path, d = ".")
+    File.open(path, 'rb') do |f|
+      shy = __hdr__(f)
+    end
+  end
+
+  def self.x(path, d = ".")
+    File.open(path, 'rb') do |f|
+      shy = __hdr__(f)
+      inp = Zlib::GzipReader.new(f)
+      Archive::Tar::Minitar.unpack(inp, d)
+      shy
+    end
+  end
+
+  def self.c(path, shy, d, &blk)
+    path = File.expand_path(path)
+    meta = shy.to_yaml
+    File.open(path, "wb") do |f|
+      f << [MAGIC, VERSION, meta.length].pack(LAYOUT)
+      f << meta
+      self.czf(f, d, &blk)
+    end
+  end
+
+  def self.progress(total, &blk)
+    if blk
+      last, left = 0.0, total
+      proc do |action, name, stats|
+        if action == :file_progress
+          left -= stats[:currinc]
+          prg = 1.0 - (left.to_f / total.to_f)
+          blk[name, (last = prg), left] if prg - last > 0.02
+        end
+      end
+    end
+  end
+
+  def self.czf(f, d, &blk)
+    total = du(d)
+    out = Zlib::GzipWriter.new(f)
+    files = ["."]
+    unless File.directory? d
+      files = [File.basename(d)]
+      d = File.dirname(d)
+    end
+    Dir.chdir(d) do
+      Archive::Tar::Minitar.pack(files, out, &blk)
+    end
+  end
+
+  def self.xzf(f, d, &blk)
+    gz = Zlib::GzipReader.new(f)
+    Archive::Tar::Minitar.unpack(gz, d, &blk)
+  end
+
+  def self.md5sum(path)
+    digest = Digest::MD5.new
+    File.open(path, "rb") do |f|
+      digest.update f.read(8192) until f.eof
+    end
+    digest.hexdigest
+  end
+
+  def self.hrun(f)
+    b, i = 0, 1
+    last = 65535
+    while i < last
+      case f.readline
+      when /OLDSKIP=(\d+)/
+        last = $1.to_i 
+      when /FULLSIZE=(\d+)/
+        b = $1.to_i
+      end
+      i += 1
+    end
+    b
+  end
+end

data/samples/sample1.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 xspeed, yspeed = 10, 6
 xdir, ydir = 1, 1
@@ -10,7 +10,7 @@ Shoes.app width: 300, height: 300 do
   button('stop'){a.stop}
   button('move'){p.move 200, 30}
   button('remove'){p.clear}
-  img = image '../static/gshoes-icon.png'
+  img = image File.join(DIR, '../static/gshoes-icon.png')
   img.click{alert "You're soooo quick!"}
 
   x, y = 150, 150

data/samples/sample10.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 300, height: 300 do
   flow do

data/samples/sample11.rb

@@ -1,6 +1,6 @@
 # Same snippet as http://shoes.heroku.com/manual/Events.html#motion{|left,top|...}
 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 200, height: 200 do
   background black

data/samples/sample12.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 300, height: 300 do
   background cadetblue

data/samples/sample13.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 # The same as sample60.rb on Shoes Tutorial Note
 Shoes.app :width => 300, :height => 300 do

data/samples/sample14-1.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 520, height: 520 do
   def mk_ovals degree, color, size, mx, my, n, n1, n2, n3

data/samples/sample14.rb

@@ -10,7 +10,7 @@
 # directions. As the circles move they change size and color. 
 #
 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 degree = 0
 color = 0

data/samples/sample15.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 TEXT =<<EOS
     Lorem ipsum dolor sit amet, consectetur adipisicing elit, \
@@ -17,4 +17,4 @@ Shoes.app do
   para lines[0], NL
   para lines[1], NL, justify: true
   para lines[2], NL, leading: -5
-end
+end

data/samples/sample16.rb

@@ -1,6 +1,6 @@
 # Same snippet as http://shoes-tutorial-note.heroku.com/html/00402_No.1_para.html
 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app :width => 240, :height => 95 do
   para 'Testing, test, test. ',

data/samples/sample17.rb

@@ -1,6 +1,6 @@
 # Add new method bg and fg to sample17
 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app :width => 240, :height => 95 do
   para 'Testing, test, test. ',

data/samples/sample18.rb

@@ -1,10 +1,10 @@
-require "../lib/green_shoes"
+require "green_shoes"
 
 Shoes.app width: 700, height: 600 do
   title "Shoes is a ", link("tiny"){alert "Cool!"}, " graphics toolkit. "
 
   flow width: 0.4 do
-    img = image '../static/gshoes-icon.png'
+    img = image File.join(DIR, '../static/gshoes-icon.png')
     img.click{alert "You're soooo quick!"}
   end
 

data/samples/sample19.rb

@@ -1,6 +1,6 @@
 # almost the same code as sample58 on (Red) Shoes Tutorial Note: 
 # http://shoes-tutorial-note.heroku.com/html/00704_Assignment_4_Pong_in_Shoes.html
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app :width => 400, :height => 400, :resizable => false do
   vx, vy = 3, 4

data/samples/sample2.rb

@@ -1,13 +1,14 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app title: 'Green Shoes New Logo Icon!', width: 300, height: 420 do
   stack do
-    image '../static/gshoes-icon.png'
+    path = File.join(DIR, '../static/gshoes-icon.png')
+    image path
     flow do
-      image '../static/gshoes-icon.png'
-      image '../static/gshoes-icon.png'
+      image path
+      image path
     end
-    image '../static/gshoes-icon.png'
+    image path
     para ' ' * 30, 'Created by Zak'
   end
 end

data/samples/sample20.rb

@@ -1,24 +1,24 @@
 # This is a tiny flip book (aka Para-Para Manga in Japanese)
 # original is http://www.paraman.net/play/preview/1258
 # 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app title: 'potacho', width: 175, height: 160 do
   background tan
   
   @imgs = []
-  1.upto 60 do |i|
-    @imgs << image("./potato_chopping/1258_s#{"%03d" % i}.gif").hide.move(10, 10)
+  1.upto 59 do |i|
+    @imgs << image(File.join(DIR, "../samples/potato_chopping/1258_s#{"%03d" % i}.gif")).hide.move(10, 10)
   end
 
   @imgs.first.show
   
   def potacho
-    @imgs[59].hide
+    @imgs[58].hide
     a = animate 12 do |i|
       @imgs[i].show
       @imgs[i-1].hide if i > 0
-      a.stop if i > 58
+      a.stop if i > 57
     end
   end
   

data/samples/sample21.rb

@@ -1,7 +1,7 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 300, height: 100 do
   background forestgreen, curve: 30
   border gold, strokewidth: 5, curve: 30
   subtitle fg(strong('Shoes Shoes Shoes'), white), align: 'center'
-end
+end

data/samples/sample22.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app do
   background chocolate..black, angle: 130

data/samples/sample23.rb

@@ -1,7 +1,7 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 300, height: 300 do
-  fname = '../static/gshoes-icon.png'
+  fname = File.join(DIR, '../static/gshoes-icon.png')
   background yellow..orange, angle: 90
   border fname, strokewidth: 20, curve: 100
   fill fname

data/samples/sample24.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 400, height: 400 do
   cap [:rect, :curve, :project][rand 3]
@@ -8,7 +8,7 @@ Shoes.app width: 400, height: 400 do
   rect 200, 200, 100, 100
   rect 0, 200, 100, 100
   rect 200, 0, 100, 100
-  stroke '../static/gshoes-icon.png'
+  stroke File.join(DIR, '../static/gshoes-icon.png')
   strokewidth 10
   line 355, 180, 5, 111, strokewidth: 20
   stroke red

data/samples/sample25.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 305, height: 460 do
   background lightskyblue
@@ -11,7 +11,7 @@ Shoes.app width: 305, height: 460 do
     end
   end
 
-  image '../static/gshoes-icon.png', margin: 20, margin_left: 80
+  image File.join(DIR, '../static/gshoes-icon.png'), margin: 20, margin_left: 80
   tagline fg(em(strong('A sample for margin style.')), maroon), 
     margin: [30, 0, 0, 30]
 

data/samples/sample26.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 450, height: 150 do
   background black

data/samples/sample27.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app do
   button 'go' do

data/samples/sample28.rb

@@ -1,5 +1,5 @@
 # The Game Snake. Refer to Gallery No.7: http://shoes-tutorial-note.heroku.com/html/01120_Fancy_Gallery_6-10.html
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app :title => 'Snake Game v0.1' do
   background black

data/samples/sample29.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app do
   lb = list_box items: COLORS.keys.map(&:to_s), choose: 'red' do |s|

data/samples/sample3.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 300, height: 400 do
   fill rgb(0, 0.6, 0.9, 0.1)

data/samples/sample30.rb

@@ -1,13 +1,13 @@
 # Almost same code as sample22.rb : http://shoes-tutorial-note.heroku.com/html/00508_The_Widget_class.html
 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 class Answer < Shoes::Widget
   attr_reader :mark
   def initialize word
     flow do
       para word, width: 70
-      @mark = image('./loogink.png', width: 20, height: 20).hide
+      @mark = image(File.join(DIR, '../samples/loogink.png'), width: 20, height: 20).hide
     end
   end
 end

data/samples/sample31.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app do
   strokewidth 3

data/samples/sample32.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app title: 'A Tiny Chipmunk Physics Demo' do
   extend ChipMunk

data/samples/sample33.rb

@@ -1,4 +1,4 @@
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 500, height: 100, title: 'Bloopsaphone Play Lists'do
   background mediumspringgreen..hotpink, angle: 90

data/samples/sample34.rb

@@ -1,6 +1,6 @@
 # Refer to NKS (Nobody Knows Shoes) page 21.
 
-require '../lib/green_shoes'
+require 'green_shoes'
 
 Shoes.app width: 280, height: 440 do
   flow width: 1.0, margin: 10 do