# -*- coding: binary -*-
module Rex
module Parser

###
#
# This class parses the contents of an INI file.
#
###
class Ini < Hash

	##
	#
	# Factories
	#
	##
	
	#
	# Creates a new class instance and reads in the contents of the supplied
	# file path.
	#
	def self.from_file(path)
		ini = Ini.new(path)
		ini.from_file
		return ini
	end

	#
	# Creates a new class instance from the supplied string.
	#
	def self.from_s(str)
		ini = Ini.new
		ini.from_s(str)
		return ini
	end

	#
	# Initializes an ini instance and tries to read in the groups from the
	# file if it exists.
	#
	def initialize(path = nil)
		self.path = path

		# Try to synchronize ourself with the file if we
		# have one
		begin
			self.from_file if (self.path)
		rescue
		end
	end

	#
	# Enumerates the groups hash keys.
	#
	def each_group(&block) 
		self.keys.each { |k|
			yield
		}
	end

	#
	# Adds a group of the supplied name if it doesn't already exist.
	#
	def add_group(name = 'global', reset = true)
		self[name] = {} if (reset == true)
		self[name] = {} if (!self[name])

		return self[name]
	end

	#
	# Checks to see if name is a valid group.
	#
	def group?(name)
		return (self[name] != nil)
	end

	##
	#
	# Serializers
	#
	##

	#
	# Reads in the groups from the supplied file path or the instance's file
	# path.
	#
	def from_file(fpath = nil)
		fpath = path if (!fpath)
	
		read_groups(fpath)
	end

	#
	# Reads in the groups from the supplied string.
	#
	def from_s(str)
		read_groups_string(str.split("\n"))
	end

	#
	# Writes the group settings to a file.
	#
	def to_file(tpath = nil)
		tpath = path if (!tpath)

		f = File.new(tpath, "w")
		f.write(to_s)
		f.close
	end

	#
	# Converts the groups to a string.
	#
	def to_s
		str = ''
		keys.sort.each { |k|
			str << "[#{k}]\n"

			self[k].each_pair { |var, val|
				str << "#{var}=#{val}\n"
			}

			str << "\n";
		}

		return str
	end

	attr_reader :path

protected

	#
	# Reads in the groups and their attributes from the supplied file
	# path or from the instance's file path if one was set.
	#
	def read_groups(fpath) # :nodoc:
		if (!fpath)
			raise ArgumentError, "No file path specified.",
				caller
		end

		# Read in the contents of the file
		lines = ::IO.readlines(fpath)

		# Now read the contents from the supplied string
		read_groups_string(lines)
	end

	#
	# Reads groups from the supplied string
	#
	def read_groups_string(str) # :nodoc:
		# Reset the groups hash
		self.clear

		# The active group
		active_group = nil

		# Walk each line initializing the groups
		str.each { |line|
			next if (line.match(/^;/))

			# Eliminate cr/lf
			line.gsub!(/(\n|\r)/, '')

			# Is it a group [bob]?
			if (md = line.match(/^\[(.+?)\]/))
				active_group = md[1]	
				self[md[1]]  = {}
			# Is it a VAR=VAL?
			elsif (md = line.match(/^(.+?)=(.*)$/))
				if (active_group)
					self[active_group][md[1]] = md[2]
				end
			end
		}
	end

	attr_writer :path # :nodoc:

end

end
end