RubyGems - ripxplore - Versions diffs - 0.0.2 → 0.4.0 - Mend

ripxplore 0.0.2 → 0.4.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

Files changed (875) hide show

data/doc/files/test/testhelper_rb.src/M000003.html CHANGED Viewed

@@ -5,14 +5,17 @@
 <html>
 <head>
-  <title>file_cache (test/testhelper.rb)</title>
+  <title>image_has_collection_of (test/testhelper.rb)</title>
   <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
   <link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
 </head>
 <body class="standalone-code">
-  <pre><span class="ruby-comment cmt"># File test/testhelper.rb, line 23</span>
-<span class="ruby-keyword kw">def</span> <span class="ruby-identifier">file_cache</span>
-  <span class="ruby-ivar">@@filecache</span>
+  <pre><span class="ruby-comment cmt"># File test/testhelper.rb, line 16</span>
+<span class="ruby-keyword kw">def</span> <span class="ruby-identifier">image_has_collection_of</span>(<span class="ruby-identifier">url</span>,<span class="ruby-identifier">collection_type</span>)
+  <span class="ruby-identifier">image</span>=<span class="ruby-ivar">@@filecache</span>.<span class="ruby-identifier">get_file_system_image</span>(<span class="ruby-identifier">url</span>)
+  <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">image</span>.<span class="ruby-identifier">respond_to?</span>(<span class="ruby-identifier">collection_type</span>),<span class="ruby-node">&quot;#{url} should contain a collection of #{collection_type}&quot;</span>)
+  <span class="ruby-identifier">collection</span>=<span class="ruby-identifier">image</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">collection_type</span>)
+  <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">collection</span>.<span class="ruby-identifier">length</span><span class="ruby-operator">&gt;</span><span class="ruby-value">0</span>,<span class="ruby-node">&quot;#{url} should contain more than zero #{collection_type}&quot;</span>)
 <span class="ruby-keyword kw">end</span></pre>
 </body>
 </html>

data/doc/files/test/testhelper_rb.src/M000004.html CHANGED Viewed

@@ -5,57 +5,14 @@
 <html>
 <head>
-  <title>sniff_url (test/testhelper.rb)</title>
+  <title>file_cache (test/testhelper.rb)</title>
   <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
   <link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
 </head>
 <body class="standalone-code">
-  <pre><span class="ruby-comment cmt"># File test/testhelper.rb, line 27</span>
-<span class="ruby-keyword kw">def</span> <span class="ruby-identifier">sniff_url</span>(<span class="ruby-identifier">url</span>,<span class="ruby-identifier">expected_image_format</span>,<span class="ruby-identifier">expected_file_system</span>,<span class="ruby-identifier">expected_files</span>=<span class="ruby-keyword kw">nil</span>)
-    <span class="ruby-identifier">assert</span>(<span class="ruby-constant">FileSystemImage</span>.<span class="ruby-identifier">is_file_system_image_filename?</span>(<span class="ruby-identifier">url</span>),<span class="ruby-node">&quot;#{url} should have a known file system image extension&quot;</span>)
-    <span class="ruby-identifier">image</span>=<span class="ruby-ivar">@@filecache</span>.<span class="ruby-identifier">get_file_system_image</span>(<span class="ruby-identifier">url</span>)
-    <span class="ruby-identifier">assert_equal</span>(<span class="ruby-identifier">expected_file_system</span>,<span class="ruby-identifier">image</span>.<span class="ruby-identifier">file_system</span>,<span class="ruby-node">&quot;validation of file system for #{url}&quot;</span>)
-    <span class="ruby-identifier">assert_kind_of</span>(<span class="ruby-identifier">expected_image_format</span>,<span class="ruby-identifier">image</span>.<span class="ruby-identifier">image_format</span>,<span class="ruby-node">&quot;validation of image format for #{url}&quot;</span>)
-    <span class="ruby-identifier">assert_not_nil</span>(<span class="ruby-identifier">image</span>.<span class="ruby-identifier">image_format</span>.<span class="ruby-identifier">host_system</span>.<span class="ruby-identifier">full_name</span>,<span class="ruby-value str">&quot;all host systems should implement :full_name&quot;</span>)
-    <span class="ruby-keyword kw">return</span> <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">expected_files</span>.<span class="ruby-identifier">nil?</span>
-    <span class="ruby-identifier">expected_files</span>.<span class="ruby-identifier">each</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">expected_file</span><span class="ruby-operator">|</span>
-      <span class="ruby-identifier">expected_file_filename</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:filename</span>]
-      <span class="ruby-constant">RipXploreLog</span>.<span class="ruby-identifier">info</span>(<span class="ruby-node">&quot;validating #{expected_file_filename}&quot;</span>)
-      <span class="ruby-identifier">raise</span> <span class="ruby-value str">&quot;no native files identified in image&quot;</span> <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">image</span>.<span class="ruby-identifier">files</span>.<span class="ruby-identifier">nil?</span> <span class="ruby-operator">||</span> <span class="ruby-identifier">image</span>.<span class="ruby-identifier">files</span>.<span class="ruby-identifier">length</span><span class="ruby-operator">==</span><span class="ruby-value">0</span>
-      <span class="ruby-identifier">raise</span> <span class="ruby-node">&quot;image.files should of type FileContainer but was #{image.files.class} (file system=#{image.file_system})&quot;</span> <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">image</span>.<span class="ruby-identifier">files</span>.<span class="ruby-identifier">kind_of?</span>(<span class="ruby-constant">FileContainer</span>)
-      <span class="ruby-identifier">native_file</span>=<span class="ruby-identifier">image</span>.<span class="ruby-identifier">files</span>[<span class="ruby-identifier">expected_file_filename</span>]
-      <span class="ruby-identifier">assert_not_nil</span>(<span class="ruby-identifier">native_file</span>,<span class="ruby-node">&quot;#{expected_file_filename} should exist in #{url} - files found: #{image.catalog}&quot;</span>)
-      <span class="ruby-identifier">expected_native_file_type</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:expected_native_file_type</span>]
-      <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_native_file_type</span>.<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
-        <span class="ruby-identifier">assert_kind_of</span>(<span class="ruby-identifier">expected_native_file_type</span>,<span class="ruby-identifier">native_file</span>,<span class="ruby-node">&quot;native file type of #{expected_file_filename} should be as specified&quot;</span>)
-      <span class="ruby-keyword kw">end</span>
-      <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:load_address</span>].<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
-        <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:load_address</span>]<span class="ruby-operator">==</span><span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">load_address</span>,<span class="ruby-node">&quot;load address of #{expected_file_filename} should be $#{&quot;%04x&quot; % expected_file[:load_address]} but was $#{&quot;%04X&quot; % native_file.load_address}&quot;</span>)
-      <span class="ruby-keyword kw">end</span>
-      <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:can_execute</span>].<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
-        <span class="ruby-identifier">method_to_call</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:can_execute</span>]
-        <span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">method_to_call</span>)
-      <span class="ruby-keyword kw">end</span>
-      <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:save_output</span>].<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
-        (<span class="ruby-identifier">method_to_call</span>,<span class="ruby-identifier">extension</span>)=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:save_output</span>]
-        <span class="ruby-identifier">file_cache</span>.<span class="ruby-identifier">purge_native_file_from_cache</span>(<span class="ruby-identifier">native_file</span>)
-        <span class="ruby-identifier">file_cache</span>.<span class="ruby-identifier">force_native_file_to_cache</span>(<span class="ruby-identifier">native_file</span>,<span class="ruby-identifier">method_to_call</span>,<span class="ruby-identifier">extension</span>)
-      <span class="ruby-keyword kw">end</span>
-      <span class="ruby-identifier">expected_file_text_starts_with</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:text_starts_with</span>]
-      <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">expected_file_text_starts_with</span>.<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
-        <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">respond_to?</span>(<span class="ruby-identifier">:to_text</span>),<span class="ruby-node">&quot;#{expected_file_filename} should respond to :to_text&quot;</span>)
-        <span class="ruby-identifier">assert_equal</span>(<span class="ruby-identifier">expected_file_text_starts_with</span>,<span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">to_text</span>[<span class="ruby-value">0</span>,<span class="ruby-identifier">expected_file_text_starts_with</span>.<span class="ruby-identifier">length</span>],<span class="ruby-node">&quot;start of #{expected_file_filename} should be as specified&quot;</span>)
-      <span class="ruby-keyword kw">end</span>
-      <span class="ruby-identifier">expected_file_listing_starts_with</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:listing_starts_with</span>]
-      <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">expected_file_listing_starts_with</span>.<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
-        <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">respond_to?</span>(<span class="ruby-identifier">:to_listing</span>),<span class="ruby-node">&quot;#{expected_file_filename} should respond to :to_listing&quot;</span>)
-        <span class="ruby-identifier">assert_equal</span>(<span class="ruby-identifier">expected_file_listing_starts_with</span>,<span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">to_listing</span>[<span class="ruby-value">0</span>,<span class="ruby-identifier">expected_file_listing_starts_with</span>.<span class="ruby-identifier">length</span>],<span class="ruby-node">&quot;start of #{expected_file_filename} should be as specified&quot;</span>)
-      <span class="ruby-keyword kw">end</span>
-    <span class="ruby-keyword kw">end</span>
-  <span class="ruby-keyword kw">end</span></pre>
+  <pre><span class="ruby-comment cmt"># File test/testhelper.rb, line 23</span>
+<span class="ruby-keyword kw">def</span> <span class="ruby-identifier">file_cache</span>
+  <span class="ruby-ivar">@@filecache</span>
+<span class="ruby-keyword kw">end</span></pre>
 </body>
 </html>

data/doc/{classes/ImageSniffing.src/M000051.html → files/test/testhelper_rb.src/M000005.html} RENAMED Viewed

@@ -5,20 +5,18 @@
 <html>
 <head>
-  <title>sniff_url (ImageSniffing)</title>
+  <title>sniff_url (test/testhelper.rb)</title>
   <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
-  <link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
+  <link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
 </head>
 <body class="standalone-code">
-  <pre><span class="ruby-comment cmt"># File test/tc_image_sniffing.rb, line 5</span>
+  <pre><span class="ruby-comment cmt"># File test/testhelper.rb, line 27</span>
 <span class="ruby-keyword kw">def</span> <span class="ruby-identifier">sniff_url</span>(<span class="ruby-identifier">url</span>,<span class="ruby-identifier">expected_image_format</span>,<span class="ruby-identifier">expected_file_system</span>,<span class="ruby-identifier">expected_files</span>=<span class="ruby-keyword kw">nil</span>)
     <span class="ruby-identifier">assert</span>(<span class="ruby-constant">FileSystemImage</span>.<span class="ruby-identifier">is_file_system_image_filename?</span>(<span class="ruby-identifier">url</span>),<span class="ruby-node">&quot;#{url} should have a known file system image extension&quot;</span>)
-    <span class="ruby-identifier">file</span>=<span class="ruby-ivar">@@filecache</span>.<span class="ruby-identifier">get</span>(<span class="ruby-identifier">url</span>)
-    <span class="ruby-constant">RipXploreLog</span>.<span class="ruby-identifier">info</span>(<span class="ruby-node">&quot;checking #{file.path}&quot;</span>)
-    <span class="ruby-identifier">image</span>=<span class="ruby-constant">RipXplore</span>.<span class="ruby-identifier">best_fit_from_file</span>(<span class="ruby-identifier">file</span>)
+    <span class="ruby-identifier">image</span>=<span class="ruby-ivar">@@filecache</span>.<span class="ruby-identifier">get_file_system_image</span>(<span class="ruby-identifier">url</span>)
     <span class="ruby-identifier">assert_equal</span>(<span class="ruby-identifier">expected_file_system</span>,<span class="ruby-identifier">image</span>.<span class="ruby-identifier">file_system</span>,<span class="ruby-node">&quot;validation of file system for #{url}&quot;</span>)
     <span class="ruby-identifier">assert_kind_of</span>(<span class="ruby-identifier">expected_image_format</span>,<span class="ruby-identifier">image</span>.<span class="ruby-identifier">image_format</span>,<span class="ruby-node">&quot;validation of image format for #{url}&quot;</span>)
+    <span class="ruby-identifier">assert_not_nil</span>(<span class="ruby-identifier">image</span>.<span class="ruby-identifier">image_format</span>.<span class="ruby-identifier">host_system</span>.<span class="ruby-identifier">full_name</span>,<span class="ruby-value str">&quot;all host systems should implement :full_name&quot;</span>)
     <span class="ruby-keyword kw">return</span> <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">expected_files</span>.<span class="ruby-identifier">nil?</span>
     <span class="ruby-identifier">expected_files</span>.<span class="ruby-identifier">each</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">expected_file</span><span class="ruby-operator">|</span>
       <span class="ruby-identifier">expected_file_filename</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:filename</span>]
@@ -34,11 +32,17 @@
       <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:load_address</span>].<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
         <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:load_address</span>]<span class="ruby-operator">==</span><span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">load_address</span>,<span class="ruby-node">&quot;load address of #{expected_file_filename} should be $#{&quot;%04x&quot; % expected_file[:load_address]} but was $#{&quot;%04X&quot; % native_file.load_address}&quot;</span>)
       <span class="ruby-keyword kw">end</span>
       <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:can_execute</span>].<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
         <span class="ruby-identifier">method_to_call</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:can_execute</span>]
         <span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">send</span>(<span class="ruby-identifier">method_to_call</span>)
       <span class="ruby-keyword kw">end</span>
+      <span class="ruby-keyword kw">unless</span>  <span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:save_output</span>].<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
+        (<span class="ruby-identifier">method_to_call</span>,<span class="ruby-identifier">extension</span>)=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:save_output</span>]
+        <span class="ruby-identifier">file_cache</span>.<span class="ruby-identifier">purge_native_file_from_cache</span>(<span class="ruby-identifier">native_file</span>)
+        <span class="ruby-identifier">file_cache</span>.<span class="ruby-identifier">force_native_file_to_cache</span>(<span class="ruby-identifier">native_file</span>,<span class="ruby-identifier">method_to_call</span>,<span class="ruby-identifier">extension</span>)
+      <span class="ruby-keyword kw">end</span>
       <span class="ruby-identifier">expected_file_text_starts_with</span>=<span class="ruby-identifier">expected_file</span>[<span class="ruby-identifier">:text_starts_with</span>]
       <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">expected_file_text_starts_with</span>.<span class="ruby-identifier">nil?</span> <span class="ruby-keyword kw">then</span>
         <span class="ruby-identifier">assert</span>(<span class="ruby-identifier">native_file</span>.<span class="ruby-identifier">respond_to?</span>(<span class="ruby-identifier">:to_text</span>),<span class="ruby-node">&quot;#{expected_file_filename} should respond to :to_text&quot;</span>)

data/doc/files/test/ts_test_all_rb.html CHANGED Viewed

@@ -67,11 +67,6 @@
   <div id="contextContent">
-    <div id="diagram">
-      <map id="map" name="map">
-</map>
-<img src="../../dot/f_0.png" usemap="#map" border="0" alt="dot/f_0.png">
-    </div>
     <div id="description">
       <p>

data/doc/fr_class_index.html CHANGED Viewed

@@ -20,6 +20,7 @@
 <div id="index">
   <h1 class="section-bar">Classes</h1>
   <div id="index-entries">
+    <a href="classes/RipXplore.html">RipXplore</a><br />
   </div>
 </div>
 </body>

data/doc/fr_file_index.html CHANGED Viewed

@@ -20,7 +20,7 @@
 <div id="index">
   <h1 class="section-bar">Files</h1>
   <div id="index-entries">
-    <a href="files/bin/ripxplore_rb.html">bin/ripxplore.rb</a><br />
+    <a href="files/lib/RipXplore_rb.html">lib/RipXplore.rb</a><br />
   </div>
 </div>
 </body>

data/doc/index.html CHANGED Viewed

@@ -19,6 +19,6 @@
         <frame src="fr_class_index.html"  name="Classes" />
         <frame src="fr_method_index.html" name="Methods" />
     </frameset>
-    <frame src="files/bin/ripxplore_rb.html" name="docwin" />
+    <frame src="files/lib/RipXplore_rb.html" name="docwin" />
 </frameset>
 </html>

data/lib/FileCache.rb CHANGED Viewed

@@ -20,7 +20,15 @@ class FileCache
   def cache_name_for_url(url)
-    "#{url_cache_dir}/#{Digest::MD5.hexdigest(url)}.cached"
+    if ( url=~/^file:/) then
+      local_name=CGI.unescape(url.sub(/file:\/+/,""))
+      local_name="#{File::Separator}#{local_name}" unless ((local_name[1].chr==':') || (local_name[0].chr==File::Separator))
+  #    puts "#{url}->#{local_name}"
+      local_name
+    else
+      "#{url_cache_dir}/#{Digest::MD5.hexdigest(url)}.cached"
+    end
   end
   def cache_name_for_native_file(native_file,extension)

data/lib/RipXplore.rb CHANGED Viewed

@@ -4,7 +4,7 @@ $:.unshift(File.dirname(__FILE__)) unless
 require 'open-uri'
 class RipXplore
-VERSION="0.0.2"
+VERSION="0.4.0"
 private
 def RipXplore.require_files_in_subdir(dirname)

data/lib/file_systems/Zx81Snapshot.rb ADDED Viewed

@@ -0,0 +1,47 @@
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+$:.unshift(File.dirname(__FILE__+"\\..")) unless
+	$:.include?(File.dirname(__FILE__+"\\..")) || $:.include?(File.expand_path(File.dirname(__FILE__+"\\..")))
+require 'FileSystem'
+class Zx81Snapshot<FileSystem
+def self.host_system
+  Zx81
+end
+def self.files(file_system_image)
+  files=FileContainer.new
+  file_name=File. basename(file_system_image.filename,".p").upcase
+  file_type=nil
+  files<<NativeFileType.best_fit(file_system_image,file_name,file_system_image.file_bytes,file_type)
+  files
+end
+end
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2008 Jonno Downes (jonno@jamtronix.com)
+#
+#Permission is hereby granted, free of charge, to any person obtaining
+#a copy of this software and associated documentation files (the
+#"Software"), to deal in the Software without restriction, including
+#without limitation the rights to use, copy, modify, merge, publish,
+#distribute, sublicense, and/or sell copies of the Software, and to
+#permit persons to whom the Software is furnished to do so, subject to
+#the following conditions:
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/lib/host_systems/Zx81.rb ADDED Viewed

@@ -0,0 +1,50 @@
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+$:.unshift(File.dirname(__FILE__+"\\..")) unless
+	$:.include?(File.dirname(__FILE__+"\\..")) || $:.include?(File.expand_path(File.dirname(__FILE__+"\\..")))
+require 'HostSystem'
+class Zx81<HostSystem
+def self.full_name
+    "Sinclair ZX81"
+end
+def self.start_track
+    0
+end
+def self.to_ascii(b)
+  b.chr
+end
+end
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2008 Jonno Downes (jonno@jamtronix.com)
+#
+#Permission is hereby granted, free of charge, to any person obtaining
+#a copy of this software and associated documentation files (the
+#"Software"), to deal in the Software without restriction, including
+#without limitation the rights to use, copy, modify, merge, publish,
+#distribute, sublicense, and/or sell copies of the Software, and to
+#permit persons to whom the Software is furnished to do so, subject to
+#the following conditions:
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/lib/image_formats/Zx81PFile.rb ADDED Viewed

@@ -0,0 +1,53 @@
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+$:.unshift(File.dirname(__FILE__+"\\..")) unless
+	$:.include?(File.dirname(__FILE__+"\\..")) || $:.include?(File.expand_path(File.dirname(__FILE__+"\\..")))
+require 'ImageFormat'
+#from http://groups.google.com.au/group/comp.sys.sinclair/browse_frm/thread/4b7506eaafc6cdab/6897525650982909?#6897525650982909
+# A .p file is really just a dump of the memory from address 16393 to the address that the contents of address 16404 point to
+#http://web.ukonline.co.uk/sinclair.zx81/chap28.html
+class Zx81PFile < ImageFormat
+def self.possible_extensions
+    ['.p']
+end
+#~ is_valid_image_if lambda {
+  #~ (file_system_image.file_bytes[0]==0x00) || (file_system_image.file_bytes[0]==0x01)
+#~ }
+def self.host_system
+    Zx81
+end
+end
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2008 Jonno Downes (jonno@jamtronix.com)
+#
+#Permission is hereby granted, free of charge, to any person obtaining
+#a copy of this software and associated documentation files (the
+#"Software"), to deal in the Software without restriction, including
+#without limitation the rights to use, copy, modify, merge, publish,
+#distribute, sublicense, and/or sell copies of the Software, and to
+#permit persons to whom the Software is furnished to do so, subject to
+#the following conditions:
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/lib/native_file_types/desktop.ini ADDED Viewed

@@ -0,0 +1,4 @@
+[ViewState]
+Mode=
+Vid=
+FolderType=NotSpecified

data/lib/native_file_types/zx81/Zx81Basic.rb ADDED Viewed

@@ -0,0 +1,260 @@
+require 'NativeFileType'
+require 'Zx81Snapshot'
+class Zx81Basic<NativeFileType
+#http://www.worldofspectrum.org/ZX81BasicProgramming/chap27.html
+def Zx81Basic.file_system_file_types
+  {
+    Zx81Snapshot=>:any
+  }
+end
+def load_address
+  16393
+end
+ZX81_TOKENS={
+0=>' ',
+11=>'"',
+12=>'�',
+13=>'$',
+14=>':',
+15=>'?',
+16=>'(',
+17=>')',
+18=>'>',
+19=>'<',
+20=>'=',
+21=>'+',
+22=>'-',
+23=>'*',
+24=>'/',
+25=>';',
+26=>',',
+27=>'.',
+28=>'0',
+29=>'1',
+30=>'2',
+31=>'3',
+32=>'4',
+33=>'5',
+34=>'6',
+35=>'7',
+36=>'8',
+37=>'9',
+38=>'A',
+39=>'B',
+40=>'C',
+41=>'D',
+42=>'E',
+43=>'F',
+44=>'G',
+45=>'H',
+46=>'I',
+47=>'J',
+48=>'K',
+49=>'L',
+50=>'M',
+51=>'N',
+52=>'O',
+53=>'P',
+54=>'Q',
+55=>'R',
+56=>'S',
+57=>'T',
+58=>'U',
+59=>'V',
+60=>'W',
+61=>'X',
+62=>'Y',
+63=>'Z',
+64=>'RND ',
+65=>'INKEY$ ',
+66=>'PI ',
+112=>'<cursor up>',
+113=>'<cursor down>',
+114=>'<cursor left>',
+115=>'<cursor right>',
+116=>'GRAPHICS ',
+117=>'EDIT ',
+118=>'NEWLINE ',
+119=>'RUBOUT ',
+120=>'/',
+121=>'FUNCTION ',
+127=>'cursor',
+128=>' ',
+139=>'"',
+140=>'�',
+141=>'$',
+142=>':',
+143=>'?',
+144=>'(',
+145=>')',
+146=>'>',
+147=>'<',
+148=>'=',
+149=>'+',
+150=>'-',
+151=>'*',
+152=>'/',
+153=>';',
+154=>',',
+155=>'.',
+156=>'0',
+157=>'1',
+158=>'2',
+159=>'3',
+160=>'4',
+161=>'5',
+162=>'6',
+163=>'7',
+164=>'8',
+165=>'9',
+166=>'A',
+167=>'B',
+168=>'C',
+169=>'D',
+170=>'E',
+171=>'F',
+172=>'G',
+173=>'H',
+174=>'I',
+175=>'J',
+176=>'K',
+177=>'L',
+178=>'M',
+179=>'N',
+180=>'O',
+181=>'P',
+182=>'Q',
+183=>'R',
+184=>'S',
+185=>'T',
+186=>'U',
+187=>'V',
+188=>'W',
+189=>'X',
+190=>'Y',
+191=>'Z',
+192=>'""',
+193=>'AT ',
+194=>'TAB ',
+195=>'?',
+196=>'CODE ',
+197=>'VAL ',
+198=>'LEN ',
+199=>'SIN ',
+200=>'COS ',
+201=>'TAN ',
+202=>'ASN ',
+203=>'ACS ',
+204=>'ATN ',
+205=>'LN ',
+206=>'EXP ',
+207=>'INT ',
+208=>'SQR ',
+209=>'SGN ',
+210=>'ABS ',
+211=>'PEEK ',
+212=>'USR ' ,
+213=>'STR$ ',
+214=>'CHR$ ',
+215=>'NOT ',
+216=>'**',
+217=>'OR ',
+218=>'AND ',
+219=>'<=',
+220=>'>=',
+221=>'<>',
+222=>'THEN ',
+223=>'TO ',
+224=>'STEP ',
+225=>'LPRINT ',
+226=>'LLIST ',
+227=>'STOP ',
+228=>'SLOW ',
+229=>'FAST ',
+230=>'NEW ',
+231=>'SCROLL ',
+232=>'CONT ',
+233=>'DIM ',
+234=>'REM ',
+235=>'FOR ',
+236=>'GOTO ' ,
+237=>'GOSUB ' ,
+238=>'INPUT ',
+239=>'LOAD ',
+240=>'LIST ',
+241=>'LET ',
+242=>'PAUSE ',
+243=>'NEXT ',
+244=>'POKE ',
+245=>'PRINT ',
+246=>'PLOT ',
+247=>'RUN ',
+248=>'SAVE ',
+249=>'RAND ',
+250=>'IF ',
+251=>'CLS ',
+252=>'UNPLOT ',
+253=>'CLEAR ',
+254=>'RETURN ',
+255=>'COPY ',
+}
+def to_listing
+    p=0x74 #start at offset 16509
+    d_file=contents[3]+(contents[4]<<8)# what would be memory offset 16396
+    s=""
+    while p<(d_file-load_address)
+      line_number=(contents[p]<<8)+contents[p+1]
+      p+=2
+      line_length=contents[p]+(contents[p+1]<<8)
+      s<<"#{line_number.to_s} "
+      i=2
+      while i<=line_length && !contents[p+i].nil? do
+        b=contents[p+i]
+        if b==126 then
+          #the next 5 bytes are binary form of the number we have just displayed
+          i+=5
+          s<<" " unless (i>=line_length-1) || (contents[p+i+1]==17)
+        else
+          token=ZX81_TOKENS[b]
+          token="<#{"$%02X" % b}>" if token.nil?
+          s<<token
+        end
+        i+=1
+      end
+      s<<"\n"
+      p+=line_length+2
+    end
+  s
+end
+end
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2008 Jonno Downes (jonno@jamtronix.com)
+#
+#Permission is hereby granted, free of charge, to any person obtaining
+#a copy of this software and associated documentation files (the
+#"Software"), to deal in the Software without restriction, including
+#without limitation the rights to use, copy, modify, merge, publish,
+#distribute, sublicense, and/or sell copies of the Software, and to
+#permit persons to whom the Software is furnished to do so, subject to
+#the following conditions:
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.