Changeset 19871 for lang/ruby

Timestamp:

09/25/08 08:24:58 (2 months ago)

Author:

hogelog

Message:

* ディレクトリ選択画面: ←で開いたときには末尾画像を表示
* ディレクトリ選択画面: Deleteキーでディレクトリ削除
* 画像表示画面 Endキーでからディレクトリ表示画面への移動
* 画像表示画面: /キーで拡大縮小アルゴリズムの切り替え
* Ruby側からはSDL資源の増大が把握できないため適時GCを呼び出すように

Files:

• lang/ruby/misc/fitview.rb (modified) (13 diffs)

lang/ruby/misc/fitview.rb

@@ -7 +7 @@
 # ruby/SDL (http://www.kmc.gr.jp/~ohai/rubysdl.html)入ってる環境で
 # $ ruby fitview.rb 画像ファイルかディレクトリ
-# で画像を適当に拡縮して全画面表示(1024x768)
-#
-# ディレクトリ移動する機能が欲しい
-#
-# ・操作
+# で画像を適当に拡大縮小して全画面表示(1024x768)
+#
+# ・画像表示画面の操作
 #   ←: 前の画像を表示
 #   →: 次の画像を表示
@@ -17 +15 @@
 #   ↓: 画像の下部分に移動。既に下を表示してるなら次の画像を表示
 #   Q, Esc: プログラムの終了
+#   End: ディレクトリ選択へ
+#   /: 拡大縮小アルゴリズムの高速/高性能切り替え
+#
+# ・ディレクトリ選択画面の操作
+#   ←: 選択しているディレクトリを開く。"."を選択で画像表示(先頭から)
+#   →: 選択しているディレクトリを開く。"."を選択で画像表示(末尾から)
+#   Delete: ディレクトリをTRASHDIRに移動
 #
 
@@ -24 +29 @@
 WIDTH = 1024
 HEIGHT = 768
-j
+
 EXTS = %w[png jpg jpeg gif bmp].map{|ext| ".#{ext}" }
 
 FONTS_PATH = ['c:\hoge\sys\mplus_j12r.bdf', 'c:\hoge\sys\mplus_f12r.bdf']
 FONTSIZE = 12
+
+TRASHDIR = 'C:/TEMP'
 
 class SDL::Surface
@@ -40 +47 @@
         self.update_rect(0, 0, self.w, self.h)
     end
-    def scale_draw(surface, scale)
-        SDL::Surface.transform_draw(surface, self, 0, scale, scale, 0, 0, 0, 0, SDL::Surface::TRANSFORM_AA)
-    end
-    def scale_transform(scale)
-        self.transform_surface(0, 0, scale, scale,  SDL::Surface::TRANSFORM_AA)
-    end
-end
-
-def open_path(path)
+    def scale_draw(surface, scale, flags)
+        SDL::Surface.transform_draw(surface, self, 0, scale, scale, 0, 0, 0, 0, flags)
+    end
+    def scale_transform(scale, flags)
+        self.transform_surface(0, 0, scale, scale, flags)
+    end
+end
+
+def open_path(path, reverse)
     basename = nil
     if File.directory?(path)
@@ -57 +64 @@
     end
     entries = Dir.entries('.').reject!{|x|
-        !EXTS.include?(File.extname(x).downcase)
+        !EXTS.include?(File.extname(x).downcase) 
     }
 
@@ -65 +72 @@
     end
 
-    return entries, (basename ? entries.index(basename) : 0)
+    return entries, (basename ? entries.index(basename) : (reverse ? entries.length-1 : 0))
 end
 class Pages
-    def initialize(entries)
+    ## @tableはweakrefあたり使ってキャッシュすると良さそう
+    def initialize(entries, curpage)
         @entries = entries
         @table = []
-        @curpage = 0
+        @curpage = curpage
+        @fastmode = false
     end
     def load(page)
@@ -84 +93 @@
                     h = image.h * scale
 
-                    @table[page] = image.scale_transform(scale)
+                    if @fastmode
+                        @table[page] = image.scale_transform(scale, 0)
+                    else
+                        @table[page] = image.scale_transform(scale, SDL::Surface::TRANSFORM_AA)
+                    end
                 rescue SDL::Error
                     text = "cannot open #{path}"
@@ -95 +108 @@
         @table[page]
     end
-    def preload
-        self.load(@curpage==self.length-1 ? 0 : @curpage+1)
+    def unload(page)
+        @table[page] = nil
+        GC.start
+    end
+    def reload
+        self.unload(@curpage-1)
+        self.unload(@curpage+1)
+        self.unload(@curpage)
+        GC.start
+        self.load(@curpage-1)
+        self.load(@curpage+1)
+        self.load(@curpage)
     end
     def length
@@ -105 +128 @@
             raise SelectDirectoryEvent
         end
+        self.unload(@curpage-1)
         @curpage = @curpage+1
+        self.load(@curpage+1)
         self.load(@curpage)
     end
@@ -112 +137 @@
             raise SelectDirectoryEvent
         end
+        self.unload(@curpage+1)
         @curpage = @curpage-1
+        self.load(@curpage-1)
         self.load(@curpage)
     end
-end
-def fitview(input_path)
+
+    attr_accessor :fastmode
+end
+def paint(image, upview)
+    copy = image
+    unless image.h <= SCREEN.h
+        h = upview ? 0 : image.h - SCREEN.h
+        copy = image.copy_rect(0, h, SCREEN.w, SCREEN.h)
+    end
+
+    SCREEN.fill(0)
+    SCREEN.put(copy, 0, 0)
+    SCREEN.update
+end
+def fitview(input_path, reverse)
     basename = File.basename(input_path)
-    entries, curpage = open_path(input_path)
+    entries, curpage = open_path(input_path, reverse)
 
     upview = true
 
-    pages = Pages.new(entries)
+    pages = Pages.new(entries, curpage)
     image = pages.load(curpage)
 
     loop do
-        copy = image
-        unless image.h <= SCREEN.h
-            h = upview ? 0 : image.h - SCREEN.h
-            copy = image.copy_rect(0, h, SCREEN.w, SCREEN.h)
-        end
-
-        SCREEN.fill(0)
-        SCREEN.put(copy, 0, 0)
-        SCREEN.update
-        pages.preload
+        paint(image, upview)
 
         case event = SDL::Event.wait
@@ -164 +195 @@
                     upview = false
                 end
+            when SDL::Key::END
+                raise SelectDirectoryEvent
+            when SDL::Key::SLASH
+                pages.fastmode = !pages.fastmode
+                image = pages.reload
             end
         end
@@ -186 +222 @@
             when SDL::Key::Q, SDL::Key::ESCAPE
                 raise QuitException
-            when SDL::Key::LEFT, SDL::Key::RIGHT
-                return dirs[select]
+            when SDL::Key::LEFT
+                return dirs[select], true
+            when SDL::Key::RIGHT
+                return dirs[select], false
             when SDL::Key::UP
                 select = select==0? dirs.length-1 : select-1
             when SDL::Key::DOWN
                 select = select==dirs.length-1? 0 : select+1
+            when SDL::Key::DELETE
+                name = dirs[select]
+                begin
+                    File.rename(name, "#{TRASHDIR}/#{name}")
+                #rescue Errno::EXXX
+                rescue SystemCallError
+                    puts "cannot delete #{name}"
+                end
+                dirs = Dir.entries('.').reject{|file| !File.directory?(file)}
+                if select==dirs.length
+                    select = 0
+                end
             end
         end
@@ -223 +273 @@
     image_path = ARGV[0]
 
-    prev_select = File.expand_path(image_path)
-    if File.directory?(prev_select)
-        prev_select = File.basename(prev_select)
-    else
-        prev_select = File.basename(File.dirname(prev_select))
-    end
+    prev_select = '.'
+    reverse = false
 
     loop do
         begin
-            fitview(image_path)
+            fitview(image_path, reverse)
         rescue SelectDirectoryEvent
-            while dir = dirselect(prev_select)
+            GC.start
+            loop do
+                dir, reverse = dirselect(prev_select)
                 if dir == '.'
                     image_path = '.'
                     break
                 else
-                    if dir!='..'
-                        prev_select = dir
+                    if dir=='..'
+                        prev_select = File.basename(File.expand_path('.'))
                     end
                     Dir.chdir(dir)