/*
 * Copyright (C) 2008-2020, Juick
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Affero General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

package com.juick.service;

import com.juick.model.User;
import com.juick.service.activities.DeleteUserEvent;
import com.juick.util.DateFormattersHolder;
import com.juick.www.api.activity.model.Context;
import com.juick.www.api.activity.model.objects.Actor;
import com.fasterxml.jackson.databind.ObjectMapper;
import com.juick.KeystoreManager;
import com.juick.model.AnonymousUser;

import org.apache.commons.codec.binary.Base64;
import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Value;
import org.springframework.cache.annotation.Cacheable;
import org.springframework.context.ApplicationEventPublisher;
import org.springframework.core.convert.ConversionService;
import org.springframework.dao.DuplicateKeyException;
import org.springframework.http.*;
import org.springframework.stereotype.Repository;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.web.client.RestTemplate;
import org.springframework.web.util.UriComponents;
import org.springframework.web.util.UriComponentsBuilder;
import org.tomitribe.auth.signatures.MissingRequiredHeaderException;
import org.tomitribe.auth.signatures.Signature;
import org.tomitribe.auth.signatures.Verifier;

import javax.annotation.Nonnull;
import javax.inject.Inject;

import java.io.IOException;
import java.net.URI;
import java.security.Key;
import java.security.MessageDigest;
import java.security.NoSuchAlgorithmException;
import java.security.SignatureException;
import java.time.Instant;
import java.util.Collections;
import java.util.List;
import java.util.Map;
import java.util.Optional;

@Repository
public class ActivityPubService extends BaseJdbcService implements SocialService {

    private static final Logger logger = LoggerFactory.getLogger("ActivityPub");

    @Value("${ap_base_uri:http://localhost:8080/}")
    private String baseUri;
    @Inject
    private UserService userService;
    @Inject
    private RestTemplate restClient;
    @Inject
    private ObjectMapper jsonMapper;
    @Inject
    private SignatureService signatureService;
    @Inject
    private ApplicationEventPublisher applicationEventPublisher;
    @Inject
    private KeystoreManager keystoreManager;
    @Inject
    private User serviceUser;
    @Inject
    private ConversionService conversionService;

    @Transactional(readOnly = true)
    @Override
    public @Nonnull User getUserByAccountUri(String acct) {
        UriComponents baseUriComponents = UriComponentsBuilder.fromUriString(baseUri).build();
        UriComponents acctComponents = UriComponentsBuilder.fromUriString(acct).build();
        if (acctComponents.getHost().equals(baseUriComponents.getHost())) {
            // /u/ugnich -> ugnich
            String userName = acctComponents.getPath().substring(3);
            return userService.getUserByName(userName);
        }
        return AnonymousUser.INSTANCE;
    }

    @Transactional(readOnly = true)
    @Override
    public @Nonnull List<String> getFollowers(User user) {
        return getJdbcTemplate().queryForList("SELECT acct FROM followers WHERE user_id=?", String.class,
                user.getUid());
    }

    @Transactional
    @Override
    public void addFollower(User user, String acct) {
        try {
            getJdbcTemplate().update("INSERT INTO followers(user_id, acct) " +
                    "VALUES(?, ?)", user.getUid(), acct);
        } catch (DuplicateKeyException e) {
            // ignore
        }
    }

    @Transactional
    @Override
    public void removeFollower(User user, String acct) {
        getJdbcTemplate().update("DELETE FROM followers WHERE user_id=? AND acct=?", user.getUid(), acct);
    }

    @Transactional
    @Override
    public void removeAccount(String acct) {
        getJdbcTemplate().update("DELETE FROM followers WHERE acct=?", acct);
    }

    @Cacheable("profiles")
    public Optional<Context> get(URI contextUri) {
        Instant now = Instant.now();
        String requestDate = DateFormattersHolder.getHttpDateFormatter().format(now);
        String host = contextUri.getPort() > 0 ? String.format("%s:%d", contextUri.getHost(), contextUri.getPort())
                : contextUri.getHost();
        var from = conversionService.convert(serviceUser, Actor.class);
        try {
            String signatureString = signatureService.addSignature(from, host, "get", contextUri.getPath(), requestDate,
                    "");
            HttpHeaders requestHeaders = new HttpHeaders();
            requestHeaders.add("Date", requestDate);
            requestHeaders.add("Host", host);
            requestHeaders.add("Signature", signatureString);
            requestHeaders.setAccept(Collections.singletonList(MediaType.valueOf(Context.ACTIVITY_MEDIA_TYPE)));
            HttpEntity<Void> activityRequest = new HttpEntity<>(requestHeaders);
            var response = restClient.exchange(contextUri, HttpMethod.GET, activityRequest, Context.class);
            if (response.getStatusCode().is2xxSuccessful()) {
                var context = response.getBody();
                if (context == null) {
                    logger.warn("Cannot identify {}", contextUri);
                    return Optional.empty();
                }
                return Optional.of(context);
            }
        } catch (IOException e) {
            logger.warn("HTTP Signature exception: {}", e.getMessage());
        }
        return Optional.empty();
    }

    public HttpStatusCode post(Actor from, Actor to, Context data) throws IOException, NoSuchAlgorithmException {
        UriComponentsBuilder uriComponentsBuilder = UriComponentsBuilder.fromUriString(to.getInbox());
        URI inbox = uriComponentsBuilder.build().toUri();
        Instant now = Instant.now();
        String requestDate = DateFormattersHolder.getHttpDateFormatter().format(now);
        String host = inbox.getPort() > 0 ? String.format("%s:%d", inbox.getHost(), inbox.getPort()) : inbox.getHost();
        var finalContext = Context.build(data);
        var payload = jsonMapper.writeValueAsString(finalContext);
        final byte[] digest = MessageDigest.getInstance("SHA-256").digest(payload.getBytes()); // (1)
        final String digestHeader = "SHA-256=" + new String(Base64.encodeBase64(digest));
        String signatureString = signatureService.addSignature(from, host, "post", inbox.getPath(), requestDate,
                digestHeader);

        HttpHeaders requestHeaders = new HttpHeaders();
        requestHeaders.add("Content-Type", Context.ACTIVITYSTREAMS_PROFILE_MEDIA_TYPE);
        requestHeaders.add("Date", requestDate);
        requestHeaders.add("Host", host);
        requestHeaders.add("Digest", digestHeader);
        requestHeaders.add("Signature", signatureString);
        HttpEntity<String> request = new HttpEntity<>(payload, requestHeaders);
        logger.debug("Sending context to {}: {}", to.getId(), payload);
        ResponseEntity<String> response = restClient.postForEntity(inbox, request, String.class);
        logger.debug("Remote response: {} {}", response.getStatusCode(), response.getBody());
        return response.getStatusCode();
    }

    public User verifyActor(String method, String path, Map<String, String> headers) {
        String signatureString = headers.get("signature");
        if (StringUtils.isNotEmpty(signatureString)) {
            try {
                Signature signature = Signature.fromString(signatureString);
                var keyId = UriComponentsBuilder.fromUriString(signature.getKeyId()).fragment(null).build().toUri();
                var user = getUserByAccountUri(keyId.toASCIIString());
                Key key = null;
                Actor actor = null;
                if (!user.isAnonymous()) {
                    // local user
                    key = keystoreManager.getPublicKey();
                } else {
                    var context = get(keyId);
                    if (context.isPresent()) {
                        actor = (Actor) context.get();
                        key = KeystoreManager.publicKeyOf(actor);
                    }
                }
                if (key != null) {
                    Verifier verifier = new Verifier(key, signature);
                    try {
                        boolean result = verifier.verify(method.toLowerCase(), path, headers);
                        if (result) {
                            if (!user.isAnonymous()) {
                                return user;
                            } else {
                                if (actor != null) {
                                    User person = new User();
                                    person.setUri(URI.create(actor.getId()));
                                    if (actor.isSuspended()) {
                                        logger.info("{} is suspended, deleting", actor.getId());
                                        applicationEventPublisher
                                                .publishEvent(new DeleteUserEvent(this, actor.getId()));
                                    }
                                    return person;
                                }
                            }
                        }
                    } catch (NoSuchAlgorithmException | SignatureException | MissingRequiredHeaderException
                            | IOException e) {
                        logger.warn("Verification error for {}: {}", signature.getKeyId(), e.getMessage());
                    }
                }
            } catch (Exception ex) {

            }
        }
        return AnonymousUser.INSTANCE;
    }
}