/*
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You under the Apache License, Version 2.0
 * (the "License"); you may not use this file except in compliance with
 * the License.  You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

package org.apache.tomee.security.http;

import org.apache.openejb.util.LogCategory;
import org.apache.openejb.util.Logger;

import jakarta.json.bind.Jsonb;
import jakarta.json.bind.JsonbBuilder;
import jakarta.json.bind.JsonbConfig;
import jakarta.json.bind.annotation.JsonbTransient;
import jakarta.json.bind.serializer.DeserializationContext;
import jakarta.json.bind.serializer.JsonbDeserializer;
import jakarta.json.bind.serializer.JsonbSerializer;
import jakarta.json.bind.serializer.SerializationContext;
import jakarta.json.stream.JsonGenerator;
import jakarta.json.stream.JsonParser;
import jakarta.servlet.http.Cookie;
import jakarta.servlet.http.HttpServletRequest;
import jakarta.servlet.http.HttpServletRequestWrapper;
import java.io.Serializable;
import java.lang.reflect.Type;
import java.util.Collections;
import java.util.Enumeration;
import java.util.HashMap;
import java.util.List;
import java.util.Map;

// JSON-B friendly class that stores the request data required for #
// both @LoginToContinue and @OpenIdAuthenticationMechanismDefinition(redirectToOriginalResource=true)
public class SavedRequest implements Serializable {
    private static final Logger LOGGER = Logger.getInstance(LogCategory.TOMEE_SECURITY, SavedRequest.class);

    private static final CookieDeSerializer COOKIE_DE_SERIALIZER = new CookieDeSerializer();
    private static final JsonbConfig jsonbConfig = new JsonbConfig()
            .withSerializers(COOKIE_DE_SERIALIZER)
            .withDeserializers(COOKIE_DE_SERIALIZER);

    private Cookie[] cookies;
    private Map<String, List<String>> headers;
    private String method;
    private String url;
    private String queryString;
    private Map<String, String[]> parameterMap;

    public static SavedRequest fromRequest(HttpServletRequest request) {
        Map<String, List<String>> headers = new HashMap<>();
        Enumeration<String> headerNames = request.getHeaderNames();

        if (headerNames != null) {
            while (headerNames.hasMoreElements()) {
                String name = headerNames.nextElement();
                headers.put(name, Collections.list(request.getHeaders(name)));
            }
        }

        SavedRequest result = new SavedRequest();
        result.setCookies(request.getCookies());
        result.setHeaders(headers);
        result.setMethod(request.getMethod());
        result.setUrl(request.getRequestURL().toString());
        result.setQueryString(request.getQueryString());
        result.setParameterMap(request.getParameterMap());

        return result;
    }

    public static SavedRequest fromJson(String json) {
        try (Jsonb jsonb = JsonbBuilder.create(jsonbConfig)) {
            return jsonb.fromJson(json, SavedRequest.class);
        } catch (Exception e) {
            LOGGER.error("Could not restore request from JSON", e);
            return null;
        }
    }

    public HttpServletRequest mask(HttpServletRequest masked) {
        return new HttpServletRequestWrapper(masked) {
            @Override
            public Cookie[] getCookies() {
                return cookies;
            }

            @Override
            public Enumeration<String> getHeaderNames() {
                return headers != null ? Collections.enumeration(headers.keySet()) : Collections.emptyEnumeration();
            }

            @Override
            public Enumeration<String> getHeaders(String name) {
                List<String> header = headers != null ? headers.get(name) : null;
                if (header == null) {
                    header = Collections.emptyList();
                }
                return Collections.enumeration(header);
            }

            @Override
            public String getHeader(String name) {
                List<String> header = headers != null ? headers.get(name) : null;
                if (header == null || header.isEmpty()) {
                    return null;
                }
                return header.get(0);
            }

            @Override
            public String getMethod() {
                return method;
            }

            @Override
            public StringBuffer getRequestURL() {
                return new StringBuffer(url);
            }

            @Override
            public String getQueryString() {
                return queryString;
            }

            @Override
            public Enumeration<String> getParameterNames() {
                return Collections.enumeration(getParameterMap().keySet());
            }

            @Override
            public String[] getParameterValues(String name) {
                return getParameterMap().get(name);
            }

            @Override
            public String getParameter(String name) {
                String[] values = getParameterValues(name);
                return values == null || values.length == 0 ? null : values[0];
            }

            @Override
            public Map<String, String[]> getParameterMap() {
                return parameterMap != null ? parameterMap : Collections.emptyMap();
            }
        };
    }

    public String toJson() {
        try (Jsonb jsonb = JsonbBuilder.create(jsonbConfig)) {
            return jsonb.toJson(this);
        } catch (Exception e) {
            LOGGER.error("Could not store request in JSON", e);
            return null;
        }
    }

    public Cookie[] getCookies() {
        return cookies;
    }

    public void setCookies(Cookie[] cookies) {
        this.cookies = cookies;
    }

    public Map<String, List<String>> getHeaders() {
        return headers;
    }

    public void setHeaders(Map<String, List<String>> headers) {
        this.headers = headers;
    }

    public String getMethod() {
        return method;
    }

    public void setMethod(String method) {
        this.method = method;
    }

    public String getUrl() {
        return url;
    }

    public void setUrl(String url) {
        this.url = url;
    }

    public String getQueryString() {
        return queryString;
    }

    public void setQueryString(String queryString) {
        this.queryString = queryString;
    }

    public Map<String, String[]> getParameterMap() {
        return parameterMap;
    }

    public void setParameterMap(Map<String, String[]> parameterMap) {
        this.parameterMap = parameterMap;
    }

    @JsonbTransient
    public String getUrlWithQueryString() {
        return queryString == null ? url : url + "?" + queryString;
    }

    public static class CookieDeSerializer implements JsonbSerializer<Cookie>, JsonbDeserializer<Cookie> {
        @Override
        public Cookie deserialize(JsonParser parser, DeserializationContext ctx, Type rtType) {
            String name = null;
            String value = null;
            Map<String, String> attributes = null;

            while (parser.hasNext()) {
                JsonParser.Event current = parser.next();

                if (current == JsonParser.Event.KEY_NAME) {
                    String key = parser.getString();

                    // move forward to value
                    parser.next();

                    if ("name".equals(key)) {
                        name = parser.getString();
                    } else if ("value".equals(key)) {
                        value = parser.getString();
                    } else if ("attributes".equals(key)) {
                        attributes = ctx.deserialize(Map.class, parser);
                    }
                }
            }

            Cookie cookie = new Cookie(name, value);
            if (attributes != null) {
                for (Map.Entry<String, String> entry : attributes.entrySet()) {
                    cookie.setAttribute(entry.getKey(), entry.getValue());
                }
            }

            return cookie;
        }

        @Override
        public void serialize(Cookie obj, JsonGenerator generator, SerializationContext ctx) {
            generator.write("name", obj.getName());
            generator.write("value", obj.getValue());
            ctx.serialize("attributes", obj.getAttributes(), generator);
        }
    }
}
