aboutsummaryrefslogtreecommitdiff
blob: a027596b8868f91250c94993244985ef23f5ad93 (plain)
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
// Used to show the landing page of the application

package message

import (
	"archives/pkg/database"
	"archives/pkg/models"
	"net/http"
	"strings"
)

// Show renders a template to show the landing page of the application
func Show(w http.ResponseWriter, r *http.Request) {

	urlParts := strings.Split(r.URL.Path, "/")
	listName := urlParts[1]
	messageHash := urlParts[len(urlParts)-1]

	message := &models.Message{Id: messageHash}
	err := database.DBCon.Select(message)

	if err != nil {
		http.NotFound(w, r)
		return
	}

	var inReplyTos []*models.Message
	var inReplyTo *models.Message
	if message.HasHeaderField("In-Reply-To") {
		err = database.DBCon.Model(&inReplyTos).
			Where(`(headers::jsonb->>'Message-Id')::jsonb ? '` + message.GetHeaderField("In-Reply-To") + `'`).
			Select()
		if err != nil || len(inReplyTos) < 1 {
			inReplyTo = nil
		} else {
			inReplyTo = inReplyTos[0]
		}
	} else {
		inReplyTo = nil
	}

	var replies []*models.Message
	database.DBCon.Model(&replies).
		Where(`(headers::jsonb->>'References')::jsonb ? '` + message.GetHeaderField("Message-Id") + `'`).
		WhereOr(`(headers::jsonb->>'In-Reply-To')::jsonb ? '` + message.GetHeaderField("Message-Id") + `'`).
		Order("date ASC").Select()

	renderMessageTemplate(w, listName, message, inReplyTo, replies)
}