rwdtorrent 0.01

data/code/superant.com.rwdtinkerbackwindow/loadconfigurationvariables.rb

@@ -0,0 +1,13 @@
+   # this method loads the on screen variables into the running class
+   def loadconfigurationvariables
+   
+   configfiletoload = File.join(ConfigurationDir,TinkerWin2ConfigurationFileName)
+   begin
+    load configfiletoload
+    @extraconfigdatadisplay = ""
+@newconfigurationresult = "Config Variables loaded"
+rescue
+ @extraconfigdatadisplay = ""
+ @newconfigurationresult = "loading error"
+ end
+  end

data/code/superant.com.rwdtinkerbackwindow/network.rb

@@ -0,0 +1,87 @@
+#!ruby
+require 'socket'		# Network stuff
+require 'timeout'		# Timeout functions
+
+def network_start
+ if RUBY_PLATFORM != "i386-mswin32"
+ processone = fork { 
+  network_demon }
+  Process.detach(processone)
+
+ else
+  puts "fork not tried winXP?"
+ end
+  @viewremotecommandresult = "starting controller on next available port"
+end
+
+  def network_demon
+	 # Find configuration variables
+	 host = "127.0.0.1"
+	 port = $rwdcontrolports[0].to_i
+	 
+openportfound = false
+until openportfound
+   
+	 # Create a socket to listen on and bind it to the host and port 
+	 begin
+		@socket = UDPSocket::new()
+		@socket.bind(host, port)
+	 # Rescue the "Address in use" error
+     openportfound = true
+   
+	 rescue Errno::EADDRINUSE
+		 puts "controller startup: Port #{port} on host #{host} is already in use."
+		port=port+1
+	 # Rescue the "Address not available' error
+	 rescue Errno::EADDRNOTAVAIL
+		puts "Network plugin: Address #{host} is not available to bind."
+		port=port+1
+	 # Rescue "permission denied errors
+    rescue Errno::EACCES
+		puts "controller startup: Access denied when binding interface addresses. Did you try to bind a port under 1024 as a regular user?"
+		port=port+1
+	 # Rescue all other errors
+	 rescue
+   puts "Network plugin: An error occured."
+		port = port+1
+	 # Rescue all other errors
+	 end
+ 
+   end
+   
+
+	 # Get all acceptable hosts 
+	 hosts = ["localhost","vaio-sag"] 
+	 # Do some nice errorchecking
+	 if(hosts.type != Array)
+		puts "Network plugin: No hosts found in networkConfig/acceptHosts. Shutting down plugin."
+		return -1 # Return the errorcode for plugin failure
+	 end
+
+	 # Main loop 
+	 while(true)
+		# Get data and client data from the client
+		data, info = @socket.recvfrom(256)
+
+		# Is this an acceptable IP address?
+		if(hosts.include?(info[2]) || hosts.include?(info[3]))
+		  command, parameter = data.split(';')
+		  
+		  # Command actions
+		  command.downcase!()
+		  case command
+      
+		  when 'stop'
+						  @socket.send("hello world",0,info[3],info[1].to_i)
+				
+      		  when 'query'
+							  @socket.send("#{$rwdapplicationidentity} on port #{$port}",0,info[3],info[1].to_i)
+				
+      
+		  end # case command
+
+		end # Access control if
+	 end # while(true)
+
+  end # Network::start()
+

data/code/superant.com.rwdtinkerbackwindow/openappletname.rb

@@ -0,0 +1,18 @@
+  def openappletname 
+   require 'fileutils'
+    nametext = "%s" % [@a_installlist]
+	 
+        begin # exception trapped block
+   	 fileName = "installed/" + nametext + ".inf"
+        
+	fd = File.open(fileName,"r")
+	 @displaytext = " "
+	while ! fd.eof?
+	 @displaytext = fd.read
+	 end
+	 fd.close
+        rescue
+            @displaytext = "\n" + "error"
+        end # exception rescue
+
+  end

data/code/superant.com.rwdtinkerbackwindow/openhelpwindowtinkerwin2.rb

@@ -0,0 +1,42 @@
+# this code is to call the help window
+def runhelpwindowtinkerwin2
+ 
+  # $helptopicsarray =  $helptopicsarray | [""]
+
+        $help_topic = "tinkerwin2_help"
+   if @rwd_tab == "rwdzipslister"
+     $help_topic = "tinkerwin2_help"
+   end
+  
+    if @rwd_tab == "filelister" 
+       $help_topic = "applet_viewing"
+   
+    end
+      if @rwd_tab == "zipslister" 
+       $help_topic = "applet_installation"
+       
+    end
+     if @rwd_tab == "editconfigurationfile"
+       $help_topic = "applet_tinkerbackeditconfiguration"
+      
+    end
+     if @rwd_tab == "rwdremotecontrol"
+      $help_topic = "remote_control"
+      
+      end
+       if @rwd_tab == "superantcomremotezipsinstall"
+       $help_topic = "remotegemapplet_install"
+       end
+          
+  
+ if @rwd_window != "rwdtinkerhelpwindow"
+       $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+      else
+           $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+  end
+  runhelpwindow
+end
+
+

data/code/superant.com.rwdtinkerbackwindow/remotegemlist.rb

@@ -0,0 +1,24 @@
+# This tinker method is to retrieve the list of rwdzip applets available to install from the remote repository
+  
+def superantcomremotegemlist
+  gemcommandoption = "search --remote "
+    gemfilename = "rwdzip"
+    commandtext = "gem search --remote rwdzip"  
+    commandtemp = $xpcommand  + commandtext
+    begin # exception trapped block
+         
+     tempremotegemappletsresult = `#{commandtemp}  2>&1`
+     @superantcomremotegemappletsfullresult = tempremotegemappletsresult
+     fileList = tempremotegemappletsresult.split(/\n/).delete_if { |x| ! (x =~ /\Arwdzip/) }
+    
+  @superantcomremotegemappletsresult = fileList.rwd_method("superantcomremotegemappletdirsname")
+      rescue SystemCallError, StandardError
+     @superantcomremotegemappletsresult  = "system call error: " + $!
+    end # exception rescue
+end
+ 
+def superantcomremotegemappletdirsname(inffile)
+  applet                = inffile
+  @superantcominstallremoteappletinput       = applet
+  
+end

data/code/superant.com.rwdtinkerbackwindow/removeapplet.rb

@@ -0,0 +1,32 @@
+  def removeapplet
+   require 'fileutils'
+    nametext = "%s" % [@a_removeapplet]
+	 
+        begin # exception trapped block
+   	 fileName = "installed/" + nametext + ".inf"
+        count =  0
+	fd = File.open(fileName,"r") 
+	       
+   	    
+   	    fd.each { |oneline|   
+         if count == 1
+        if File.exist?(oneline.chop)
+        FileUtils.rm_rf( oneline.chop)
+         end
+        
+         end
+         count = 1
+      }
+   fd.close
+   
+    FileUtils.rm_rf( fileName)
+    
+    
+   @removeapplettext = "applet files removed! - restart rwd to finish uninstalling"    
+ 
+        rescue
+           @removeapplettext = "\n" + "error"
+       
+   end # exception rescue
+
+  end

data/code/superant.com.rwdtinkerbackwindow/runrwdtinkerbackwindow.rb

@@ -0,0 +1,12 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# http://www.erikveen.dds.nl/rubywebdialogs/index.html 
+# For more information about RwdTinker see http://www.rubyforge.net/projects/rwdapplications
+  
+  # call the rwdtinker helpwindow  
+
+  def runrwdtinkerbackwindow
+   @rwd_window = "tinkerbackwindow"
+   @rwd_tab = "rwdzipslister"
+   end   
+   

data/code/superant.com.rwdtinkerbackwindow/rwdtinkerwin2version.rb

@@ -0,0 +1,14 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# http://www.erikveen.dds.nl/rubywebdialogs/index.html 
+# For more information about RwdTinker see http://www.rubyforge.net/projects/rwdapplications
+  
+  # return the version constant defined in the config file
+  def runrwdtinkerwin2version
+  @rwd_window = "applicationversion"
+  @versionappnamedisplay = "RwdTinkerWin2"
+  @versioncopyrightdisplay = "(c) 2004 Steven Gibson "
+  @versionnumberdisplay =  "Version " + RwdTinkerWin2Version
+
+   end
+  

data/code/superant.com.rwdtinkerbackwindow/saveconfigurationrecord.rb

@@ -0,0 +1,18 @@
+  # this method saves the configuration record
+  def saveconfigurationrecord 
+   require 'fileutils'
+   if @a_configurationfilename
+   newname = "%s" %   [@a_configurationfilename] # grab the filename to create
+   newdata =@a_configline1.to_s + "\n" + @a_configline2.to_s + "\n" + @a_configline3.to_s + "\n" + @a_configline4.to_s + "\n" + @a_configline5.to_s + "\n" + @a_configline6.to_s + "\n" + @a_configline7.to_s + "\n" + @a_configline8.to_s + "\n"
+	 
+        begin # exception trapped block
+          fileName = File.join( ConfigurationDir, newname )
+        	fd = File.open(fileName,"w")
+	        fd.print(newdata) # save the record info to the file
+	        fd.close
+          @newconfigurationresult=newdata # show the record info in the browser
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+    end
+  end

data/code/superant.com.rwdtinkerbackwindow/viewappletcontents.rb

@@ -0,0 +1,21 @@
+  def viewappletcontents
+   require 'fileutils'
+   require 'extras/zip/zip'
+    nametext = "%s" % [@a_installapplet]
+	 
+        begin # exception trapped block
+   	 fullname =  nametext + ".zip"
+     fileName = File.join($zipslocation,fullname)
+  tempfilecontents = " "
+  zf = Zip::ZipFile.new(fileName)
+ zf.sort.each {
+  |entry|
+      tempfilecontents =  tempfilecontents + entry.to_s  + "\n"
+                     }
+   @appletcontentstext = tempfilecontents 
+   
+       rescue
+            @installapplettext = "unzip error - error opening applet"
+        end # exception rescue
+
+  end

data/code/superant.com.rwdtinkerbackwindow/viewgemappletcontents.rb

@@ -0,0 +1,21 @@
+  def viewgemappletcontents
+   require 'fileutils'
+   require 'extras/zip/zip'
+    nametext = "%s" % [@a_installapplet]
+	 
+        begin # exception trapped block
+   	 fullname =  nametext + ".zip"
+     
+  tempfilecontents = " "
+  zf = Zip::ZipFile.new(fullname)
+ zf.sort.each {
+  |entry|
+      tempfilecontents =  tempfilecontents + entry.to_s  + "\n"
+                     }
+   @appletcontentstext = tempfilecontents 
+   
+       rescue
+            @installapplettext = "unzip error - error opening applet"
+        end # exception rescue
+
+  end

data/code/superant.com.rwdtorrent/helptesthashrwdtorrent.rb

@@ -0,0 +1,55 @@
+  
+
+ Helptext.update( :rwdtorrent_generalhelp => "This program is torrent download GUI
+      
+ You can select a torrent file in the torrentfile directory and download it
+ 
+ There are tabs to view file sizes  and edit configurations
+ 
+ 'View Torrent Metafiles' - to view and select torrent files before downloading
+ 
+ 'View Torrent' - to view file size of downloaded file
+ 
+ 'Torrent Download Display' the tab to start a download and open the torrent download window
+ 
+ 'Edit Configuration' - to change the configuration of rwdtorrent
+ 
+       .",
+ :torrent_help => "You can view torrent metafile details
+   click the bottom button 'list torrent lists' to see a list 
+   of the torrent metafiles in the torrent directory.
+   click on a file name with the mouse to select it. 
+   
+   after a file name is selected you can click 'View local Torrent Detail'
+   This will show the torrent detail on the same screen
+   
+   You can also enter a http address with a torrent
+  Click on the 'View http Torrent Detail' to see the detail
+  of a http torrent address
+  
+  You can change the address of the torrent metafile directory in the
+  rwdtorrent.cnf file",
+  :torrentsize_help => "You can see the size of downloaded files
+   Click 'View Torrent List' 
+   
+  You can change the location of the torrent download directory in the
+   rwdtorrent.cnf file
+   ",
+   :torrentrefresh_help => "This is the screen to download a torrent
+   once a filename is selected click on 'Start local Download' 
+   
+   This should open another window with download information
+   Each 10 seconds the window should refresh.
+   
+   click the stop button in the refresh window to reset for another download",
+         
+       :rwdtorrent_configuration => " click on 'Edit Configuration'
+ You can view the configuration file
+ 
+  You can edit the configuration
+  
+  Remember to reload the configuration variables if you want your
+  changes used.
+  "
+  
+)

data/code/superant.com.rwdtorrent/listnamerecord.rb

@@ -0,0 +1,15 @@
+ # this code is to list the file data
+ def listtorrentrecordfiles
+  if File.exist?($rwdtorrentfilesdir)
+   fileList      = Dir.new($rwdtorrentfilesdir).entries.sort.delete_if { |x| ! (x =~ /torrent$/) }
+   
+   @torrentrecordsresult  = fileList.rwd_method("filltorrentrecordname")
+  end
+ end
+ 
+ # this method is to help fill in list of names
+ def filltorrentrecordname(inffile)
+  applet                = inffile.gsub(/\.torrent$/, "")
+  @a_viewtorrent       = applet
+ end
+

data/code/superant.com.rwdtorrent/loadconfigurationrecord.rb

@@ -0,0 +1,36 @@
+   # this method puts the configuration rexord on the screen
+  def loadrwdtorrentconfiguration
+ 
+         require 'fileutils'
+          
+               @a_torrentconfigurationfilename = "rwdtorrent.cnf" 
+        
+	      
+        begin # exception trapped block
+       
+       Dir.chdir($progdir)
+	      fileName = File.join(ConfigurationDir, "rwdtorrent.cnf")
+        
+        
+	      fd = File.open(fileName,"r")
+	      @a_torrentconfigline1=        fd.readline.chomp
+	      @a_torrentconfigline2 =  fd.readline.chomp
+        @a_torrentconfigline3 = fd.readline.chomp
+          @a_torrentconfigline4 = fd.readline.chomp
+        @a_torrentconfigline5 = fd.readline.chomp
+         @a_torrentconfigline6 = fd.readline.chomp 
+          @a_torrentconfigline7 =fd.readline.chomp
+          @a_torrentconfigline8 = fd.readline.chomp
+           @a_torrentconfigline9 = fd.readline.chomp
+          @a_torrentconfigline10 = fd.readline.chomp
+           @a_torrentconfigline11 = fd.readline.chomp
+	 
+	      while ! fd.eof?
+	        @extratorrentconfigdatadisplay = fd.readline
+	      end
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/superant.com.rwdtorrent/loadconfigurationvariables.rb

@@ -0,0 +1,13 @@
+   # this method loads the on screen variables into the running class
+   def loadrwdtorrentconfigurationvariables
+   
+   configfiletoload = File.join(ConfigurationDir,"rwdtorrent.cnf")
+   begin
+    load configfiletoload
+    @extratorrentconfigdatadisplay = ""
+@newtorrentconfigurationresult = "Config Variables loaded"
+rescue
+ @extratorrentconfigdatadisplay = ""
+ @newtorrentconfigurationresult = "loading error"
+ end
+  end