$:.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 CbmDos<FileSystem

def self.host_system
  C64
end  

DIRECTORY_ENTRY_SIZE=0x20
FILE_TYPES=[:del,:seq,:prg,:usr,:rel,:unk,:unk,:unk]
  
#for now, assume that anything on a CBM compatable image format is a CBM DOS
is_valid_file_system_if lambda {true}

def self.files(file_system_image)
  files=FileContainer.new
  dir_track_no=18
  dir_sector_no=1      
  until dir_track_no==0 || dir_track_no> file_system_image.end_track do 
    directory_sector=file_system_image.get_sector(dir_track_no,dir_sector_no)        
    dir_track_no=directory_sector[0]
    dir_sector_no=directory_sector[1]
    0.upto(7) do |entry_number|            
        directory_entry=directory_sector[DIRECTORY_ENTRY_SIZE*entry_number,DIRECTORY_ENTRY_SIZE]
        file_name=C64.s_to_ascii(directory_entry[0x05..0x14]).strip
        file_type=FILE_TYPES[directory_entry[0x02]%8]
        file_track_no=directory_entry[0x03]
        file_sector_no=directory_entry[0x04]
        file_contents=""
        until file_track_no==0 || file_track_no> file_system_image.end_track do
          file_sector=file_system_image.get_sector(file_track_no,file_sector_no)          
          break if file_sector.nil?
          file_track_no=file_sector[0]
          file_sector_no=file_sector[1]
          file_contents+=file_sector[2..255]
        end        
        files<<NativeFileType.best_fit(file_system_image,file_name,file_contents,file_type)
    end
  end
  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.