dsktool 0.4.2 → 0.5.1

data/lib/DSKFile.rb~

@@ -0,0 +1,137 @@
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+
+
+#Generic Apple II file
+class DSKFile	
+	attr_accessor(:filename,:contents) 
+	def initialize(filename,contents)
+		@filename=filename
+		@contents=contents
+	end
+
+	def to_s
+		@contents
+	end
+
+	def file_extension
+		".bin"
+	end
+	def hex_dump
+		s=""
+		(0..(@contents.length/16)).each {|line_number|
+			 lhs=""
+			 rhs=""
+			 start_byte=line_number*16
+			 line=@contents[start_byte..start_byte+15]
+			if line.length>0 then
+				 line.each_byte {|byte|
+					  lhs+= sprintf("%02X ", byte)
+					  rhs+= (byte%128).chr.sub(/[\x00-\x1f]/,'.')
+			 	}
+				lhs+=" "*(16-line.length)*3
+				s+=sprintf("%02X\t%s %s\n",start_byte,lhs,rhs)
+			end
+		}
+		s
+	end
+
+	#default is files can NOT be displayed as a picture
+	def can_be_picture?
+		false
+	end
+# Adapted from FID.C -- a utility to browse Apple II .DSK image files by Paul Schlyter (pausch@saaf.se)
+#
+#Applesoft file format:
+# <Length_of_file> (16-bit little endian)
+# <Line>
+# ......
+# <Line>
+# where <Line> is:
+# <Next addr>  (16-bit little endian)
+# <Line no>    (16-bit little endian: 0-65535)
+# <Tokens and/or characters>
+# <End-of-line marker: $00 >
+#
+	APPLESOFT_TOKENS = [
+	       "END","FOR","NEXT","DATA","INPUT","DEL","DIM","READ",
+		"GR","TEXT","PR#","IN#","CALL","PLOT","HLIN","VLIN",
+		"HGR2","HGR","HCOLOR=","HPLOT","DRAW","XDRAW","HTAB",
+		"HOME","ROT=","SCALE=","SHLOAD","TRACE","NOTRACE",
+		"NORMAL","INVERSE","FLASH","COLOR=","POP","VTAB",
+		"HIMEM=","LOMEM=","ONERR","RESUME","RECALL","STORE",
+		"SPEED=","LET","GOTO","RUN","IF","RESTORE","&","GOSUB",
+		"RETURN","REM","STOP","ON","WAIT","LOAD","SAVE","DEF",
+		"POKE","PRINT","CONT","LIST","CLEAR","GET","NEW",
+		"TAB(","TO","FN","SPC(","THEN","AT","NOT","STEP","+",
+		"-","*","/","^","AND","OR",">","=","<","SGN","INT",
+		"ABS","USR","FRE","SCRN(","PDL","POS","SQR","RND",
+		"LOG","EXP","COS","SIN","TAN","ATN","PEEK","LEN",
+		"STR$","VAL","ASC","CHR$", "LEFT$","RIGHT$","MID$","?",
+		"?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?"
+]
+
+	def buffer_as_applesoft_file(buffer)
+
+		length=buffer[0]+buffer[1]*256
+		index=2
+		s=""
+		while (index<length)
+			index+=2 #skip over the "next address" field
+			break if buffer[index].nil?
+			break if buffer[index+1].nil?
+			line_no=buffer[index]+buffer[index+1]*256
+			index+=2 #skip over the "line number" field
+			s+=sprintf("%u",line_no)
+			done_line=false
+			last_char_space=false
+			while (!done_line)			
+				b=buffer[index]
+				break if b.nil?
+				if b>=0x80 then
+					if !last_char_space then
+						s+=" "
+					end
+					s+=APPLESOFT_TOKENS[b-0x80]+" "
+					last_char_space=true
+				else
+					s+=b.chr
+					last_char_space=false
+				end
+				index+=1
+				done_line=(index>=length)||(buffer[index]==0)
+			end
+			s+="\n"
+			index+=1        # skip over "end of line" marker
+		end
+	       s
+	end
+end
+
+
+
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2007 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/HGR.rb~

@@ -0,0 +1,157 @@
+#Apple II Hi-Res Graphics routines
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require 'rubygems'
+require_gem 'png', '= 1.0.0'
+require 'png'
+#need to add a new method to PNG to get at the raw bytes as the png library only writes to disk
+class PNG
+	def raw_bytes
+		bytes=""
+		bytes<< [137, 80, 78, 71, 13, 10, 26, 10].pack("C*") # PNG signature
+		bytes<< PNG.chunk('IHDR',
+			[ @height, @width, @bits, 6, 0, 0, 0 ].pack("N2C5"))
+		# 0 == filter type code "none"
+		data = @data.map { |row| [0] + row.map { |p| p.values } }.flatten
+		bytes<< PNG.chunk('IDAT', Zlib::Deflate.deflate(data.pack("C*"), 9))
+		bytes<< PNG.chunk('IEND', '')
+		bytes
+	end
+end
+
+class HGR
+
+PALLETE_MODES=[:white,:green,:amber,:colour]
+PALLETE={
+	:white=>PNG::Color::White,
+	:green=>PNG::Color.new(0x00, 0x99, 0x00, 0xFF),
+	:amber=>PNG::Color::Orange
+}
+
+#colours cribbed from http://groups.google.com.au/group/comp.sys.apple2/browse_thread/thread/b9aa36ead6935c42/faa0f4df3e89060f
+HGR_BLACK=PNG::Color::Black			#color=0,4
+HGR_GREEN=PNG::Color.new(0x2F,0xB8,0x1F,0xFF)	#color=1
+HGR_VIOLET=PNG::Color.new(0xC8,0x47,0xE4,0xFF)	#color=2
+HGR_WHITE=PNG::Color::White			#color=3,7
+HGR_ORANGE=PNG::Color.new(0xC7,0x70,0x28,0xFF)	#color=5
+HGR_BLUE=PNG::Color.new(0x30,0x8F,0xE3,0xFF)	#color=6
+
+HGR_COLS=40*7
+HGR_ROWS=8*8*3
+SCALE=2
+
+#per Apple // Reference Manual for //e chapter 2, pages 22-35
+#also TechNote - Apple IIe #3 Double High-Resolution Graphics - http://web.pdx.edu/~heiss/technotes/aiie/tn.aiie.03.html
+#HGR screen consists of 3 bands of 8 rows of 8 scanlines
+#for each absolute scanline, what is the offset into screen ram that the 40 bytes for this scanline is stored?
+
+@@scanline_offsets=Array.new(HGR_ROWS)
+
+0.upto(2) do |band|
+		0.upto(7) do |row|						
+			0.upto(7) do |relative_scanline|
+				band_ram_offset=band*40
+				band_scanline_offset=band*64
+				scanline_ram_offset=relative_scanline*1024
+				scanline_scanline_offset=relative_scanline
+				row_ram_offset=128*row
+				row_scanline_offset=8*row
+				scanline_offset=band_scanline_offset+scanline_scanline_offset+row_scanline_offset
+				ram_offset=band_ram_offset+scanline_ram_offset+row_ram_offset								
+				@@scanline_offsets[scanline_offset]=ram_offset
+		end
+	end
+end
+
+
+0.upto(HGR_ROWS-1) do |scanline|
+	puts "no offset defined for scanline #{scanline}" if @@scanline_offsets[scanline].nil?
+end
+	#HGR screen is 8192 bytes stored at either $2000 (page 1) or $4000 (page 2)
+	def HGR.can_be_hgr_screen?(buffer,memory_location=nil)
+		if ((memory_location.nil?) || (memory_location==0) || (memory_location==0x2000) || (memory_location==0x4000)) then
+		#because only 120 out of every 128 bytes are shown, the last 8 bytes are not needed
+		#in order to save a sector under dos 3.3 it was common to only store 8192=8184 (0x1FF8) bytes
+		#sometimes an extra sector was included by mistake
+			if (buffer.length>=8184 && buffer.length<=8192) || buffer.length==8444
+				return true
+			end
+		end
+		false
+	end
+
+private
+	def HGR.set_pixel(canvas,x,y,colour)
+		0.upto(SCALE-1) do |row|
+			0.upto(SCALE-1) do |col|
+				canvas[x*SCALE+col, y*SCALE+row]= colour
+			end
+		end
+	end
+
+public
+	def HGR.buffer_to_png(buffer,pallete_mode=:amber)
+		canvas = PNG::Canvas.new HGR_COLS*SCALE, HGR_ROWS*SCALE, PNG::Color::Black
+		0.upto(HGR_ROWS-1) do |y|
+			last_bit_set=false
+			0.upto(39) do |x_byte|
+				offset=@@scanline_offsets[y]+x_byte
+				current_byte=buffer[offset]				
+				current_byte=0 if current_byte.nil? #if we overrun the buffer then assume it's black
+				0.upto(6) do |x_bit|
+					x=x_byte*7+x_bit
+					bit_set=((current_byte & (2**x_bit))>0)
+					if (bit_set) then
+						if pallete_mode==:colour then
+							if (last_bit_set) then 
+								#adjacent pixels should both be white
+								set_pixel(canvas,x-1,y,HGR_WHITE) 
+								set_pixel(canvas,x,y,HGR_WHITE)
+							else
+								if current_byte>=0x80 then
+									pallete=[HGR_BLUE,HGR_ORANGE]
+								else
+									pallete=[HGR_VIOLET,HGR_GREEN]
+								end
+								this_pixel_colour=pallete[x%2]
+								set_pixel(canvas,x,y,this_pixel_colour)
+							end
+						else
+							this_pixel_colour=PALLETE[pallete_mode]
+							this_pixel_colour=PALLETE.values[0] if this_pixel_colour.nil?
+							set_pixel(canvas,x,y,this_pixel_colour)
+						end
+					end
+					last_bit_set=bit_set
+				end
+			end
+		end
+		png = PNG.new canvas
+		png.raw_bytes
+	end
+end
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2007 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/NADOLDisk.rb~

@@ -0,0 +1,104 @@
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+# Disk image in NADOL format
+#
+#CATALOG will be at track $00, sector $03 to track $00, sector $09
+#each entry consists of $10 bytes, which are:
+# 00-0B - filename - if file is deleted, first byte will be FF
+# 0C-0D - filesize (low byte first)
+# 0E - track of track sector list sector
+# 0F - sector of track sector list sector
+
+#TRACK/SECTOR LIST FORMAT 
+# pairs of track/sectors in order. up to 128 entries [assumes that no file can be > 128 sectors]
+
+require 'NADOLFile'
+
+class NADOLDisk < DSK
+
+	def dump_catalog
+		s=""
+	files.keys.sort.each { |file_name|		
+			file=files[file_name]	
+			s<< "#{sprintf('% 6d',file.contents.length)} #{file.filename}\n"
+		}
+		s
+	end
+
+	def initialize(file_bytes,sector_order)
+		super(file_bytes,sector_order)
+		self.read_catalog
+	end
+
+	def file_system
+		:nadol
+	end
+	
+	#reads the catalog, and populate the "files" array with files
+	#CATALOG will be at track $00, sector $03 to track $00, sector $09
+	#each entry consists of $10 bytes, which are:
+	# 00-0B - filename - if file is deleted, first byte will be FF
+	# 0C-0D - filesize (low byte first)
+	# 0E - track of track sector list sector
+	# 0F - sector of track sector list sector
+	def read_catalog
+		0x300.step(0x9FF,0x10) do |file_descriptive_entry_start|
+			file_descriptive_entry=@file_bytes[file_descriptive_entry_start..file_descriptive_entry_start+0x0F]
+			break if (file_descriptive_entry[0]==0xFF) # skip deleted files
+			filename=""
+			file_descriptive_entry[0..11].to_s.each_byte{|b| filename+=(b.%128).chr} #strip off high bit
+			filename.sub!(/ *$/,"") #strip off trailing spaces
+			full_sectors=file_descriptive_entry[0x0D]
+			bytes_in_last_sector=file_descriptive_entry[0x0C]
+			file_size=full_sectors*256+bytes_in_last_sector
+			if (file_size>0) then
+				contents=""					
+				ts_list_track_no=file_descriptive_entry[0x0E]
+				ts_list_sector_no=file_descriptive_entry[0x0F]
+				ts_list=get_sector(ts_list_track_no,ts_list_sector_no)
+				entry_number=0
+				while entry_number<full_sectors do						
+					data_track_no=ts_list[entry_number*2]
+					data_sector_no=ts_list[entry_number*2+1]
+					contents+=get_sector(data_track_no,data_sector_no)
+					entry_number+=1
+				end
+				if (bytes_in_last_sector>0) then
+					data_track_no=ts_list[entry_number*2]
+					data_sector_no=ts_list[entry_number*2+1]
+					contents+=get_sector(data_track_no,data_sector_no)[0..bytes_in_last_sector-1]
+				end	
+				if (NADOLTokenisedFile.can_be_nadol_tokenised_file?(contents)) then
+					@files[filename]= NADOLTokenisedFile.new(filename,contents)
+				else
+					@files[filename]= NADOLBinaryFile.new(filename,contents)
+				end
+			end
+		end
+	end
+end
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2007 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/NADOLFile.rb~

@@ -0,0 +1,225 @@
+$:.unshift(File.dirname(__FILE__)) unless
+	$:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require 'D65'
+require 'DSKFile'
+
+#NADOL (Nibbles Away Disk Optimized Language) file
+class NADOLFile	< DSKFile
+	def file_extension
+		".bin"
+	end
+end
+
+#a file on a NADOL dsk that does not appear to be in NADOL tokenised format
+class NADOLBinaryFile<NADOLFile
+	def disassembly(start_address=0x8000) 
+		require 'D65'
+		D65.disassemble(@contents,start_address)
+	end
+
+	def can_be_picture?
+		HGR.can_be_hgr_screen?(@contents)
+	end
+
+	def to_png(pallete_mode=:amber)
+		HGR.buffer_to_png(@contents)
+	end
+end
+
+
+#file packed by the NADOL EDITOR application.
+#format is a series of  unnumbered lines, where each line has the following format:
+#  <Length>     (8-bit: including length byte, line no, contents, zero>
+#  <Tokens and/or Characters>
+#  <Zero byte>  ($00, to mark the end of the S-C Asm source line)
+# each byte in the line is interpreted as follows:
+# $00 - end of line marker
+# $01 - $64 - NADOL tokens
+# $65 - $70 - ??? unknown
+# $71 - $7f - 1 to F spaces
+# $80 - $FF - ASCII character with high bit set
+class NADOLTokenisedFile < NADOLFile
+	NADOL_EDITOR_TOKENS = [
+	"?",		#00 (so we can use token as an index in to this array)
+	"READ(",	#01
+	"FREE(",	#02
+	"NOT(",	#03
+	"LENGTH(",	#04
+	"PDL(",	#05
+	"SIZEOF(",	#06
+	"LSCRN(",	#07
+	"HSCRN(",	#08
+	"CHECK(",	#09
+	"MAKE(",	#0a
+	"SCREEN(",	#0b
+	"HEXPACK ",#0c
+	"PROCEDURE ",#0d
+	"ENDPROC",	#0e
+	"FUNCTION ",#0f
+	"ENDFUNC",	#10
+	"IF ",	#11
+	"ELSE",	#12
+	"ENDIF",	#13
+	"WHILE ",	#14
+	"ENDWHILE",#15
+	"DEFINE ",	#16
+	"RESULT=",	#17
+	"PRINT",	#18
+	"PRINTHEX",#19
+	"PRINTBYTE",#1a
+	"LABEL ",	#1b
+	"GOTO ",	#1c
+	"INVERSE",	#1d
+	"NORMAL",	#1e
+	"FLASH",	#1f
+	"CASE ",	#20
+	"GOTOXY(",	#21
+	"CLEAR",	#22
+	"NEW",	#23
+	"HOME",	#24
+	"CLREOL",	#25
+	"CLREOP",	#26
+	"PRBLOCK(",#27
+	"STOP",	#28
+	"COPY(",	#29
+	"FILL(",	#2a
+	"MASK(",	#2b
+	"RSECT(",	#2c
+	"WSECT(",	#2d
+	"RBLOCK(",	#2e
+	"WBLOCK(",	#2f
+	"WTRACK(",	#30
+	"WSYNC(",	#31
+	"RECAL(",	#32
+	"DISPLAY(",#33
+	"RTRACK(",	#34
+	"RSYNC(",	#35
+	"BEEP(",	#36
+	"DISASM(",	#37
+	"TEXT",	#38
+	"FORMAT(",	#39
+	"SETFORMAT(",#3a
+	"WORKDRIVE ",#3b
+	"INIT ",	#3c
+	"LOAD ",	#3d
+	"SAVE ",	#3e
+	"CATALOG",	#3f
+	"DELETE ",	#40
+	"RENAME ",	#41
+	"PACK ",	#42
+	"CONVERT(",#43
+	"INPUT(",	#44
+	"LORES",	#45
+	"PLOT(",	#46
+	"HLINE(",	#47
+	"VLINE(",	#48
+	"COLOR=",	#49
+	"FIND(",	#4a
+	"HIRES",	#4b
+	"HCOLOR=",	#4c
+	"HPLOT",	#4d
+	"CALL(",	#4e
+	"PR#",	#4f
+	"IN#",	#50
+	"FILTER(",	#51
+	"LIST",	#52
+	"RUN",	#53
+	"AUXMOVE(",#54
+	"LCMOVE(",	#55
+	"DELAY(",	#56
+	"INTEGER",	#57
+	"BYTE",	#58
+	" AND ",	#59
+	" OR ",	#5a
+	" MOD ",	#5b
+	" XOR ",	#5c
+	" WITH ",	#5d
+	" TO ",	#5e
+	" AT ",	#5f
+	"TAB(",	#60
+	"ENDCASE",	#61
+	"MON:",	#62
+	"EDIT",	#63
+	"SAVE@"	#64
+]
+
+
+	#check whether a given series of bytes can be a valid NADOL tokenised file
+	#heuristics are:
+	# - bytes 
+	def  NADOLTokenisedFile.can_be_nadol_tokenised_file?(buffer)
+		r=true
+		i=0
+		while i<buffer.length
+			line_length=buffer[i]
+			if buffer[i+line_length-1]!=0 then
+				r=false
+				break
+			end
+			i+=line_length
+		end
+		r
+	end
+	
+	def to_s
+		NADOLTokenisedFile.buffer_as_tokenised_file(@contents)
+	end
+	def file_extension
+		".nad"
+	end
+
+	private
+	def  NADOLTokenisedFile.buffer_as_tokenised_file(buffer)
+		s=""
+		index=0
+		while (index<buffer.length)
+			line_length=buffer[index]
+			index+=1
+			end_of_line=index+line_length-2
+			while(index<end_of_line)
+				b=buffer[index]
+				if (b<=0x64) then
+					s+=NADOL_EDITOR_TOKENS[b]
+				elsif(b>0x70 and b<0x80) then
+					s+=" "*(b-0x70)
+				elsif(b>=0x80) then
+					s+=(b-0x80).chr
+				else
+					raise sprintf("unknown token %02X at offset %04X",b,index)
+				end
+				index+=1 #move to next char
+			end
+			index+=1 #skip over end-of-line marker
+			s+="\n"
+		end
+		s
+	end
+
+end
+
+
+# == Author
+# Jonno Downes (jonno@jamtronix.com)
+#
+# == Copyright
+# Copyright (c) 2007 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.