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) []*Chatter {
542 duedt := time.Now().Add(-3 * 24 * time.Hour).UTC().Format(dbtimeformat)
543 rows, err := stmtLoadChonks.Query(userid, duedt)
544 if err != nil {
545 log.Printf("error loading chonks: %s", err)
546 return nil
547 }
548 defer rows.Close()
549 chonks := make(map[string][]*Chonk)
550 var allchonks []*Chonk
551 for rows.Next() {
552 ch := new(Chonk)
553 var dt string
554 err = rows.Scan(&ch.ID, &ch.UserID, &ch.XID, &ch.Who, &ch.Target, &dt, &ch.Noise, &ch.Format)
555 if err != nil {
556 log.Printf("error scanning chonk: %s", err)
557 continue
558 }
559 ch.Date, _ = time.Parse(dbtimeformat, dt)
560 chonks[ch.Target] = append(chonks[ch.Target], ch)
561 allchonks = append(allchonks, ch)
562 }
563 donksforchonks(allchonks)
564 rows.Close()
565 rows, err = stmtGetChatters.Query(userid)
566 if err != nil {
567 log.Printf("error getting chatters: %s", err)
568 return nil
569 }
570 for rows.Next() {
571 var target string
572 err = rows.Scan(&target)
573 if err != nil {
574 log.Printf("error scanning chatter: %s", target)
575 continue
576 }
577 if _, ok := chonks[target]; !ok {
578 chonks[target] = []*Chonk{}
579
580 }
581 }
582 var chatter []*Chatter
583 for target, chonks := range chonks {
584 chatter = append(chatter, &Chatter{
585 Target: target,
586 Chonks: chonks,
587 })
588 }
589 return chatter
590}
591
592func savehonk(h *Honk) error {
593 dt := h.Date.UTC().Format(dbtimeformat)
594 aud := strings.Join(h.Audience, " ")
595
596 db := opendatabase()
597 tx, err := db.Begin()
598 if err != nil {
599 log.Printf("can't begin tx: %s", err)
600 return err
601 }
602
603 res, err := tx.Stmt(stmtSaveHonk).Exec(h.UserID, h.What, h.Honker, h.XID, h.RID, dt, h.URL,
604 aud, h.Noise, h.Convoy, h.Whofore, h.Format, h.Precis,
605 h.Oonker, h.Flags)
606 if err == nil {
607 h.ID, _ = res.LastInsertId()
608 err = saveextras(tx, h)
609 }
610 if err == nil {
611 err = tx.Commit()
612 } else {
613 tx.Rollback()
614 }
615 if err != nil {
616 log.Printf("error saving honk: %s", err)
617 }
618 honkhonkline()
619 return err
620}
621
622func updatehonk(h *Honk) error {
623 old := getxonk(h.UserID, h.XID)
624 oldrev := OldRevision{Precis: old.Precis, Noise: old.Noise}
625 dt := h.Date.UTC().Format(dbtimeformat)
626
627 db := opendatabase()
628 tx, err := db.Begin()
629 if err != nil {
630 log.Printf("can't begin tx: %s", err)
631 return err
632 }
633
634 err = deleteextras(tx, h.ID, false)
635 if err == nil {
636 _, err = tx.Stmt(stmtUpdateHonk).Exec(h.Precis, h.Noise, h.Format, h.Whofore, dt, h.ID)
637 }
638 if err == nil {
639 err = saveextras(tx, h)
640 }
641 if err == nil {
642 var j string
643 j, err = jsonify(&oldrev)
644 if err == nil {
645 _, err = tx.Stmt(stmtSaveMeta).Exec(old.ID, "oldrev", j)
646 }
647 if err != nil {
648 log.Printf("error saving oldrev: %s", err)
649 }
650 }
651 if err == nil {
652 err = tx.Commit()
653 } else {
654 tx.Rollback()
655 }
656 if err != nil {
657 log.Printf("error updating honk %d: %s", h.ID, err)
658 }
659 return err
660}
661
662func deletehonk(honkid int64) error {
663 db := opendatabase()
664 tx, err := db.Begin()
665 if err != nil {
666 log.Printf("can't begin tx: %s", err)
667 return err
668 }
669
670 err = deleteextras(tx, honkid, true)
671 if err == nil {
672 _, err = tx.Stmt(stmtDeleteHonk).Exec(honkid)
673 }
674 if err == nil {
675 err = tx.Commit()
676 } else {
677 tx.Rollback()
678 }
679 if err != nil {
680 log.Printf("error deleting honk %d: %s", honkid, err)
681 }
682 return err
683}
684
685func saveextras(tx *sql.Tx, h *Honk) error {
686 for _, d := range h.Donks {
687 _, err := tx.Stmt(stmtSaveDonk).Exec(h.ID, -1, d.FileID)
688 if err != nil {
689 log.Printf("error saving donk: %s", err)
690 return err
691 }
692 }
693 for _, o := range h.Onts {
694 _, err := tx.Stmt(stmtSaveOnt).Exec(strings.ToLower(o), h.ID)
695 if err != nil {
696 log.Printf("error saving ont: %s", err)
697 return err
698 }
699 }
700 if p := h.Place; p != nil {
701 j, err := jsonify(p)
702 if err == nil {
703 _, err = tx.Stmt(stmtSaveMeta).Exec(h.ID, "place", j)
704 }
705 if err != nil {
706 log.Printf("error saving place: %s", err)
707 return err
708 }
709 }
710 if t := h.Time; t != nil {
711 j, err := jsonify(t)
712 if err == nil {
713 _, err = tx.Stmt(stmtSaveMeta).Exec(h.ID, "time", j)
714 }
715 if err != nil {
716 log.Printf("error saving time: %s", err)
717 return err
718 }
719 }
720 if m := h.Mentions; len(m) > 0 {
721 j, err := jsonify(m)
722 if err == nil {
723 _, err = tx.Stmt(stmtSaveMeta).Exec(h.ID, "mentions", j)
724 }
725 if err != nil {
726 log.Printf("error saving mentions: %s", err)
727 return err
728 }
729 }
730 return nil
731}
732
733func deleteextras(tx *sql.Tx, honkid int64, everything bool) error {
734 _, err := tx.Stmt(stmtDeleteDonks).Exec(honkid)
735 if err != nil {
736 return err
737 }
738 _, err = tx.Stmt(stmtDeleteOnts).Exec(honkid)
739 if err != nil {
740 return err
741 }
742 if everything {
743 _, err = tx.Stmt(stmtDeleteAllMeta).Exec(honkid)
744 } else {
745 _, err = tx.Stmt(stmtDeleteSomeMeta).Exec(honkid)
746 }
747 if err != nil {
748 return err
749 }
750 return nil
751}
752
753func jsonify(what interface{}) (string, error) {
754 var buf bytes.Buffer
755 e := json.NewEncoder(&buf)
756 e.SetEscapeHTML(false)
757 e.SetIndent("", "")
758 err := e.Encode(what)
759 return buf.String(), err
760}
761
762func unjsonify(s string, dest interface{}) error {
763 d := json.NewDecoder(strings.NewReader(s))
764 err := d.Decode(dest)
765 return err
766}
767
768func cleanupdb(arg string) {
769 db := opendatabase()
770 days, err := strconv.Atoi(arg)
771 var sqlargs []interface{}
772 var where string
773 if err != nil {
774 honker := arg
775 expdate := time.Now().UTC().Add(-3 * 24 * time.Hour).Format(dbtimeformat)
776 where = "dt < ? and honker = ?"
777 sqlargs = append(sqlargs, expdate)
778 sqlargs = append(sqlargs, honker)
779 } else {
780 expdate := time.Now().UTC().Add(-time.Duration(days) * 24 * time.Hour).Format(dbtimeformat)
781 where = "dt < ? and convoy not in (select convoy from honks where flags & 4 or whofore = 2 or whofore = 3)"
782 sqlargs = append(sqlargs, expdate)
783 }
784 doordie(db, "delete from honks where flags & 4 = 0 and whofore = 0 and "+where, sqlargs...)
785 doordie(db, "delete from donks where honkid > 0 and honkid not in (select honkid from honks)")
786 doordie(db, "delete from onts where honkid not in (select honkid from honks)")
787 doordie(db, "delete from honkmeta where honkid not in (select honkid from honks)")
788
789 doordie(db, "delete from filemeta where fileid not in (select fileid from donks)")
790 for _, u := range allusers() {
791 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)
792 }
793
794 filexids := make(map[string]bool)
795 blobdb := openblobdb()
796 rows, err := blobdb.Query("select xid from filedata")
797 if err != nil {
798 log.Fatal(err)
799 }
800 for rows.Next() {
801 var xid string
802 err = rows.Scan(&xid)
803 if err != nil {
804 log.Fatal(err)
805 }
806 filexids[xid] = true
807 }
808 rows.Close()
809 rows, err = db.Query("select xid from filemeta")
810 for rows.Next() {
811 var xid string
812 err = rows.Scan(&xid)
813 if err != nil {
814 log.Fatal(err)
815 }
816 delete(filexids, xid)
817 }
818 rows.Close()
819 tx, err := blobdb.Begin()
820 if err != nil {
821 log.Fatal(err)
822 }
823 for xid, _ := range filexids {
824 _, err = tx.Exec("delete from filedata where xid = ?", xid)
825 if err != nil {
826 log.Fatal(err)
827 }
828 }
829 err = tx.Commit()
830 if err != nil {
831 log.Fatal(err)
832 }
833}
834
835var stmtHonkers, stmtDubbers, stmtNamedDubbers, stmtSaveHonker, stmtUpdateFlavor, stmtUpdateHonker *sql.Stmt
836var stmtAnyXonk, stmtOneXonk, stmtPublicHonks, stmtUserHonks, stmtHonksByCombo, stmtHonksByConvoy *sql.Stmt
837var stmtHonksByOntology, stmtHonksForUser, stmtHonksForMe, stmtSaveDub, stmtHonksByXonker *sql.Stmt
838var stmtHonksByHonker, stmtSaveHonk, stmtUserByName, stmtUserByNumber *sql.Stmt
839var stmtEventHonks, stmtOneBonk, stmtFindZonk, stmtFindXonk, stmtSaveDonk *sql.Stmt
840var stmtFindFile, stmtGetFileData, stmtSaveFileData, stmtSaveFile *sql.Stmt
841var stmtAddDoover, stmtGetDoovers, stmtLoadDoover, stmtZapDoover, stmtOneHonker *sql.Stmt
842var stmtUntagged, stmtDeleteHonk, stmtDeleteDonks, stmtDeleteOnts, stmtSaveZonker *sql.Stmt
843var stmtGetZonkers, stmtRecentHonkers, stmtGetXonker, stmtSaveXonker, stmtDeleteXonker *sql.Stmt
844var stmtAllOnts, stmtSaveOnt, stmtUpdateFlags, stmtClearFlags *sql.Stmt
845var stmtHonksForUserFirstClass *sql.Stmt
846var stmtSaveMeta, stmtDeleteAllMeta, stmtDeleteSomeMeta, stmtUpdateHonk *sql.Stmt
847var stmtHonksISaved, stmtGetFilters, stmtSaveFilter, stmtDeleteFilter *sql.Stmt
848var stmtGetTracks *sql.Stmt
849var stmtSaveChonk, stmtLoadChonks, stmtGetChatters *sql.Stmt
850
851func preparetodie(db *sql.DB, s string) *sql.Stmt {
852 stmt, err := db.Prepare(s)
853 if err != nil {
854 log.Fatalf("error %s: %s", err, s)
855 }
856 return stmt
857}
858
859func prepareStatements(db *sql.DB) {
860 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")
861 stmtSaveHonker = preparetodie(db, "insert into honkers (userid, name, xid, flavor, combos, owner, meta) values (?, ?, ?, ?, ?, ?, ?)")
862 stmtUpdateFlavor = preparetodie(db, "update honkers set flavor = ? where userid = ? and xid = ? and name = ? and flavor = ?")
863 stmtUpdateHonker = preparetodie(db, "update honkers set name = ?, combos = ?, meta = ? where honkerid = ? and userid = ?")
864 stmtOneHonker = preparetodie(db, "select xid from honkers where name = ? and userid = ?")
865 stmtDubbers = preparetodie(db, "select honkerid, userid, name, xid, flavor from honkers where userid = ? and flavor = 'dub'")
866 stmtNamedDubbers = preparetodie(db, "select honkerid, userid, name, xid, flavor from honkers where userid = ? and name = ? and flavor = 'dub'")
867
868 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 "
869 limit := " order by honks.honkid desc limit 250"
870 smalllimit := " order by honks.honkid desc limit ?"
871 butnotthose := " and convoy not in (select name from zonkers where userid = ? and wherefore = 'zonvoy' order by zonkerid desc limit 100)"
872 stmtOneXonk = preparetodie(db, selecthonks+"where honks.userid = ? and xid = ?")
873 stmtAnyXonk = preparetodie(db, selecthonks+"where xid = ? order by honks.honkid asc")
874 stmtOneBonk = preparetodie(db, selecthonks+"where honks.userid = ? and xid = ? and what = 'bonk' and whofore = 2")
875 stmtPublicHonks = preparetodie(db, selecthonks+"where whofore = 2 and dt > ?"+smalllimit)
876 stmtEventHonks = preparetodie(db, selecthonks+"where (whofore = 2 or honks.userid = ?) and what = 'event'"+smalllimit)
877 stmtUserHonks = preparetodie(db, selecthonks+"where honks.honkid > ? and (whofore = 2 or whofore = ?) and username = ? and dt > ?"+smalllimit)
878 myhonkers := " and honker in (select xid from honkers where userid = ? and (flavor = 'sub' or flavor = 'peep' or flavor = 'presub') and combos not like '% - %')"
879 stmtHonksForUser = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and dt > ?"+myhonkers+butnotthose+limit)
880 stmtHonksForUserFirstClass = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and dt > ? and (what <> 'tonk')"+myhonkers+butnotthose+limit)
881 stmtHonksForMe = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and dt > ? and whofore = 1"+butnotthose+limit)
882 stmtHonksISaved = preparetodie(db, selecthonks+"where honks.honkid > ? and honks.userid = ? and flags & 4 order by honks.honkid desc")
883 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)
884 stmtHonksByXonker = preparetodie(db, selecthonks+" where honks.honkid > ? and honks.userid = ? and (honker = ? or oonker = ?)"+butnotthose+limit)
885 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)
886 stmtHonksByConvoy = preparetodie(db, selecthonks+"where honks.honkid > ? and (honks.userid = ? or (? = -1 and whofore = 2)) and convoy = ?"+limit)
887 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)
888
889 stmtSaveMeta = preparetodie(db, "insert into honkmeta (honkid, genus, json) values (?, ?, ?)")
890 stmtDeleteAllMeta = preparetodie(db, "delete from honkmeta where honkid = ?")
891 stmtDeleteSomeMeta = preparetodie(db, "delete from honkmeta where honkid = ? and genus not in ('oldrev')")
892 stmtSaveHonk = preparetodie(db, "insert into honks (userid, what, honker, xid, rid, dt, url, audience, noise, convoy, whofore, format, precis, oonker, flags) values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)")
893 stmtDeleteHonk = preparetodie(db, "delete from honks where honkid = ?")
894 stmtUpdateHonk = preparetodie(db, "update honks set precis = ?, noise = ?, format = ?, whofore = ?, dt = ? where honkid = ?")
895 stmtSaveOnt = preparetodie(db, "insert into onts (ontology, honkid) values (?, ?)")
896 stmtDeleteOnts = preparetodie(db, "delete from onts where honkid = ?")
897 stmtSaveDonk = preparetodie(db, "insert into donks (honkid, chonkid, fileid) values (?, ?, ?)")
898 stmtDeleteDonks = preparetodie(db, "delete from donks where honkid = ?")
899 stmtSaveFile = preparetodie(db, "insert into filemeta (xid, name, description, url, media, local) values (?, ?, ?, ?, ?, ?)")
900 blobdb := openblobdb()
901 stmtSaveFileData = preparetodie(blobdb, "insert into filedata (xid, media, content) values (?, ?, ?)")
902 stmtGetFileData = preparetodie(blobdb, "select media, content from filedata where xid = ?")
903 stmtFindXonk = preparetodie(db, "select honkid from honks where userid = ? and xid = ?")
904 stmtFindFile = preparetodie(db, "select fileid, xid from filemeta where url = ? and local = 1")
905 stmtUserByName = preparetodie(db, "select userid, username, displayname, about, pubkey, seckey, options from users where username = ? and userid > 0")
906 stmtUserByNumber = preparetodie(db, "select userid, username, displayname, about, pubkey, seckey, options from users where userid = ?")
907 stmtSaveDub = preparetodie(db, "insert into honkers (userid, name, xid, flavor) values (?, ?, ?, ?)")
908 stmtAddDoover = preparetodie(db, "insert into doovers (dt, tries, userid, rcpt, msg) values (?, ?, ?, ?, ?)")
909 stmtGetDoovers = preparetodie(db, "select dooverid, dt from doovers")
910 stmtLoadDoover = preparetodie(db, "select tries, userid, rcpt, msg from doovers where dooverid = ?")
911 stmtZapDoover = preparetodie(db, "delete from doovers where dooverid = ?")
912 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")
913 stmtFindZonk = preparetodie(db, "select zonkerid from zonkers where userid = ? and name = ? and wherefore = 'zonk'")
914 stmtGetZonkers = preparetodie(db, "select zonkerid, name, wherefore from zonkers where userid = ? and wherefore <> 'zonk'")
915 stmtSaveZonker = preparetodie(db, "insert into zonkers (userid, name, wherefore) values (?, ?, ?)")
916 stmtGetXonker = preparetodie(db, "select info from xonkers where name = ? and flavor = ?")
917 stmtSaveXonker = preparetodie(db, "insert into xonkers (name, info, flavor, dt) values (?, ?, ?, ?)")
918 stmtDeleteXonker = preparetodie(db, "delete from xonkers where name = ? and flavor = ? and dt < ?")
919 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")
920 stmtUpdateFlags = preparetodie(db, "update honks set flags = flags | ? where honkid = ?")
921 stmtClearFlags = preparetodie(db, "update honks set flags = flags & ~ ? where honkid = ?")
922 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")
923 stmtGetFilters = preparetodie(db, "select hfcsid, json from hfcs where userid = ?")
924 stmtSaveFilter = preparetodie(db, "insert into hfcs (userid, json) values (?, ?)")
925 stmtDeleteFilter = preparetodie(db, "delete from hfcs where userid = ? and hfcsid = ?")
926 stmtGetTracks = preparetodie(db, "select fetches from tracks where xid = ?")
927 stmtSaveChonk = preparetodie(db, "insert into chonks (userid, xid, who, target, dt, noise, format) values (?, ?, ?, ?, ?, ?, ?)")
928 stmtLoadChonks = preparetodie(db, "select chonkid, userid, xid, who, target, dt, noise, format from chonks where userid = ? and dt > ? order by chonkid asc")
929 stmtGetChatters = preparetodie(db, "select distinct(target) from chonks where userid = ?")
930}