rwdtorrent 0.04 → 0.05

data/ev/tree.rb

@@ -88,7 +88,7 @@ class TreeObject
   def inspect
     parent, children	= @parent, @children
 
-    @parent, @children	= parent.id, children.collect{|obj| obj.id}
+    @parent, @children	= parent.object_id, children.collect{|obj| obj.object_id}
 
     res = "  " * (level-1) + "#{self.class}(#{@subtype}) #{super}"
 
@@ -96,6 +96,34 @@ class TreeObject
 
     res
   end
+
+  def previous(klass=[], skip=[])
+    klass	= [klass].flatten
+    skip	= [skip].flatten
+
+    po	= @parent
+    return nil	if po.nil?
+
+    ch	= po.children
+    return nil	if ch.nil?
+
+    n	= ch.index(self)
+    return nil	if n.nil?
+
+    res	= nil
+    if klass.nil?
+      n -= 1
+      res	= ch[n]
+    else
+      begin
+        n -= 1
+        res	= ch[n]
+      end while (klass.empty? or klass.collect{|k| ch[n-1].kind_of?(k)}.sort.uniq == [true]) \
+            and (skip.empty? or skip.collect{|k| ch[n-1].kind_of?(k)}.sort.uniq == [false])
+    end
+
+    res
+  end
 end
 
 class Tree
@@ -138,7 +166,7 @@ class Tree
   end
 
   def self.location(url, form=Hash.new)
-    s	= HTTPClient.get(url, form)
+    s	= HTTPClient.get(url, {}, form)
     s	= ""	if s.nil?
     new(s)
   end
@@ -155,7 +183,7 @@ class Tree
 
     tree	= nil
 
-    Dir.mkdirrec(dir)
+    File.mkpath(dir)
 
     if File.file?(file)
       @@mutex.synchronize do
@@ -227,7 +255,7 @@ class Tree
   end
 
   def markclosed
-    ([self].concat @objects).each do |obj|
+    ([self] + @objects).each do |obj|
       obj.children.each_index do |i|
         co1		= obj.children[i]
         co2		= obj.children[i+1]
@@ -238,7 +266,7 @@ class Tree
   end
 
   def deletedummies
-    ([self].concat @objects).each do |obj|
+    ([self] + @objects).each do |obj|
       obj.children.delete_if do |obj2|
         obj2.upordown == Dummy
       end

data/ev/xml.rb

@@ -1,4 +1,101 @@
 require "ev/sgml"
 
+class SGMLObject
+  def to_x(closetags=true)
+    res	= ""
+
+    parsetree("prechildren_to_x", "postchildren_to_x", res, closetags)
+
+    res
+  end
+end
+
+class Text < SGMLObject
+  def prechildren_to_x(res, closetags)
+    res << @text.strip	unless @text.strip.empty?
+  end
+end
+
+class Comment < SGMLObject
+  def prechildren_to_x(res, closetags)
+    res << "\n"	if not previous([], [Text]).kind_of?(Comment)
+    lines	= @text.gsub(/(<!--|-->)/, "").lf.split(/\n/)
+    if lines.length == 1
+      res << "  "*(@level-1) + "<!-- " + lines[0].strip + " -->" + "\n"
+    else
+      res << "  "*(@level-1) + "<!--" + "\n"
+      res << lines.collect{|s| "  "*(@level-1) + s.strip}.delete_if{|s| s.compress.empty?}.join("\n")
+      res << "\n"
+      res << "  "*(@level-1) + "-->" + "\n"
+      res << "\n"
+    end
+  end
+end
+
+class Special < SGMLObject
+  def prechildren_to_x(res, closetags)
+    res << "  "*(@level-1) + @text.compress + "\n"
+  end
+end
+
+class Instruction < SGMLObject
+  def prechildren_to_x(res, closetags)
+    res << "  "*(@level-1) + @text.compress + "\n"
+  end
+end
+
+class OpenTag < Tag
+  def prechildren_to_x(res, closetags)
+    a	= [@subtype]
+
+    args	= @args.dup
+    args.delete("id")
+    args.delete("name")
+    args	= args.sort
+    args.unshift(["id", @args["id"]])		if @args.include?("id")
+    args.unshift(["name", @args["name"]])	if @args.include?("name")
+
+    args.each do |k, v|
+      if not v.include?("'")
+        a << "#{k}='#{v}'"
+      else
+        if not v.include?('"')
+          a << "#{k}=\"#{v}\""
+        else
+          a << "#{k}='#{v.gsub(/\'/, '"')}'"
+        end
+      end
+    end
+
+    if @children.length == 0 or (@children.length == 1 and @children[0].kind_of?(Text) and @children[0].text.compress.empty?)
+      res << "  "*(@level-1) + "<#{a.join(" ")}/>" + "\n"
+    else
+      if @children.length == 1 and @children[0].kind_of?(Text) and @children[0].text.lf.split(/\n/).length == 1
+        res << "  "*(@level-1) + "<#{a.join(" ")}>"
+      else
+        res << "  "*(@level-1) + "<#{a.join(" ")}>" + "\n"
+      end
+    end
+  end
+
+  def postchildren_to_x(res, closetags)
+    if closetags
+      unless @children.length == 0 or (@children.length == 1 and @children[0].kind_of?(Text) and @children[0].text.compress.empty?)
+        res << "\n"		if @children.length == 1 and @children[0].kind_of?(Text) and @children[0].text.lf.split(/\n/).length > 1
+        res << "  "*(@level-1)	unless @children.length == 1 and @children[0].kind_of?(Text) and @children[0].text.lf.split(/\n/).length == 1
+        res << "</#{@subtype}>"
+        res << "\n"
+      end
+    end
+  end
+end
+
 class XML < SGML
+  def to_x(closetags=true)
+    res	= ""
+
+    parsetree("prechildren_to_x", "postchildren_to_x", res, closetags)
+
+    res
+  end
 end

data/extras/rubytorrent/metainfo.rb

@@ -131,7 +131,8 @@ end
 
 class MetaInfo
   def initialize(dict=nil)
-    raise TypeError, "argument must be a Hash (maybe see MetaInfo.from_location)" unless dict.is_a? Hash
+#    raise TypeError, "argument must be a Hash (maybe see MetaInfo.from_location)" unless dict.is_a? Hash
+   
     @s = TypedStruct.new do |s|
       s.field :info => MetaInfoInfo, :announce => URI::HTTP,
               :announce_list => Array, :creation_date => Time,

data/gui/00coreguibegin/applicationguitop.rwd

@@ -1,4 +1,4 @@
 $rwdguivar=
 "<application>
-  <window name=\"main\" title=\"Tinker - RubyWebDialogs\">
+  <window name=\"main\" title=\"RwdTinker - RubyWebDialogs\">
 <tabs>"

data/gui/frontwindowselectionbegin/selectiontabbegin/00selectiontabbegin.rwd

@@ -1,6 +1,6 @@
 $rwdguivar=
 "	
-      <tab name=\"selectiontab\" caption=#{Message[:selection_panel]}>
+      <tab name=\"selectiontab\" caption=\"Menu Panel\">
 
       <table>
       <row> <p align=\"right\">Open a new location </row>

data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/60editconfiguration.rwd

@@ -16,21 +16,7 @@ $rwdguivar=
     
     </horizontal>
     <table>
-      <row> <p align=\"right\" >FileName:</p>  <text size=70 name=\"a_configurationfilename\"/> </row>
-      <row> <p align=\"right\">1:</p>  <text size=70  name=\"a_configline1\"/> </row>
-      <row> <p align=\"right\">2:</p>  <text size=70  name=\"a_configline2\"/> </row>
-      <row> <p align=\"right\">3:</p>  <text size=70  name=\"a_configline3\"/> </row>
-      <row> <p align=\"right\">4:</p>  <text  size=70 name=\"a_configline4\"/> </row>
-      <row> <p align=\"right\">5:</p>  <text size=70 name=\"a_configline5\"/> </row>
-      <row> <p align=\"right\">6:</p>  <text size=70 name=\"a_configline6\"/> </row>
-      <row> <p align=\"right\">7:</p>  <text size=70 name=\"a_configline7\"/> </row>
-      <row> <p align=\"right\">8:</p>  <text size=70 name=\"a_configline8\"/> </row>
-      <row> <p align=\"right\">9:</p>  <text size=70 name=\"a_configline9\"/> </row>
-      <row> <p align=\"right\">10:</p>  <text size=70 name=\"a_configline10\"/> </row>
-      <row> <p align=\"right\">11:</p>  <text size=70 name=\"a_configline11\"/> </row>
-      <row> <p align=\"right\">12:</p>  <text size=70 name=\"a_configline12\"/> </row>
-     <row> <p align=\"right\">13:</p>  <text size=70 name=\"a_configline13\"/> </row>
-      <row> <p align=\"right\">14:</p>  <text size=70 name=\"a_configline14\"/> </row>
+        <textarea name=\"a_configurationfile\"/>
        
 
     </table>

data/rwd_files/HowTo_Tinker.txt

@@ -227,6 +227,10 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 == Changelog
+Version 1.66
+ Fixed directory layout
+ increased size of config edit screen
+
 Version 1.65
  Changed documents listing screen - now using hash
  Changed helpabout screen - now using hash

data/rwd_files/HowTo_Torrent.txt

@@ -132,6 +132,11 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 == Changelog
+Version 0.05
+ updated to rwdtinker 1.66
+ changed SAFE level to 0 - don't put online
+ updated to Webdialog 0.2.0 4-2005 version
+
 Version 0.04
  now only using rubytorrent to read metafile data
  changed config file screen

data/rwdconfig.dist

@@ -1,4 +1,4 @@
-##VERSION:1.65
+##VERSION:1.66
 # rwdtinker core configuration file
 ##NAME: ConfigLocation:0
 ConfigLocation=""

data/tests/makedist.rb

@@ -57,4 +57,5 @@ ListingCommand = "ls -1 -s -h #{DistroTitle}*"
 
 puts `#{ListingCommand}`
 
-print "Build finished\n"
+print "Build finished\n"
+print "for debian remeber to change config file: RwdTorrentRoot and $torrentfile location"