Changeset 19701 for lang/ruby

Timestamp:

09/22/08 03:11:32 (2 months ago)

Author:

hogelog

Message:

ディレクトリ移動機能追加

Files:

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

lang/ruby/misc/fitview.rb

@@ -19 +19 @@
 #
 
+require 'kconv'
 require 'sdl'
 
@@ -26 +27 @@
 EXTS = ['.png', '.jpg', '.jpeg', '.gif', '.bmp', '.jpeg']
 
-FONTPATH = 'C:\Windows\Fonts\GOTHIC.TTF'
-FONTSIZE = 32
+FONTS_PATH = ['c:\hoge\sys\mplus_j12r.bdf', 'c:\hoge\sys\mplus_f12r.bdf']
+FONTSIZE = 12
 
 class SDL::Surface
@@ -61 +62 @@
     if entries.length==0
         puts "no image: #{File.expand_path('.')}"
-        raise QuitException
+        raise SelectDirectoryEvent
     end
 
@@ -85 +86 @@
                     @table[page] = image.scale_transform(scale)
                 rescue SDL::Error
+                    text = "cannot open #{path}"
                     surface = SDL::Surface.plain_surface(SCREEN.w, SCREEN.h, SCREEN.format)
-                    text = "cannot open #{path}"
-                    DEFAULT_FONT.draw_solid_utf8(surface, text, 0, 0, 255, 255, 255)
+                    draw_text(surface, text, 0, 0)
                     @table[page] = surface
                 end
@@ -101 +102 @@
     end
     def next_page
-        @curpage = @curpage==self.length-1 ? 0 : @curpage+1
+        if @curpage==self.length-1
+            raise SelectDirectoryEvent
+        end
+        @curpage = @curpage+1
         self.load(@curpage)
     end
     def prev_page
-        @curpage = @curpage==0 ? self.length - 1 : @curpage-1
+        if @curpage==0
+            raise SelectDirectoryEvent
+        end
+        @curpage = @curpage-1
         self.load(@curpage)
     end
 end
-
-class QuitException < Exception
-end
-
-begin
-    if ARGV.length==0
-        puts 'no input'
-        raise QuitException
-    end
-
-    SDL.init(SDL::INIT_VIDEO)
-    SDL::TTF.init
-
-    DEFAULT_FONT = SDL::TTF.open(FONTPATH, FONTSIZE)
-
-    SDL::Screen.open(WIDTH, HEIGHT, 0, SDL::HWSURFACE|SDL::HWACCEL|SDL::FULLSCREEN)
-    SCREEN = SDL::Screen.get
-
-    input_path = ARGV[0]
+def fitview(input_path)
     basename = File.basename(input_path)
     entries, curpage = open_path(input_path)
@@ -164 +153 @@
                 if upview || image.h <= SCREEN.h
                     upview = false
-                    image, scale, enough = pages.prev_page
+                    image = pages.prev_page
                 else
                     upview = true
@@ -178 +167 @@
         end
     end
+end
+
+def dirselect
+    dirs = Dir.entries('.').reject{|file| !File.directory?(file)}
+    select = 0
+    loop do
+        SCREEN.fill(0)
+        SCREEN.draw_rect(0, select*FONTSIZE, SCREEN.w, FONTSIZE, 255, true, 100)
+        dirs.each_with_index{|dir, i|
+            draw_text(SCREEN, dir, 0, i*FONTSIZE)
+        }
+        SCREEN.update
+        case event = SDL::Event.wait
+        when SDL::Event::Quit
+            raise QuitException
+        when SDL::Event::KeyDown
+            case event.sym
+            when SDL::Key::Q, SDL::Key::ESCAPE
+                raise QuitException
+            when SDL::Key::LEFT, SDL::Key::RIGHT
+                return dirs[select]
+            when SDL::Key::UP
+                select = select==0? dirs.length-1 : select-1
+            when SDL::Key::DOWN
+                select = select==dirs.length-1? 0 : select+1
+            end
+        end
+    end
+end
+def draw_text(surface, text, x, y)
+    DEFAULT_FONT.put(surface, text.tojis, 0, y, 255, 255, 255)
+end
+
+class SelectDirectoryEvent < Exception
+end
+class QuitException < Exception
+end
+
+begin
+    if ARGV.length==0
+        puts 'no input'
+        raise QuitException
+    end
+
+    SDL.init(SDL::INIT_VIDEO)
+
+    DEFAULT_FONT = SDL::Kanji.open(FONTS_PATH[0], FONTSIZE)
+    FONTS_PATH[1..-1].each{|font|
+        DEFAULT_FONT.add(font)
+    }
+
+    SDL::Screen.open(WIDTH, HEIGHT, 0, SDL::HWSURFACE|SDL::HWACCEL|SDL::FULLSCREEN)
+    SCREEN = SDL::Screen.get
+
+    image_path = ARGV[0]
+    loop do
+        begin
+            fitview(image_path)
+        rescue SelectDirectoryEvent
+            while dir = dirselect
+                if dir == '.'
+                    image_path = '.'
+                    break
+                else
+                    Dir.chdir(dir)
+                end
+            end
+        end
+    end
+
 rescue SDL::Error => error
     puts error.message