Files

4567 lines
159 KiB
C

/* snac - A simple, minimalistic ActivityPub instance */
/* copyright (c) 2022 - 2026 grunfink et al. / MIT license */
#ifndef NO_MASTODON_API
#include "xs.h"
#include "xs_hex.h"
#include "xs_openssl.h"
#include "xs_json.h"
#include "xs_io.h"
#include "xs_time.h"
#include "xs_glob.h"
#include "xs_set.h"
#include "xs_random.h"
#include "xs_url.h"
#include "xs_mime.h"
#include "xs_match.h"
#include "xs_unicode.h"
#include "xs_http.h"
#include "snac.h"
#include <sys/time.h>
static xs_str *random_str(void)
/* just what is says in the tin */
{
unsigned int data[4] = {0};
xs_rnd_buf(data, sizeof(data));
return xs_hex_enc((char *)data, sizeof(data));
}
int app_add(const char *id, const xs_dict *app)
/* stores an app */
{
if (!xs_is_hex(id))
return HTTP_STATUS_INTERNAL_SERVER_ERROR;
int status = HTTP_STATUS_CREATED;
xs *fn = xs_fmt("%s/app/", srv_basedir);
FILE *f;
mkdirx(fn);
fn = xs_str_cat(fn, id);
fn = xs_str_cat(fn, ".json");
if ((f = fopen(fn, "w")) != NULL) {
xs_json_dump(app, 4, f);
fclose(f);
}
else
status = HTTP_STATUS_INTERNAL_SERVER_ERROR;
return status;
}
xs_str *_app_fn(const char *id)
{
return xs_fmt("%s/app/%s.json", srv_basedir, id);
}
xs_dict *app_get(const char *id)
/* gets an app */
{
if (!xs_is_hex(id))
return NULL;
xs *fn = _app_fn(id);
xs_dict *app = NULL;
FILE *f;
if ((f = fopen(fn, "r")) != NULL) {
app = xs_json_load(f);
fclose(f);
}
return app;
}
int app_del(const char *id)
/* deletes an app */
{
if (!xs_is_hex(id))
return -1;
xs *fn = _app_fn(id);
return unlink(fn);
}
int token_add(const char *id, const xs_dict *token)
/* stores a token */
{
if (!xs_is_hex(id))
return HTTP_STATUS_INTERNAL_SERVER_ERROR;
int status = HTTP_STATUS_CREATED;
xs *fn = xs_fmt("%s/token/", srv_basedir);
FILE *f;
mkdirx(fn);
fn = xs_str_cat(fn, id);
fn = xs_str_cat(fn, ".json");
if ((f = fopen(fn, "w")) != NULL) {
xs_json_dump(token, 4, f);
fclose(f);
}
else
status = HTTP_STATUS_INTERNAL_SERVER_ERROR;
return status;
}
xs_dict *token_get(const char *id)
/* gets a token */
{
if (!xs_is_hex(id))
return NULL;
xs *fn = xs_fmt("%s/token/%s.json", srv_basedir, id);
xs_dict *token = NULL;
FILE *f;
if ((f = fopen(fn, "r")) != NULL) {
token = xs_json_load(f);
fclose(f);
/* 'touch' the file */
utimes(fn, NULL);
/* also 'touch' the app */
const char *app_id = xs_dict_get(token, "client_id");
if (app_id) {
xs *afn = xs_fmt("%s/app/%s.json", srv_basedir, app_id);
utimes(afn, NULL);
}
}
return token;
}
int token_del(const char *id)
/* deletes a token */
{
if (!xs_is_hex(id))
return -1;
xs *fn = xs_fmt("%s/token/%s.json", srv_basedir, id);
return unlink(fn);
}
const char * const login_page = ""
"<!DOCTYPE html>\n"
"<html>\n"
"<head>\n"
"<title>%s OAuth - Snac2</title>\n"
"<meta content=\"width=device-width, initial-scale=1, minimum-scale=1, user-scalable=no\" name=\"viewport\">"
"<style>:root {color-scheme: light dark}</style>\n"
"</head>\n"
"<body><h1>%s OAuth identify</h1>\n"
"<div style=\"background-color: red; color: white\">%s</div>\n"
"<form method=\"post\" action=\"%s:/" "/%s/%s\">\n"
"<p>Login: <input type=\"text\" name=\"login\" autocapitalize=\"off\"></p>\n"
"<p>Password: <input type=\"password\" name=\"passwd\"></p>\n"
"<input type=\"hidden\" name=\"redir\" value=\"%s\">\n"
"<input type=\"hidden\" name=\"cid\" value=\"%s\">\n"
"<input type=\"hidden\" name=\"state\" value=\"%s\">\n"
"<input type=\"submit\" value=\"OK\">\n"
"</form><p>%s</p></body></html>\n"
"";
int oauth_get_handler(const xs_dict *req, const char *q_path,
char **body, int *b_size, char **ctype)
{
(void)b_size;
if (!xs_startswith(q_path, "/oauth/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
const xs_dict *msg = xs_dict_get(req, "q_vars");
xs *cmd = xs_replace_n(q_path, "/oauth", "", 1);
srv_debug(1, xs_fmt("oauth_get_handler %s", q_path));
if (strcmp(cmd, "/authorize") == 0) { /** **/
const char *cid = xs_dict_get(msg, "client_id");
const char *ruri = xs_dict_get(msg, "redirect_uri");
const char *rtype = xs_dict_get(msg, "response_type");
const char *state = xs_dict_get(msg, "state");
status = HTTP_STATUS_BAD_REQUEST;
if (cid && ruri && rtype && strcmp(rtype, "code") == 0) {
xs *app = app_get(cid);
if (app != NULL) {
const char *host = xs_dict_get(srv_config, "host");
const char *proto = xs_dict_get_def(srv_config, "protocol", "https");
if (xs_is_null(state))
state = "";
*body = xs_fmt(login_page, host, host, "", proto, host, "oauth/x-snac-login",
ruri, cid, state, USER_AGENT);
*ctype = "text/html";
status = HTTP_STATUS_OK;
srv_debug(1, xs_fmt("oauth authorize: generating login page"));
}
else
srv_debug(1, xs_fmt("oauth authorize: bad client_id %s", cid));
}
else
srv_debug(1, xs_fmt("oauth authorize: invalid or unset arguments"));
}
else
if (strcmp(cmd, "/x-snac-get-token") == 0) { /** **/
const char *host = xs_dict_get(srv_config, "host");
const char *proto = xs_dict_get_def(srv_config, "protocol", "https");
*body = xs_fmt(login_page, host, host, "", proto, host, "oauth/x-snac-get-token",
"", "", "", USER_AGENT);
*ctype = "text/html";
status = HTTP_STATUS_OK;
}
return status;
}
int oauth_post_handler(const xs_dict *req, const char *q_path,
const char *payload, int p_size,
char **body, int *b_size, char **ctype)
{
(void)p_size;
(void)b_size;
if (!xs_startswith(q_path, "/oauth/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
const char *i_ctype = xs_dict_get(req, "content-type");
xs *args = NULL;
if (i_ctype && xs_startswith(i_ctype, "application/json")) {
if (!xs_is_null(payload))
args = xs_json_loads(payload);
}
else
if (i_ctype && xs_startswith(i_ctype, "application/x-www-form-urlencoded") && payload) {
args = xs_url_vars(payload);
}
else
args = xs_dup(xs_dict_get(req, "p_vars"));
if (args == NULL)
return HTTP_STATUS_BAD_REQUEST;
xs *cmd = xs_replace_n(q_path, "/oauth", "", 1);
srv_debug(1, xs_fmt("oauth_post_handler %s", q_path));
if (strcmp(cmd, "/x-snac-login") == 0) { /** **/
const char *login = xs_dict_get(args, "login");
const char *passwd = xs_dict_get(args, "passwd");
const char *redir = xs_dict_get(args, "redir");
const char *cid = xs_dict_get(args, "cid");
const char *state = xs_dict_get(args, "state");
const char *host = xs_dict_get(srv_config, "host");
const char *proto = xs_dict_get_def(srv_config, "protocol", "https");
/* by default, generate another login form with an error */
*body = xs_fmt(login_page, host, host, "LOGIN INCORRECT", proto, host, "oauth/x-snac-login",
redir, cid, state, USER_AGENT);
*ctype = "text/html";
status = HTTP_STATUS_OK;
if (login && passwd && redir && cid) {
snac snac;
if (user_open(&snac, login)) {
const char *addr = xs_or(xs_dict_get(req, "remote-addr"),
xs_dict_get(req, "x-forwarded-for"));
if (badlogin_check(login, addr)) {
/* check the login + password */
if (check_password(login, passwd, xs_dict_get(snac.config, "passwd"))) {
/* success! redirect to the desired uri */
xs *code = random_str();
xs_free(*body);
if (strcmp(redir, "urn:ietf:wg:oauth:2.0:oob") == 0) {
*body = xs_dup(code);
}
else {
if (xs_str_in(redir, "?") != -1)
*body = xs_fmt("%s&code=%s", redir, code);
else
*body = xs_fmt("%s?code=%s", redir, code);
status = HTTP_STATUS_SEE_OTHER;
}
/* if there is a state, add it */
if (!xs_is_null(state) && *state) {
*body = xs_str_cat(*body, "&state=");
*body = xs_str_cat(*body, state);
}
srv_log(xs_fmt("oauth x-snac-login: '%s' success, redirect to %s",
login, *body));
/* assign the login to the app */
xs *app = app_get(cid);
if (app != NULL) {
app = xs_dict_set(app, "uid", login);
app = xs_dict_set(app, "code", code);
app_add(cid, app);
}
else
srv_log(xs_fmt("oauth x-snac-login: error getting app %s", cid));
}
else {
srv_debug(1, xs_fmt("oauth x-snac-login: login '%s' incorrect", login));
badlogin_inc(login, addr);
}
}
user_free(&snac);
}
else
srv_debug(1, xs_fmt("oauth x-snac-login: bad user '%s'", login));
}
else
srv_debug(1, xs_fmt("oauth x-snac-login: invalid or unset arguments"));
}
else
if (strcmp(cmd, "/token") == 0) { /** **/
xs *wrk = NULL;
xs *codewrk = NULL;
const char *gtype = xs_dict_get(args, "grant_type");
const char *code = xs_dict_get(args, "code");
const char *cid = xs_dict_get(args, "client_id");
const char *csec = xs_dict_get(args, "client_secret");
const char *ruri = xs_dict_get(args, "redirect_uri");
const char *scope = xs_dict_get(args, "scope");
/* no client_secret? check if it's inside an authorization header
(AndStatus does it this way) */
if (xs_is_null(csec)) {
const char *auhdr = xs_dict_get(req, "authorization");
if (!xs_is_null(auhdr) && xs_startswith(auhdr, "Basic ")) {
xs *s1 = xs_replace_n(auhdr, "Basic ", "", 1);
int size;
xs *s2 = xs_base64_dec(s1, &size);
if (!xs_is_null(s2)) {
xs *l1 = xs_split(s2, ":");
if (xs_list_len(l1) == 2) {
wrk = xs_dup(xs_list_get(l1, 1));
csec = wrk;
}
}
}
}
/* no code?
I'm not sure of the impacts of this right now, but Subway Tooter does not
provide a code so one must be generated */
if (xs_is_null(code)){
code = codewrk = random_str();
}
if (gtype && code && cid && csec && ruri) {
xs *app = app_get(cid);
if (app == NULL) {
status = HTTP_STATUS_UNAUTHORIZED;
srv_log(xs_fmt("oauth token: invalid app %s", cid));
}
else
if (strcmp(csec, xs_dict_get(app, "client_secret")) != 0) {
status = HTTP_STATUS_UNAUTHORIZED;
srv_log(xs_fmt("oauth token: invalid client_secret for app %s", cid));
}
else {
xs *rsp = xs_dict_new();
xs *cat = xs_number_new(time(NULL));
xs *tokid = random_str();
rsp = xs_dict_append(rsp, "access_token", tokid);
rsp = xs_dict_append(rsp, "token_type", "Bearer");
rsp = xs_dict_append(rsp, "created_at", cat);
if (!xs_is_null(scope))
rsp = xs_dict_append(rsp, "scope", scope);
else
rsp = xs_dict_append(rsp, "scope", "");
*body = xs_json_dumps(rsp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
const char *uid = xs_dict_get(app, "uid");
srv_debug(1, xs_fmt("oauth token: "
"successful login for %s, new token %s", uid, tokid));
xs *token = xs_dict_new();
token = xs_dict_append(token, "token", tokid);
token = xs_dict_append(token, "client_id", cid);
token = xs_dict_append(token, "client_secret", csec);
token = xs_dict_append(token, "uid", uid);
token = xs_dict_append(token, "code", code);
token_add(tokid, token);
}
}
else {
srv_debug(1, xs_fmt("oauth token: invalid or unset arguments"));
status = HTTP_STATUS_BAD_REQUEST;
}
}
else
if (strcmp(cmd, "/revoke") == 0) { /** **/
const char *cid = xs_dict_get(args, "client_id");
const char *csec = xs_dict_get(args, "client_secret");
const char *tokid = xs_dict_get(args, "token");
if (cid && csec && tokid) {
xs *token = token_get(tokid);
*body = xs_str_new("{}");
*ctype = "application/json";
if (token == NULL || strcmp(csec, xs_dict_get(token, "client_secret")) != 0) {
srv_debug(1, xs_fmt("oauth revoke: bad secret for token %s", tokid));
status = HTTP_STATUS_FORBIDDEN;
}
else {
token_del(tokid);
srv_debug(1, xs_fmt("oauth revoke: revoked token %s", tokid));
status = HTTP_STATUS_OK;
/* also delete the app, as it serves no purpose from now on */
app_del(cid);
}
}
else {
srv_debug(1, xs_fmt("oauth revoke: invalid or unset arguments"));
status = HTTP_STATUS_FORBIDDEN;
}
}
if (strcmp(cmd, "/x-snac-get-token") == 0) { /** **/
const char *login = xs_dict_get(args, "login");
const char *passwd = xs_dict_get(args, "passwd");
const char *host = xs_dict_get(srv_config, "host");
const char *proto = xs_dict_get_def(srv_config, "protocol", "https");
/* by default, generate another login form with an error */
*body = xs_fmt(login_page, host, host, "LOGIN INCORRECT", proto, host, "oauth/x-snac-get-token",
"", "", "", USER_AGENT);
*ctype = "text/html";
status = HTTP_STATUS_OK;
if (login && passwd) {
snac user;
if (user_open(&user, login)) {
const char *addr = xs_or(xs_dict_get(req, "remote-addr"),
xs_dict_get(req, "x-forwarded-for"));
if (badlogin_check(login, addr)) {
/* check the login + password */
if (check_password(login, passwd, xs_dict_get(user.config, "passwd"))) {
/* success! create a new token */
xs *tokid = random_str();
srv_debug(1, xs_fmt("x-snac-new-token: "
"successful login for %s, new token %s", login, tokid));
xs *token = xs_dict_new();
token = xs_dict_append(token, "token", tokid);
token = xs_dict_append(token, "client_id", "snac-client");
token = xs_dict_append(token, "client_secret", "");
token = xs_dict_append(token, "uid", login);
token = xs_dict_append(token, "code", "");
token_add(tokid, token);
*ctype = "text/plain";
xs_free(*body);
*body = xs_dup(tokid);
}
else
badlogin_inc(login, addr);
user_free(&user);
}
}
}
}
return status;
}
xs_str *mastoapi_id(const xs_dict *msg)
/* returns a somewhat Mastodon-compatible status id */
{
const char *id = xs_dict_get(msg, "id");
xs *md5 = xs_md5_hex(id, strlen(id));
return xs_fmt("%10.0f%s", object_ctime_by_md5(md5), md5);
}
#define MID_TO_MD5(id) (id + 10)
static xs_val *get_count_from_actor(const xs_dict *actor, const char *field_names[], const char *collection_url_field)
/* helper to extract count from actor dict using various field name variations or from cached collection */
{
xs_val *count = NULL;
/* try direct field name variations first */
for (int i = 0; field_names[i] && xs_type(count) != XSTYPE_NUMBER; i++) {
const xs_number *val = xs_dict_get(actor, field_names[i]);
if (xs_type(val) == XSTYPE_NUMBER)
count = xs_dup(val);
}
/* if not found directly, try to get from cached collection object */
if (xs_type(count) != XSTYPE_NUMBER) {
const char *url = xs_dict_get(actor, collection_url_field);
if (!xs_is_null(url)) {
xs *coll = NULL;
if (valid_status(object_get(url, &coll))) {
const xs_number *total = xs_dict_get(coll, "totalItems");
if (xs_type(total) == XSTYPE_NUMBER)
count = xs_dup(total);
}
}
}
return count;
}
static const xs_list *get_collection_items(snac *snac, const char *collection_url,
xs_dict **out_collection, xs_dict **out_page)
/* fetches items from an ActivityPub collection (outbox, etc) with minimal HTTP requests */
{
const xs_list *items = NULL;
xs_dict *collection = NULL;
if (valid_status(activitypub_request(snac, collection_url, &collection))) {
/* check if items are directly embedded */
items = xs_dict_get(collection, "orderedItems");
if (xs_is_null(items))
items = xs_dict_get(collection, "items");
if (!xs_is_null(items)) {
/* items found in main collection - transfer ownership to keep items valid */
if (out_collection)
*out_collection = collection;
return items;
}
/* if no items, try fetching first page (only 1 extra request) */
const char *first_url = xs_dict_get(collection, "first");
if (!xs_is_null(first_url)) {
xs_dict *first_page = NULL;
if (valid_status(activitypub_request(snac, first_url, &first_page))) {
items = xs_dict_get(first_page, "orderedItems");
if (xs_is_null(items))
items = xs_dict_get(first_page, "items");
if (!xs_is_null(items)) {
/* items found in first page - transfer ownership to keep items valid */
if (out_page)
*out_page = first_page;
xs_free(collection);
return items;
}
xs_free(first_page);
}
}
xs_free(collection);
}
return NULL;
}
static const xs_dict *extract_post_from_item(const xs_val *item)
/* extracts the post object from an outbox item, handling Create/Announce wrappers */
{
if (xs_type(item) != XSTYPE_DICT)
return NULL;
const char *item_type = xs_dict_get(item, "type");
const xs_dict *post = item;
/* if it's an activity, try to get embedded object */
if (!xs_is_null(item_type) &&
(strcmp(item_type, "Create") == 0 || strcmp(item_type, "Announce") == 0)) {
const xs_val *obj = xs_dict_get(item, "object");
/* only use embedded objects, skip URL references (would need HTTP fetch) */
if (!xs_is_null(obj) && xs_type(obj) == XSTYPE_DICT)
post = obj;
else
return NULL;
}
return post;
}
static int is_valid_post_type(const char *post_type)
/* checks if a type is a valid post type for timeline display */
{
return !xs_is_null(post_type) &&
(strcmp(post_type, "Note") == 0 ||
strcmp(post_type, "Article") == 0 ||
strcmp(post_type, "Question") == 0 ||
strcmp(post_type, "Page") == 0);
}
xs_dict *mastoapi_account(snac *logged, const xs_dict *actor)
/* converts an ActivityPub actor to a Mastodon account */
{
const char *id = xs_dict_get(actor, "id");
const char *pub = xs_dict_get(actor, "published");
const char *proxy = NULL;
if (xs_type(id) != XSTYPE_STRING)
return NULL;
if (logged && xs_is_true(xs_dict_get(srv_config, "proxy_media")))
proxy = logged->actor;
const char *prefu = xs_dict_get(actor, "preferredUsername");
const char *display_name = xs_dict_get(actor, "name");
if (xs_is_null(display_name) || *display_name == '\0')
display_name = prefu;
xs_dict *acct = xs_dict_new();
xs *acct_md5 = xs_md5_hex(id, strlen(id));
acct = xs_dict_append(acct, "id", acct_md5);
acct = xs_dict_append(acct, "username", prefu);
acct = xs_dict_append(acct, "display_name", display_name);
acct = xs_dict_append(acct, "discoverable", xs_stock(XSTYPE_TRUE));
acct = xs_dict_append(acct, "group", xs_stock(XSTYPE_FALSE));
acct = xs_dict_append(acct, "hide_collections", xs_stock(XSTYPE_FALSE));
acct = xs_dict_append(acct, "indexable", xs_stock(XSTYPE_TRUE));
acct = xs_dict_append(acct, "noindex", xs_stock(XSTYPE_FALSE));
acct = xs_dict_append(acct, "roles", xs_stock(XSTYPE_LIST));
{
/* create the acct field as user@host */
xs *l = xs_split(id, "/");
xs *fquid = xs_fmt("%s@%s", prefu, xs_list_get(l, 2));
acct = xs_dict_append(acct, "acct", fquid);
}
if (pub)
acct = xs_dict_append(acct, "created_at", pub);
else {
/* unset created_at crashes Tusky, so lie like a mf */
xs *date = xs_str_utctime(0, ISO_DATE_SPEC);
acct = xs_dict_append(acct, "created_at", date);
}
xs *last_status_at = xs_str_utctime(0, "%Y-%m-%d");
acct = xs_dict_append(acct, "last_status_at", last_status_at);
const char *note = xs_dict_get(actor, "summary");
if (xs_is_null(note))
note = "";
if (strcmp(xs_dict_get(actor, "type"), "Service") == 0)
acct = xs_dict_append(acct, "bot", xs_stock(XSTYPE_TRUE));
else
acct = xs_dict_append(acct, "bot", xs_stock(XSTYPE_FALSE));
acct = xs_dict_append(acct, "note", note);
acct = xs_dict_append(acct, "url", id);
acct = xs_dict_append(acct, "uri", id);
xs *avatar = NULL;
const xs_dict *av = xs_dict_get(actor, "icon");
if (xs_type(av) == XSTYPE_DICT) {
const char *url = xs_dict_get(av, "url");
if (url != NULL)
avatar = make_url(url, proxy, 1);
}
if (avatar == NULL)
avatar = xs_fmt("%s/snacforge.png", srv_baseurl);
acct = xs_dict_append(acct, "avatar", avatar);
acct = xs_dict_append(acct, "avatar_static", avatar);
xs *header = NULL;
const xs_dict *hd = xs_dict_get(actor, "image");
if (xs_type(hd) == XSTYPE_DICT)
header = make_url(xs_dict_get(hd, "url"), proxy, 1);
if (xs_is_null(header))
header = xs_str_new(NULL);
acct = xs_dict_append(acct, "header", header);
acct = xs_dict_append(acct, "header_static", header);
/* emojis */
const xs_list *p;
if (!xs_is_null(p = xs_dict_get(actor, "tag"))) {
xs *eml = xs_list_new();
const xs_dict *v;
int c = 0;
while (xs_list_next(p, &v, &c)) {
const char *type = xs_dict_get(v, "type");
if (!xs_is_null(type) && strcmp(type, "Emoji") == 0) {
const char *name = xs_dict_get(v, "name");
const xs_dict *icon = xs_dict_get(v, "icon");
if (!xs_is_null(name) && !xs_is_null(icon)) {
const char *o_url = xs_dict_get(icon, "url");
if (!xs_is_null(o_url)) {
xs *url = make_url(o_url, proxy, 1);
xs *nm = xs_strip_chars_i(xs_dup(name), ":");
xs *d1 = xs_dict_new();
d1 = xs_dict_append(d1, "shortcode", nm);
d1 = xs_dict_append(d1, "url", url);
d1 = xs_dict_append(d1, "static_url", url);
d1 = xs_dict_append(d1, "visible_in_picker", xs_stock(XSTYPE_TRUE));
eml = xs_list_append(eml, d1);
}
}
}
}
acct = xs_dict_append(acct, "emojis", eml);
}
acct = xs_dict_append(acct, "locked", xs_stock(XSTYPE_FALSE));
/* try to get counts from actor object if available (some servers include these) */
const char *fcount_fields[] = { "followersCount", "followers_count", NULL };
const char *gcount_fields[] = { "followingCount", "following_count", NULL };
const char *scount_fields[] = { "statusesCount", "statuses_count", "totalItems", NULL };
xs *followers_count = get_count_from_actor(actor, fcount_fields, "followers");
xs *following_count = get_count_from_actor(actor, gcount_fields, "following");
xs *statuses_count = get_count_from_actor(actor, scount_fields, "outbox");
acct = xs_dict_append(acct, "followers_count",
xs_type(followers_count) == XSTYPE_NUMBER ? followers_count : xs_stock(0));
acct = xs_dict_append(acct, "following_count",
xs_type(following_count) == XSTYPE_NUMBER ? following_count : xs_stock(0));
acct = xs_dict_append(acct, "statuses_count",
xs_type(statuses_count) == XSTYPE_NUMBER ? statuses_count : xs_stock(0));
xs *fields = xs_list_new();
p = xs_dict_get(actor, "attachment");
const xs_dict *v;
/* dict of validated links */
xs_dict *val_links = NULL;
const xs_dict *metadata = xs_stock(XSTYPE_DICT);
snac user = {0};
if (xs_startswith(id, srv_baseurl)) {
/* if it's a local user, open it and pick its validated links */
if (user_open(&user, prefu)) {
val_links = user.links;
metadata = xs_dict_get_def(user.config, "metadata", xs_stock(XSTYPE_DICT));
/* does this user want to publish their contact metrics? */
if (xs_is_true(xs_dict_get(user.config, "show_contact_metrics"))) {
int fwing = following_list_len(&user);
int fwers = follower_list_len(&user);
xs *ni = xs_number_new(fwing);
xs *ne = xs_number_new(fwers);
acct = xs_dict_append(acct, "followers_count", ne);
acct = xs_dict_append(acct, "following_count", ni);
}
}
}
if (xs_is_null(val_links))
val_links = xs_stock(XSTYPE_DICT);
int c = 0;
while (xs_list_next(p, &v, &c)) {
const char *type = xs_dict_get(v, "type");
const char *name = xs_dict_get(v, "name");
const char *value = xs_dict_get(v, "value");
if (!xs_is_null(type) && !xs_is_null(name) &&
!xs_is_null(value) && strcmp(type, "PropertyValue") == 0) {
xs *val_date = NULL;
const char *url = xs_dict_get(metadata, name);
if (!xs_is_null(url) && xs_startswith(url, "https:/" "/")) {
const xs_number *verified_time = xs_dict_get(val_links, url);
if (xs_type(verified_time) == XSTYPE_NUMBER) {
time_t t = xs_number_get(verified_time);
if (t > 0)
val_date = xs_str_utctime(t, ISO_DATE_SPEC);
}
}
xs *d = xs_dict_new();
d = xs_dict_append(d, "name", name);
d = xs_dict_append(d, "value", value);
d = xs_dict_append(d, "verified_at",
xs_type(val_date) == XSTYPE_STRING && *val_date ?
val_date : xs_stock(XSTYPE_NULL));
fields = xs_list_append(fields, d);
}
}
user_free(&user);
acct = xs_dict_append(acct, "fields", fields);
return acct;
}
xs_str *mastoapi_date(const char *date)
/* converts an ISO 8601 date to whatever format Mastodon uses */
{
xs_str *s = xs_crop_i(xs_dup(date), 0, 19);
s = xs_str_cat(s, ".000Z");
return s;
}
xs_dict *mastoapi_poll(snac *snac, const xs_dict *msg)
/* creates a mastoapi Poll object */
{
xs_dict *poll = xs_dict_new();
xs *mid = mastoapi_id(msg);
const xs_list *opts = NULL;
const xs_val *v;
int num_votes = 0;
xs *options = xs_list_new();
poll = xs_dict_append(poll, "id", mid);
const char *date = xs_dict_get(msg, "endTime");
if (date == NULL)
date = xs_dict_get(msg, "closed");
if (date == NULL)
return NULL;
xs *fd = mastoapi_date(date);
poll = xs_dict_append(poll, "expires_at", fd);
date = xs_dict_get(msg, "closed");
time_t t = 0;
if (date != NULL)
t = xs_parse_iso_date(date, 0);
poll = xs_dict_append(poll, "expired",
t < time(NULL) ? xs_stock(XSTYPE_FALSE) : xs_stock(XSTYPE_TRUE));
if ((opts = xs_dict_get(msg, "oneOf")) != NULL)
poll = xs_dict_append(poll, "multiple", xs_stock(XSTYPE_FALSE));
else {
opts = xs_dict_get(msg, "anyOf");
poll = xs_dict_append(poll, "multiple", xs_stock(XSTYPE_TRUE));
}
int c = 0;
while (xs_list_next(opts, &v, &c)) {
const char *title = xs_dict_get(v, "name");
const char *replies = xs_dict_get(v, "replies");
if (title && replies) {
const char *votes_count = xs_dict_get(replies, "totalItems");
if (xs_type(votes_count) == XSTYPE_NUMBER) {
xs *d = xs_dict_new();
d = xs_dict_append(d, "title", title);
d = xs_dict_append(d, "votes_count", votes_count);
options = xs_list_append(options, d);
num_votes += xs_number_get(votes_count);
}
}
}
poll = xs_dict_append(poll, "options", options);
xs *vc = xs_number_new(num_votes);
poll = xs_dict_append(poll, "votes_count", vc);
poll = xs_dict_append(poll, "emojis", xs_stock(XSTYPE_LIST));
poll = xs_dict_append(poll, "voted",
(snac && was_question_voted(snac, xs_dict_get(msg, "id"))) ?
xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
return poll;
}
xs_dict *mastoapi_status(snac *snac, const xs_dict *msg)
/* converts an ActivityPub note to a Mastodon status */
{
xs *actor = NULL;
actor_get_refresh(snac, get_atto(msg), &actor);
const char *proxy = NULL;
/* if the author is not here, discard */
if (actor == NULL)
return NULL;
if (snac && xs_is_true(xs_dict_get(srv_config, "proxy_media")))
proxy = snac->actor;
const char *type = xs_dict_get(msg, "type");
const char *id = xs_dict_get(msg, "id");
/* fail if it's not a valid actor */
if (xs_is_null(type) || xs_is_null(id))
return NULL;
xs *acct = mastoapi_account(snac, actor);
if (acct == NULL)
return NULL;
xs *idx = NULL;
xs *ixc = NULL;
const char *tmp;
xs *mid = mastoapi_id(msg);
xs_dict *st = xs_dict_new();
st = xs_dict_append(st, "id", mid);
st = xs_dict_append(st, "uri", id);
st = xs_dict_append(st, "url", id);
st = xs_dict_append(st, "account", acct);
const char *published = xs_dict_get(msg, "published");
xs *fd = NULL;
if (published)
fd = mastoapi_date(published);
else {
xs *p = xs_str_iso_date(0);
fd = mastoapi_date(p);
}
st = xs_dict_append(st, "created_at", fd);
{
const char *content = xs_dict_get(msg, "content");
const char *name = xs_dict_get(msg, "name");
xs *s1 = NULL;
if (name && content)
s1 = xs_fmt("%s<br><br>%s", name, content);
else
if (name)
s1 = xs_dup(name);
else
if (content)
s1 = xs_dup(content);
else
s1 = xs_str_new(NULL);
st = xs_dict_append(st, "content", s1);
}
/* determine visibility: https://docs.joinmastodon.org/entities/Status/#visibility */
const int scope = get_msg_visibility(msg);
if (scope == SCOPE_PUBLIC)
st = xs_dict_append(st, "visibility", "public");
else if (scope == SCOPE_FOLLOWERS)
st = xs_dict_append(st, "visibility", "private");
else if (scope == SCOPE_MENTIONED)
st = xs_dict_append(st, "visibility", "direct");
else if (scope == SCOPE_UNLISTED)
st = xs_dict_append(st, "visibility", "unlisted");
tmp = xs_dict_get(msg, "sensitive");
if (xs_is_null(tmp))
tmp = xs_stock(XSTYPE_FALSE);
st = xs_dict_append(st, "sensitive", tmp);
tmp = xs_dict_get(msg, "summary");
if (xs_is_null(tmp))
tmp = "";
st = xs_dict_append(st, "spoiler_text", tmp);
/* create the list of attachments */
xs *attach = get_attachments(msg);
{
xs_list *p = attach;
const xs_dict *v;
xs *matt = xs_list_new();
while (xs_list_iter(&p, &v)) {
const char *type = xs_dict_get(v, "type");
const char *o_href = xs_dict_get(v, "href");
const char *name = xs_dict_get(v, "name");
if (xs_match(type, "image/*|video/*|audio/*|Image|Video")) { /* */
xs *matteid = xs_fmt("%s_%d", id, xs_list_len(matt));
xs *href = make_url(o_href, proxy, 1);
xs *d = xs_dict_new();
d = xs_dict_append(d, "id", matteid);
d = xs_dict_append(d, "url", href);
d = xs_dict_append(d, "preview_url", href);
d = xs_dict_append(d, "remote_url", href);
d = xs_dict_append(d, "description", name);
d = xs_dict_append(d, "type", (*type == 'v' || *type == 'V') ? "video" :
(*type == 'a' || *type == 'A') ? "audio" : "image");
matt = xs_list_append(matt, d);
}
}
st = xs_dict_append(st, "media_attachments", matt);
}
{
xs *ml = xs_list_new();
xs *htl = xs_list_new();
xs *eml = xs_list_new();
const xs_list *tag = xs_dict_get(msg, "tag");
int n = 0;
xs *tag_list = NULL;
if (xs_type(tag) == XSTYPE_DICT) {
tag_list = xs_list_new();
tag_list = xs_list_append(tag_list, tag);
}
else
if (xs_type(tag) == XSTYPE_LIST)
tag_list = xs_dup(tag);
else
tag_list = xs_list_new();
tag = tag_list;
const xs_dict *v;
int c = 0;
while (xs_list_next(tag, &v, &c)) {
const char *type = xs_dict_get(v, "type");
if (xs_is_null(type))
continue;
xs *d1 = xs_dict_new();
if (strcmp(type, "Mention") == 0) {
const char *name = xs_dict_get(v, "name");
const char *href = xs_dict_get(v, "href");
if (!xs_is_null(name) && !xs_is_null(href) &&
(snac == NULL || strcmp(href, snac->actor) != 0)) {
xs *nm = xs_strip_chars_i(xs_dup(name), "@");
xs *id = xs_fmt("%d", n++);
d1 = xs_dict_append(d1, "id", id);
d1 = xs_dict_append(d1, "username", nm);
d1 = xs_dict_append(d1, "acct", nm);
d1 = xs_dict_append(d1, "url", href);
ml = xs_list_append(ml, d1);
}
}
else
if (strcmp(type, "Hashtag") == 0) {
const char *name = xs_dict_get(v, "name");
const char *href = xs_dict_get(v, "href");
if (!xs_is_null(name) && !xs_is_null(href)) {
xs *nm = xs_strip_chars_i(xs_dup(name), "#");
d1 = xs_dict_append(d1, "name", nm);
d1 = xs_dict_append(d1, "url", href);
htl = xs_list_append(htl, d1);
}
}
else
if (strcmp(type, "Emoji") == 0) {
const char *name = xs_dict_get(v, "name");
const xs_dict *icon = xs_dict_get(v, "icon");
if (!xs_is_null(name) && !xs_is_null(icon)) {
const char *o_url = xs_dict_get(icon, "url");
if (!xs_is_null(o_url)) {
xs *url = make_url(o_url, snac ? snac->actor : NULL, 1);
xs *nm = xs_strip_chars_i(xs_dup(name), ":");
d1 = xs_dict_append(d1, "shortcode", nm);
d1 = xs_dict_append(d1, "url", url);
d1 = xs_dict_append(d1, "static_url", url);
d1 = xs_dict_append(d1, "visible_in_picker", xs_stock(XSTYPE_TRUE));
d1 = xs_dict_append(d1, "category", "Emojis");
eml = xs_list_append(eml, d1);
}
}
}
}
st = xs_dict_append(st, "mentions", ml);
st = xs_dict_append(st, "tags", htl);
st = xs_dict_append(st, "emojis", eml);
}
{
xs *rl = object_get_emoji_reacts(id);
xs *frl = xs_list_new(); /* final */
xs *sfrl = xs_dict_new(); /* seen */
int c = 0;
const char *v;
while (xs_list_next(rl, &v, &c)) {
xs *msg = NULL;
if (valid_status(object_get_by_md5(v, &msg))) {
const char *content = xs_dict_get(msg, "content");
const char *actor = xs_dict_get(msg, "actor");
const xs_list *contentl = xs_dict_get(sfrl, content);
if ((snac && is_muted(snac, actor)) || is_instance_blocked(actor))
continue;
/* NOTE: idk when there are no actor, but i encountered that bug.
* Probably because of one of my previous attempts.
* Keeping this just in case, can remove later */
const char *me = actor && snac && strcmp(actor, snac->actor) == 0 ?
xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE);
int count = 1;
if (contentl) {
count = xs_number_get(xs_list_get(contentl, 0)) + 1;
if (strncmp(xs_list_get(contentl, 1), xs_stock(XSTYPE_TRUE), 1) == 0)
me = xs_stock(XSTYPE_TRUE);
}
xs *fl = xs_list_new();
xs *c1 = xs_number_new(count);
fl = xs_list_append(fl, c1, me);
sfrl = xs_dict_append(sfrl, content, fl);
}
}
c = 0;
while (xs_list_next(rl, &v, &c)) {
xs *msg = NULL;
if (valid_status(object_get_by_md5(v, &msg))) {
xs *d1 = xs_dict_new();
const xs_dict *icon = xs_dict_get(xs_list_get(xs_dict_get(msg, "tag"), 0), "icon");
const char *o_url = xs_dict_get(icon, "url");
const char *name = xs_dict_get(msg, "content");
const char *actor = xs_dict_get(msg, "actor");
xs *nm = xs_dup(name);
xs *url = NULL;
if (!xs_is_null(o_url)) {
if (actor && snac && !strcmp(actor, snac->actor))
url = make_url(o_url, NULL, 1);
else
url = xs_dup(o_url);
}
xs *accounts = xs_list_new();
if (actor) {
xs *d2 = NULL;
if (valid_status(object_get(actor, &d2))) {
xs *e_acct = mastoapi_account(snac, d2);
accounts = xs_list_append(accounts, e_acct);
}
}
const xs_list *item = xs_dict_get(sfrl, nm);
const xs_str *nb = xs_list_get(item, 0);
const xs_val *me = xs_list_get(item, 1);
if (item == NULL)
continue;
if (nm && strcmp(nm, "")) {
if (url && strcmp(url, "")) {
d1 = xs_dict_append(d1, "name", nm);
d1 = xs_dict_append(d1, "shortcode", nm);
d1 = xs_dict_append(d1, "accounts", accounts);
d1 = xs_dict_append(d1, "me", me);
d1 = xs_dict_append(d1, "url", url);
d1 = xs_dict_append(d1, "static_url", url);
d1 = xs_dict_append(d1, "visible_in_picker", xs_stock(XSTYPE_TRUE));
d1 = xs_dict_append(d1, "count", nb);
} else {
d1 = xs_dict_append(d1, "name", nm);
d1 = xs_dict_append(d1, "count", nb);
d1 = xs_dict_append(d1, "me", me);
d1 = xs_dict_append(d1, "visible_in_picker", xs_stock(XSTYPE_TRUE));
}
sfrl = xs_dict_del(sfrl, nm);
frl = xs_list_append(frl, d1);
}
}
}
st = xs_dict_append(st, "reactions", frl);
}
xs_free(idx);
xs_free(ixc);
idx = object_likes(id);
ixc = xs_number_new(xs_list_len(idx));
st = xs_dict_append(st, "favourites_count", ixc);
st = xs_dict_append(st, "favourited",
(snac && xs_list_in(idx, snac->md5) != -1) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
xs_free(idx);
xs_free(ixc);
idx = object_announces(id);
ixc = xs_number_new(xs_list_len(idx));
st = xs_dict_append(st, "reblogs_count", ixc);
st = xs_dict_append(st, "reblogged",
(snac && xs_list_in(idx, snac->md5) != -1) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
/* get the last person who boosted this */
xs *boosted_by_md5 = NULL;
if (xs_list_len(idx))
boosted_by_md5 = xs_dup(xs_list_get(idx, -1));
xs_free(idx);
xs_free(ixc);
idx = object_children(id);
ixc = xs_number_new(xs_list_len(idx));
st = xs_dict_append(st, "replies_count", ixc);
/* default in_reply_to values */
st = xs_dict_append(st, "in_reply_to_id", xs_stock(XSTYPE_NULL));
st = xs_dict_append(st, "in_reply_to_account_id", xs_stock(XSTYPE_NULL));
tmp = get_in_reply_to(msg);
if (!xs_is_null(tmp)) {
xs *irto = NULL;
if (valid_status(object_get(tmp, &irto))) {
xs *irt_mid = mastoapi_id(irto);
st = xs_dict_set(st, "in_reply_to_id", irt_mid);
const char *at = NULL;
if (!xs_is_null(at = get_atto(irto))) {
xs *at_md5 = xs_md5_hex(at, strlen(at));
st = xs_dict_set(st, "in_reply_to_account_id", at_md5);
}
}
}
st = xs_dict_append(st, "reblog", xs_stock(XSTYPE_NULL));
st = xs_dict_append(st, "card", xs_stock(XSTYPE_NULL));
st = xs_dict_append(st, "language", "en");
st = xs_dict_append(st, "filtered", xs_stock(XSTYPE_LIST));
st = xs_dict_append(st, "muted", xs_stock(XSTYPE_FALSE));
tmp = xs_dict_get(msg, "sourceContent");
if (xs_is_null(tmp))
tmp = "";
st = xs_dict_append(st, "text", tmp);
tmp = xs_dict_get(msg, "updated");
xs *fd2 = NULL;
if (xs_is_null(tmp))
tmp = xs_stock(XSTYPE_NULL);
else {
fd2 = mastoapi_date(tmp);
tmp = fd2;
}
st = xs_dict_append(st, "edited_at", tmp);
if (strcmp(type, "Question") == 0) {
xs *poll = mastoapi_poll(snac, msg);
st = xs_dict_append(st, "poll", poll);
}
else
st = xs_dict_append(st, "poll", xs_stock(XSTYPE_NULL));
st = xs_dict_append(st, "bookmarked",
(snac && is_bookmarked(snac, id)) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
st = xs_dict_append(st, "pinned",
(snac && is_pinned(snac, id)) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
/* is it a boost? */
if (!xs_is_null(boosted_by_md5)) {
/* create a new dummy status, using st as the 'reblog' field */
xs_dict *bst = xs_dup(st);
xs *b_actor = NULL;
if (valid_status(object_get_by_md5(boosted_by_md5, &b_actor))) {
xs *b_acct = mastoapi_account(snac, b_actor);
xs *fake_uri = NULL;
if (snac)
fake_uri = xs_fmt("%s/d/%s/Announce", snac->actor, mid);
else
fake_uri = xs_fmt("%s#%s", srv_baseurl, mid);
bst = xs_dict_set(bst, "uri", fake_uri);
bst = xs_dict_set(bst, "url", fake_uri);
bst = xs_dict_set(bst, "account", b_acct);
bst = xs_dict_set(bst, "content", "");
bst = xs_dict_set(bst, "reblog", st);
xs *b_id = xs_toupper_i(xs_dup(xs_dict_get(st, "id")));
bst = xs_dict_set(bst, "id", b_id);
xs_free(st);
st = bst;
}
else
xs_free(bst);
}
return st;
}
xs_dict *mastoapi_relationship(snac *snac, const char *md5)
{
xs_dict *rel = NULL;
xs *actor_o = NULL;
if (valid_status(object_get_by_md5(md5, &actor_o))) {
rel = xs_dict_new();
const char *actor = xs_dict_get(actor_o, "id");
rel = xs_dict_append(rel, "id", md5);
rel = xs_dict_append(rel, "following",
following_check(snac, actor) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "showing_reblogs", xs_stock(XSTYPE_TRUE));
rel = xs_dict_append(rel, "notifying", xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "followed_by",
follower_check(snac, actor) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "blocking",
is_muted(snac, actor) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "muting", xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "muting_notifications", xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "requested", xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "domain_blocking", xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "endorsed", xs_stock(XSTYPE_FALSE));
rel = xs_dict_append(rel, "note", "");
}
return rel;
}
int process_auth_token(snac *snac, const xs_dict *req)
/* processes an authorization token, if there is one */
{
int logged_in = 0;
const char *v;
/* if there is an authorization field, try to validate it */
if (!xs_is_null(v = xs_dict_get(req, "authorization")) && xs_startswith(v, "Bearer ")) {
xs *tokid = xs_replace_n(v, "Bearer ", "", 1);
xs *token = token_get(tokid);
if (token != NULL) {
const char *uid = xs_dict_get(token, "uid");
if (!xs_is_null(uid) && user_open(snac, uid)) {
logged_in = 1;
/* this counts as a 'login' */
lastlog_write(snac, "mastoapi");
srv_debug(2, xs_fmt("mastoapi auth: valid token for user '%s'", uid));
}
else
srv_log(xs_fmt("mastoapi auth: corrupted token '%s'", tokid));
}
else
srv_log(xs_fmt("mastoapi auth: invalid token '%s'", tokid));
}
return logged_in;
}
void credentials_get(char **body, char **ctype, int *status, snac snac)
{
xs *acct = xs_dict_new();
const xs_val *bot = xs_dict_get(snac.config, "bot");
acct = xs_dict_append(acct, "id", snac.md5);
acct = xs_dict_append(acct, "username", xs_dict_get(snac.config, "uid"));
acct = xs_dict_append(acct, "acct", xs_dict_get(snac.config, "uid"));
acct = xs_dict_append(acct, "display_name", xs_dict_get(snac.config, "name"));
acct = xs_dict_append(acct, "created_at", xs_dict_get(snac.config, "published"));
acct = xs_dict_append(acct, "last_status_at", xs_dict_get(snac.config, "published"));
acct = xs_dict_append(acct, "note", xs_dict_get(snac.config, "bio"));
acct = xs_dict_append(acct, "url", snac.actor);
acct = xs_dict_append(acct, "uri", snac.actor);
acct = xs_dict_append(acct, "locked",
xs_stock(xs_is_true(xs_dict_get(snac.config, "approve_followers")) ? XSTYPE_TRUE : XSTYPE_FALSE));
acct = xs_dict_append(acct, "bot", xs_stock(xs_is_true(bot) ? XSTYPE_TRUE : XSTYPE_FALSE));
acct = xs_dict_append(acct, "emojis", xs_stock(XSTYPE_LIST));
xs *src = xs_json_loads("{\"privacy\":\"public\", \"language\":\"en\","
"\"follow_requests_count\": 0,"
"\"sensitive\":false,\"fields\":[],\"note\":\"\"}");
/* some apps take the note from the source object */
src = xs_dict_set(src, "note", xs_dict_get(snac.config, "bio"));
src = xs_dict_set(src, "privacy", xs_type(xs_dict_get(snac.config, "private")) == XSTYPE_TRUE ? "private" : "public");
const xs_str *cw = xs_dict_get(snac.config, "cw");
src = xs_dict_set(src, "sensitive",
strcmp(cw, "open") == 0 ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
src = xs_dict_set(src, "bot", xs_stock(xs_is_true(bot) ? XSTYPE_TRUE : XSTYPE_FALSE));
xs *avatar = NULL;
const char *av = xs_dict_get(snac.config, "avatar");
if (xs_is_null(av) || *av == '\0')
avatar = xs_fmt("%s/snacforge.png", srv_baseurl);
else
avatar = xs_dup(av);
acct = xs_dict_append(acct, "avatar", avatar);
acct = xs_dict_append(acct, "avatar_static", avatar);
xs *header = NULL;
const char *hd = xs_dict_get(snac.config, "header");
if (!xs_is_null(hd))
header = xs_dup(hd);
else
header = xs_str_new(NULL);
acct = xs_dict_append(acct, "header", header);
acct = xs_dict_append(acct, "header_static", header);
xs *metadata = NULL;
const xs_dict *md = xs_dict_get(snac.config, "metadata");
if (xs_is_dict(md))
metadata = xs_dup(md);
else
if (xs_is_string(md)) {
metadata = xs_dict_new();
xs *l = xs_split(md, "\n");
const char *ll;
xs_list_foreach(l, ll) {
xs *kv = xs_split_n(ll, "=", 1);
const char *k = xs_list_get(kv, 0);
const char *v = xs_list_get(kv, 1);
if (k && v) {
xs *kk = xs_strip_i(xs_dup(k));
xs *vv = xs_strip_i(xs_dup(v));
metadata = xs_dict_set(metadata, kk, vv);
}
}
}
if (xs_is_dict(metadata)) {
xs *fields = xs_list_new();
const xs_str *k;
const xs_str *v;
xs_dict *val_links = snac.links;
if (xs_is_null(val_links))
val_links = xs_stock(XSTYPE_DICT);
int c = 0;
while (xs_dict_next(metadata, &k, &v, &c)) {
xs *val_date = NULL;
const xs_number *verified_time = xs_dict_get(val_links, v);
if (xs_type(verified_time) == XSTYPE_NUMBER) {
time_t t = xs_number_get(verified_time);
if (t > 0)
val_date = xs_str_utctime(t, ISO_DATE_SPEC);
}
xs *d = xs_dict_new();
d = xs_dict_append(d, "name", k);
d = xs_dict_append(d, "value", v);
d = xs_dict_append(d, "verified_at",
xs_type(val_date) == XSTYPE_STRING && *val_date ? val_date : xs_stock(XSTYPE_NULL));
fields = xs_list_append(fields, d);
}
acct = xs_dict_set(acct, "fields", fields);
/* some apps take the fields from the source object */
src = xs_dict_set(src, "fields", fields);
}
acct = xs_dict_append(acct, "source", src);
acct = xs_dict_append(acct, "followers_count", xs_stock(0));
acct = xs_dict_append(acct, "following_count", xs_stock(0));
acct = xs_dict_append(acct, "statuses_count", xs_stock(0));
/* does this user want to publish their contact metrics? */
if (xs_is_true(xs_dict_get(snac.config, "show_contact_metrics"))) {
int fwing = following_list_len(&snac);
int fwers = follower_list_len(&snac);
xs *ni = xs_number_new(fwing);
xs *ne = xs_number_new(fwers);
acct = xs_dict_append(acct, "followers_count", ne);
acct = xs_dict_append(acct, "following_count", ni);
}
*body = xs_json_dumps(acct, 4);
*ctype = "application/json";
*status = HTTP_STATUS_OK;
}
xs_list *mastoapi_timeline(snac *user, const xs_dict *args, const char *index_fn)
{
xs_list *out = xs_list_new();
FILE *f;
char md5[MD5_HEX_SIZE];
if (dbglevel) {
xs *js = xs_json_dumps(args, 0);
srv_debug(1, xs_fmt("mastoapi_timeline args %s", js));
}
if ((f = fopen(index_fn, "r")) == NULL)
return out;
const char *o_max_id = xs_dict_get(args, "max_id");
const char *o_since_id = xs_dict_get(args, "since_id");
const char *o_min_id = xs_dict_get(args, "min_id"); /* unsupported old-to-new navigation */
const char *limit_s = xs_dict_get(args, "limit");
int (*iterator)(FILE *, char *);
int initial_status = 0;
int ascending = 0;
int limit = 0;
int cnt = 0;
xs *max_id = o_max_id ? xs_tolower_i(xs_dup(o_max_id)) : NULL;
xs *since_id = o_since_id ? xs_tolower_i(xs_dup(o_since_id)) : NULL;
xs *min_id = o_min_id ? xs_tolower_i(xs_dup(o_min_id)) : NULL;
if (!xs_is_null(limit_s))
limit = atoi(limit_s);
if (limit == 0)
limit = 20;
if (min_id) {
iterator = &index_asc_next;
initial_status = index_asc_first(f, md5, MID_TO_MD5(min_id));
ascending = 1;
}
else {
iterator = &index_desc_next;
initial_status = index_desc_first(f, md5, 0);
}
xs_set entries;
xs_set_init(&entries);
if (initial_status) {
do {
xs *msg = NULL;
/* only return entries older that max_id */
if (max_id) {
if (strcmp(md5, MID_TO_MD5(max_id)) == 0) {
max_id = xs_free(max_id);
if (ascending)
break;
}
if (!ascending)
continue;
}
/* only returns entries newer than since_id */
if (since_id) {
if (strcmp(md5, MID_TO_MD5(since_id)) == 0) {
if (!ascending)
break;
since_id = xs_free(since_id);
}
if (ascending)
continue;
}
/* get the entry */
if (user) {
if (!valid_status(timeline_get_by_md5(user, md5, &msg)))
continue;
}
else {
if (!valid_status(object_get_by_md5(md5, &msg)))
continue;
}
/* discard non-Notes */
const char *id = xs_dict_get(msg, "id");
const char *type = xs_dict_get(msg, "type");
if (!xs_match(type, POSTLIKE_OBJECT_TYPE))
continue;
if (id && is_instance_blocked(id))
continue;
const char *from = NULL;
if (strcmp(type, "Page") == 0)
from = xs_dict_get(msg, "audience");
if (from == NULL)
from = get_atto(msg);
if (from == NULL)
continue;
if (user) {
/* is this message from a person we don't follow? */
if (strcmp(from, user->actor) && !following_check(user, from)) {
/* discard if it was not boosted */
xs *idx = object_announces(id);
if (xs_list_len(idx) == 0)
continue;
}
/* discard notes from muted morons */
if (is_muted(user, from))
continue;
/* discard hidden notes */
if (is_hidden(user, id))
continue;
}
else {
/* skip non-public messages */
if (!is_msg_public(msg))
continue;
/* discard messages from private users */
if (is_msg_from_private_user(msg))
continue;
}
/* if it has a name and it's not an object that may have one,
it's a poll vote, so discard it */
if (!xs_is_null(xs_dict_get(msg, "name")) && !xs_match(type, "Page|Video|Audio|Event"))
continue;
/* convert the Note into a Mastodon status */
xs *st = mastoapi_status(user, msg);
if (st != NULL && xs_set_add(&entries, md5) == 1) {
if (ascending)
out = xs_list_insert(out, 0, st);
else
out = xs_list_append(out, st);
cnt++;
}
} while ((cnt < limit) && (*iterator)(f, md5));
}
xs_set_free(&entries);
int more = index_desc_next(f, md5);
fclose(f);
srv_debug(1, xs_fmt("mastoapi_timeline ret %d%s", cnt, more ? " (+)" : ""));
return out;
}
xs_str *timeline_link_header(const char *endpoint, xs_list *timeline)
/* returns a Link header with paging information */
{
xs_str *s = NULL;
if (xs_list_len(timeline) == 0)
return NULL;
const xs_dict *first_st = xs_list_get(timeline, 0);
const xs_dict *last_st = xs_list_get(timeline, -1);
const char *first_id = xs_dict_get(first_st, "id");
const char *last_id = xs_dict_get(last_st, "id");
const char *host = xs_dict_get(srv_config, "host");
const char *protocol = xs_dict_get_def(srv_config, "protocol", "https");
s = xs_fmt(
"<%s:/" "/%s%s?max_id=%s>; rel=\"next\", "
"<%s:/" "/%s%s?since_id=%s>; rel=\"prev\"",
protocol, host, endpoint, last_id,
protocol, host, endpoint, first_id);
srv_debug(1, xs_fmt("timeline_link_header %s", s));
return s;
}
xs_list *mastoapi_account_lists(snac *user, const char *uid)
/* returns the list of list an user is in */
{
xs_list *out = xs_list_new();
xs *actor_md5 = NULL;
xs *lol = list_maint(user, NULL, OP_LIST);
if (uid) {
if (!xs_is_hex(uid))
actor_md5 = xs_md5_hex(uid, strlen(uid));
else
actor_md5 = xs_dup(uid);
}
const xs_list *li;
xs_list_foreach(lol, li) {
const char *list_id = xs_list_get(li, 0);
const char *list_title = xs_list_get(li, 1);
if (uid) {
xs *users = list_members(user, list_id, NULL, OP_LIST);
if (xs_list_in(users, actor_md5) == -1)
continue;
}
xs *d = xs_dict_new();
d = xs_dict_append(d, "id", list_id);
d = xs_dict_append(d, "title", list_title);
d = xs_dict_append(d, "replies_policy", "list");
d = xs_dict_append(d, "exclusive", xs_stock(XSTYPE_FALSE));
out = xs_list_append(out, d);
}
return out;
}
xs_list *build_childrens(const xs_dict *msg, snac *snac1) {
xs_list *ret = xs_list_new();
xs *children = object_children(xs_dict_get(msg, "id"));
char *p = children;
const xs_str *v;
while (xs_list_iter(&p, &v)) {
xs *m2 = NULL;
if (valid_status(timeline_get_by_md5(snac1, v, &m2))) {
if (xs_is_null(xs_dict_get(m2, "name"))) {
xs *st = mastoapi_status(snac1, m2);
if (st) {
/* childrens children */
xs *childs = build_childrens(m2, snac1);
ret = xs_list_append(ret, st);
if (xs_list_len(childs)) {
char *p2 = childs;
while (xs_list_iter(&p2, &v))
ret = xs_list_append(ret, v);
}
}
}
}
}
return ret;
}
int mastoapi_get_handler(const xs_dict *req, const char *q_path,
char **body, int *b_size, char **ctype, xs_str **link)
{
(void)b_size;
if (!xs_startswith(q_path, "/api/v1/") && !xs_startswith(q_path, "/api/v2/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
const xs_dict *args = xs_dict_get(req, "q_vars");
xs *cmd = xs_replace_n(q_path, "/api", "", 1);
snac snac1 = {0};
int logged_in = process_auth_token(&snac1, req);
if (strcmp(cmd, "/v1/accounts/verify_credentials") == 0) { /** **/
if (logged_in) {
credentials_get(body, ctype, &status, snac1);
}
else {
status = HTTP_STATUS_UNPROCESSABLE_CONTENT; // (no login)
}
}
else
if (strcmp(cmd, "/v1/accounts/relationships") == 0) { /** **/
/* find if an account is followed, blocked, etc. */
/* the account to get relationships about is in args "id[]" */
if (logged_in) {
xs *res = xs_list_new();
const char *md5 = xs_dict_get(args, "id[]");
if (xs_is_null(md5))
md5 = xs_dict_get(args, "id");
if (!xs_is_null(md5)) {
if (xs_type(md5) == XSTYPE_LIST)
md5 = xs_list_get(md5, 0);
xs *rel = mastoapi_relationship(&snac1, md5);
if (rel != NULL)
res = xs_list_append(res, rel);
}
*body = xs_json_dumps(res, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
}
else
if (strcmp(cmd, "/v1/accounts/lookup") == 0) { /** **/
/* lookup an account */
const char *acct = xs_dict_get(args, "acct");
if (!xs_is_null(acct)) {
xs *s = xs_strip_chars_i(xs_dup(acct), "@");
xs *l = xs_split_n(s, "@", 1);
const char *uid = xs_list_get(l, 0);
const char *host = xs_list_get(l, 1);
if (uid && (!host || strcmp(host, xs_dict_get(srv_config, "host")) == 0)) {
snac user;
if (user_open(&user, uid)) {
xs *actor = msg_actor(&user);
xs *macct = mastoapi_account(NULL, actor);
*body = xs_json_dumps(macct, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
user_free(&user);
}
}
}
}
else
if (xs_startswith(cmd, "/v1/accounts/")) { /** **/
/* account-related information */
xs *l = xs_split(cmd, "/");
const char *uid = xs_list_get(l, 3);
const char *opt = xs_list_get(l, 4);
if (uid != NULL) {
snac snac2;
xs *out = NULL;
xs *actor = NULL;
if (logged_in && strcmp(uid, "familiar_followers") == 0) { /** **/
/* familiar followers endpoint - return empty array */
out = xs_list_new();
}
else
if (logged_in && strcmp(uid, "search") == 0) { /** **/
/* search for accounts starting with q */
const char *aq = xs_dict_get(args, "q");
if (!xs_is_null(aq)) {
xs *q = xs_utf8_to_lower(aq);
out = xs_list_new();
xs *wing = following_list(&snac1);
xs *wers = follower_list(&snac1);
xs *ulst = user_list();
xs_list *p;
const xs_str *v;
xs_set seen;
xs_set_init(&seen);
/* user relations */
xs_list *lsts[] = { wing, wers, NULL };
int n;
for (n = 0; (p = lsts[n]) != NULL; n++) {
while (xs_list_iter(&p, &v)) {
/* already seen? skip */
if (xs_set_add(&seen, v) == 0)
continue;
xs *actor = NULL;
if (valid_status(object_get(v, &actor))) {
const char *uname = xs_dict_get(actor, "preferredUsername");
if (!xs_is_null(uname)) {
xs *luname = xs_tolower_i(xs_dup(uname));
if (xs_startswith(luname, q)) {
xs *acct = mastoapi_account(&snac1, actor);
out = xs_list_append(out, acct);
}
}
}
}
}
/* local users */
p = ulst;
while (xs_list_iter(&p, &v)) {
snac user;
/* skip this same user */
if (strcmp(v, xs_dict_get(snac1.config, "uid")) == 0)
continue;
/* skip if the uid does not start with the query */
xs *v2 = xs_tolower_i(xs_dup(v));
if (!xs_startswith(v2, q))
continue;
if (user_open(&user, v)) {
/* if it's not already seen, add it */
if (xs_set_add(&seen, user.actor) == 1) {
xs *actor = msg_actor(&user);
xs *acct = mastoapi_account(&snac1, actor);
out = xs_list_append(out, acct);
}
user_free(&user);
}
}
xs_set_free(&seen);
}
}
else
/* is it a local user? */
if (user_open(&snac2, uid) || user_open_by_md5(&snac2, uid)) {
if (opt == NULL) {
/* account information */
actor = msg_actor(&snac2);
out = mastoapi_account(NULL, actor);
}
else
if (strcmp(opt, "statuses") == 0) { /** **/
if (logged_in || xs_type(xs_dict_get(snac2.config, "private")) == XSTYPE_FALSE) {
/* the public list of posts of a user */
const char *limit_s = xs_dict_get(args, "limit");
const char *o_max_id = xs_dict_get(args, "max_id");
int limit = limit_s ? atoi(limit_s) : 20;
xs *max_id = o_max_id ? xs_tolower_i(xs_dup(o_max_id)) : NULL;
srv_debug(1, xs_fmt("account statuses: max_id=%s limit=%d", max_id ? max_id : "(null)", limit));
xs *timeline = timeline_simple_list(&snac2, "public", 0, 256, NULL);
xs_list *p = timeline;
const xs_str *v;
xs_set seen;
int cnt = 0;
int skip_until_max = max_id != NULL;
out = xs_list_new();
xs_set_init(&seen);
while (xs_list_iter(&p, &v) && cnt < limit) {
xs *msg = NULL;
if (valid_status(timeline_get_by_md5(&snac2, v, &msg))) {
const char *msg_id = xs_dict_get(msg, "id");
/* add only posts by the author */
if (!xs_is_null(msg_id) &&
strcmp(xs_dict_get(msg, "type"), "Note") == 0 &&
is_msg_mine(&snac2, xs_dict_get(msg, "id")) && is_msg_public(msg)) {
/* if max_id is set, skip entries until we find it */
if (skip_until_max) {
xs *mid = mastoapi_id(msg);
if (strcmp(mid, max_id) == 0) {
skip_until_max = 0;
srv_debug(2, xs_fmt("account statuses: found max_id, starting from next post"));
}
continue;
}
/* deduplicate by message id */
if (xs_set_add(&seen, msg_id) == 1) {
xs *st = mastoapi_status(&snac2, msg);
if (st) {
out = xs_list_append(out, st);
cnt++;
}
}
}
}
}
srv_debug(1, xs_fmt("account statuses: returning %d posts (requested %d)", cnt, limit));
xs_set_free(&seen);
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(opt, "featured_tags") == 0) {
/* snac doesn't have features tags, yet? */
/* implement empty response so apps like Tokodon don't show an error */
out = xs_list_new();
}
else
if (strcmp(opt, "following") == 0) {
xs *wing = following_list(&snac1);
out = xs_list_new();
int c = 0;
const char *v;
while (xs_list_next(wing, &v, &c)) {
xs *actor = NULL;
if (valid_status(object_get(v, &actor))) {
xs *acct = mastoapi_account(NULL, actor);
out = xs_list_append(out, acct);
}
}
}
else
if (strcmp(opt, "followers") == 0) {
out = xs_list_new();
}
else
if (strcmp(opt, "lists") == 0) {
out = mastoapi_account_lists(&snac1, uid);
}
else
if (strcmp(opt, "familiar_followers") == 0) {
/* familiar followers - not implemented, return empty array */
out = xs_list_new();
}
user_free(&snac2);
}
else {
/* try the uid as the md5 of a possibly loaded actor */
if (logged_in && valid_status(object_get_by_md5(uid, &actor))) {
if (opt == NULL) {
/* account information */
out = mastoapi_account(&snac1, actor);
}
else
if (strcmp(opt, "statuses") == 0) {
/* fetch statuses from remote outbox */
out = xs_list_new();
const char *outbox_url = xs_dict_get(actor, "outbox");
if (!xs_is_null(outbox_url)) {
/* extract query parameters */
const char *limit_s = xs_dict_get(args, "limit");
const char *exclude_replies_s = xs_dict_get(args, "exclude_replies");
const char *o_max_id = xs_dict_get(args, "max_id");
int limit = 20;
if (!xs_is_null(limit_s))
limit = atoi(limit_s);
if (limit == 0 || limit > 40)
limit = 20;
int exclude_replies = !xs_is_null(exclude_replies_s) &&
strcmp(exclude_replies_s, "true") == 0;
xs *max_id = o_max_id ? xs_tolower_i(xs_dup(o_max_id)) : NULL;
int skip_until_max = max_id != NULL;
srv_debug(1, xs_fmt("remote account statuses: fetching from %s (max_id=%s limit=%d)",
outbox_url, max_id ? max_id : "(null)", limit));
/* fetch first page only - safer for memory on large instances */
xs *outbox_collection = NULL;
xs *first_page = NULL;
const xs_list *items = get_collection_items(&snac1, outbox_url,
&outbox_collection, &first_page);
int count = 0;
int processed = 0;
if (!xs_is_null(items) && xs_type(items) == XSTYPE_LIST) {
int total_items = xs_list_len(items);
srv_debug(1, xs_fmt("remote account statuses: got %d items from outbox", total_items));
const xs_val *item;
xs_list_foreach(items, item) {
processed++;
if (count >= limit)
break;
const xs_dict *post = extract_post_from_item(item);
if (!post)
continue;
const char *post_type = xs_dict_get(post, "type");
const char *in_reply_to = xs_dict_get(post, "inReplyTo");
/* apply filters */
if (exclude_replies && !xs_is_null(in_reply_to))
continue;
if (is_valid_post_type(post_type)) {
/* store object locally so mastoapi_id() can generate valid IDs */
const char *post_id = xs_dict_get(post, "id");
if (!xs_is_null(post_id))
object_add(post_id, post);
/* handle pagination with max_id */
if (skip_until_max) {
xs *mid = mastoapi_id(post);
if (!xs_is_null(mid) && strcmp(mid, max_id) == 0) {
skip_until_max = 0;
srv_debug(2, xs_fmt("remote account statuses: found max_id at position %d", processed));
}
continue;
}
/* pass logged-in user context to enable media proxying if configured */
xs *st = mastoapi_status(&snac1, post);
if (st) {
out = xs_list_append(out, st);
count++;
}
}
}
}
else {
srv_debug(1, xs_fmt("remote account statuses: no items found in outbox"));
}
srv_debug(1, xs_fmt("remote account statuses: processed %d items, returning %d posts (requested %d)",
processed, count, limit));
}
}
else
if (strcmp(opt, "featured_tags") == 0) {
/* snac doesn't have features tags, yet? */
/* implement empty response so apps like Tokodon don't show an error */
out = xs_list_new();
}
else
if (strcmp(opt, "lists") == 0) {
out = mastoapi_account_lists(&snac1, uid);
}
else
if (strcmp(opt, "familiar_followers") == 0) {
/* familiar followers - not implemented, return empty array */
out = xs_list_new();
}
}
}
if (out != NULL) {
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
if (strcmp(cmd, "/v1/timelines/home") == 0) { /** **/
/* the private timeline */
if (logged_in) {
xs *ifn = user_index_fn(&snac1, "private");
xs *out = mastoapi_timeline(&snac1, args, ifn);
*link = timeline_link_header("/api/v1/timelines/home", out);
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
srv_debug(2, xs_fmt("mastoapi timeline: returned %d entries", xs_list_len(out)));
}
else {
status = HTTP_STATUS_UNAUTHORIZED;
}
}
else
if (strcmp(cmd, "/v1/timelines/public") == 0) { /** **/
/* the instance public timeline (public timelines for all users) */
xs *ifn = instance_index_fn();
xs *out = mastoapi_timeline(NULL, args, ifn);
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (xs_startswith(cmd, "/v1/timelines/tag/")) { /** **/
/* get the tag */
xs *l = xs_split(cmd, "/");
const char *tag = xs_list_get(l, -1);
xs *ifn = tag_fn(tag);
xs *out = mastoapi_timeline(NULL, args, ifn);
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (xs_startswith(cmd, "/v1/timelines/list/")) { /** **/
/* get the list id */
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *list = xs_list_get(l, -1);
xs *ifn = list_timeline_fn(&snac1, list);
xs *out = mastoapi_timeline(NULL, args, ifn);
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_MISDIRECTED_REQUEST;
}
else
if (strcmp(cmd, "/v1/conversations") == 0) { /** **/
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/notifications") == 0) { /** **/
if (logged_in) {
xs *l = notify_list(&snac1, 0, 64);
xs *out = xs_list_new();
const char *v;
const xs_list *excl = xs_dict_get(args, "exclude_types[]");
const xs_list *incl = xs_dict_get(args, "types[]");
const char *min_id = xs_dict_get(args, "min_id");
const char *max_id = xs_dict_get(args, "max_id");
const char *limit = xs_dict_get(args, "limit");
int limit_count = 0;
if (xs_is_string(limit)) {
limit_count = atoi(limit);
}
if (dbglevel) {
xs *js = xs_json_dumps(args, 0);
srv_debug(1, xs_fmt("mastoapi_notifications args %s", js));
}
xs_list_foreach(l, v) {
xs *noti = notify_get(&snac1, v);
if (noti == NULL)
continue;
const xs_dict *tag = xs_list_get(xs_dict_get_path(noti, "msg.tag"), 0);
const char *type = xs_dict_get(noti, "type");
const char *utype = xs_dict_get(noti, "utype");
const char *objid = xs_dict_get(noti, "objid");
const char *id = xs_dict_get(noti, "id");
const char *actid = xs_dict_get(noti, "actor");
int isEmoji = 0;
xs *fid = xs_replace(id, ".", "");
xs *actor = NULL;
xs *entry = NULL;
if (tag) {
isEmoji = strcmp(xs_dict_get(tag, "type"), "Emoji") ? 0 : 1;
}
if (!valid_status(actor_get(actid, &actor)))
continue;
if (objid != NULL && !valid_status(object_get(objid, &entry)))
continue;
if (is_hidden(&snac1, objid))
continue;
if (max_id) {
if (strcmp(fid, max_id) == 0)
max_id = NULL;
continue;
}
if (min_id) {
if (strcmp(fid, min_id) <= 0) {
continue;
}
}
/* convert the type */
if (strcmp(type, "Like") == 0 && !isEmoji)
type = "favourite";
else
if (isEmoji || strcmp(type, "EmojiReact") == 0)
type = "reaction";
else
if (strcmp(type, "Announce") == 0)
type = "reblog";
else
if (strcmp(type, "Follow") == 0)
type = "follow";
else
if (strcmp(type, "Create") == 0)
type = "mention";
else
if (strcmp(type, "Update") == 0 && strcmp(utype, "Question") == 0)
type = "poll";
else
continue;
/* excluded type? */
if (xs_is_list(excl) && xs_list_in(excl, type) != -1)
continue;
/* included type? */
if (xs_is_list(incl) && xs_list_in(incl, type) == -1)
continue;
xs *mn = xs_dict_new();
mn = xs_dict_append(mn, "type", type);
mn = xs_dict_append(mn, "id", fid);
mn = xs_dict_append(mn, "created_at", xs_dict_get(noti, "date"));
xs *acct = mastoapi_account(&snac1, actor);
if (acct == NULL)
continue;
mn = xs_dict_append(mn, "account", acct);
if (strcmp(type, "follow") != 0 && !xs_is_null(objid)) {
xs *st = mastoapi_status(&snac1, entry);
if (st) {
mn = xs_dict_append(mn, "status", st);
if (strcmp(type, "reaction") == 0 && !xs_is_null(objid)) {
const char *eid = NULL;
const char *url = NULL;
int utf = 0;
const xs_dict *tag = xs_list_get(xs_dict_get_path(noti, "msg.tag"), 0);
const char *content = xs_dict_get_path(noti, "msg.content");
url = xs_dict_get(xs_dict_get(tag, "icon"), "url");
eid = xs_dict_get(tag, "name");
if (eid && url) {
mn = xs_dict_append(mn, "emoji", eid);
mn = xs_dict_append(mn, "emoji_url", url);
}
if (xs_is_emoji((utf = xs_utf8_dec(&content)))) {
xs *s1 = xs_fmt("&#%d;", utf);
mn = xs_dict_append(mn, "name", s1);
}
}
}
}
out = xs_list_append(out, mn);
if (--limit_count <= 0)
break;
}
srv_debug(1, xs_fmt("mastoapi_notifications count %d", xs_list_len(out)));
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/filters") == 0) { /** **/
/* snac will never have filters */
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v2/filters") == 0) { /** **/
/* snac will never have filters
* but still, without a v2 endpoint a short delay is introduced
* in some apps */
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/favourites") == 0) { /** **/
/* snac will never support a list of favourites */
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/bookmarks") == 0) { /** **/
if (logged_in) {
xs *ifn = bookmark_index_fn(&snac1);
xs *out = mastoapi_timeline(&snac1, args, ifn);
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/lists") == 0) { /** list of lists **/
if (logged_in) {
xs *l = mastoapi_account_lists(&snac1, NULL);
*body = xs_json_dumps(l, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/lists/")) { /** list information **/
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *p = xs_list_get(l, -1);
if (p) {
if (strcmp(p, "accounts") == 0) {
p = xs_list_get(l, -2);
if (p && xs_is_hex(p)) {
xs *actors = list_members(&snac1, p, NULL, OP_LIST);
xs *out = xs_list_new();
int c = 0;
const char *v;
while (xs_list_next(actors, &v, &c)) {
xs *actor = NULL;
if (valid_status(object_get_by_md5(v, &actor))) {
xs *acct = mastoapi_account(&snac1, actor);
out = xs_list_append(out, acct);
}
}
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
else
if (xs_is_hex(p)) {
xs *out = xs_list_new();
xs *lol = list_maint(&snac1, NULL, OP_LIST);
int c = 0;
const xs_list *v;
while (xs_list_next(lol, &v, &c)) {
const char *id = xs_list_get(v, 0);
if (id && strcmp(id, p) == 0) {
xs *d = xs_dict_new();
d = xs_dict_append(d, "id", p);
d = xs_dict_append(d, "title", xs_list_get(v, 1));
d = xs_dict_append(d, "replies_policy", "list");
d = xs_dict_append(d, "exclusive", xs_stock(XSTYPE_FALSE));
out = xs_dup(d);
break;
}
}
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/scheduled_statuses") == 0) { /** **/
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/follow_requests") == 0) { /** **/
if (logged_in) {
xs *pend = pending_list(&snac1);
xs *resp = xs_list_new();
const char *id;
xs_list_foreach(pend, id) {
xs *actor = NULL;
if (valid_status(object_get(id, &actor))) {
xs *acct = mastoapi_account(&snac1, actor);
if (acct)
resp = xs_list_append(resp, acct);
}
}
*body = xs_json_dumps(resp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
else
if (strcmp(cmd, "/v1/announcements") == 0) { /** **/
if (logged_in) {
xs *resp = xs_list_new();
double la = 0.0;
xs *user_la = xs_dup(xs_dict_get(snac1.config, "last_announcement"));
if (user_la != NULL)
la = xs_number_get(user_la);
xs *val_date = xs_str_utctime(la, ISO_DATE_SPEC);
/* contrary to html, we always send the announcement and set the read flag instead */
const t_announcement *annce = announcement(la);
if (annce != NULL && annce->text != NULL) {
xs *an = xs_dict_new();
xs *id = xs_fmt("%d", annce->timestamp);
xs *ct = xs_fmt("<p>%s</p>", annce->text);
an = xs_dict_set(an, "id", id);
an = xs_dict_set(an, "content", ct);
an = xs_dict_set(an, "starts_at", xs_stock(XSTYPE_NULL));
an = xs_dict_set(an, "ends_at", xs_stock(XSTYPE_NULL));
an = xs_dict_set(an, "all_day", xs_stock(XSTYPE_TRUE));
an = xs_dict_set(an, "published_at", val_date);
an = xs_dict_set(an, "updated_at", val_date);
an = xs_dict_set(an, "read", (annce->timestamp >= la)
? xs_stock(XSTYPE_FALSE) : xs_stock(XSTYPE_TRUE));
an = xs_dict_set(an, "mentions", xs_stock(XSTYPE_LIST));
an = xs_dict_set(an, "statuses", xs_stock(XSTYPE_LIST));
an = xs_dict_set(an, "tags", xs_stock(XSTYPE_LIST));
an = xs_dict_set(an, "emojis", xs_stock(XSTYPE_LIST));
an = xs_dict_set(an, "reactions", xs_stock(XSTYPE_LIST));
resp = xs_list_append(resp, an);
}
*body = xs_json_dumps(resp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
else
if (strcmp(cmd, "/v1/custom_emojis") == 0) { /** **/
xs *emo = emojis();
xs *list = xs_list_new();
const xs_str *k;
const xs_val *v;
xs_dict_foreach(emo, k, v) {
xs *current = xs_dict_new();
if ((xs_startswith(v, "https://") && xs_startswith((xs_mime_by_ext(v)), "image/")) || xs_type(v) == XSTYPE_DICT) {
/* remove first and last colon */
if (xs_type(v) == XSTYPE_DICT) {
const char *v2;
const char *cat = k;
xs_dict_foreach(v, k, v2) {
xs *shortcode = xs_replace(k, ":", "");
current = xs_dict_append(current, "shortcode", shortcode);
current = xs_dict_append(current, "url", v2);
current = xs_dict_append(current, "static_url", v2);
current = xs_dict_append(current, "visible_in_picker", xs_stock(XSTYPE_TRUE));
current = xs_dict_append(current, "category", cat);
list = xs_list_append(list, current);
}
}
else {
xs *shortcode = xs_replace(k, ":", "");
current = xs_dict_append(current, "shortcode", shortcode);
current = xs_dict_append(current, "url", v);
current = xs_dict_append(current, "static_url", v);
current = xs_dict_append(current, "visible_in_picker", xs_stock(XSTYPE_TRUE));
list = xs_list_append(list, current);
}
}
}
*body = xs_json_dumps(list, 0);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (strcmp(cmd, "/v1/instance") == 0) { /** **/
/* returns an instance object */
xs *ins = xs_dict_new();
const char *host = xs_dict_get(srv_config, "host");
const char *title = xs_dict_get(srv_config, "title");
const char *sdesc = xs_dict_get(srv_config, "short_description");
ins = xs_dict_append(ins, "uri", host);
ins = xs_dict_append(ins, "domain", host);
ins = xs_dict_append(ins, "title", title && *title ? title : host);
ins = xs_dict_append(ins, "version", "4.0.0 (not true; really " USER_AGENT ")");
ins = xs_dict_append(ins, "source_url", SNACFORGE_URL);
ins = xs_dict_append(ins, "description", host);
ins = xs_dict_append(ins, "short_description", sdesc && *sdesc ? sdesc : host);
xs *thumbnail = xs_fmt("%s/snacforge.png", srv_baseurl);
ins = xs_dict_append(ins, "thumbnail", thumbnail);
const char *v = xs_dict_get(srv_config, "admin_email");
if (xs_is_null(v) || *v == '\0')
v = "admin@localhost";
ins = xs_dict_append(ins, "email", v);
ins = xs_dict_append(ins, "rules", xs_stock(XSTYPE_LIST));
xs *l1 = xs_list_append(xs_list_new(), "en");
ins = xs_dict_append(ins, "languages", l1);
xs *wss = xs_fmt("wss:/" "/%s", xs_dict_get(srv_config, "host"));
xs *urls = xs_dict_new();
urls = xs_dict_append(urls, "streaming_api", wss);
ins = xs_dict_append(ins, "urls", urls);
xs *d2 = xs_dict_append(xs_dict_new(), "user_count", xs_stock(0));
d2 = xs_dict_append(d2, "status_count", xs_stock(0));
d2 = xs_dict_append(d2, "domain_count", xs_stock(0));
ins = xs_dict_append(ins, "stats", d2);
ins = xs_dict_append(ins, "registrations", xs_stock(XSTYPE_FALSE));
ins = xs_dict_append(ins, "approval_required", xs_stock(XSTYPE_FALSE));
ins = xs_dict_append(ins, "invites_enabled", xs_stock(XSTYPE_FALSE));
xs *cfg = xs_dict_new();
{
xs *d11 = xs_json_loads("{\"characters_reserved_per_url\":32,"
"\"max_characters\":100000,\"max_media_attachments\":4}");
const xs_number *max_attachments = xs_dict_get(srv_config, "max_attachments");
if (xs_type(max_attachments) == XSTYPE_NUMBER)
d11 = xs_dict_set(d11, "max_media_attachments", max_attachments);
cfg = xs_dict_append(cfg, "statuses", d11);
xs *d12 = xs_json_loads("{\"max_featured_tags\":0}");
cfg = xs_dict_append(cfg, "accounts", d12);
xs *d13 = xs_json_loads("{\"image_matrix_limit\":33177600,"
"\"image_size_limit\":16777216,"
"\"video_frame_rate_limit\":120,"
"\"video_matrix_limit\":8294400,"
"\"video_size_limit\":103809024}"
);
{
/* get the supported mime types from the internal list */
const char **p = xs_mime_types;
xs_set mtypes;
xs_set_init(&mtypes);
while (*p) {
const char *type = p[1];
if (xs_startswith(type, "image/") ||
xs_startswith(type, "video/") ||
xs_startswith(type, "audio/"))
xs_set_add(&mtypes, type);
p += 2;
}
xs *l = xs_set_result(&mtypes);
d13 = xs_dict_append(d13, "supported_mime_types", l);
}
cfg = xs_dict_append(cfg, "media_attachments", d13);
xs *d14 = xs_json_loads("{\"max_characters_per_option\":50,"
"\"max_expiration\":2629746,"
"\"max_options\":8,\"min_expiration\":300}");
cfg = xs_dict_append(cfg, "polls", d14);
xs *d15 = xs_json_loads("{\"max_reactions\":50}");
cfg = xs_dict_append(cfg, "reactions", d15);
}
ins = xs_dict_append(ins, "configuration", cfg);
const char *admin_account = xs_dict_get(srv_config, "admin_account");
if (!xs_is_null(admin_account) && *admin_account) {
snac admin;
if (user_open(&admin, admin_account)) {
xs *actor = msg_actor(&admin);
xs *acct = mastoapi_account(NULL, actor);
ins = xs_dict_append(ins, "contact_account", acct);
user_free(&admin);
}
}
*body = xs_json_dumps(ins, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (strcmp(cmd, "/v1/instance/peers") == 0) { /** **/
/* get the collected inbox list as the instances "this domain is aware of" */
xs *list = inbox_list();
xs *peers = xs_list_new();
const char *inbox;
xs_list_foreach(list, inbox) {
xs *l = xs_split(inbox, "/");
const char *domain = xs_list_get(l, 2);
if (xs_is_string(domain))
peers = xs_list_append(peers, domain);
}
*body = xs_json_dumps(peers, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (strcmp(cmd, "/v1/instance/extended_description") == 0) { /** **/
xs *d = xs_dict_new();
xs *greeting = xs_fmt("%s/greeting.html", srv_basedir);
time_t t = mtime(greeting);
xs *updated_at = xs_str_iso_date(t);
xs *content = xs_replace(snac_blurb, "%host%", xs_dict_get(srv_config, "host"));
d = xs_dict_set(d, "updated_at", updated_at);
d = xs_dict_set(d, "content", content);
*body = xs_json_dumps(d, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (xs_startswith(cmd, "/v1/statuses/")) { /** **/
/* information about a status */
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *oid = xs_list_get(l, 3);
const char *op = xs_list_get(l, 4);
if (!xs_is_null(oid)) {
xs *msg = NULL;
xs *out = NULL;
/* skip the 'fake' part of the id */
oid = MID_TO_MD5(oid);
xs *id = xs_tolower_i(xs_dup(oid));
if (valid_status(object_get_by_md5(id, &msg))) {
if (op == NULL) {
if (!is_muted(&snac1, get_atto(msg))) {
/* return the status itself */
out = mastoapi_status(&snac1, msg);
}
}
else
if (strcmp(op, "context") == 0) { /** **/
/* return ancestors and children */
xs *anc = xs_list_new();
xs *des = xs_list_new();
char pid[MD5_HEX_SIZE];
/* build the [grand]parent list, moving up */
strncpy(pid, id, sizeof(pid));
while (object_parent(pid, pid)) {
xs *m2 = NULL;
if (valid_status(timeline_get_by_md5(&snac1, pid, &m2))) {
xs *st = mastoapi_status(&snac1, m2);
if (st)
anc = xs_list_insert(anc, 0, st);
}
else
break;
}
/* build the children list */
xs *childs = build_childrens(msg, &snac1);
if (xs_list_len(childs) > 0)
des = xs_list_cat(des, childs);
out = xs_dict_new();
out = xs_dict_append(out, "ancestors", anc);
out = xs_dict_append(out, "descendants", des);
}
else
if (strcmp(op, "reblogged_by") == 0 || /** **/
strcmp(op, "favourited_by") == 0) { /** **/
/* return the list of people who liked or boosted this */
out = xs_list_new();
xs *l = NULL;
if (op[0] == 'r')
l = object_announces(xs_dict_get(msg, "id"));
else
l = object_likes(xs_dict_get(msg, "id"));
xs_list *p = l;
const xs_str *v;
while (xs_list_iter(&p, &v)) {
xs *actor2 = NULL;
if (valid_status(object_get_by_md5(v, &actor2))) {
xs *acct2 = mastoapi_account(&snac1, actor2);
out = xs_list_append(out, acct2);
}
}
}
else
if (strcmp(op, "source") == 0) { /** **/
out = xs_dict_new();
/* get the mastoapi status id */
out = xs_dict_append(out, "id", xs_list_get(l, 3));
out = xs_dict_append(out, "text", xs_dict_get(msg, "sourceContent"));
out = xs_dict_append(out, "spoiler_text", xs_dict_get(msg, "summary"));
}
}
else
srv_debug(1, xs_fmt("mastoapi status: bad id %s", id));
if (out != NULL) {
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/preferences") == 0) { /** **/
/* TBD */
if (logged_in) {
*body = xs_dup("{}");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/markers") == 0) { /** **/
if (logged_in) {
const xs_list *timeline = xs_dict_get(args, "timeline[]");
xs_str *json = NULL;
if (!xs_is_null(timeline))
json = xs_json_dumps(markers_get(&snac1, timeline), 4);
if (!xs_is_null(json))
*body = json;
else
*body = xs_dup("{}");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/followed_tags") == 0) { /** **/
if (logged_in) {
xs *r = xs_list_new();
const xs_list *followed_hashtags = xs_dict_get_def(snac1.config,
"followed_hashtags", xs_stock(XSTYPE_LIST));
const char *hashtag;
xs_list_foreach(followed_hashtags, hashtag) {
if (*hashtag == '#') {
xs *d = xs_dict_new();
xs *s = xs_fmt("%s?t=%s", srv_baseurl, hashtag + 1);
d = xs_dict_set(d, "name", hashtag + 1);
d = xs_dict_set(d, "url", s);
d = xs_dict_set(d, "history", xs_stock(XSTYPE_LIST));
r = xs_list_append(r, d);
}
}
*body = xs_json_dumps(r, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/blocks") == 0) { /** **/
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/mutes") == 0) { /** **/
if (logged_in) {
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/trends/tags") == 0) { /** **/
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (strcmp(cmd, "/v1/trends/statuses") == 0) { /** **/
*body = xs_dup("[]");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (strcmp(cmd, "/v2/search") == 0) { /** **/
if (logged_in) {
const char *q = xs_dict_get(args, "q");
const char *type = xs_dict_get(args, "type");
const char *offset = xs_dict_get(args, "offset");
xs *acl = xs_list_new();
xs *stl = xs_list_new();
xs *htl = xs_list_new();
xs *res = xs_dict_new();
if (xs_is_null(offset) || strcmp(offset, "0") == 0) {
/* reply something only for offset 0; otherwise,
apps like Tusky keep asking again and again */
if (xs_startswith(q, "https://")) {
if (!timeline_here(&snac1, q)) {
xs *object = NULL;
int status;
status = activitypub_request(&snac1, q, &object);
snac_debug(&snac1, 1, xs_fmt("Request searched URL %s %d", q, status));
if (valid_status(status)) {
/* got it; also request the actor */
const char *attr_to = get_atto(object);
xs *actor_obj = NULL;
if (!xs_is_null(attr_to)) {
status = actor_request(&snac1, attr_to, &actor_obj);
snac_debug(&snac1, 1, xs_fmt("Request author %s of %s %d", attr_to, q, status));
if (valid_status(status)) {
/* add the actor */
actor_add(attr_to, actor_obj);
/* add the post to the timeline */
timeline_add(&snac1, q, object);
}
}
}
}
}
if (!xs_is_null(q)) {
if (xs_is_null(type) || strcmp(type, "accounts") == 0) {
/* do a webfinger query */
char *actor = NULL;
char *user = NULL;
if (valid_status(webfinger_request(q, &actor, &user)) && actor) {
xs *actor_o = NULL;
if (valid_status(actor_request(&snac1, actor, &actor_o))) {
xs *acct = mastoapi_account(NULL, actor_o);
acl = xs_list_append(acl, acct);
if (!object_here(actor))
object_add(actor, actor_o);
}
}
}
if (xs_is_null(type) || strcmp(type, "hashtags") == 0) {
/* search this tag */
xs *tl = tag_search((char *)q, 0, 1);
if (xs_list_len(tl)) {
xs *d = xs_dict_new();
d = xs_dict_append(d, "name", q);
xs *url = xs_fmt("%s?t=%s", srv_baseurl, q);
d = xs_dict_append(d, "url", url);
d = xs_dict_append(d, "history", xs_stock(XSTYPE_LIST));
htl = xs_list_append(htl, d);
}
}
if (xs_is_null(type) || strcmp(type, "statuses") == 0) {
int to = 0;
int cnt = 40;
xs *tl = content_search(&snac1, q, 1, 0, cnt, 0, &to);
int c = 0;
const char *v;
while (xs_list_next(tl, &v, &c) && --cnt) {
xs *post = NULL;
if (!valid_status(timeline_get_by_md5(&snac1, v, &post)))
continue;
xs *s = mastoapi_status(&snac1, post);
if (!xs_is_null(s))
stl = xs_list_append(stl, s);
}
}
}
}
res = xs_dict_append(res, "accounts", acl);
res = xs_dict_append(res, "statuses", stl);
res = xs_dict_append(res, "hashtags", htl);
*body = xs_json_dumps(res, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/media/") || xs_startswith(cmd, "/v2/media/")) { /** **/
if (logged_in) {
xs *p = xs_split(cmd, "/");
const char *id = xs_list_get(p, -1);
if (xs_is_string(id)) {
xs *filename = xs_fmt("%s/static/%s", snac1.basedir, id);
if (mtime(filename)) {
/* file exists */
xs *alt = static_get_meta(&snac1, id);
xs *url = xs_fmt("%s/s/%s", snac1.actor, id);
xs *mime = xs_split(xs_mime_by_ext(filename), "/");
const char *type = xs_list_get(mime, 0);
if (!xs_match(type, "image|video|audio"))
type = "unknown";
xs *d = xs_dict_new();
d = xs_dict_set(d, "id", id);
d = xs_dict_set(d, "url", url);
d = xs_dict_set(d, "preview_url", url);
d = xs_dict_set(d, "remote_url", url);
d = xs_dict_set(d, "type", type);
d = xs_dict_set(d, "description", xs_or(alt, ""));
*body = xs_json_dumps(d, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
/* user cleanup */
if (logged_in)
user_free(&snac1);
srv_debug(1, xs_fmt("mastoapi_get_handler %s %d", q_path, status));
return status;
}
int mastoapi_post_handler(const xs_dict *req, const char *q_path,
const char *payload, int p_size,
char **body, int *b_size, char **ctype)
{
(void)p_size;
(void)b_size;
if (!xs_startswith(q_path, "/api/v1/") && !xs_startswith(q_path, "/api/v2/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
xs *args = NULL;
const char *i_ctype = xs_dict_get(req, "content-type");
if (i_ctype && xs_startswith(i_ctype, "application/json")) {
if (!xs_is_null(payload)) {
args = xs_json_loads(payload);
}
}
else if (i_ctype && xs_startswith(i_ctype, "application/x-www-form-urlencoded"))
{
// Some apps send form data instead of json so we should cater for those
if (!xs_is_null(payload)) {
args = xs_url_vars(payload);
}
}
else if (i_ctype && xs_startswith(i_ctype, "multipart/form-data"))
{
// Handle multipart/form-data by using p_vars (already parsed by httpd)
args = xs_dup(xs_dict_get(req, "p_vars"));
}
/* if args still NULL, try falling back to p_vars or q_vars */
if (args == NULL)
args = xs_dup(xs_dict_get(req, "p_vars"));
if (args == NULL)
args = xs_dup(xs_dict_get(req, "q_vars"));
if (args == NULL) {
srv_debug(1, xs_fmt("mastoapi_post_handler: failed to parse args for %s, content-type: %s",
q_path, i_ctype ? i_ctype : "(null)"));
return HTTP_STATUS_BAD_REQUEST;
}
xs *cmd = xs_replace_n(q_path, "/api", "", 1);
snac snac = {0};
int logged_in = process_auth_token(&snac, req);
if (strcmp(cmd, "/v1/apps") == 0) { /** **/
const char *name = xs_dict_get(args, "client_name");
const char *ruri = xs_dict_get(args, "redirect_uris");
const char *scope = xs_dict_get(args, "scope");
/* Ice Cubes sends these values as query parameters, so try these */
if (name == NULL && ruri == NULL && scope == NULL) {
xs_free(args);
args = xs_dup(xs_dict_get(req, "q_vars"));
name = xs_dict_get(args, "client_name");
ruri = xs_dict_get(args, "redirect_uris");
scope = xs_dict_get(args, "scope");
}
if (xs_type(ruri) == XSTYPE_LIST)
ruri = xs_dict_get(ruri, 0);
if (name && ruri) {
xs *app = xs_dict_new();
xs *id = xs_replace_i(tid(0), ".", "");
xs *csec = random_str();
xs *vkey = xs_dup(xs_dict_get(srv_config, "vkey"));
if (vkey == NULL)
vkey = random_str();
xs *cid = NULL;
/* pick a non-existent random cid */
for (;;) {
cid = random_str();
xs *p_app = app_get(cid);
if (p_app == NULL)
break;
xs_free(cid);
}
app = xs_dict_append(app, "name", name);
app = xs_dict_append(app, "redirect_uri", ruri);
app = xs_dict_append(app, "client_id", cid);
app = xs_dict_append(app, "client_secret", csec);
app = xs_dict_append(app, "vapid_key", vkey);
app = xs_dict_append(app, "id", id);
app = xs_dict_append(app, "client_secret_expires_at", xs_stock(0));
*body = xs_json_dumps(app, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
app = xs_dict_append(app, "code", "");
if (scope)
app = xs_dict_append(app, "scope", scope);
app_add(cid, app);
srv_debug(1, xs_fmt("mastoapi apps: new app %s", cid));
}
}
else
if (strcmp(cmd, "/v1/statuses") == 0) { /** **/
if (logged_in) {
/* post a new Note */
const char *content = xs_dict_get(args, "status");
const char *mid = xs_dict_get(args, "in_reply_to_id");
const char *visibility = xs_dict_get(args, "visibility");
const char *summary = xs_dict_get(args, "spoiler_text");
const char *poll_opts = xs_dict_get(args, "poll[options][]");
const char *poll_end_secs = xs_dict_get(args, "poll[expires_in]");
const char *poll_multiple = xs_dict_get(args, "poll[multiple]");
// const char *poll_hide_totals = xs_dict_get(args, "poll[hide_totals]");
const char *media_ids = xs_dict_get(args, "media_ids");
const char *language = xs_dict_get(args, "language");
if (xs_is_null(media_ids))
media_ids = xs_dict_get(args, "media_ids[]");
if (xs_is_null(media_ids))
media_ids = xs_dict_get(args, "media_ids");
if (xs_is_null(visibility))
visibility = "public";
xs *attach_list = xs_list_new();
xs *irt = NULL;
/* is it a reply? */
if (mid != NULL) {
xs *r_msg = NULL;
const char *md5 = MID_TO_MD5(mid);
if (valid_status(object_get_by_md5(md5, &r_msg)))
irt = xs_dup(xs_dict_get(r_msg, "id"));
}
/* does it have attachments (and no poll)? */
if (!xs_is_null(media_ids) && xs_is_null(poll_end_secs) && xs_is_null(poll_opts)) {
xs *mi = NULL;
if (xs_type(media_ids) == XSTYPE_LIST)
mi = xs_dup(media_ids);
else {
mi = xs_list_new();
mi = xs_list_append(mi, media_ids);
}
xs_list *p = mi;
const xs_str *v;
while (xs_list_iter(&p, &v)) {
xs *l = xs_list_new();
xs *url = xs_fmt("%s/s/%s", snac.actor, v);
xs *desc = static_get_meta(&snac, v);
l = xs_list_append(l, url);
l = xs_list_append(l, desc);
attach_list = xs_list_append(attach_list, l);
}
}
/* prepare the message */
xs *msg = NULL;
int scope = SCOPE_MENTIONED;
if (strcmp(visibility, "unlisted") == 0)
scope = SCOPE_UNLISTED;
else
if (strcmp(visibility, "public") == 0)
scope = SCOPE_PUBLIC;
else
if (strcmp(visibility, "private") == 0)
scope = SCOPE_FOLLOWERS;
/* does it have a poll? */
if (!xs_is_null(poll_opts) && !xs_is_null(poll_end_secs)) {
xs *po = NULL;
int end_secs = atoi(poll_end_secs);
int multiple = 0;
if (xs_type(poll_opts) == XSTYPE_LIST)
po = xs_dup(poll_opts);
else {
po = xs_list_new();
po = xs_list_append(po, poll_opts);
}
if (!xs_is_null(poll_multiple) && strcmp(poll_multiple, "true") == 0)
multiple = 1;
msg = msg_question(&snac, content, attach_list,
poll_opts, multiple, end_secs);
enqueue_close_question(&snac, xs_dict_get(msg, "id"), end_secs);
}
else
msg = msg_note(&snac, content, NULL, irt, attach_list, scope, language, NULL);
if (!xs_is_null(summary) && *summary) {
msg = xs_dict_set(msg, "sensitive", xs_stock(XSTYPE_TRUE));
msg = xs_dict_set(msg, "summary", summary);
}
/* scheduled? */
const char *scheduled_at = xs_dict_get(args, "scheduled_at");
if (xs_is_string(scheduled_at) && *scheduled_at) {
msg = xs_dict_set(msg, "published", scheduled_at);
schedule_add(&snac, xs_dict_get(msg, "id"), msg);
}
else {
/* store */
timeline_add(&snac, xs_dict_get(msg, "id"), msg);
/* 'Create' message */
xs *c_msg = msg_create(&snac, msg);
enqueue_message(&snac, c_msg);
timeline_touch(&snac);
}
/* convert to a mastodon status as a response code */
xs *st = mastoapi_status(&snac, msg);
*body = xs_json_dumps(st, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/statuses")) { /** **/
if (logged_in) {
/* operations on a status */
xs *l = xs_split(cmd, "/");
const char *mid = xs_list_get(l, 3);
const char *op = xs_list_get(l, 4);
if (!xs_is_null(mid)) {
xs *msg = NULL;
xs *out = NULL;
/* skip the 'fake' part of the id */
mid = MID_TO_MD5(mid);
/* try timeline first, then global object store for remote posts */
int found = valid_status(timeline_get_by_md5(&snac, mid, &msg));
if (!found)
found = valid_status(object_get_by_md5(mid, &msg));
if (found) {
const char *id = xs_dict_get(msg, "id");
if (op == NULL) {
/* no operation (?) */
}
else
if (strcmp(op, "favourite") == 0) { /** **/
xs *n_msg = msg_admiration(&snac, id, "Like");
if (n_msg != NULL) {
enqueue_message(&snac, n_msg);
timeline_admire(&snac, xs_dict_get(n_msg, "object"), snac.actor, 1, msg);
out = mastoapi_status(&snac, msg);
}
}
else
if (strcmp(op, "unfavourite") == 0) { /** **/
xs *n_msg = msg_repulsion(&snac, id, "Like");
if (n_msg != NULL) {
object_user_cache_del(&snac, id, "admire");
enqueue_message(&snac, n_msg);
out = mastoapi_status(&snac, msg);
}
}
else
if (strcmp(op, "react") == 0) { /** **/
const char *eid = xs_list_get(l, 5);
xs *n_msg = msg_emoji_init(&snac, id, eid);
if (n_msg)
out = mastoapi_status(&snac, n_msg);
}
else
if (strcmp(op, "unreact") == 0) { /** **/
const char *eid = xs_list_get(l, 5);
xs *content = xs_fmt("%s", eid);
if (eid) {
xs *n_msg = msg_emoji_unreact(&snac, id, content);
if (n_msg != NULL) {
object_user_cache_del(&snac, id, "admire");
enqueue_message(&snac, n_msg);
out = mastoapi_status(&snac, msg);
}
}
}
else
if (strcmp(op, "reblog") == 0) { /** **/
xs *n_msg = msg_admiration(&snac, id, "Announce");
if (n_msg != NULL) {
enqueue_message(&snac, n_msg);
timeline_admire(&snac, xs_dict_get(n_msg, "object"), snac.actor, 0, msg);
out = mastoapi_status(&snac, msg);
}
}
else
if (strcmp(op, "unreblog") == 0) { /** **/
xs *n_msg = msg_repulsion(&snac, id, "Announce");
if (n_msg != NULL) {
enqueue_message(&snac, n_msg);
out = mastoapi_status(&snac, msg);
}
}
else
if (strcmp(op, "bookmark") == 0) { /** **/
/* bookmark this message */
if (bookmark(&snac, id) == 0)
out = mastoapi_status(&snac, msg);
else
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
}
else
if (strcmp(op, "unbookmark") == 0) { /** **/
/* unbookmark this message */
unbookmark(&snac, id);
out = mastoapi_status(&snac, msg);
}
else
if (strcmp(op, "pin") == 0) { /** **/
/* pin this message */
if (pin(&snac, id) == 0)
out = mastoapi_status(&snac, msg);
else
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
}
else
if (strcmp(op, "unpin") == 0) { /** **/
/* unpin this message */
unpin(&snac, id);
out = mastoapi_status(&snac, msg);
}
else
if (strcmp(op, "mute") == 0) { /** **/
/* Mastodon's mute is snac's hide */
}
else
if (strcmp(op, "unmute") == 0) { /** **/
/* Mastodon's unmute is snac's unhide */
}
}
if (out != NULL) {
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/notifications/clear") == 0) { /** **/
if (logged_in) {
notify_clear(&snac);
timeline_touch(&snac);
*body = xs_dup("{}");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/push/subscription") == 0) { /** **/
/* I don't know what I'm doing */
if (logged_in) {
const char *v;
xs *wpush = xs_dict_new();
wpush = xs_dict_append(wpush, "id", "1");
v = xs_dict_get(args, "data");
v = xs_dict_get(v, "alerts");
wpush = xs_dict_append(wpush, "alerts", v);
v = xs_dict_get(args, "subscription");
v = xs_dict_get(v, "endpoint");
wpush = xs_dict_append(wpush, "endpoint", v);
xs *server_key = random_str();
wpush = xs_dict_append(wpush, "server_key", server_key);
*body = xs_json_dumps(wpush, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/media") == 0 || strcmp(cmd, "/v2/media") == 0) { /** **/
if (logged_in) {
const xs_list *file = xs_dict_get(args, "file");
const char *desc = xs_dict_get(args, "description");
if (xs_is_null(desc))
desc = "";
status = HTTP_STATUS_BAD_REQUEST;
if (xs_type(file) == XSTYPE_LIST) {
const char *fn = xs_list_get(file, 0);
if (*fn != '\0') {
char *ext = strrchr(fn, '.');
char rnd[32];
xs_rnd_buf(rnd, sizeof(rnd));
xs *hash = xs_md5_hex(rnd, sizeof(rnd));
xs *id = xs_fmt("post-%s%s", hash, ext ? ext : "");
xs *url = xs_fmt("%s/s/%s", snac.actor, id);
int fo = xs_number_get(xs_list_get(file, 1));
int fs = xs_number_get(xs_list_get(file, 2));
/* store */
static_put(&snac, id, payload + fo, fs);
static_put_meta(&snac, id, desc);
/* prepare a response */
xs *rsp = xs_dict_new();
rsp = xs_dict_append(rsp, "id", id);
rsp = xs_dict_append(rsp, "type", "image");
rsp = xs_dict_append(rsp, "url", url);
rsp = xs_dict_append(rsp, "preview_url", url);
rsp = xs_dict_append(rsp, "remote_url", url);
rsp = xs_dict_append(rsp, "description", desc);
*body = xs_json_dumps(rsp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/accounts")) { /** **/
if (logged_in) {
/* account-related information */
xs *l = xs_split(cmd, "/");
const char *md5 = xs_list_get(l, 3);
const char *opt = xs_list_get(l, 4);
xs *rsp = NULL;
if (!xs_is_null(md5) && *md5) {
xs *actor_o = NULL;
if (xs_is_null(opt)) {
/* ? */
}
else
if (strcmp(opt, "follow") == 0) { /** **/
if (valid_status(object_get_by_md5(md5, &actor_o))) {
const char *actor = xs_dict_get(actor_o, "id");
xs *msg = msg_follow(&snac, actor);
if (msg != NULL) {
/* reload the actor from the message, in may be different */
actor = xs_dict_get(msg, "object");
following_add(&snac, actor, msg);
enqueue_output_by_actor(&snac, msg, actor, 0);
rsp = mastoapi_relationship(&snac, md5);
}
}
}
else
if (strcmp(opt, "unfollow") == 0) { /** **/
if (valid_status(object_get_by_md5(md5, &actor_o))) {
const char *actor = xs_dict_get(actor_o, "id");
/* get the following object */
xs *object = NULL;
if (valid_status(following_get(&snac, actor, &object))) {
xs *msg = msg_undo(&snac, xs_dict_get(object, "object"));
following_del(&snac, actor);
enqueue_output_by_actor(&snac, msg, actor, 0);
rsp = mastoapi_relationship(&snac, md5);
}
}
}
else
if (strcmp(opt, "block") == 0) { /** **/
if (valid_status(object_get_by_md5(md5, &actor_o))) {
const char *actor = xs_dict_get(actor_o, "id");
mute(&snac, actor);
rsp = mastoapi_relationship(&snac, md5);
}
}
else
if (strcmp(opt, "unblock") == 0) { /** **/
if (valid_status(object_get_by_md5(md5, &actor_o))) {
const char *actor = xs_dict_get(actor_o, "id");
unmute(&snac, actor);
rsp = mastoapi_relationship(&snac, md5);
}
}
}
if (rsp != NULL) {
*body = xs_json_dumps(rsp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/polls")) { /** **/
if (logged_in) {
/* operations on a status */
xs *l = xs_split(cmd, "/");
const char *mid = xs_list_get(l, 3);
const char *op = xs_list_get(l, 4);
if (!xs_is_null(mid)) {
xs *msg = NULL;
xs *out = NULL;
/* skip the 'fake' part of the id */
mid = MID_TO_MD5(mid);
/* try timeline first, then global object store for remote posts */
int found = valid_status(timeline_get_by_md5(&snac, mid, &msg));
if (!found)
found = valid_status(object_get_by_md5(mid, &msg));
if (found) {
const char *id = xs_dict_get(msg, "id");
const char *atto = get_atto(msg);
int closed = 0;
const char *f_closed = NULL;
if ((f_closed = xs_dict_get(msg, "closed")) != NULL) {
/* it has a closed date... but is it in the past? */
time_t t0 = time(NULL);
time_t t1 = xs_parse_iso_date(f_closed, 0);
if (t1 < t0)
closed = 1;
}
if (closed || was_question_voted(&snac, id))
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
else {
const xs_list *opts = xs_dict_get(msg, "oneOf");
if (opts == NULL)
opts = xs_dict_get(msg, "anyOf");
if (op == NULL) {
}
else {
if (strcmp(op, "votes") == 0) {
const xs_list *choices = xs_dict_get(args, "choices[]");
if (xs_is_null(choices))
choices = xs_dict_get(args, "choices");
if (xs_type(choices) == XSTYPE_LIST) {
const xs_str *v;
int c = 0;
while (xs_list_next(choices, &v, &c)) {
int io = atoi(v);
const xs_dict *o = xs_list_get(opts, io);
if (o) {
const char *name = xs_dict_get(o, "name");
xs *msg = msg_note(&snac, "", atto, (char *)id, NULL, 1, NULL, NULL);
msg = xs_dict_append(msg, "name", name);
xs *c_msg = msg_create(&snac, msg);
enqueue_message(&snac, c_msg);
timeline_add(&snac, xs_dict_get(msg, "id"), msg);
}
}
out = mastoapi_poll(&snac, msg);
}
}
}
}
}
if (out != NULL) {
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (strcmp(cmd, "/v1/lists") == 0) {
if (logged_in) {
const char *title = xs_dict_get(args, "title");
if (xs_type(title) == XSTYPE_STRING) {
/* add the list */
xs *out = xs_dict_new();
xs *lid = list_maint(&snac, title, OP_ADD);
if (!xs_is_null(lid)) {
out = xs_dict_append(out, "id", lid);
out = xs_dict_append(out, "title", title);
out = xs_dict_append(out, "replies_policy", xs_dict_get_def(args, "replies_policy", "list"));
out = xs_dict_append(out, "exclusive", xs_stock(XSTYPE_FALSE));
status = HTTP_STATUS_OK;
}
else {
out = xs_dict_append(out, "error", "cannot create list");
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
}
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
}
else
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
}
}
else
if (xs_startswith(cmd, "/v1/lists/")) { /** list maintenance **/
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *op = xs_list_get(l, -1);
const char *id = xs_list_get(l, -2);
if (op && id && xs_is_hex(id)) {
if (strcmp(op, "accounts") == 0) {
const xs_list *accts = xs_dict_get(args, "account_ids[]");
if (xs_is_null(accts))
accts = xs_dict_get(args, "account_ids");
int c = 0;
const char *v;
while (xs_list_next(accts, &v, &c)) {
list_members(&snac, id, v, OP_ADD);
}
xs *out = xs_dict_new();
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
}
else if (strcmp(cmd, "/v1/markers") == 0) { /** **/
xs_str *json = NULL;
if (logged_in) {
const xs_str *home_marker = xs_dict_get(args, "home[last_read_id]");
if (xs_is_null(home_marker)) {
const xs_dict *home = xs_dict_get(args, "home");
if (!xs_is_null(home))
home_marker = xs_dict_get(home, "last_read_id");
}
const xs_str *notify_marker = xs_dict_get(args, "notifications[last_read_id]");
if (xs_is_null(notify_marker)) {
const xs_dict *notify = xs_dict_get(args, "notifications");
if (!xs_is_null(notify))
notify_marker = xs_dict_get(notify, "last_read_id");
}
json = xs_json_dumps(markers_set(&snac, home_marker, notify_marker), 4);
}
if (!xs_is_null(json))
*body = json;
else
*body = xs_dup("{}");
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
if (xs_startswith(cmd, "/v1/follow_requests")) { /** **/
if (logged_in) {
/* "authorize" or "reject" */
xs *rel = NULL;
xs *l = xs_split(cmd, "/");
const char *md5 = xs_list_get(l, -2);
const char *s_cmd = xs_list_get(l, -1);
if (xs_is_string(md5) && xs_is_string(s_cmd)) {
xs *actor = NULL;
if (valid_status(object_get_by_md5(md5, &actor))) {
const char *actor_id = xs_dict_get(actor, "id");
if (strcmp(s_cmd, "authorize") == 0) {
xs *fwreq = pending_get(&snac, actor_id);
if (fwreq != NULL) {
xs *reply = msg_accept(&snac, fwreq, actor_id);
enqueue_message(&snac, reply);
if (xs_is_null(xs_dict_get(fwreq, "published"))) {
xs *date = xs_str_utctime(0, ISO_DATE_SPEC);
fwreq = xs_dict_set(fwreq, "published", date);
}
timeline_add(&snac, xs_dict_get(fwreq, "id"), fwreq);
follower_add(&snac, actor_id);
pending_del(&snac, actor_id);
rel = mastoapi_relationship(&snac, md5);
}
}
else
if (strcmp(s_cmd, "reject") == 0) {
pending_del(&snac, actor_id);
rel = mastoapi_relationship(&snac, md5);
}
}
}
if (rel != NULL) {
*body = xs_json_dumps(rel, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
if (xs_startswith(cmd, "/v1/tags/")) { /** **/
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *i_tag = xs_list_get(l, 3);
const char *cmd = xs_list_get(l, 4);
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
if (xs_is_string(i_tag) && xs_is_string(cmd)) {
int ok = 0;
xs *tag = xs_fmt("#%s", i_tag);
xs *followed_hashtags = xs_dup(xs_dict_get_def(snac.config,
"followed_hashtags", xs_stock(XSTYPE_LIST)));
if (strcmp(cmd, "follow") == 0) {
followed_hashtags = xs_list_append(followed_hashtags, tag);
ok = 1;
}
else
if (strcmp(cmd, "unfollow") == 0) {
int off = xs_list_in(followed_hashtags, tag);
if (off != -1)
followed_hashtags = xs_list_del(followed_hashtags, off);
ok = 1;
}
if (ok) {
/* update */
xs_dict_set(snac.config, "followed_hashtags", followed_hashtags);
user_persist(&snac, 0);
xs *d = xs_dict_new();
xs *s = xs_fmt("%s?t=%s", srv_baseurl, i_tag);
d = xs_dict_set(d, "name", i_tag);
d = xs_dict_set(d, "url", s);
d = xs_dict_set(d, "history", xs_stock(XSTYPE_LIST));
*body = xs_json_dumps(d, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
}
else
status = HTTP_STATUS_UNPROCESSABLE_CONTENT;
/* user cleanup */
if (logged_in)
user_free(&snac);
srv_debug(1, xs_fmt("mastoapi_post_handler %s %d", q_path, status));
return status;
}
int mastoapi_delete_handler(const xs_dict *req, const char *q_path,
const char *payload, int p_size,
char **body, int *b_size, char **ctype)
{
(void)p_size;
(void)b_size;
(void)ctype;
if (!xs_startswith(q_path, "/api/v1/") && !xs_startswith(q_path, "/api/v2/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
xs *args = NULL;
const char *i_ctype = xs_dict_get(req, "content-type");
if (i_ctype && xs_startswith(i_ctype, "application/json")) {
if (!xs_is_null(payload))
args = xs_json_loads(payload);
}
else if (i_ctype && xs_startswith(i_ctype, "application/x-www-form-urlencoded"))
{
// Some apps send form data instead of json so we should cater for those
if (!xs_is_null(payload)) {
args = xs_url_vars(payload);
}
}
else
args = xs_dup(xs_dict_get(req, "p_vars"));
if (args == NULL)
return HTTP_STATUS_BAD_REQUEST;
snac snac = {0};
int logged_in = process_auth_token(&snac, req);
xs *cmd = xs_replace_n(q_path, "/api", "", 1);
if (xs_startswith(cmd, "/v1/push/subscription") || xs_startswith(cmd, "/v2/push/subscription")) { /** **/
// pretend we deleted it, since it doesn't exist anyway
status = HTTP_STATUS_OK;
}
else
if (xs_startswith(cmd, "/v1/lists/")) {
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *p = xs_list_get(l, -1);
if (p) {
if (strcmp(p, "accounts") == 0) {
/* delete account from list */
p = xs_list_get(l, -2);
const xs_list *accts = xs_dict_get(args, "account_ids[]");
if (xs_is_null(accts))
accts = xs_dict_get(args, "account_ids");
int c = 0;
const char *v;
while (xs_list_next(accts, &v, &c)) {
list_members(&snac, p, v, OP_DEL);
}
}
else {
/* delete list */
if (xs_is_hex(p)) {
list_maint(&snac, p, OP_DEL);
}
}
}
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/statuses/")) {
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *p = xs_list_get(l, -1);
p = MID_TO_MD5(p);
xs *obj = NULL;
if (valid_status(object_get_by_md5(p, &obj))) {
const char *id = xs_dict_get(obj, "id");
if (xs_is_string(id) && is_msg_mine(&snac, id)) {
xs *out = mastoapi_status(&snac, obj);
xs *msg = msg_delete(&snac, id);
enqueue_message(&snac, msg);
timeline_del(&snac, id);
draft_del(&snac, id);
schedule_del(&snac, id);
snac_log(&snac, xs_fmt("deleted entry %s", id));
*body = xs_json_dumps(out, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/profile/")) {
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *p = xs_list_get(l, -1);
if (strcmp(p, "avatar") == 0 || strcmp(p, "header") == 0) {
snac.config = xs_dict_set(snac.config, p, "");
if (user_persist(&snac, 1) == 0)
credentials_get(body, ctype, &status, snac);
else
status = HTTP_STATUS_INTERNAL_SERVER_ERROR;
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
/* user cleanup */
if (logged_in)
user_free(&snac);
srv_debug(1, xs_fmt("mastoapi_delete_handler %s %d", q_path, status));
return status;
}
int mastoapi_put_handler(const xs_dict *req, const char *q_path,
const char *payload, int p_size,
char **body, int *b_size, char **ctype)
{
(void)p_size;
(void)b_size;
if (!xs_startswith(q_path, "/api/v1/") && !xs_startswith(q_path, "/api/v2/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
xs *args = NULL;
const char *i_ctype = xs_dict_get(req, "content-type");
if (i_ctype && xs_startswith(i_ctype, "application/json")) {
if (!xs_is_null(payload))
args = xs_json_loads(payload);
}
else if (i_ctype && xs_startswith(i_ctype, "application/x-www-form-urlencoded"))
{
// Some apps send form data instead of json so we should cater for those
if (!xs_is_null(payload)) {
args = xs_url_vars(payload);
}
}
else if (i_ctype && xs_startswith(i_ctype, "multipart/form-data"))
{
// Handle multipart/form-data by using p_vars (already parsed by httpd)
args = xs_dup(xs_dict_get(req, "p_vars"));
}
/* if args still NULL, try falling back to p_vars or q_vars */
if (args == NULL)
args = xs_dup(xs_dict_get(req, "p_vars"));
if (args == NULL)
args = xs_dup(xs_dict_get(req, "q_vars"));
if (args == NULL) {
srv_debug(1, xs_fmt("mastoapi_put_handler: failed to parse args for %s, content-type: %s",
q_path, i_ctype ? i_ctype : "(null)"));
return HTTP_STATUS_BAD_REQUEST;
}
xs *cmd = xs_replace_n(q_path, "/api", "", 1);
snac snac = {0};
int logged_in = process_auth_token(&snac, req);
if (xs_startswith(cmd, "/v1/media") || xs_startswith(cmd, "/v2/media")) { /** **/
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *stid = xs_list_get(l, 3);
if (!xs_is_null(stid)) {
const char *desc = xs_dict_get(args, "description");
/* set the image metadata */
static_put_meta(&snac, stid, desc);
/* prepare a response */
xs *rsp = xs_dict_new();
xs *url = xs_fmt("%s/s/%s", snac.actor, stid);
rsp = xs_dict_append(rsp, "id", stid);
rsp = xs_dict_append(rsp, "type", "image");
rsp = xs_dict_append(rsp, "url", url);
rsp = xs_dict_append(rsp, "preview_url", url);
rsp = xs_dict_append(rsp, "remote_url", url);
rsp = xs_dict_append(rsp, "description", desc);
*body = xs_json_dumps(rsp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
else
if (xs_startswith(cmd, "/v1/statuses")) {
if (logged_in) {
xs *l = xs_split(cmd, "/");
const char *mid = xs_list_get(l, 3);
if (!xs_is_null(mid)) {
const char *md5 = MID_TO_MD5(mid);
xs *rsp = NULL;
xs *msg = NULL;
if (valid_status(timeline_get_by_md5(&snac, md5, &msg))) {
const char *content = xs_dict_get(args, "status");
xs *atls = xs_list_new();
xs *tag = xs_list_new();
xs *f_content0 = not_really_markdown(content, &atls, &tag);
xs *f_content = process_tags(&snac, f_content0, &tag);
/* replace fields with new content */
msg = xs_dict_set(msg, "sourceContent", content);
msg = xs_dict_set(msg, "content", f_content);
xs *content_map = xs_dup(xs_dict_get(msg, "contentMap"));
if (xs_is_dict(content_map)) {
/* get the first pair */
const char *k, *v;
int c = 0;
if (xs_dict_next(content_map, &k, &v, &c)) {
content_map = xs_dict_set(content_map, k, f_content);
msg = xs_dict_set(msg, "contentMap", content_map);
}
}
xs *updated = xs_str_utctime(0, ISO_DATE_SPEC);
msg = xs_dict_set(msg, "updated", updated);
msg = xs_dict_set(msg, "tag", tag);
if (xs_is_true(xs_dict_get(args, "sensitive"))) {
const char *spoiler_text = xs_dict_get(args, "spoiler_text");
msg = xs_dict_set(msg, "summary", spoiler_text);
msg = xs_dict_set(msg, "sensitive", xs_stock(XSTYPE_TRUE));
}
else {
msg = xs_dict_set(msg, "summary", "");
msg = xs_dict_set(msg, "sensitive", xs_stock(XSTYPE_FALSE));
}
/* overwrite object, not updating the indexes */
const char *id = xs_dict_get(msg, "id");
object_add_ow(id, msg);
tag_index(id, msg);
/* update message */
xs *c_msg = msg_update(&snac, msg);
enqueue_message(&snac, c_msg);
rsp = mastoapi_status(&snac, msg);
}
if (rsp != NULL) {
*body = xs_json_dumps(rsp, 4);
*ctype = "application/json";
status = HTTP_STATUS_OK;
}
}
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
/* user cleanup */
if (logged_in)
user_free(&snac);
srv_debug(1, xs_fmt("mastoapi_put_handler %s %d", q_path, status));
return status;
}
void persist_image(const char *key, const xs_val *data, const char *payload, snac *snac)
/* Store header or avatar */
{
if (data != NULL) {
if (xs_type(data) == XSTYPE_LIST) {
const char *fn = xs_list_get(data, 0);
if (fn && *fn) {
const char *ext = strrchr(fn, '.');
/* Mona iOS sends always jpg as application/octet-stream with no filename */
if (ext == NULL || strcmp(fn, key) == 0) {
ext = ".jpg";
}
/* Make sure we have a unique file name, otherwise updated images will not be
* re-loaded by clients. */
xs *rnd = random_str();
xs *hash = xs_md5_hex(rnd, strlen(rnd));
xs *id = xs_fmt("%s%s", hash, ext);
xs *url = xs_fmt("%s/s/%s", snac->actor, id);
int fo = xs_number_get(xs_list_get(data, 1));
int fs = xs_number_get(xs_list_get(data, 2));
/* store */
static_put(snac, id, payload + fo, fs);
snac->config = xs_dict_set(snac->config, key, url);
}
}
}
}
int mastoapi_patch_handler(const xs_dict *req, const char *q_path,
const char *payload, int p_size,
char **body, int *b_size, char **ctype)
/* Handle profile updates */
{
(void)p_size;
(void)b_size;
if (!xs_startswith(q_path, "/api/v1/"))
return 0;
int status = HTTP_STATUS_NOT_FOUND;
xs *args = NULL;
const char *i_ctype = xs_dict_get(req, "content-type");
if (i_ctype && xs_startswith(i_ctype, "application/json")) {
if (!xs_is_null(payload))
args = xs_json_loads(payload);
}
else if (i_ctype && xs_startswith(i_ctype, "application/x-www-form-urlencoded"))
{
// Some apps send form data instead of json so we should cater for those
if (!xs_is_null(payload)) {
args = xs_url_vars(payload);
}
}
else if (i_ctype && xs_startswith(i_ctype, "multipart/form-data"))
{
// Handle multipart/form-data by using p_vars (already parsed by httpd)
args = xs_dup(xs_dict_get(req, "p_vars"));
}
/* if args still NULL, try falling back to p_vars or q_vars */
if (args == NULL)
args = xs_dup(xs_dict_get(req, "p_vars"));
if (args == NULL)
args = xs_dup(xs_dict_get(req, "q_vars"));
if (args == NULL) {
srv_debug(1, xs_fmt("mastoapi_patch_handler: failed to parse args for %s, content-type: %s",
q_path, i_ctype ? i_ctype : "(null)"));
return HTTP_STATUS_BAD_REQUEST;
}
xs *cmd = xs_replace_n(q_path, "/api", "", 1);
snac snac = {0};
int logged_in = process_auth_token(&snac, req);
if (xs_startswith(cmd, "/v1/accounts/update_credentials")) { /** **/
/* Update user profile fields */
if (logged_in) {
int c = 0;
const xs_str *k;
const xs_val *v;
const xs_str *field_name = NULL;
xs *new_fields = xs_dict_new();
while (xs_dict_next(args, &k, &v, &c)) {
if (strcmp(k, "display_name") == 0) {
if (v != NULL)
snac.config = xs_dict_set(snac.config, "name", v);
}
else
if (strcmp(k, "note") == 0) {
if (v != NULL)
snac.config = xs_dict_set(snac.config, "bio", v);
}
else
if (strcmp(k, "bot") == 0) {
if (v != NULL)
snac.config = xs_dict_set(snac.config, "bot",
(strcmp(v, "true") == 0 ||
strcmp(v, "1") == 0) ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
}
else
if (strcmp(k, "source[sensitive]") == 0) {
if (v != NULL)
snac.config = xs_dict_set(snac.config, "cw",
strcmp(v, "true") == 0 ? "open" : "");
}
else
if (strcmp(k, "source[privacy]") == 0) {
if (v != NULL)
snac.config = xs_dict_set(snac.config, "private",
strcmp(v, "private") == 0 ? xs_stock(XSTYPE_TRUE) : xs_stock(XSTYPE_FALSE));
}
else
if (strcmp(k, "header") == 0) {
persist_image("header", v, payload, &snac);
}
else
if (strcmp(k, "avatar") == 0) {
persist_image("avatar", v, payload, &snac);
}
else
if (xs_between("fields_attributes", k, "[name]")) {
field_name = strcmp(v, "") != 0 ? v : NULL;
}
else
if (xs_between("fields_attributes", k, "[value]")) {
if (field_name != NULL) {
new_fields = xs_dict_set(new_fields, field_name, v);
snac.config = xs_dict_set(snac.config, "metadata", new_fields);
}
}
else
if (strcmp(k, "locked") == 0) {
snac.config = xs_dict_set(snac.config, "approve_followers",
xs_stock(strcmp(v, "true") == 0 ? XSTYPE_TRUE : XSTYPE_FALSE));
}
/* we don't have support for the following options, yet
- discoverable (0/1)
*/
}
/* Persist profile */
if (user_persist(&snac, 1) == 0)
credentials_get(body, ctype, &status, snac);
else
status = HTTP_STATUS_INTERNAL_SERVER_ERROR;
}
else
status = HTTP_STATUS_UNAUTHORIZED;
}
/* user cleanup */
if (logged_in)
user_free(&snac);
srv_debug(1, xs_fmt("mastoapi_patch_handler %s %d", q_path, status));
return status;
}
void mastoapi_purge(void)
{
xs *spec = xs_fmt("%s/app/" "*.json", srv_basedir);
xs *files = xs_glob(spec, 1, 0);
xs_list *p = files;
const xs_str *v;
time_t mt = time(NULL) - 3600;
while (xs_list_iter(&p, &v)) {
xs *cid = xs_replace(v, ".json", "");
xs *fn = _app_fn(cid);
if (mtime(fn) < mt) {
/* get the app */
xs *app = app_get(cid);
if (app) {
/* old apps with no uid are incomplete cruft */
const char *uid = xs_dict_get(app, "uid");
if (xs_is_null(uid) || *uid == '\0') {
unlink(fn);
srv_debug(2, xs_fmt("purged %s", fn));
}
}
}
}
}
#endif /* #ifndef NO_MASTODON_API */