honk.go (view raw)
1//
2// Copyright (c) 2019 Ted Unangst <tedu@tedunangst.com>
3//
4// Permission to use, copy, modify, and distribute this software for any
5// purpose with or without fee is hereby granted, provided that the above
6// copyright notice and this permission notice appear in all copies.
7//
8// THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9// WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10// MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11// ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12// WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13// ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14// OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15
16package main
17
18import (
19 "crypto/rsa"
20 "flag"
21 "fmt"
22 "html/template"
23 "log"
24 notrand "math/rand"
25 "os"
26 "strconv"
27 "strings"
28 "time"
29)
30
31var softwareVersion = "develop"
32
33func init() {
34 notrand.Seed(time.Now().Unix())
35}
36
37type WhatAbout struct {
38 ID int64
39 Name string
40 Display string
41 About string
42 Key string
43 URL string
44 Options UserOptions
45 SecKey *rsa.PrivateKey
46}
47
48type UserOptions struct {
49 SkinnyCSS bool `json:",omitempty"`
50 Avatar string `json:",omitempty"`
51 MapLink string `json:",omitempty"`
52}
53
54type KeyInfo struct {
55 keyname string
56 seckey *rsa.PrivateKey
57}
58
59const serverUID int64 = -2
60
61type Honk struct {
62 ID int64
63 UserID int64
64 Username string
65 What string
66 Honker string
67 Handle string
68 Oonker string
69 Oondle string
70 XID string
71 RID string
72 Date time.Time
73 URL string
74 Noise string
75 Precis string
76 Format string
77 Convoy string
78 Audience []string
79 Public bool
80 Whofore int64
81 Replies []*Honk
82 Flags int64
83 HTPrecis template.HTML
84 HTML template.HTML
85 Style string
86 Open string
87 Donks []*Donk
88 Onts []string
89 Place *Place
90 Time *Time
91}
92
93type OldRevision struct {
94 Precis string
95 Noise string
96}
97
98const (
99 flagIsAcked = 1
100 flagIsBonked = 2
101 flagIsSaved = 4
102 flagIsUntagged = 8
103)
104
105func (honk *Honk) IsAcked() bool {
106 return honk.Flags&flagIsAcked != 0
107}
108
109func (honk *Honk) IsBonked() bool {
110 return honk.Flags&flagIsBonked != 0
111}
112
113func (honk *Honk) IsSaved() bool {
114 return honk.Flags&flagIsSaved != 0
115}
116
117func (honk *Honk) IsUntagged() bool {
118 return honk.Flags&flagIsUntagged != 0
119}
120
121type Donk struct {
122 FileID int64
123 XID string
124 Name string
125 Desc string
126 URL string
127 Media string
128 Local bool
129}
130
131type Place struct {
132 Name string
133 Latitude float64
134 Longitude float64
135 Url string
136}
137
138type Duration int64
139
140func (d Duration) String() string {
141 s := time.Duration(d).String()
142 if strings.HasSuffix(s, "m0s") {
143 s = s[:len(s)-2]
144 }
145 if strings.HasSuffix(s, "h0m") {
146 s = s[:len(s)-2]
147 }
148 return s
149}
150
151func parseDuration(s string) time.Duration {
152 didx := strings.IndexByte(s, 'd')
153 if didx != -1 {
154 days, _ := strconv.ParseInt(s[:didx], 10, 0)
155 dur, _ := time.ParseDuration(s[didx:])
156 return dur + 24*time.Hour*time.Duration(days)
157 }
158 dur, _ := time.ParseDuration(s)
159 return dur
160}
161
162type Time struct {
163 StartTime time.Time
164 EndTime time.Time
165 Duration Duration
166}
167
168type Honker struct {
169 ID int64
170 UserID int64
171 Name string
172 XID string
173 Handle string
174 Flavor string
175 Combos []string
176}
177
178type SomeThing struct {
179 What int
180 XID string
181 Owner string
182 Name string
183}
184
185const (
186 SomeNothing int = iota
187 SomeActor
188 SomeCollection
189)
190
191var serverName string
192var dataDir = "."
193var viewDir = "."
194var iconName = "icon.png"
195var serverMsg template.HTML
196var aboutMsg template.HTML
197var loginMsg template.HTML
198
199func ElaborateUnitTests() {
200}
201
202func main() {
203 flag.StringVar(&dataDir, "datadir", dataDir, "data directory")
204 flag.StringVar(&viewDir, "viewdir", viewDir, "view directory")
205 flag.Parse()
206 args := flag.Args()
207 cmd := "run"
208 if len(args) > 0 {
209 cmd = args[0]
210 }
211 switch cmd {
212 case "init":
213 initdb()
214 case "upgrade":
215 upgradedb()
216 case "version":
217 fmt.Println(softwareVersion)
218 os.Exit(0)
219 }
220 db := opendatabase()
221 dbversion := 0
222 getconfig("dbversion", &dbversion)
223 if dbversion != myVersion {
224 log.Fatal("incorrect database version. run upgrade.")
225 }
226 getconfig("servermsg", &serverMsg)
227 getconfig("aboutmsg", &aboutMsg)
228 getconfig("loginmsg", &loginMsg)
229 getconfig("servername", &serverName)
230 getconfig("usersep", &userSep)
231 getconfig("honksep", &honkSep)
232 prepareStatements(db)
233 switch cmd {
234 case "admin":
235 adminscreen()
236 case "import":
237 if len(args) != 4 {
238 log.Fatal("import username twitter [srcdir]")
239 }
240 importMain(args[1], args[2], args[3])
241 case "debug":
242 if len(args) != 2 {
243 log.Fatal("need an argument: debug (on|off)")
244 }
245 switch args[1] {
246 case "on":
247 updateconfig("debug", 1)
248 case "off":
249 updateconfig("debug", 0)
250 default:
251 log.Fatal("argument must be on or off")
252 }
253 case "adduser":
254 adduser()
255 case "chpass":
256 chpass()
257 case "cleanup":
258 arg := "30"
259 if len(args) > 1 {
260 arg = args[1]
261 }
262 cleanupdb(arg)
263 case "ping":
264 if len(args) < 3 {
265 fmt.Printf("usage: honk ping from to\n")
266 return
267 }
268 name := args[1]
269 targ := args[2]
270 user, err := butwhatabout(name)
271 if err != nil {
272 log.Printf("unknown user")
273 return
274 }
275 ping(user, targ)
276 case "run":
277 serve()
278 case "backend":
279 backendServer()
280 case "test":
281 ElaborateUnitTests()
282 default:
283 log.Fatal("unknown command")
284 }
285}