all repos — honk @ 12e1deac71cc9338bc2adb90740bd86685f09391

my fork of honk

activity.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	"compress/gzip"
 21	"crypto/rsa"
 22	"database/sql"
 23	"encoding/json"
 24	"fmt"
 25	"io"
 26	"log"
 27	"net/http"
 28	"net/url"
 29	"os"
 30	"strconv"
 31	"strings"
 32	"sync"
 33	"time"
 34)
 35
 36func NewJunk() map[string]interface{} {
 37	return make(map[string]interface{})
 38}
 39
 40func WriteJunk(w io.Writer, j map[string]interface{}) error {
 41	e := json.NewEncoder(w)
 42	e.SetEscapeHTML(false)
 43	e.SetIndent("", "  ")
 44	err := e.Encode(j)
 45	return err
 46}
 47
 48func ReadJunk(r io.Reader) (map[string]interface{}, error) {
 49	decoder := json.NewDecoder(r)
 50	var j map[string]interface{}
 51	err := decoder.Decode(&j)
 52	if err != nil {
 53		return nil, err
 54	}
 55	return j, nil
 56}
 57
 58var theonetruename = `application/ld+json; profile="https://www.w3.org/ns/activitystreams"`
 59var falsenames = []string{
 60	`application/ld+json`,
 61	`application/activity+json`,
 62}
 63var itiswhatitis = "https://www.w3.org/ns/activitystreams"
 64var thewholeworld = "https://www.w3.org/ns/activitystreams#Public"
 65
 66func friendorfoe(ct string) bool {
 67	ct = strings.ToLower(ct)
 68	for _, at := range falsenames {
 69		if strings.HasPrefix(ct, at) {
 70			return true
 71		}
 72	}
 73	return false
 74}
 75
 76func PostJunk(keyname string, key *rsa.PrivateKey, url string, j map[string]interface{}) error {
 77	var buf bytes.Buffer
 78	WriteJunk(&buf, j)
 79	return PostMsg(keyname, key, url, buf.Bytes())
 80}
 81
 82func PostMsg(keyname string, key *rsa.PrivateKey, url string, msg []byte) error {
 83	client := http.DefaultClient
 84	req, err := http.NewRequest("POST", url, bytes.NewReader(msg))
 85	if err != nil {
 86		return err
 87	}
 88	req.Header.Set("Content-Type", theonetruename)
 89	zig(keyname, key, req, msg)
 90	resp, err := client.Do(req)
 91	if err != nil {
 92		return err
 93	}
 94	resp.Body.Close()
 95	switch resp.StatusCode {
 96	case 200:
 97	case 201:
 98	case 202:
 99	default:
100		return fmt.Errorf("http post status: %d", resp.StatusCode)
101	}
102	log.Printf("successful post: %s %d", url, resp.StatusCode)
103	return nil
104}
105
106type gzCloser struct {
107	r     *gzip.Reader
108	under io.ReadCloser
109}
110
111func (gz *gzCloser) Read(p []byte) (int, error) {
112	return gz.r.Read(p)
113}
114
115func (gz *gzCloser) Close() error {
116	defer gz.under.Close()
117	return gz.r.Close()
118}
119
120func GetJunk(url string) (map[string]interface{}, error) {
121	client := http.DefaultClient
122	req, err := http.NewRequest("GET", url, nil)
123	if err != nil {
124		return nil, err
125	}
126	at := theonetruename
127	if strings.Contains(url, ".well-known/webfinger?resource") {
128		at = "application/jrd+json"
129	}
130	req.Header.Set("Accept", at)
131	req.Header.Set("Accept-Encoding", "gzip")
132	resp, err := client.Do(req)
133	if err != nil {
134		return nil, err
135	}
136	if resp.StatusCode != 200 {
137		resp.Body.Close()
138		return nil, fmt.Errorf("http get status: %d", resp.StatusCode)
139	}
140	if strings.EqualFold(resp.Header.Get("Content-Encoding"), "gzip") {
141		gz, err := gzip.NewReader(resp.Body)
142		if err != nil {
143			resp.Body.Close()
144			return nil, err
145		}
146		resp.Body = &gzCloser{r: gz, under: resp.Body}
147	}
148	defer resp.Body.Close()
149	j, err := ReadJunk(resp.Body)
150	return j, err
151}
152
153func jsonfindinterface(ii interface{}, keys []string) interface{} {
154	for _, key := range keys {
155		idx, err := strconv.Atoi(key)
156		if err == nil {
157			m := ii.([]interface{})
158			if idx >= len(m) {
159				return nil
160			}
161			ii = m[idx]
162		} else {
163			m := ii.(map[string]interface{})
164			ii = m[key]
165			if ii == nil {
166				return nil
167			}
168		}
169	}
170	return ii
171}
172func jsonfindstring(j interface{}, keys []string) (string, bool) {
173	s, ok := jsonfindinterface(j, keys).(string)
174	return s, ok
175}
176func jsonfindarray(j interface{}, keys []string) ([]interface{}, bool) {
177	a, ok := jsonfindinterface(j, keys).([]interface{})
178	return a, ok
179}
180func jsonfindmap(j interface{}, keys []string) (map[string]interface{}, bool) {
181	m, ok := jsonfindinterface(j, keys).(map[string]interface{})
182	return m, ok
183}
184func jsongetstring(j interface{}, key string) (string, bool) {
185	return jsonfindstring(j, []string{key})
186}
187func jsongetarray(j interface{}, key string) ([]interface{}, bool) {
188	return jsonfindarray(j, []string{key})
189}
190func jsongetmap(j interface{}, key string) (map[string]interface{}, bool) {
191	return jsonfindmap(j, []string{key})
192}
193
194func savedonk(url string, name, media string) *Donk {
195	var donk Donk
196	row := stmtFindFile.QueryRow(url)
197	err := row.Scan(&donk.FileID)
198	if err == nil {
199		return &donk
200	}
201	log.Printf("saving donk: %s", url)
202	if err != nil && err != sql.ErrNoRows {
203		log.Printf("error querying: %s", err)
204	}
205	resp, err := http.Get(url)
206	if err != nil {
207		log.Printf("error fetching %s: %s", url, err)
208		return nil
209	}
210	defer resp.Body.Close()
211	if resp.StatusCode != 200 {
212		return nil
213	}
214	var buf bytes.Buffer
215	io.Copy(&buf, resp.Body)
216
217	xid := xfiltrate()
218
219	res, err := stmtSaveFile.Exec(xid, name, url, media, buf.Bytes())
220	if err != nil {
221		log.Printf("error saving file %s: %s", url, err)
222		return nil
223	}
224	donk.FileID, _ = res.LastInsertId()
225	return &donk
226}
227
228func needxonk(user *WhatAbout, x *Honk) bool {
229	if strings.HasPrefix(x.XID, user.URL+"/h/") {
230		return false
231	}
232	if x.What == "eradicate" {
233		return true
234	}
235	row := stmtFindXonk.QueryRow(user.ID, x.XID)
236	err := row.Scan(&x.ID)
237	if err == nil {
238		return false
239	}
240	if err != sql.ErrNoRows {
241		log.Printf("err querying xonk: %s", err)
242	}
243	return true
244}
245
246func savexonk(x *Honk) {
247	if x.What == "eradicate" {
248		log.Printf("eradicating %s by %s", x.RID, x.Honker)
249		_, err := stmtDeleteHonk.Exec(x.RID, x.Honker)
250		if err != nil {
251			log.Printf("error eradicating: %s", err)
252		}
253		return
254	}
255	dt := x.Date.UTC().Format(dbtimeformat)
256	aud := strings.Join(x.Audience, " ")
257	res, err := stmtSaveHonk.Exec(x.UserID, x.What, x.Honker, x.XID, x.RID, dt, x.URL, aud, x.Noise, x.Convoy)
258	if err != nil {
259		log.Printf("err saving xonk: %s", err)
260		return
261	}
262	x.ID, _ = res.LastInsertId()
263	for _, d := range x.Donks {
264		_, err = stmtSaveDonk.Exec(x.ID, d.FileID)
265		if err != nil {
266			log.Printf("err saving donk: %s", err)
267			return
268		}
269	}
270}
271
272type Box struct {
273	In     string
274	Out    string
275	Shared string
276}
277
278var boxofboxes = make(map[string]*Box)
279var boxlock sync.Mutex
280var boxinglock sync.Mutex
281
282func getboxes(ident string) (*Box, error) {
283	boxlock.Lock()
284	b, ok := boxofboxes[ident]
285	boxlock.Unlock()
286	if ok {
287		return b, nil
288	}
289
290	boxinglock.Lock()
291	defer boxinglock.Unlock()
292
293	boxlock.Lock()
294	b, ok = boxofboxes[ident]
295	boxlock.Unlock()
296	if ok {
297		return b, nil
298	}
299
300	j, err := GetJunk(ident)
301	if err != nil {
302		return nil, err
303	}
304	inbox, _ := jsongetstring(j, "inbox")
305	outbox, _ := jsongetstring(j, "outbox")
306	sbox, _ := jsonfindstring(j, []string{"endpoints", "sharedInbox"})
307	b = &Box{In: inbox, Out: outbox, Shared: sbox}
308	boxlock.Lock()
309	boxofboxes[ident] = b
310	boxlock.Unlock()
311	return b, nil
312}
313
314func peeppeep() {
315	user, _ := butwhatabout("")
316	honkers := gethonkers(user.ID)
317	for _, f := range honkers {
318		if f.Flavor != "peep" {
319			continue
320		}
321		log.Printf("getting updates: %s", f.XID)
322		box, err := getboxes(f.XID)
323		if err != nil {
324			log.Printf("error getting outbox: %s", err)
325			continue
326		}
327		log.Printf("getting outbox")
328		j, err := GetJunk(box.Out)
329		if err != nil {
330			log.Printf("err: %s", err)
331			continue
332		}
333		t, _ := jsongetstring(j, "type")
334		if t == "OrderedCollection" {
335			items, _ := jsongetarray(j, "orderedItems")
336			if items == nil {
337				page1, _ := jsongetstring(j, "first")
338				j, err = GetJunk(page1)
339				if err != nil {
340					log.Printf("err: %s", err)
341					continue
342				}
343				items, _ = jsongetarray(j, "orderedItems")
344			}
345
346			for _, item := range items {
347				xonk := xonkxonk(item)
348				if xonk != nil && needxonk(user, xonk) {
349					xonk.UserID = user.ID
350					savexonk(xonk)
351				}
352			}
353		}
354	}
355}
356
357func whosthere(xid string) []string {
358	obj, err := GetJunk(xid)
359	if err != nil {
360		log.Printf("error getting remote xonk: %s", err)
361		return nil
362	}
363	return newphone(nil, obj)
364}
365
366func newphone(a []string, obj map[string]interface{}) []string {
367	for _, addr := range []string{"to", "cc", "attributedTo"} {
368		who, _ := jsongetstring(obj, addr)
369		if who != "" {
370			a = append(a, who)
371		}
372		whos, _ := jsongetarray(obj, addr)
373		for _, w := range whos {
374			who, _ := w.(string)
375			if who != "" {
376				a = append(a, who)
377			}
378		}
379	}
380	return a
381}
382
383func xonkxonk(item interface{}) *Honk {
384	// id, _ := jsongetstring(item, "id")
385	what, _ := jsongetstring(item, "type")
386	dt, _ := jsongetstring(item, "published")
387
388	var audience []string
389	var err error
390	var xid, rid, url, content string
391	var obj map[string]interface{}
392	switch what {
393	case "Announce":
394		xid, _ = jsongetstring(item, "object")
395		log.Printf("getting bonk: %s", xid)
396		obj, err = GetJunk(xid)
397		if err != nil {
398			log.Printf("error regetting: %s", err)
399		}
400		what = "bonk"
401	case "Create":
402		obj, _ = jsongetmap(item, "object")
403		what = "honk"
404	case "Delete":
405		obj, _ = jsongetmap(item, "object")
406		rid, _ = jsongetstring(item, "object")
407		what = "eradicate"
408	default:
409		log.Printf("unknown activity: %s", what)
410		return nil
411	}
412	who, _ := jsongetstring(item, "actor")
413
414	var xonk Honk
415	if obj != nil {
416		ot, _ := jsongetstring(obj, "type")
417		url, _ = jsongetstring(obj, "url")
418		if ot == "Note" || ot == "Article" {
419			audience = newphone(audience, obj)
420			xid, _ = jsongetstring(obj, "id")
421			content, _ = jsongetstring(obj, "content")
422			summary, _ := jsongetstring(obj, "summary")
423			if summary != "" {
424				content = "<p>summary: " + summary + content
425			}
426			rid, _ = jsongetstring(obj, "inReplyTo")
427			if what == "honk" && rid != "" {
428				what = "tonk"
429			}
430		}
431		if ot == "Tombstone" {
432			rid, _ = jsongetstring(obj, "id")
433		}
434		atts, _ := jsongetarray(obj, "attachment")
435		for _, att := range atts {
436			at, _ := jsongetstring(att, "type")
437			mt, _ := jsongetstring(att, "mediaType")
438			u, _ := jsongetstring(att, "url")
439			name, _ := jsongetstring(att, "name")
440			if at == "Document" {
441				mt = strings.ToLower(mt)
442				log.Printf("attachment: %s %s", mt, u)
443				if mt == "image/jpeg" || mt == "image/png" ||
444					mt == "image/gif" || mt == "text/plain" {
445					donk := savedonk(u, name, mt)
446					if donk != nil {
447						xonk.Donks = append(xonk.Donks, donk)
448					}
449				}
450			}
451		}
452		tags, _ := jsongetarray(obj, "tag")
453		for _, tag := range tags {
454			tt, _ := jsongetstring(tag, "type")
455			name, _ := jsongetstring(tag, "name")
456			if tt == "Emoji" {
457				icon, _ := jsongetmap(tag, "icon")
458				mt, _ := jsongetstring(icon, "mediaType")
459				u, _ := jsongetstring(icon, "url")
460				donk := savedonk(u, name, mt)
461				if donk != nil {
462					xonk.Donks = append(xonk.Donks, donk)
463				}
464			}
465		}
466	}
467	audience = append(audience, who)
468
469	audience = oneofakind(audience)
470
471	xonk.What = what
472	xonk.Honker = who
473	xonk.XID = xid
474	xonk.RID = rid
475	xonk.Date, _ = time.Parse(time.RFC3339, dt)
476	xonk.URL = url
477	xonk.Noise = content
478	xonk.Audience = audience
479
480	return &xonk
481}
482
483func rubadubdub(user *WhatAbout, req map[string]interface{}) {
484	xid, _ := jsongetstring(req, "id")
485	reqactor, _ := jsongetstring(req, "actor")
486	j := NewJunk()
487	j["@context"] = itiswhatitis
488	j["id"] = user.URL + "/dub/" + xid
489	j["type"] = "Accept"
490	j["actor"] = user.URL
491	j["to"] = reqactor
492	j["published"] = time.Now().UTC().Format(time.RFC3339)
493	j["object"] = req
494
495	WriteJunk(os.Stdout, j)
496
497	actor, _ := jsongetstring(req, "actor")
498	box, err := getboxes(actor)
499	if err != nil {
500		log.Printf("can't get dub box: %s", err)
501		return
502	}
503	keyname, key := ziggy(user.Name)
504	err = PostJunk(keyname, key, box.In, j)
505	if err != nil {
506		log.Printf("can't rub a dub: %s", err)
507		return
508	}
509	stmtSaveDub.Exec(user.ID, actor, actor, "dub")
510}
511
512func subsub(user *WhatAbout, xid string) {
513	j := NewJunk()
514	j["@context"] = itiswhatitis
515	j["id"] = user.URL + "/sub/" + xid
516	j["type"] = "Follow"
517	j["actor"] = user.URL
518	j["to"] = xid
519	j["object"] = xid
520	j["published"] = time.Now().UTC().Format(time.RFC3339)
521
522	box, err := getboxes(xid)
523	if err != nil {
524		log.Printf("can't send follow: %s", err)
525		return
526	}
527	WriteJunk(os.Stdout, j)
528	keyname, key := ziggy(user.Name)
529	err = PostJunk(keyname, key, box.In, j)
530	if err != nil {
531		log.Printf("failed to subsub: %s", err)
532	}
533}
534
535func jonkjonk(user *WhatAbout, h *Honk) (map[string]interface{}, map[string]interface{}) {
536	dt := h.Date.Format(time.RFC3339)
537	var jo map[string]interface{}
538	j := NewJunk()
539	j["id"] = user.URL + "/" + h.What + "/" + h.XID
540	j["actor"] = user.URL
541	j["published"] = dt
542	j["to"] = h.Audience[0]
543	if len(h.Audience) > 1 {
544		j["cc"] = h.Audience[1:]
545	}
546
547	switch h.What {
548	case "zonk":
549		fallthrough
550	case "tonk":
551		fallthrough
552	case "honk":
553		j["type"] = "Create"
554		if h.What == "zonk" {
555			j["type"] = "Delete"
556		}
557
558		jo = NewJunk()
559		jo["id"] = user.URL + "/h/" + h.XID
560		jo["type"] = "Note"
561		if h.What == "zonk" {
562			jo["type"] = "Tombstone"
563		}
564		jo["published"] = dt
565		jo["url"] = user.URL + "/h/" + h.XID
566		jo["attributedTo"] = user.URL
567		if h.RID != "" {
568			jo["inReplyTo"] = h.RID
569		}
570		jo["to"] = h.Audience[0]
571		if len(h.Audience) > 1 {
572			jo["cc"] = h.Audience[1:]
573		}
574		jo["content"] = h.Noise
575		jo["summary"] = nil
576		var tags []interface{}
577		g := bunchofgrapes(h.Noise)
578		for _, m := range g {
579			t := NewJunk()
580			t["type"] = "Mention"
581			t["name"] = m.who
582			t["href"] = m.where
583			tags = append(tags, t)
584		}
585		herd := herdofemus(h.Noise)
586		for _, e := range herd {
587			t := NewJunk()
588			t["id"] = e.ID
589			t["type"] = "Emoji"
590			t["name"] = e.Name
591			i := NewJunk()
592			i["type"] = "Image"
593			i["mediaType"] = "image/png"
594			i["url"] = e.ID
595			t["icon"] = i
596			tags = append(tags, t)
597		}
598		if len(tags) > 0 {
599			jo["tag"] = tags
600		}
601		var atts []interface{}
602		for _, d := range h.Donks {
603			if re_emus.MatchString(d.Name) {
604				continue
605			}
606			jd := NewJunk()
607			jd["mediaType"] = d.Media
608			jd["name"] = d.Name
609			jd["type"] = "Document"
610			jd["url"] = d.URL
611			atts = append(atts, jd)
612		}
613		if len(atts) > 0 {
614			jo["attachment"] = atts
615		}
616		j["object"] = jo
617	case "bonk":
618		j["type"] = "Announce"
619		j["object"] = h.XID
620	}
621
622	return j, jo
623}
624
625func honkworldwide(user *WhatAbout, honk *Honk) {
626	jonk, _ := jonkjonk(user, honk)
627	jonk["@context"] = itiswhatitis
628	var buf bytes.Buffer
629	WriteJunk(&buf, jonk)
630	msg := buf.Bytes()
631
632	rcpts := make(map[string]bool)
633	for _, a := range honk.Audience {
634		if a != thewholeworld && a != user.URL && !strings.HasSuffix(a, "/followers") {
635			box, _ := getboxes(a)
636			if box != nil && box.Shared != "" {
637				rcpts["%"+box.Shared] = true
638			} else {
639				rcpts[a] = true
640			}
641		}
642	}
643	for _, f := range getdubs(user.ID) {
644		box, _ := getboxes(f.XID)
645		if box != nil && box.Shared != "" {
646			rcpts["%"+box.Shared] = true
647		} else {
648			rcpts[f.XID] = true
649		}
650	}
651	for a := range rcpts {
652		go deliverate(0, user.Name, a, msg)
653	}
654}
655
656func asjonker(user *WhatAbout) map[string]interface{} {
657	about := obfusbreak(user.About)
658
659	j := NewJunk()
660	j["@context"] = itiswhatitis
661	j["id"] = user.URL
662	j["type"] = "Person"
663	j["inbox"] = user.URL + "/inbox"
664	j["outbox"] = user.URL + "/outbox"
665	j["name"] = user.Display
666	j["preferredUsername"] = user.Name
667	j["summary"] = about
668	j["url"] = user.URL
669	a := NewJunk()
670	a["type"] = "icon"
671	a["mediaType"] = "image/png"
672	a["url"] = fmt.Sprintf("https://%s/a?a=%s", serverName, url.QueryEscape(user.URL))
673	j["icon"] = a
674	k := NewJunk()
675	k["id"] = user.URL + "#key"
676	k["owner"] = user.URL
677	k["publicKeyPem"] = user.Key
678	j["publicKey"] = k
679
680	return j
681}