# part of rwdtinker smalllinux@gmail.com
# copyleft gpl 2008 Steven Gibson

require 'lib/rwdtinker/rwdtinkertools'

tmpmodload = '
def RwdtinkerTools.findfilest(d)
	a = Array.new(Dir[d].entries.sort)
	#loop through and get the files names
	a.each do |x|
		#adjust the filters to the files you want to see...
		if(!test(?d,x))
			# only rwd files
			if x =~ /rb|po|txt/
				fileA=File.open("#{x}","r")        #opens the file thats in fileName as read only
				@@tempdoc+=fileA.read    #reads the file into the doc string
				fileA.close    
			end
		end
	end
	
end


def RwdtinkerTools.findlanguagefiles(langdir,lang)
     @@tempdoc = ""

            startlangdir = File.join(langdir,lang)
           #get a list of the files and subdirectories on the starting directory only
            alanghash = Array.new(Dir[startlangdir].entries.sort)
             #loop through the list, ignore the files and add all new directories found
            alanghash.each do |x|
	             #if a directory...
	              if(test(?d,x))
		          # add to the original list of directories
		          @@tmproot = x + "/**"
		          #adds the new ones to the array
		          blanghash = Dir[@@tmproot].entries.sort
		          blanghash.each do |x|
			           if(test(?d,x))
				        alanghash.push(x)  #appends to the end of the array...
			           end
		            end
	            end
            end
            alanghash.each do |x|
	                      #if it is a file...
	                      if(!test(?d,x))
		                      alanghash.delete(x)
	                       else              #it is a directory...
		                      findfilest(x + "/**")
	                       end
                end
  
	        return @@tempdoc
  
end
'

RwdtinkerTools.module_eval(tmpmodload)