package common

import (
	"crypto/tls"
	"fmt"
	"net/mail"
	"net/smtp"
	"strings"
	
	p "github.com/Azareal/Gosora/common/phrases"
)

func SendActivationEmail(username string, email string, token string) error {
	schema := "http"
	if Config.SslSchema {
		schema += "s"
	}
	// TODO: Move these to the phrase system
	subject := "Account Activation - " + Site.Name
	msg := "Dear " + username + ", to complete your registration on our forums, we need you to validate your email, so that we can confirm that this email actually belongs to you.\n\nClick on the following link to do so. " + schema + "://" + Site.URL + "/user/edit/token/" + token + "\n\nIf you haven't created an account here, then please feel free to ignore this email.\nWe're sorry for the inconvenience this may have caused."
	return SendEmail(email, subject, msg)
}

func SendValidationEmail(username string, email string, token string) error {
	schema := "http"
	if Config.SslSchema {
		schema += "s"
	}
	r := func(body *string) func(name, val string) {
		return func(name, val string) {
			*body = strings.Replace(*body,"{{"+name+"}}",val,-1)
		}
	}
	subject := p.GetAccountPhrase("ValidateEmailSubject")
	r1 := r(&subject)
	r1("name",Site.Name)
	body := p.GetAccountPhrase("ValidateEmailBody")
	r2 := r(&body)
	r2("username",username)
	r2("schema",schema)
	r2("url",Site.URL)
	r2("token",token)
	return SendEmail(email, subject, body)
}

// TODO: Refactor this
func SendEmail(email string, subject string, msg string) (err error) {
	// This hook is useful for plugin_sendmail or for testing tools. Possibly to hook it into some sort of mail server?
	ret, hasHook := GetHookTable().VhookNeedHook("email_send_intercept", email, subject, msg)
	if hasHook {
		return ret.(error)
	}

	from := mail.Address{"", Site.Email}
	to := mail.Address{"", email}
	headers := make(map[string]string)
	headers["From"] = from.String()
	headers["To"] = to.String()
	headers["Subject"] = subject

	body := ""
	for k, v := range headers {
		body += fmt.Sprintf("%s: %s\r\n", k, v)
	}
	body += "\r\n" + msg

	var c *smtp.Client
	if Config.SMTPEnableTLS {
		tlsconfig := &tls.Config{
			InsecureSkipVerify: true,
			ServerName:         Config.SMTPServer,
		}
		conn, err := tls.Dial("tcp", Config.SMTPServer+":"+Config.SMTPPort, tlsconfig)
		if err != nil {
			LogWarning(err)
			return err
		}
		c, err = smtp.NewClient(conn, Config.SMTPServer)
	} else {
		c, err = smtp.Dial(Config.SMTPServer + ":" + Config.SMTPPort)
	}
	if err != nil {
		LogWarning(err)
		return err
	}

	if Config.SMTPUsername != "" {
		auth := smtp.PlainAuth("", Config.SMTPUsername, Config.SMTPPassword, Config.SMTPServer)
		err = c.Auth(auth)
		if err != nil {
			LogWarning(err)
			return err
		}
	}
	if err = c.Mail(from.Address); err != nil {
		LogWarning(err)
		return err
	}
	if err = c.Rcpt(to.Address); err != nil {
		LogWarning(err)
		return err
	}

	w, err := c.Data()
	if err != nil {
		LogWarning(err)
		return err
	}
	_, err = w.Write([]byte(body))
	if err != nil {
		LogWarning(err)
		return err
	}
	if err = w.Close(); err != nil {
		LogWarning(err)
		return err
	}
	if err = c.Quit(); err != nil {
		LogWarning(err)
		return err
	}

	return nil
}