-
Notifications
You must be signed in to change notification settings - Fork 1
/
email.moon
63 lines (52 loc) · 1.72 KB
/
email.moon
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
-- simplyfied commands to send mail through the SMTP server configured in config.moon
-- utilizes sendmail lua module available through luarocks
config = require("lapis.config").get!
tables = require "tables"
sendmail = require "sendmail"
import build_url, encode_query_string from require "lapis.util"
import create_email_hash from require "session"
send_email = (recipient, subject, text, html) ->
sendmail.send {
from: {
title: "AMS"
address: config.email.user .. "@" .. config.email.hostname
}
to: recipient
server: {
address: config.email.host
user: config.email.user
password: config.email.password
ssl: config.email.use_ssl
}
message: {
subject: subject
text: text
html: html
}
}
-- takes the result from a create or search query with an email verifications entry
send_verification_email = (ev) =>
hash, err = create_email_hash ev
unless hash return hash, err
url = build_url {
path: "new_user"
host: @req.parsed_url.host
scheme: @req.parsed_url.scheme
port: if @req.parsed_url.port == 80 then nil else @req.parsed_url.port
query: encode_query_string {
email: ev.email
evid: ev.evid
verify: hash
}
}
-- annoyingly multiline strings don't take indentation into account.
-- probably will end up pulling any messages displayed to users out into some
-- sort of string table or database, so I guess it's only a temporary headache.
message = "Hello
You recently requested to create a new account using this e-mail address.
Use the following link to complete registraiton:
" .. url .. "
If you did not request to create an user account you may ignore this e-mail.
Best Regards"
send_email ev.email, "Verify your E-Mail address", message
{ :send_email, :send_verification_email }