database.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 "bytes"
20 "database/sql"
21 "encoding/json"
22 "fmt"
23 "log"
24 "sort"
25 "strconv"
26 "strings"
27 "time"
28
29 "humungus.tedunangst.com/r/webs/cache"
30 "humungus.tedunangst.com/r/webs/httpsig"
31 "humungus.tedunangst.com/r/webs/login"
32)
33
34func userfromrow(row *sql.Row) (*WhatAbout, error) {
35 user := new(WhatAbout)
36 var seckey, options string
37 err := row.Scan(&user.ID, &user.Name, &user.Display, &user.About, &user.Key, &seckey, &options)
38 if err == nil {
39 user.SecKey, _, err = httpsig.DecodeKey(seckey)
40 }
41 if err != nil {
42 return nil, err
43 }
44 if user.ID > 0 {
45 user.URL = fmt.Sprintf("https://%s/%s/%s", serverName, userSep, user.Name)
46 err = unjsonify(options, &user.Options)
47 if err != nil {
48 log.Printf("error processing user options: %s", err)
49 }
50 } else {
51 user.URL = fmt.Sprintf("https://%s/%s", serverName, user.Name)
52 }
53 if user.Options.Reaction == "" {
54 user.Options.Reaction = "none"
55 }
56 return user, nil
57}
58
59var somenamedusers = cache.New(cache.Options{Filler: func(name string) (*WhatAbout, bool) {
60 row := stmtUserByName.QueryRow(name)
61 user, err := userfromrow(row)
62 if err != nil {
63 return nil, false
64 }
65 return user, true
66}})
67
68var somenumberedusers = cache.New(cache.Options{Filler: func(userid int64) (*WhatAbout, bool) {
69 row := stmtUserByNumber.QueryRow(userid)
70 user, err := userfromrow(row)
71 if err != nil {
72 return nil, false
73 }
74 return user, true
75}})
76
77func getserveruser() *WhatAbout {
78 var user *WhatAbout
79 ok := somenumberedusers.Get(serverUID, &user)
80 if !ok {
81 log.Panicf("lost server user")
82 }
83 return user
84}
85
86func butwhatabout(name string) (*WhatAbout, error) {
87 var user *WhatAbout
88 ok := somenamedusers.Get(name, &user)
89 if !ok {
90 return nil, fmt.Errorf("no user: %s", name)
91 }
92 return user, nil
93}
94
95var honkerinvalidator cache.Invalidator
96
97func gethonkers(userid int64) []*Honker {
98 rows, err := stmtHonkers.Query(userid)
99 if err != nil {
100 log.Printf("error querying honkers: %s", err)
101 return nil
102 }
103 defer rows.Close()
104 var honkers []*Honker
105 for rows.Next() {
106 h := new(Honker)
107 var combos, meta string
108 err = rows.Scan(&h.ID, &h.UserID, &h.Name, &h.XID, &h.Flavor, &combos, &meta)
109 if err == nil {
110 err = unjsonify(meta, &h.Meta)
111 }
112 if err != nil {
113 log.Printf("error scanning honker: %s", err)
114 continue
115 }
116 h.Combos = strings.Split(strings.TrimSpace(combos), " ")
117 honkers = append(honkers, h)
118 }
119 return honkers
120}
121
122func getdubs(userid int64) []*Honker {
123 rows, err := stmtDubbers.Query(userid)
124 return dubsfromrows(rows, err)
125}
126
127func getnameddubs(userid int64, name string) []*Honker {
128 rows, err := stmtNamedDubbers.Query(userid, name)
129 return dubsfromrows(rows, err)
130}
131
132func dubsfromrows(rows *sql.Rows, err error) []*Honker {
133 if err != nil {
134 log.Printf("error querying dubs: %s", err)
135 return nil
136 }
137 defer rows.Close()
138 var honkers []*Honker
139 for rows.Next() {
140 h := new(Honker)
141 err = rows.Scan(&h.ID, &h.UserID, &h.Name, &h.XID, &h.Flavor)
142 if err != nil {
143 log.Printf("error scanning honker: %s", err)
144 return nil
145 }
146 honkers = append(honkers, h)
147 }
148 return honkers
149}
150
151func allusers() []login.UserInfo {
152 var users []login.UserInfo
153 rows, _ := opendatabase().Query("select userid, username from users where userid > 0")
154 defer rows.Close()
155 for rows.Next() {
156 var u login.UserInfo
157 rows.Scan(&u.UserID, &u.Username)
158 users = append(users, u)
159 }
160 return users
161}
162
163func getxonk(userid int64, xid string) *Honk {
164 row := stmtOneXonk.QueryRow(userid, xid)
165 return scanhonk(row)
166}
167
168func getbonk(userid int64, xid string) *Honk {
169 row := stmtOneBonk.QueryRow(userid, xid)
170 return scanhonk(row)
171}
172
173func getpublichonks() []*Honk {
174 dt := time.Now().UTC().Add(-7 * 24 * time.Hour).Format(dbtimeformat)
175 rows, err := stmtPublicHonks.Query(dt, 100)
176 return getsomehonks(rows, err)
177}
178func geteventhonks(userid int64) []*Honk {
179 rows, err := stmtEventHonks.Query(userid, 25)
180 honks := getsomehonks(rows, err)
181 sort.Slice(honks, func(i, j int) bool {
182 var t1, t2 time.Time
183 if honks[i].Time == nil {
184 t1 = honks[i].Date
185 } else {
186 t1 = honks[i].Time.StartTime
187 }
188 if honks[j].Time == nil {
189 t2 = honks[j].Date
190 } else {
191 t2 = honks[j].Time.StartTime
192 }
193 return t1.After(t2)
194 })
195 now := time.Now().Add(-24 * time.Hour)
196 for i, h := range honks {
197 t := h.Date
198 if tm := h.Time; tm != nil {
199 t = tm.StartTime
200 }
201 if t.Before(now) {
202 honks = honks[:i]
203 break
204 }
205 }
206 reversehonks(honks)
207 return honks
208}
209func gethonksbyuser(name string, includeprivate bool, wanted int64) []*Honk {
210 dt := time.Now().UTC().Add(-7 * 24 * time.Hour).Format(dbtimeformat)
211 limit := 50
212 whofore := 2
213 if includeprivate {
214 whofore = 3
215 }
216 rows, err := stmtUserHonks.Query(wanted, whofore, name, dt, limit)
217 return getsomehonks(rows, err)
218}
219func gethonksforuser(userid int64, wanted int64) []*Honk {
220 dt := time.Now().UTC().Add(-7 * 24 * time.Hour).Format(dbtimeformat)
221 rows, err := stmtHonksForUser.Query(wanted, userid, dt, userid, userid)
222 return getsomehonks(rows, err)
223}
224func gethonksforuserfirstclass(userid int64, wanted int64) []*Honk {
225 dt := time.Now().UTC().Add(-7 * 24 * time.Hour).Format(dbtimeformat)
226 rows, err := stmtHonksForUserFirstClass.Query(wanted, userid, dt, userid, userid)
227 return getsomehonks(rows, err)
228}
229
230func gethonksforme(userid int64, wanted int64) []*Honk {
231 dt := time.Now().UTC().Add(-7 * 24 * time.Hour).Format(dbtimeformat)
232 rows, err := stmtHonksForMe.Query(wanted, userid, dt, userid)
233 return getsomehonks(rows, err)
234}
235func getsavedhonks(userid int64, wanted int64) []*Honk {
236 rows, err := stmtHonksISaved.Query(wanted, userid)
237 return getsomehonks(rows, err)
238}
239func gethonksbyhonker(userid int64, honker string, wanted int64) []*Honk {
240 rows, err := stmtHonksByHonker.Query(wanted, userid, honker, userid)
241 return getsomehonks(rows, err)
242}
243func gethonksbyxonker(userid int64, xonker string, wanted int64) []*Honk {
244 rows, err := stmtHonksByXonker.Query(wanted, userid, xonker, xonker, userid)
245 return getsomehonks(rows, err)
246}
247func gethonksbycombo(userid int64, combo string, wanted int64) []*Honk {
248 combo = "% " + combo + " %"
249 rows, err := stmtHonksByCombo.Query(wanted, userid, userid, combo, userid, wanted, userid, combo, userid)
250 return getsomehonks(rows, err)
251}
252func gethonksbyconvoy(userid int64, convoy string, wanted int64) []*Honk {
253 rows, err := stmtHonksByConvoy.Query(wanted, userid, userid, convoy)
254 honks := getsomehonks(rows, err)
255 return honks
256}
257func gethonksbysearch(userid int64, q string, wanted int64) []*Honk {
258 var queries []string
259 var params []interface{}
260 queries = append(queries, "honks.honkid > ?")
261 params = append(params, wanted)
262 queries = append(queries, "honks.userid = ?")
263 params = append(params, userid)
264
265 terms := strings.Split(q, " ")
266 for _, t := range terms {
267 negate := " "
268 if t[0] == '-' {
269 t = t[1:]
270 negate = " not "
271 }
272 if t == "" {
273 continue
274 }
275 if strings.HasPrefix(t, "site:") {
276 site := t[5:]
277 site = "%" + site + "%"
278 queries = append(queries, "xid"+negate+"like ?")
279 params = append(params, site)
280 continue
281 }
282 if strings.HasPrefix(t, "honker:") {
283 honker := t[7:]
284 xid := fullname(honker, userid)
285 if xid != "" {
286 honker = xid
287 }
288 queries = append(queries, negate+"(honks.honker = ? or honks.oonker = ?)")
289 params = append(params, honker)
290 params = append(params, honker)
291 continue
292 }
293 t = "%" + t + "%"
294 queries = append(queries, "noise"+negate+"like ?")
295 params = append(params, t)
296 }
297
298 selecthonks := "select honks.honkid, honks.userid, username, what, honker, oonker, honks.xid, rid, dt, url, audience, noise, precis, format, convoy, whofore, flags from honks join users on honks.userid = users.userid "
299 where := "where " + strings.Join(queries, " and ")
300 butnotthose := " and convoy not in (select name from zonkers where userid = ? and wherefore = 'zonvoy' order by zonkerid desc limit 100)"
301 limit := " order by honks.honkid desc limit 250"
302 params = append(params, userid)
303 rows, err := opendatabase().Query(selecthonks+where+butnotthose+limit, params...)
304 honks := getsomehonks(rows, err)
305 return honks
306}
307func gethonksbyontology(userid int64, name string, wanted int64) []*Honk {
308 rows, err := stmtHonksByOntology.Query(wanted, name, userid, userid)
309 honks := getsomehonks(rows, err)
310 return honks
311}
312
313func reversehonks(honks []*Honk) {
314 for i, j := 0, len(honks)-1; i < j; i, j = i+1, j-1 {
315 honks[i], honks[j] = honks[j], honks[i]
316 }
317}
318
319func getsomehonks(rows *sql.Rows, err error) []*Honk {
320 if err != nil {
321 log.Printf("error querying honks: %s", err)
322 return nil
323 }
324 defer rows.Close()
325 var honks []*Honk
326 for rows.Next() {
327 h := scanhonk(rows)
328 if h != nil {
329 honks = append(honks, h)
330 }
331 }
332 rows.Close()
333 donksforhonks(honks)
334 return honks
335}
336
337type RowLike interface {
338 Scan(dest ...interface{}) error
339}
340
341func scanhonk(row RowLike) *Honk {
342 h := new(Honk)
343 var dt, aud string
344 err := row.Scan(&h.ID, &h.UserID, &h.Username, &h.What, &h.Honker, &h.Oonker, &h.XID, &h.RID,
345 &dt, &h.URL, &aud, &h.Noise, &h.Precis, &h.Format, &h.Convoy, &h.Whofore, &h.Flags)
346 if err != nil {
347 if err != sql.ErrNoRows {
348 log.Printf("error scanning honk: %s", err)
349 }
350 return nil
351 }
352 h.Date, _ = time.Parse(dbtimeformat, dt)
353 h.Audience = strings.Split(aud, " ")
354 h.Public = loudandproud(h.Audience)
355 return h
356}
357
358func donksforhonks(honks []*Honk) {
359 db := opendatabase()
360 var ids []string
361 hmap := make(map[int64]*Honk)
362 for _, h := range honks {
363 ids = append(ids, fmt.Sprintf("%d", h.ID))
364 hmap[h.ID] = h
365 }
366 idset := strings.Join(ids, ",")
367 // grab donks
368 q := fmt.Sprintf("select honkid, donks.fileid, xid, name, description, url, media, local from donks join filemeta on donks.fileid = filemeta.fileid where honkid in (%s)", idset)
369 rows, err := db.Query(q)
370 if err != nil {
371 log.Printf("error querying donks: %s", err)
372 return
373 }
374 defer rows.Close()
375 for rows.Next() {
376 var hid int64
377 d := new(Donk)
378 err = rows.Scan(&hid, &d.FileID, &d.XID, &d.Name, &d.Desc, &d.URL, &d.Media, &d.Local)
379 if err != nil {
380 log.Printf("error scanning donk: %s", err)
381 continue
382 }
383 h := hmap[hid]
384 h.Donks = append(h.Donks, d)
385 }
386 rows.Close()
387
388 // grab onts
389 q = fmt.Sprintf("select honkid, ontology from onts where honkid in (%s)", idset)
390 rows, err = db.Query(q)
391 if err != nil {
392 log.Printf("error querying onts: %s", err)
393 return
394 }
395 defer rows.Close()
396 for rows.Next() {
397 var hid int64
398 var o string
399 err = rows.Scan(&hid, &o)
400 if err != nil {
401 log.Printf("error scanning donk: %s", err)
402 continue
403 }
404 h := hmap[hid]
405 h.Onts = append(h.Onts, o)
406 }
407 rows.Close()
408
409 // grab meta
410 q = fmt.Sprintf("select honkid, genus, json from honkmeta where honkid in (%s)", idset)
411 rows, err = db.Query(q)
412 if err != nil {
413 log.Printf("error querying honkmeta: %s", err)
414 return
415 }
416 defer rows.Close()
417 for rows.Next() {
418 var hid int64
419 var genus, j string
420 err = rows.Scan(&hid, &genus, &j)
421 if err != nil {
422 log.Printf("error scanning honkmeta: %s", err)
423 continue
424 }
425 h := hmap[hid]
426 switch genus {
427 case "place":
428 p := new(Place)
429 err = unjsonify(j, p)
430 if err != nil {
431 log.Printf("error parsing place: %s", err)
432 continue
433 }
434 h.Place = p
435 case "time":
436 t := new(Time)
437 err = unjsonify(j, t)
438 if err != nil {
439 log.Printf("error parsing time: %s", err)
440 continue
441 }
442 h.Time = t
443 case "mentions":
444 err = unjsonify(j, &h.Mentions)
445 if err != nil {
446 log.Printf("error parsing mentions: %s", err)
447 continue
448 }
449 case "oldrev":
450 default:
451 log.Printf("unknown meta genus: %s", genus)
452 }
453 }
454 rows.Close()
455}
456
457func donksforchonks(chonks []*Chonk) {
458 db := opendatabase()
459 var ids []string
460 chmap := make(map[int64]*Chonk)
461 for _, ch := range chonks {
462 ids = append(ids, fmt.Sprintf("%d", ch.ID))
463 chmap[ch.ID] = ch
464 }
465 idset := strings.Join(ids, ",")
466 // grab donks
467 q := fmt.Sprintf("select chonkid, donks.fileid, xid, name, description, url, media, local from donks join filemeta on donks.fileid = filemeta.fileid where chonkid in (%s)", idset)
468 rows, err := db.Query(q)
469 if err != nil {
470 log.Printf("error querying donks: %s", err)
471 return
472 }
473 defer rows.Close()
474 for rows.Next() {
475 var chid int64
476 d := new(Donk)
477 err = rows.Scan(&chid, &d.FileID, &d.XID, &d.Name, &d.Desc, &d.URL, &d.Media, &d.Local)
478 if err != nil {
479 log.Printf("error scanning donk: %s", err)
480 continue
481 }
482 ch := chmap[chid]
483 ch.Donks = append(ch.Donks, d)
484 }
485}
486
487func savefile(xid string, name string, desc string, url string, media string, local bool, data []byte) (int64, error) {
488 res, err := stmtSaveFile.Exec(xid, name, desc, url, media, local)
489 if err != nil {
490 return 0, err
491 }
492 fileid, _ := res.LastInsertId()
493 if local {
494 _, err = stmtSaveFileData.Exec(xid, media, data)
495 if err != nil {
496 return 0, err
497 }
498 }
499 return fileid, nil
500}
501
502func finddonk(url string) *Donk {
503 donk := new(Donk)
504 row := stmtFindFile.QueryRow(url)
505 err := row.Scan(&donk.FileID, &donk.XID)
506 if err == nil {
507 return donk
508 }
509 if err != sql.ErrNoRows {
510 log.Printf("error finding file: %s", err)
511 }
512 return nil
513}
514
515func savechonk(ch *Chonk) error {
516 dt := ch.Date.UTC().Format(dbtimeformat)
517 db := opendatabase()
518 tx, err := db.Begin()
519 if err != nil {
520 log.Printf("can't begin tx: %s", err)
521 return err
522 }
523
524 res, err := tx.Stmt(stmtSaveChonk).Exec(ch.UserID, ch.XID, ch.Who, ch.Target, dt, ch.Noise, ch.Format)
525 if err == nil {
526 ch.ID, _ = res.LastInsertId()
527 for _, d := range ch.Donks {
528 _, err := tx.Stmt(stmtSaveDonk).Exec(-1, ch.ID, d.FileID)
529 if err != nil {
530 log.Printf("error saving donk: %s", err)
531 break
532 }
533 }
534 err = tx.Commit()
535 } else {
536 tx.Rollback()
537 }
538 return err
539}
540
541func loadchatter(userid int64) map[string][]*Chonk {
542 rows, err := stmtLoadChonks.Query(userid)
543 if err != nil {
544 log.Printf("error loading chonks: %s", err)
545 return nil
546 }
547 defer rows.Close()
548 chonks := make(map[string][]*Chonk)
549 var allchonks []*Chonk
550 for rows.Next() {
551 ch := new(Chonk)
552 var dt string
553 err = rows.Scan(&ch.ID, &ch.UserID, &ch.XID, &ch.Who, &ch.Target, &dt, &ch.Noise, &ch.Format)
554 if err != nil {
555 log.Printf("error scanning chonk: %s", err)
556 continue
557 }
558 ch.Date, _ = time.Parse(dbtimeformat, dt)
559 chonks[ch.Target] = append(chonks[ch.Target], ch)
560 allchonks = append(allchonks, ch)
561 }
562 donksforchonks(allchonks)
563 return chonks
564}
565
566func savehonk(h *Honk) error {
567 dt := h.Date.UTC().Format(dbtimeformat)
568 aud := strings.Join(h.Audience, " ")
569
570 db := opendatabase()
571 tx, err := db.Begin()
572 if err != nil {
573 log.Printf("can't begin tx: %s", err)
574 return err
575 }
576
577 res, err := tx.Stmt(stmtSaveHonk).Exec(h.UserID, h.What, h.Honker, h.XID, h.RID, dt, h.URL,
578 aud, h.Noise, h.Convoy, h.Whofore, h.Format, h.Precis,
579 h.Oonker, h.Flags)
580 if err == nil {
581 h.ID, _ = res.LastInsertId()
582 err = saveextras(tx, h)
583 }
584 if err == nil {
585 err = tx.Commit()
586 } else {
587 tx.Rollback()
588 }
589 if err != nil {
590 log.Printf("error saving honk: %s", err)
591 }
592 honkhonkline()
593 return err
594}
595
596func updatehonk(h *Honk) error {
597 old := getxonk(h.UserID, h.XID)
598 oldrev := OldRevision{Precis: old.Precis, Noise: old.Noise}
599 dt := h.Date.UTC().Format(dbtimeformat)
600
601 db := opendatabase()
602 tx, err := db.Begin()
603 if err != nil {
604 log.Printf("can't begin tx: %s", err)
605 return err
606 }
607
608 err = deleteextras(tx, h.ID, false)
609 if err == nil {
610 _, err = tx.Stmt(stmtUpdateHonk).Exec(h.Precis, h.Noise, h.Format, h.Whofore, dt, h.ID)
611 }
612 if err == nil {
613 err = saveextras(tx, h)
614 }
615 if err == nil {
616 var j string
617 j, err = jsonify(&oldrev)
618 if err == nil {
619 _, err = tx.Stmt(stmtSaveMeta).Exec(old.ID, "oldrev", j)
620 }
621 if err != nil {
622 log.Printf("error saving oldrev: %s", err)
623 }
624 }
625 if err == nil {
626 err = tx.Commit()
627 } else {
628 tx.Rollback()
629 }
630 if err != nil {
631 log.Printf("error updating honk %d: %s", h.ID, err)
632 }
633 return err
634}
635
636func deletehonk(honkid int64) error {
637 db := opendatabase()
638 tx, err := db.Begin()
639 if err != nil {
640 log.Printf("can't begin tx: %s", err)
641 return err
642 }
643
644 err = deleteextras(tx, honkid, true)
645 if err == nil {
646 _, err = tx.Stmt(stmtDeleteHonk).Exec(honkid)
647 }
648 if err == nil {
649 err = tx.Commit()
650 } else {
651 tx.Rollback()
652 }
653 if err != nil {
654 log.Printf("error deleting honk %d: %s", honkid, err)
655 }
656 return err
657}
658
659func saveextras(tx *sql.Tx, h *Honk) error {
660 for _, d := range h.Donks {
661 _, err := tx.Stmt(stmtSaveDonk).Exec(h.ID, -1, d.FileID)
662 if err != nil {
663 log.Printf("error saving donk: %s", err)
664 return err
665 }
666 }
667 for _, o := range h.Onts {
668 _, err := tx.Stmt(stmtSaveOnt).Exec(strings.ToLower(o), h.ID)
669 if err != nil {
670 log.Printf("error saving ont: %s", err)
671 return err
672 }
673 }
674 if p := h.Place; p != nil {
675 j, err := jsonify(p)
676 if err == nil {
677 _, err = tx.Stmt(stmtSaveMeta).Exec(h.ID, "place", j)
678 }
679 if err != nil {
680 log.Printf("error saving place: %s", err)
681 return err
682 }
683 }
684 if t := h.Time; t != nil {
685 j, err := jsonify(t)
686 if err == nil {
687 _, err = tx.Stmt(stmtSaveMeta).Exec(h.ID, "time", j)
688 }
689 if err != nil {
690 log.Printf("error saving time: %s", err)
691 return err
692 }
693 }
694 if m := h.Mentions; len(m) > 0 {
695 j, err := jsonify(m)
696 if err == nil {
697 _, err = tx.Stmt(stmtSaveMeta).Exec(h.ID, "mentions", j)
698 }
699 if err != nil {
700 log.Printf("error saving mentions: %s", err)
701 return err
702 }
703 }
704 return nil
705}
706
707func deleteextras(tx *sql.Tx, honkid int64, everything bool) error {
708 _, err := tx.Stmt(stmtDeleteDonks).Exec(honkid)
709 if err != nil {
710 return err
711 }
712 _, err = tx.Stmt(stmtDeleteOnts).Exec(honkid)
713 if err != nil {
714 return err
715 }
716 if everything {
717 _, err = tx.Stmt(stmtDeleteAllMeta).Exec(honkid)
718 } else {
719 _, err = tx.Stmt(stmtDeleteSomeMeta).Exec(honkid)
720 }
721 if err != nil {
722 return err
723 }
724 return nil
725}
726
727func jsonify(what interface{}) (string, error) {
728 var buf bytes.Buffer
729 e := json.NewEncoder(&buf)
730 e.SetEscapeHTML(false)
731 e.SetIndent("", "")
732 err := e.Encode(what)
733 return buf.String(), err
734}
735
736func unjsonify(s string, dest interface{}) error {
737 d := json.NewDecoder(strings.NewReader(s))
738 err := d.Decode(dest)
739 return err
740}
741
742func cleanupdb(arg string) {
743 db := opendatabase()
744 days, err := strconv.Atoi(arg)
745 var sqlargs []interface{}
746 var where string
747 if err != nil {
748 honker := arg
749 expdate := time.Now().UTC().Add(-3 * 24 * time.Hour).Format(dbtimeformat)
750 where = "dt < ? and honker = ?"
751 sqlargs = append(sqlargs, expdate)
752 sqlargs = append(sqlargs, honker)
753 } else {
754 expdate := time.Now().UTC().Add(-time.Duration(days) * 24 * time.Hour).Format(dbtimeformat)
755 where = "dt < ? and convoy not in (select convoy from honks where flags & 4 or whofore = 2 or whofore = 3)"
756 sqlargs = append(sqlargs, expdate)
757 }
758 doordie(db, "delete from honks where flags & 4 = 0 and whofore = 0 and "+where, sqlargs...)
759 doordie(db, "delete from donks where honkid > 0 and honkid not in (select honkid from honks)")
760 doordie(db, "delete from onts where honkid not in (select honkid from honks)")
761 doordie(db, "delete from honkmeta where honkid not in (select honkid from honks)")
762
763 doordie(db, "delete from filemeta where fileid not in (select fileid from donks)")
764 for _, u := range allusers() {
765 doordie(db, "delete from zonkers where userid = ? and wherefore = 'zonvoy' and zonkerid < (select zonkerid from zonkers where userid = ? and wherefore = 'zonvoy' order by zonkerid desc limit 1 offset 200)", u.UserID, u.UserID)
766 }
767
768 filexids := make(map[string]bool)
769 blobdb := openblobdb()
770 rows, err := blobdb.Query("select xid from filedata")
771 if err != nil {
772 log.Fatal(err)
773 }
774 for rows.Next() {
775 var xid string
776 err = rows.Scan(&xid)
777 if err != nil {
778 log.Fatal(err)
779 }
780 filexids[xid] = true
781 }
782 rows.Close()
783 rows, err = db.Query("select xid from filemeta")
784 for rows.Next() {
785 var xid string
786 err = rows.Scan(&xid)
787 if err != nil {
788 log.Fatal(err)
789 }
790 delete(filexids, xid)
791 }
792 rows.Close()
793 tx, err := blobdb.Begin()
794 if err != nil {
795 log.Fatal(err)
796 }
797 for xid, _ := range filexids {
798 _, err = tx.Exec("delete from filedata where xid = ?", xid)
799 if err != nil {
800 log.Fatal(err)
801 }
802 }
803 err = tx.Commit()
804 if err != nil {
805 log.Fatal(err)
806 }
807}
808
809var stmtHonkers, stmtDubbers, stmtNamedDubbers, stmtSaveHonker, stmtUpdateFlavor, stmtUpdateHonker *sql.Stmt
810var stmtAnyXonk, stmtOneXonk, stmtPublicHonks, stmtUserHonks, stmtHonksByCombo, stmtHonksByConvoy *sql.Stmt
811var stmtHonksByOntology, stmtHonksForUser, stmtHonksForMe, stmtSaveDub, stmtHonksByXonker *sql.Stmt
812var stmtHonksByHonker, stmtSaveHonk, stmtUserByName, stmtUserByNumber *sql.Stmt
813var stmtEventHonks, stmtOneBonk, stmtFindZonk, stmtFindXonk, stmtSaveDonk *sql.Stmt
814var stmtFindFile, stmtGetFileData, stmtSaveFileData, stmtSaveFile *sql.Stmt
815var stmtAddDoover, stmtGetDoovers, stmtLoadDoover, stmtZapDoover, stmtOneHonker *sql.Stmt
816var stmtUntagged, stmtDeleteHonk, stmtDeleteDonks, stmtDeleteOnts, stmtSaveZonker *sql.Stmt
817var stmtGetZonkers, stmtRecentHonkers, stmtGetXonker, stmtSaveXonker, stmtDeleteXonker *sql.Stmt
818var stmtAllOnts, stmtSaveOnt, stmtUpdateFlags, stmtClearFlags *sql.Stmt
819var stmtHonksForUserFirstClass *sql.Stmt
820var stmtSaveMeta, stmtDeleteAllMeta, stmtDeleteSomeMeta, stmtUpdateHonk *sql.Stmt
821var stmtHonksISaved, stmtGetFilters, stmtSaveFilter, stmtDeleteFilter *sql.Stmt
822var stmtGetTracks *sql.Stmt
823var stmtSaveChonk, stmtLoadChonks *sql.Stmt
824
825func preparetodie(db *sql.DB, s string) *sql.Stmt {
826 stmt, err := db.Prepare(s)
827 if err != nil {
828 log.Fatalf("error %s: %s", err, s)
829 }
830 return stmt
831}
832
833func prepareStatements(db *sql.DB) {
834 stmtHonkers = preparetodie(db, "select honkerid, userid, name, xid, flavor, combos, meta from honkers where userid = ? and (flavor = 'presub' or flavor = 'sub' or flavor = 'peep' or flavor = 'unsub') order by name")
835 stmtSaveHonker = preparetodie(db, "insert into honkers (userid, name, xid, flavor, combos, owner, meta) values (?, ?, ?, ?, ?, ?, ?)")
836 stmtUpdateFlavor = preparetodie(db, "update honkers set flavor = ? where userid = ? and xid = ? and name = ? and flavor = ?")
837 stmtUpdateHonker = preparetodie(db, "update honkers set name = ?, combos = ?, meta = ? where honkerid = ? and userid = ?")
838 stmtOneHonker = preparetodie(db, "select xid from honkers where name = ? and userid = ?")
839 stmtDubbers = preparetodie(db, "select honkerid, userid, name, xid, flavor from honkers where userid = ? and flavor = 'dub'")
840 stmtNamedDubbers = preparetodie(db, "select honkerid, userid, name, xid, flavor from honkers where userid = ? and name = ? and flavor = 'dub'")
841
842 selecthonks := "select honks.honkid, honks.userid, username, what, honker, oonker, honks.xid, rid, dt, url, audience, noise, precis, format, convoy, whofore, flags from honks join users on honks.userid = users.userid "
843 limit := " order by honks.honkid desc limit 250"
844 smalllimit := " order by honks.honkid desc limit ?"
845 butnotthose := " and convoy not in (select name from zonkers where userid = ? and wherefore = 'zonvoy' order by zonkerid desc limit 100)"
846 stmtOneXonk = preparetodie(db, selecthonks+"where honks.userid = ? and xid = ?")
847 stmtAnyXonk = preparetodie(db, selecthonks+"where xid = ? order by honks.honkid asc")
848 stmtOneBonk = preparetodie(db, selecthonks+"where honks.userid = ? and xid = ? and what = 'bonk' and whofore = 2")
849 stmtPublicHonks = preparetodie(db, selecthonks+"where whofore = 2 and dt > ?"+smalllimit)
850 stmtEventHonks = preparetodie(db, selecthonks+"where (whofore = 2 or honks.userid = ?) and what = 'event'"+smalllimit)
851 stmtUserHonks = preparetodie(db, selecthonks+"where honks.honkid > ? and (whofore = 2 or whofore = ?) and username = ? and dt > ?"+smalllimit)
852 myhonkers := " and honker in (select xid from honkers where userid = ? and (flavor = 'sub' or flavor = 'peep' or flavor = 'presub') and combos not like '% - %')"
853 stmtHonksForUser = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and dt > ?"+myhonkers+butnotthose+limit)
854 stmtHonksForUserFirstClass = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and dt > ? and (what <> 'tonk')"+myhonkers+butnotthose+limit)
855 stmtHonksForMe = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and dt > ? and whofore = 1"+butnotthose+limit)
856 stmtHonksISaved = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and flags & 4 order by honks.honkid desc")
857 stmtHonksByHonker = preparetodie(db, selecthonks+"join honkers on (honkers.xid = honks.honker or honkers.xid = honks.oonker) where honks.honkid > ? and honks.userid = ? and honkers.name = ?"+butnotthose+limit)
858 stmtHonksByXonker = preparetodie(db, selecthonks+" where honks.honkid > ? and honks.userid = ? and (honker = ? or oonker = ?)"+butnotthose+limit)
859 stmtHonksByCombo = preparetodie(db, selecthonks+" where honks.honkid > ? and honks.userid = ? and honks.honker in (select xid from honkers where honkers.userid = ? and honkers.combos like ?) "+butnotthose+" union "+selecthonks+"join onts on honks.honkid = onts.honkid where honks.honkid > ? and honks.userid = ? and onts.ontology in (select xid from honkers where combos like ?)"+butnotthose+limit)
860 stmtHonksByConvoy = preparetodie(db, selecthonks+"where honks.honkid > ? and (honks.userid = ? or (? = -1 and whofore = 2)) and convoy = ?"+limit)
861 stmtHonksByOntology = preparetodie(db, selecthonks+"join onts on honks.honkid = onts.honkid where honks.honkid > ? and onts.ontology = ? and (honks.userid = ? or (? = -1 and honks.whofore = 2))"+limit)
862
863 stmtSaveMeta = preparetodie(db, "insert into honkmeta (honkid, genus, json) values (?, ?, ?)")
864 stmtDeleteAllMeta = preparetodie(db, "delete from honkmeta where honkid = ?")
865 stmtDeleteSomeMeta = preparetodie(db, "delete from honkmeta where honkid = ? and genus not in ('oldrev')")
866 stmtSaveHonk = preparetodie(db, "insert into honks (userid, what, honker, xid, rid, dt, url, audience, noise, convoy, whofore, format, precis, oonker, flags) values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)")
867 stmtDeleteHonk = preparetodie(db, "delete from honks where honkid = ?")
868 stmtUpdateHonk = preparetodie(db, "update honks set precis = ?, noise = ?, format = ?, whofore = ?, dt = ? where honkid = ?")
869 stmtSaveOnt = preparetodie(db, "insert into onts (ontology, honkid) values (?, ?)")
870 stmtDeleteOnts = preparetodie(db, "delete from onts where honkid = ?")
871 stmtSaveDonk = preparetodie(db, "insert into donks (honkid, chonkid, fileid) values (?, ?, ?)")
872 stmtDeleteDonks = preparetodie(db, "delete from donks where honkid = ?")
873 stmtSaveFile = preparetodie(db, "insert into filemeta (xid, name, description, url, media, local) values (?, ?, ?, ?, ?, ?)")
874 blobdb := openblobdb()
875 stmtSaveFileData = preparetodie(blobdb, "insert into filedata (xid, media, content) values (?, ?, ?)")
876 stmtGetFileData = preparetodie(blobdb, "select media, content from filedata where xid = ?")
877 stmtFindXonk = preparetodie(db, "select honkid from honks where userid = ? and xid = ?")
878 stmtFindFile = preparetodie(db, "select fileid, xid from filemeta where url = ? and local = 1")
879 stmtUserByName = preparetodie(db, "select userid, username, displayname, about, pubkey, seckey, options from users where username = ? and userid > 0")
880 stmtUserByNumber = preparetodie(db, "select userid, username, displayname, about, pubkey, seckey, options from users where userid = ?")
881 stmtSaveDub = preparetodie(db, "insert into honkers (userid, name, xid, flavor) values (?, ?, ?, ?)")
882 stmtAddDoover = preparetodie(db, "insert into doovers (dt, tries, userid, rcpt, msg) values (?, ?, ?, ?, ?)")
883 stmtGetDoovers = preparetodie(db, "select dooverid, dt from doovers")
884 stmtLoadDoover = preparetodie(db, "select tries, userid, rcpt, msg from doovers where dooverid = ?")
885 stmtZapDoover = preparetodie(db, "delete from doovers where dooverid = ?")
886 stmtUntagged = preparetodie(db, "select xid, rid, flags from (select honkid, xid, rid, flags from honks where userid = ? order by honkid desc limit 10000) order by honkid asc")
887 stmtFindZonk = preparetodie(db, "select zonkerid from zonkers where userid = ? and name = ? and wherefore = 'zonk'")
888 stmtGetZonkers = preparetodie(db, "select zonkerid, name, wherefore from zonkers where userid = ? and wherefore <> 'zonk'")
889 stmtSaveZonker = preparetodie(db, "insert into zonkers (userid, name, wherefore) values (?, ?, ?)")
890 stmtGetXonker = preparetodie(db, "select info from xonkers where name = ? and flavor = ?")
891 stmtSaveXonker = preparetodie(db, "insert into xonkers (name, info, flavor, dt) values (?, ?, ?, ?)")
892 stmtDeleteXonker = preparetodie(db, "delete from xonkers where name = ? and flavor = ? and dt < ?")
893 stmtRecentHonkers = preparetodie(db, "select distinct(honker) from honks where userid = ? and honker not in (select xid from honkers where userid = ? and flavor = 'sub') order by honkid desc limit 100")
894 stmtUpdateFlags = preparetodie(db, "update honks set flags = flags | ? where honkid = ?")
895 stmtClearFlags = preparetodie(db, "update honks set flags = flags & ~ ? where honkid = ?")
896 stmtAllOnts = preparetodie(db, "select ontology, count(ontology) from onts join honks on onts.honkid = honks.honkid where (honks.userid = ? or honks.whofore = 2) group by ontology")
897 stmtGetFilters = preparetodie(db, "select hfcsid, json from hfcs where userid = ?")
898 stmtSaveFilter = preparetodie(db, "insert into hfcs (userid, json) values (?, ?)")
899 stmtDeleteFilter = preparetodie(db, "delete from hfcs where userid = ? and hfcsid = ?")
900 stmtGetTracks = preparetodie(db, "select fetches from tracks where xid = ?")
901 stmtSaveChonk = preparetodie(db, "insert into chonks (userid, xid, who, target, dt, noise, format) values (?, ?, ?, ?, ?, ?, ?)")
902 stmtLoadChonks = preparetodie(db, "select chonkid, userid, xid, who, target, dt, noise, format from chonks where userid = ?")
903}