-- Petit WEB IDE tout simple autonome -- ATTENTION: tourne sur le port 88 ! print("\n _web_ide2.lua zf190227.1739 \n") --[[ XChip's NodeMCU IDE Create, Edit and run NodeMCU files using your webbrowser. Examples: http:/// will list all the files in the MCU http:///newfile.lua displays the file on your browser http:///newfile.lua?edit allows to creates or edits the specified script in your browser http:///newfile.lua?run it will run the specified script and will show the returned value ]]-- srv=net.createServer(net.TCP) srv:listen(88,function(conn) local rnrn=0 local Status = 0 local DataToGet = 0 local method="" local url="" local vars="" conn:on("receive",function(conn,payload) if Status==0 then _, _, method, url, vars = string.find(payload, "([A-Z]+) /([^?]*)%??(.*) HTTP") print(method, url, vars) end if method=="POST" then if Status==0 then --print("status", Status) _,_,DataToGet, payload = string.find(payload, "Content%-Length: (%d+)(.+)") if DataToGet~=nil then DataToGet = tonumber(DataToGet) --print(DataToGet) rnrn=1 Status = 1 else print("bad length") end end -- find /r/n/r/n if Status==1 then --print("status", Status) local payloadlen = string.len(payload) local mark = "\r\n\r\n" local i for i=1, payloadlen do if string.byte(mark, rnrn) == string.byte(payload, i) then rnrn=rnrn+1 if rnrn==5 then payload = string.sub(payload, i+1,payloadlen) file.open(url, "w") file.close() Status=2 break end else rnrn=1 end end if Status==1 then return end end if Status==2 then --print("status", Status) if payload~=nil then DataToGet=DataToGet-string.len(payload) --print("DataToGet:", DataToGet, "payload len:", string.len(payload)) file.open(url, "a+") file.write(payload) file.close() else conn:send("HTTP/1.1 200 OK\r\n\r\nERROR") Status=0 end if DataToGet==0 then conn:send("HTTP/1.1 200 OK\r\n\r\nOK") Status=0 end end return end DataToGet = -1 if url == "favicon.ico" then conn:send("HTTP/1.1 404 file not found") return end conn:send("HTTP/1.1 200 OK\r\n\r\n") -- it wants a file in particular if url~="" and vars=="" then DataToGet = 0 return end conn:send("

NodeMCU IDE

".."Connected IP: "..wifi.sta.getip().."

") if vars=="edit" then conn:send("") conn:send("

Back to file list\n") conn:send("

run") conn:send("

") end if vars=="run" then conn:send("") local st, result=pcall(dofile, url) conn:send(tostring(result)) conn:send("") end if url=="" then local l = file.list(); for k,v in pairs(l) do conn:send(""..k..", size:"..v.."
") end end conn:send("") end) conn:on("sent",function(conn) if DataToGet>=0 and method=="GET" then if file.open(url, "r") then file.seek("set", DataToGet) local line=file.read(512) file.close() if line then conn:send(line) DataToGet = DataToGet + 512 if (string.len(line)==512) then return end end end end conn:close() end) end) print("listening, free:", node.heap())

NodeMCU IDE

Back to file list\n") conn:send("Saverun") conn:send("

Back to file list\n") conn:send("

run") conn:send("