Lua读取文件

--cat sql


--fileName = "./ECNS/CGPV100R006C01SPC300/Init_ch.sql"
destFile = "cat.sql"

BUFFSIZE = 1024

files = {
		  ddl = "Table.sql",
		  cns = "./ECNS/CGPV100R006C01SPC300/Init_ch.sql",
		  cgp = "./EME/V100R001C00B100/Init_ch.sql",
		  nodeb = "./ENODEB/eBBU530V100R001C00IDC00/Init_ch.sql"
		}
fileList = {
		 "Table.sql",
		  "./ECNS/CGPV100R006C01SPC300/Init_ch.sql",
		  "./EME/V100R001C00B100/Init_ch.sql",
		  "./ENODEB/eBBU530V100R001C00IDC00/Init_ch.sql"
		}



dfile = assert(io.open("cat.sql","w"))


------------------------write file-------------------
do
function writeFile(str)

   local dfile = assert(io.open("cat.sql","w"))

			dfile:write(str)

			dfile:close();
end

end

----------read list_--------------------------

do

function list_iter(t)
   local i = 0
   local n = table.getn(t)
   return function ()
     i = i+1
	 if i<= n then return t[i] end
	end
end

end

-------------read file---------------------------

do

function readFile(fileName)


	local file = assert(io.open(fileName,"r"))


	while true do

		local lines, bytes = file:read(BUFFSIZE,"*line")

		if not bytes then break end

		--io.write(string.format(bytes))
		--local str = string.format(string.byte(bytes))

		 --print(lines)

		 dfile:write(lines)


    end
    file:close()
end

end

-------------------- clal function------------


for element in list_iter(fileList) do

	 --print(element)

	 readFile(element)

end
dfile:close()