aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/smtp.lua3
1 files changed, 0 insertions, 3 deletions
diff --git a/src/smtp.lua b/src/smtp.lua
index 7f9af3d..6404e6c 100644
--- a/src/smtp.lua
+++ b/src/smtp.lua
@@ -29,7 +29,6 @@ end
29----------------------------------------------------------------------------- 29-----------------------------------------------------------------------------
30local try_send = function(sock, line) 30local try_send = function(sock, line)
31 local err = sock:send(line .. "\r\n") 31 local err = sock:send(line .. "\r\n")
32print(line)
33 if err then sock:close() end 32 if err then sock:close() end
34 return err 33 return err
35end 34end
@@ -47,14 +46,12 @@ local get_answer = function(control)
47 local line, err = control:receive() 46 local line, err = control:receive()
48 local answer = line 47 local answer = line
49 if err then return nil, err end 48 if err then return nil, err end
50print(line)
51 _,_, code, sep = strfind(line, "^(%d%d%d)(.)") 49 _,_, code, sep = strfind(line, "^(%d%d%d)(.)")
52 if not code or not sep then return nil, answer end 50 if not code or not sep then return nil, answer end
53 if sep == "-" then -- answer is multiline 51 if sep == "-" then -- answer is multiline
54 repeat 52 repeat
55 line, err = control:receive() 53 line, err = control:receive()
56 if err then return nil, err end 54 if err then return nil, err end
57print(line)
58 _,_, lastcode, sep = strfind(line, "^(%d%d%d)(.)") 55 _,_, lastcode, sep = strfind(line, "^(%d%d%d)(.)")
59 answer = answer .. "\n" .. line 56 answer = answer .. "\n" .. line
60 until code == lastcode and sep == " " -- answer ends with same code 57 until code == lastcode and sep == " " -- answer ends with same code