diff options
| author | Diego Nehab <diego@tecgraf.puc-rio.br> | 2001-06-11 18:15:49 +0000 |
|---|---|---|
| committer | Diego Nehab <diego@tecgraf.puc-rio.br> | 2001-06-11 18:15:49 +0000 |
| commit | ce0ad4c6b687aa6ff8aa24ef510e6e8716f9e995 (patch) | |
| tree | 53b85983474815752cbe602fb1c8890b11c78fba /src | |
| parent | 6fd40adc77b1f35e098dc5b3a8fc361f46bc061f (diff) | |
| download | luasocket-ce0ad4c6b687aa6ff8aa24ef510e6e8716f9e995.tar.gz luasocket-ce0ad4c6b687aa6ff8aa24ef510e6e8716f9e995.tar.bz2 luasocket-ce0ad4c6b687aa6ff8aa24ef510e6e8716f9e995.zip | |
debug code removed.
Diffstat (limited to 'src')
| -rw-r--r-- | src/smtp.lua | 3 |
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 | ----------------------------------------------------------------------------- |
| 30 | local try_send = function(sock, line) | 30 | local try_send = function(sock, line) |
| 31 | local err = sock:send(line .. "\r\n") | 31 | local err = sock:send(line .. "\r\n") |
| 32 | print(line) | ||
| 33 | if err then sock:close() end | 32 | if err then sock:close() end |
| 34 | return err | 33 | return err |
| 35 | end | 34 | end |
| @@ -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 |
| 50 | print(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 |
| 57 | print(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 |