akane_sound 0.1.0

data/lib/akane_sound/class.sound.rb

@@ -0,0 +1,381 @@
+class Sound < AkaneSound
+  attr_accessor :volume, :track, :mode, :state, :tstmp_play_start,
+    :tstmp_play_cur, :progress, :side
+  def initialize
+    @track = nil
+    @track_data = nil
+    @side = nil
+    @pointer_left = nil
+    @pointer_right = nil
+    @state = "not playing"
+    @tmp_playlist_left = nil
+    @playlist_left = nil
+    @playlist_left_bkp = nil
+    @tmp_playlist_right = nil
+    @progress = 0
+    @playlist_right = nil
+    @playlist_right_bkp = nil
+    @tstmp_play_start = nil
+    @tstmp_play_cur = nil
+    @tstmp_pause_start = nil
+    @total_pause = 0
+    @volume = @@save_data[:volume]
+    @play_dir = nil
+    @play_dir_bkp = nil
+    @tmp_dir = nil
+    set_vol
+    @mode = { next: @@save_data[:next], repeat: @@save_data[:repeat],
+              shuffle: @@save_data[:shuffle] }
+    @end = false
+    @tracks_played = 0
+  end
+
+  def update
+    now = SDL2.get_ticks
+    case @state
+    when "playing"
+      @tstmp_play_cur = (now - @tstmp_play_start) - @total_pause
+      @progress = Util.get_percentage(@tstmp_play_cur, @track_data[:duration])
+      if @tstmp_play_cur >= @track_data[:duration]
+        if @mode[:next]
+          skip("next", 1)
+        else
+          if @mode[:repeat]
+            case @side
+            when "left"
+              set_track(@pointer_left, false)
+            when "right"
+              set_track(@pointer_right, false)
+            end
+            start_track
+          else
+            stop_track
+          end
+        end
+      end
+    when "paused"
+    when "not playing"
+    when nil
+    end
+  end
+
+  def skip(type, offset)
+    stop_track
+    return if @end
+    case type
+    when "next"
+
+      # pointer correction
+      case @side
+      when "left"
+        if @pointer_left+offset >= @playlist_left.length
+          @end = true unless @mode[:repeat]
+          @tracks_played = 0
+          @pointer_left = 0
+          offset = 0
+        end
+        unless @playlist_left[@pointer_left+offset][:index]
+          skip("next", offset+1)
+          return
+        end
+      when "right"
+        if @pointer_right+offset >= @playlist_right.length
+          @end = true unless @mode[:repeat]
+          @tracks_played = 0
+          @pointer_right = 0
+          offset = 0
+        end
+        unless @playlist_right[@pointer_right+offset][:index]
+          skip("next", offset+1)
+          return
+        end
+      end
+
+      # skip
+
+      case @side
+      when "left"
+        set_track(@pointer_left+offset, false)
+        @tracks_played += 1
+        start_track
+      when "right"
+        set_track(@pointer_right+offset, false)
+        @tracks_played += 1
+        start_track
+      end
+
+    when "previous"
+      
+      # pointer correction
+      case @side
+      when "left"
+        if @pointer_left-offset < 0
+          @end = true unless @mode[:repeat]
+          @pointer_left = @playlist_left.length-1
+          offset = 0
+        end
+        unless @playlist_left[@pointer_left-offset][:index]
+          skip("previous", offset+1)
+          return
+        end
+      when "right"
+        if @pointer_right-offset < 0
+          @end = true unless @mode[:repeat]
+          @pointer_right = @playlist_right.length-1
+          offset = 0
+        end
+        unless @playlist_right[@pointer_right-offset][:index]
+          skip("previous", offset+1)
+          return
+        end
+      end
+
+      return if @end
+
+      # skip
+
+      case @side
+      when "left"
+        set_track(@pointer_left-offset, false)
+        start_track
+      when "right"
+        set_track(@pointer_right-offset, false)
+        start_track
+      end
+
+    end
+  end
+
+  def set_track(pointer, setter)
+    @end = false
+    set_playlist(@side) if setter
+    case @side
+    when "left"
+      if setter
+        pointer = @playlist_left.index { |song| song[:index] == pointer }
+      else
+        pointer = @pointer_left if pointer >= @playlist_left.length
+      end
+      @pointer_left = pointer
+      @track_data = @playlist_left[pointer]
+      SDL2::Mixer.open(@track_data[:sample].to_i,
+                       SDL2::Mixer::DEFAULT_FORMAT, 2, 512)
+      set_vol
+      @track = SDL2::Mixer::Music.load(@playlist_left[pointer][:path])
+    when "right"
+      if setter
+        pointer = @playlist_right.index { |song| song[:index] == pointer }
+      else
+        pointer = @pointer_right if pointer >= @playlist_right.length
+      end
+      @pointer_right = pointer
+      @track_data = @playlist_right[pointer]
+      SDL2::Mixer.open(@track_data[:sample].to_i,
+                       SDL2::Mixer::DEFAULT_FORMAT, 2, 512)
+      set_vol
+      @track = SDL2::Mixer::Music.load(@playlist_right[pointer][:path])
+    end
+    #todo restore_playlist if fails to load
+  end
+
+  def play_track
+    if SDL2::Mixer::MusicChannel.play?
+      if SDL2::Mixer::MusicChannel.pause?
+        @total_pause += SDL2.get_ticks - @tstmp_pause_start
+        @state = "playing"
+        case @side
+        when "left"
+          set_status("[PLAY] #{@playlist_left[@pointer_left][:filename]}")
+        when "right"
+          set_status("[PLAY] #{@playlist_right[@pointer_right][:filename]}")
+        end
+        SDL2::Mixer::MusicChannel.resume
+      else
+        @tstmp_pause_start = SDL2.get_ticks
+        @state = "paused"
+        case @side
+        when"left"
+          set_status("[PAUSE] #{@playlist_left[@pointer_left][:filename]}")
+        when "right"
+          set_status("[PAUSE] #{@playlist_right[@pointer_right][:filename]}")
+        end
+        SDL2::Mixer::MusicChannel.pause
+      end
+    end
+  end
+
+  def stop_track
+    if @track
+      set_status("[]")
+      SDL2::Mixer::MusicChannel.halt if SDL2::Mixer::MusicChannel.play?
+      SDL2::Mixer.close
+      @track = nil
+      @track_data = nil
+      @state = "not playing"
+      @progress = 0
+      case @side
+      when "left"
+        #@pointer_left = nil
+      when "right"
+        #@pointer_right = nil
+      end
+
+    end
+  end
+
+  def start_track
+    @state = "playing"
+    case @side
+    when "left"
+      set_status("[PLAY] #{@playlist_left[@pointer_left][:filename]}")
+      @tstmp_play_start = SDL2.get_ticks
+      @total_pause = 0
+      SDL2::Mixer::MusicChannel.play(@track, 1)
+    when "right"
+      set_status("[PLAY] #{@playlist_right[@pointer_right][:filename]}")
+      @tstmp_play_start = SDL2.get_ticks
+      @total_pause = 0
+      SDL2::Mixer::MusicChannel.play(@track, 1)
+    end
+  end
+
+  def get_play_id(side)
+    case side
+    when "left"
+      return @pointer_left
+    when "right"
+      return @pointer_right
+    end
+  end
+
+  def get_track
+    case @side
+    when "left"
+      return @playlist_left[@pointer_left]
+    when "right"
+      return @playlist_right[@pointer_right]
+    end
+
+  end
+
+  def get_play_path(side)
+    #return "" if side != @side
+    if @state == "playing" || @state == "paused"
+      case side
+      when "left"
+        if @side == "left"
+          return @track_data[:path]
+          #return @playlist_left[@pointer_left][:path]
+        else
+          return ""
+        end
+      when "right"
+        if @side == "right"
+          return @track_data[:filename]
+          #return @playlist_right[@pointer_right][:filename]
+        else
+          return ""
+        end
+      end
+    else
+      return ""
+    end
+  end
+
+  def set_side(side)
+    @side = side
+  end
+
+  def toggle_shuffle
+    if @mode[:shuffle]
+      @mode[:shuffle] = false
+      restore_playlist("left") if @playlist_left
+      restore_playlist("right") if @playlist_right
+    else
+      @mode[:shuffle] = true
+      @playlist_left.shuffle! if @playlist_left
+      @playlist_right.shuffle! if @playlist_right
+    end
+  end
+
+  def toggle_repeat
+    if @mode[:repeat]
+      @mode[:repeat] = false
+    else
+      @mode[:repeat] = true
+    end
+  end
+  def toggle_next
+    if @mode[:next]
+      @mode[:next] = false
+    else
+      @mode[:next] = true
+    end
+  end
+
+  def set_vol
+    SDL2::Mixer::MusicChannel.volume = @volume
+  end
+
+  def set_tmp_playlist(pl, side, dir)
+    case side
+    when "left"
+      i = 0
+      pl = pl.map do |item|
+        if !item[:dir_flag] && !item[:pl_flag]
+          #item[:path] = File.join(dir, item[:filename])
+          item[:index] = i
+        else
+          item[:index] = nil
+        end
+        i += 1
+        item
+      end
+      @tmp_playlist_left = pl
+      @tmp_dir = dir
+    when "right"
+      i = 0
+      pl = pl.map do |item|
+        item[:index] = i
+        i += 1
+        item
+      end
+      @tmp_playlist_right = pl
+      @tmp_dir = dir
+      set_playlist("right")
+    end
+  end
+
+  private
+
+  def set_playlist(side)
+    case side
+    when "left"
+      @playlist_left = @tmp_playlist_left
+      @playlist_left_bkp = Array.new(@playlist_left)
+      
+      @play_dir_bkp = @play_dir
+      @play_dir = @tmp_dir
+      if @mode[:shuffle]
+        @playlist_left.shuffle!
+      end
+    when "right"
+      @playlist_right = @tmp_playlist_right
+      @playlist_right_bkp = Array.new(@playlist_right)
+      if @mode[:shuffle]
+        @playlist_right.shuffle!
+      end
+    end
+  end
+
+  def restore_playlist(side)
+    case side
+    when "left"
+      @playlist_left = Array.new(@playlist_left_bkp)
+      @play_dir = @play_dir_bkp
+    when "right"
+      @playlist_right = Array.new(@playlist_right_bkp)
+    end
+  end
+
+end

data/lib/akane_sound/class.upper_section_base.rb

@@ -0,0 +1,421 @@
+class UpperSectionBase < ViewBase
+  attr_accessor :max_elements
+  def initialize(x, y, w, h, col)
+    super
+    @view = nil
+    @element_h = nil
+    @offset = nil
+    @max_elements = 0
+    @element_h = (@@config[:font_size] * @@config[:line_height_mod]).to_i
+    @offset = @element_h
+    @max_elements = 0
+    set_view
+    @txt_color   = Util.to_col_ar(@@config[:text_color])
+    @txt_col_dis = Util.to_col_ar(@@config[:text_color_disabled])
+    @txt_color_sel   = Util.to_col_ar(@@config[:text_color_selected])
+    @elements = Array.new
+    @title = @@font.render_blended(@title, @txt_color)
+    @title_rect = SDL2::Rect[8, @element_h/2-@title.h/2, @title.w, @title.h]
+
+    update_element_strings
+    set_page
+    update_element_positions
+  end
+
+  def update
+    if @focus_flag
+      if (@@inp.down == 1 || @@inp.down >= 20) && @playlist.length > 0
+        if @@inp.down == 1
+          @pointer = (@pointer+1) % @elements.length
+          set_page
+          update_element_positions
+        elsif @@inp.down == 22
+          @pointer = (@pointer+1) % @elements.length
+          set_page
+          update_element_positions
+          @@inp.down = 20
+        end
+      end
+      if (@@inp.up == 1 || @@inp.up >= 20) && @playlist.length > 0
+        if @@inp.up == 1
+          @pointer = (@pointer+(@elements.length-1)) % @elements.length
+          set_page
+          update_element_positions
+        elsif @@inp.up == 22
+          @pointer = (@pointer+(@elements.length-1)) % @elements.length
+          set_page
+          update_element_positions
+          @@inp.up = 20
+        end
+      end
+      if @@inp.pagedown == 1 && @playlist.length > 0
+        @pointer = @max_elements*@page
+        @pointer = @elements.length-1 if @pointer > @elements.length-1
+        set_page
+        update_element_positions
+      end
+      if @@inp.pageup == 1 && @playlist.length > 0
+        @pointer = @max_elements*(@page-2)
+        @pointer = 0 if @pointer < 0
+        set_page
+        update_element_positions
+      end
+      if @@inp.first == 1 && @playlist.length > 0
+        @pointer = 0
+        set_page
+        update_element_positions
+      end
+      if @@inp.last == 1 && @playlist.length > 0
+        @pointer = @elements.length-1
+        set_page
+        update_element_positions
+      end
+      if @@inp.accept == 1
+        #Util.p (@elements.length.to_f/@max_elements.to_f).ceil.to_s
+      end
+    end
+  end
+
+  def update_size(x, y, w, h)
+    super
+    @max_elements = 0
+    set_view
+    set_page
+    update_element_strings
+    update_element_positions
+  end
+
+  def update_element_positions
+    j = 0
+    i = @max_elements*(@page-1)
+    k = -1
+
+    @elements.each do |e|
+      k += 1
+      next if k < i
+      unless @playlist[i][:dir_flag] || @playlist[i][:pl_flag]
+        overshoot = ((@view.w-8)-@elements[i].dur.w-4)
+        unless i == @pointer
+          if @elements[i].txt.w >= overshoot
+            sprite_w = @elements[i].txt.w-(@elements[i].txt.w-overshoot)
+          else
+            sprite_w = @elements[i].txt.w
+          end
+          sprite_h = @elements[i].txt.h
+        else
+          if @elements[i].txt_bld.w >= overshoot
+            sprite_w = @elements[i].txt_bld.w-(@elements[i].txt_bld.w-overshoot)
+          else
+            sprite_w = @elements[i].txt_bld.w
+          end
+          sprite_h = @elements[i].txt_bld.h
+        end
+      else
+        unless i == @pointer
+          sprite_w = @elements[i].txt.w
+          sprite_h = @elements[i].txt.h
+        else
+          sprite_w = @elements[i].txt_bld.w
+          sprite_h = @elements[i].txt_bld.h
+        end
+      end
+      y = (0+(j*@element_h))+((@element_h/2)-(sprite_h/2))
+      @elements[i].txt_src = SDL2::Rect[0, 0, sprite_w, sprite_h]
+      @elements[i].txt_dst = SDL2::Rect[4, y, sprite_w, sprite_h]
+      @elements[i].bg_rect = SDL2::Rect[0, j*@element_h, @view.w, @element_h]
+      unless @playlist[i][:dir_flag] || @playlist[i][:pl_flag]
+        @elements[i].dur_dst = SDL2::Rect[(@view.w-@elements[i].dur.w)-4, y,
+                                          @elements[i].dur.w,
+                                          @elements[i].dur.h]
+      end
+      i+= 1
+      j+= 1
+
+
+    end
+  end
+=begin
+  def update_element_positions
+    j = 0
+    i = @max_elements*(@page-1)
+    Util.p i.to_s
+
+    @playlist.each do |item|
+      unless item[:dir_flag]
+        overshoot = ((@view.w-8)-@elements[i].dur.w-4)
+        unless i == @pointer
+          if @elements[i].txt.w >= overshoot
+            sprite_w = @elements[i].txt.w-(@elements[i].txt.w-overshoot)
+          else
+            sprite_w = @elements[i].txt.w
+          end
+          sprite_h = @elements[i].txt.h
+        else
+          if @elements[i].txt_bld.w >= overshoot
+            sprite_w = @elements[i].txt_bld.w-(@elements[i].txt_bld.w-overshoot)
+          else
+            sprite_w = @elements[i].txt_bld.w
+          end
+          sprite_h = @elements[i].txt_bld.h
+        end
+      else
+        unless i == @pointer
+          sprite_w = @elements[i].txt.w
+          sprite_h = @elements[i].txt.h
+        else
+          sprite_w = @elements[i].txt_bld.w
+          sprite_h = @elements[i].txt_bld.h
+        end
+      end
+      y = (0+(j*@element_h))+((@element_h/2)-(sprite_h/2))
+      @elements[i].txt_src = SDL2::Rect[0, 0, sprite_w, sprite_h]
+      @elements[i].txt_dst = SDL2::Rect[4, y, sprite_w, sprite_h]
+      @elements[i].bg_rect = SDL2::Rect[0, j*@element_h, @view.w, @element_h]
+      unless item[:dir_flag]
+        @elements[i].dur_dst = SDL2::Rect[(@view.w-@elements[i].dur.w)-4, y,
+                                          @elements[i].dur.w,
+                                          @elements[i].dur.h]
+      end
+      i+= 1
+      j+= 1
+      break if i >= @playlist.length
+    end
+  end
+=end
+
+  def update_element_strings
+    @border = SDL2::Rect[@view.x-1, @view.y-1, @view.w+2, @view.h+2]
+    i = 0
+    txtcol = (@focus_flag) ? @txt_color : @txt_col_dis
+    @elements.each { |e| e.destroy }
+    @elements.clear
+    @playlist.each do |item|
+      el = Element.new
+      unless item[:dir_flag] || item[:pl_flag]
+        str = String.new
+        unless item[:artist].empty?
+          str = item[:artist]+' - '
+        end
+        unless item[:title].empty?
+          str += item[:title]
+        else
+          str += item[:filename]
+        end
+        unless item[:album].empty?
+          str += ' ('+item[:album]+')'
+        end
+        el.dur = @@font_bold.render_blended(item[:tag], txtcol)
+      else
+        str = item[:filename]
+      end
+      el.txt = @@font.render_blended(str, txtcol)
+      el.txt_bld = @@font_bold.render_blended(str, txtcol)
+      el.txt_sel = @@font.render_blended(str, @txt_color_sel)
+      el.txt_sel_bld = @@font_bold.render_blended(str, @txt_color_sel)
+
+      @elements.push(el)
+      i += 1
+    end
+  end
+
+  def draw
+    super
+
+    @@renderer.viewport = @view_base
+    @@renderer.fill_rect(SDL2::Rect[0,
+                                    0,
+                                    @view_base.w,
+                                    @view_base.h])
+    # draw border
+    @@renderer.viewport = @border
+    @@renderer.draw_blend_mode = SDL2::BlendMode::BLEND
+    @@renderer.draw_color = [@@config[:fg_color][:red],
+                             @@config[:fg_color][:green],
+                             @@config[:fg_color][:blue],
+                             @@config[:fg_color][:alpha]]
+    @@renderer.draw_rect(SDL2::Rect[0, 0, @border.w, @border.h])
+    @@renderer.viewport = @view_base
+    # draw title
+    @@renderer.copy(@@renderer.create_texture_from(@title), nil, @title_rect)
+    
+    # draw item list
+    @@renderer.viewport = @view
+    i = @max_elements*(@page-1)
+    j = -1
+    @elements.each do |el|
+      j +=1
+      next if j < i
+      txt = nil
+      if @pointer == i
+        if @focus_flag
+          @@renderer.draw_color = [@@config[:select_bg_color][:red],
+                                   @@config[:select_bg_color][:green],
+                                   @@config[:select_bg_color][:blue],
+                                   @@config[:select_bg_color][:alpha]]
+          @@renderer.fill_rect(el.bg_rect)
+        end
+        case self.class.to_s
+        when "SectionDir"
+          if File.join(@dir_stack.join(nil), @playlist[i][:filename]) ==
+              @@sound.get_play_path("left") && @focus_flag
+            txt = el.txt_sel_bld
+          else
+            txt = el.txt_bld
+          end
+        when "SectionPlaylist"
+          if @playlist[i][:filename] == @@sound.get_play_path("right") &&
+              @focus_flag
+            txt = el.txt_sel_bld
+          else
+            txt = el.txt_bld
+          end
+        end
+      else
+        case self.class.to_s
+        when "SectionDir"
+          if File.join(@dir_stack.join(nil), @playlist[i][:filename]) ==
+              @@sound.get_play_path("left") && @focus_flag
+            txt = el.txt_sel
+          else
+            txt = el.txt
+          end
+        when "SectionPlaylist"
+          if @playlist[i][:filename] == @@sound.get_play_path("right") &&
+              @focus_flag
+            txt = el.txt_sel
+          else
+            txt = el.txt
+          end
+        end
+      end
+      @@renderer.copy(@@renderer.create_texture_from(txt), el.txt_src,
+                      el.txt_dst)
+      if el.dur
+        @@renderer.copy(@@renderer.create_texture_from(el.dur),
+                        nil, el.dur_dst)
+      end
+      i += 1
+      break if i >= @elements.length
+    end
+  end
+
+  def get_cache(dir)
+    dir += "/" if dir[-1] != "/"
+    #cache = get_cache_name(dir)
+    return @@cache[dir] if @@cache.has_key?(dir)
+    return nil
+=begin
+    if File.exist?(cache)
+      ar = YAML.load(File.open(cache))
+      return ar
+    end
+    return nil
+=end
+  end
+
+  def get_playlist(dir)
+    #cache = get_cache_name(dir)
+    ar = Array.new
+    dir_contents_dir = Dir.entries(dir).sort.select do |entry|
+      if dir == @@config[:root_dir]
+        File.directory?(File.join(dir, entry)) and
+          !(entry == '.' || entry == '..')
+      else
+        File.directory?(File.join(dir, entry)) and
+          !(entry == '.')
+      end
+    end
+    dir_contents_dir.each do |entry|
+      ar.push({ filename: entry+'/', dir_flag: true, duration: nil, bps: nil,
+                br: nil, artist: nil, album: nil, pl_time: nil, type: nil,
+                tag: nil, title: nil, pl_flag: false, sample: nil, path: nil })
+    end
+    dir_contents_file = Dir.entries(dir).sort.select do |entry|
+      !File.directory?(File.join(dir, entry)) and
+        (/\.mp3|ogg|m4a|wav|mid|flac\z/ === entry)
+    end
+    dir_contents_file.each do |entry|
+      dur = %x( mediainfo --Inform="Audio;%Duration%" "#{dir+entry}" )
+      bps = %x( mediainfo --Inform="Audio;%BitRate%" "#{dir+entry}" )
+      br  = %x( mediainfo --Inform="Audio;%BitRate_Mode%" "#{dir+entry}" )
+      sample  = %x( mediainfo --Inform="Audio;%SamplingRate%" "#{dir+entry}" )
+      #sample2  = %x( mediainfo --Inform="Audio;%SamplingRate/String%" "#{dir+entry}" )
+      artist = %x(ffprobe -loglevel error -show_entries format_tags=artist -of default=noprint_wrappers=1:nokey=1 "#{dir+entry}" )
+      album = %x(ffprobe -loglevel error -show_entries format_tags=album -of default=noprint_wrappers=1:nokey=1 "#{dir+entry}" )
+      title = %x(ffprobe -loglevel error -show_entries format_tags=title -of default=noprint_wrappers=1:nokey=1 "#{dir+entry}" )
+      artist.delete!("\n")
+      title.delete!("\n")
+      album.delete!("\n")
+      pltime = Util.ms_to_time_str(dur.to_i)
+      type = entry[-3..-1].upcase
+      tag = '['+pltime+'|'+type+']'
+      ar.push({ filename: entry, dir_flag: false, duration: dur.to_i,
+                bps: bps.to_i, br: br[0..2], artist: artist, album: album,
+                pl_time: pltime, type: type, tag: tag, title: title,
+                pl_flag: false, sample: sample, path: dir+entry })
+      #@tracks += 1
+    end
+    dir_contents_pl = Dir.entries(dir).sort.select do |entry|
+      !File.directory?(File.join(dir, entry)) and
+        (/\.apl.yaml\z/ === entry)
+    end
+    dir_contents_pl.each do |entry|
+      ar.push({ filename: entry, dir_flag: false, duration: nil, bps: nil,
+                br: nil, artist: nil, album: nil, pl_time: nil, type: nil,
+                tag: nil, title: nil, pl_flag: true, sample: nil, path: nil })
+    end
+    # write cache
+    dir += "/" if dir[-1] != "/"
+    @@cache[dir] = ar
+    str = (@@debug_flag) ? "cache_debug.yaml" : "cache.yaml"
+      File.open(
+        File.join(@@pref_dir, str), 'w') { |file| file.write(@@cache.to_yaml) }
+    ar
+  end
+
+  private
+
+  def set_view
+    @view = SDL2::Rect[@view_base.x+@offset_left,
+                       @view_base.y+@offset,
+                       @view_base.w - (@offset_left+@offset_right),
+                       view_height]
+  end
+
+  def view_height
+    height = 0
+    max_h = @view_base.h - @offset*2
+    while height < max_h
+      height += @element_h
+      @max_elements += 1
+    end
+    return height
+  end
+
+  def set_page
+    #@page = 1 if @pointer < @max_elements-1
+    @page = get_page((@max_elements), @pointer)
+  end
+
+  def get_page(max, pointer)
+    page = 1
+    i = 0
+    while i <= pointer
+      if i == max*page
+        page += 1
+      end
+      i += 1
+    end
+
+    return page
+  end
+
+  def get_cache_name(dir)
+    unless @@debug_flag
+      return File.join(dir, ".cache.yaml")
+    else
+      return File.join(dir, ".cache_debug.yaml")
+    end
+  end
+end
+