/*
    * Copyright 2022 The Netty Project
    *
    * The Netty Project 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:
    *
    *   https://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 io.netty.handler.ssl.ocsp;
  
  import io.netty.buffer.ByteBuf;
  import io.netty.channel.ChannelHandlerContext;
  import io.netty.channel.ChannelOutboundHandler;
  import io.netty.channel.ChannelPromise;
  import io.netty.handler.codec.ByteToMessageDecoder;
  import io.netty.handler.ssl.SslHandler;
  import io.netty.handler.ssl.SslHandshakeCompletionEvent;
  import io.netty.resolver.dns.DnsNameResolver;
  import io.netty.resolver.dns.DnsNameResolverBuilder;
  import io.netty.util.AttributeKey;
  import io.netty.util.concurrent.Future;
  import io.netty.util.concurrent.GenericFutureListener;
  import io.netty.util.concurrent.Promise;
  import io.netty.util.internal.SystemPropertyUtil;
  import org.bouncycastle.cert.ocsp.BasicOCSPResp;
  import org.bouncycastle.cert.ocsp.OCSPException;
  import org.bouncycastle.cert.ocsp.RevokedStatus;
  import org.bouncycastle.cert.ocsp.SingleResp;
  
  import java.net.SocketAddress;
  import java.security.cert.Certificate;
  import java.security.cert.X509Certificate;
  import java.util.Date;
  import java.util.List;
  import java.util.concurrent.TimeUnit;
  
  import static io.netty.util.internal.ObjectUtil.checkNotNull;
  
  /**
   * {@link OcspServerCertificateValidator} validates incoming server's certificate
   * using OCSP. Once TLS handshake is completed, {@link SslHandshakeCompletionEvent#SUCCESS} is fired, validator
   * will perform certificate validation using OCSP over HTTP/1.1 with the server's certificate issuer OCSP responder.
   */
  public class OcspServerCertificateValidator extends ByteToMessageDecoder implements ChannelOutboundHandler {
      /**
       * An attribute used to mark all channels created by the {@link OcspServerCertificateValidator}.
       */
      public static final AttributeKey<Boolean> OCSP_PIPELINE_ATTRIBUTE =
              AttributeKey.newInstance("io.netty.handler.ssl.ocsp.pipeline");
  
      /**
       * Tolerate some clock skew in the OCSP validity time. Default to 15 minutes, which is the same as the JDK.
       */
      private static final long CLOCK_SKEW_TOLERANCE_MILLIS = getClockSkewTolerance();
  
      private static long getClockSkewTolerance() {
          long defaultToleranceSeconds = TimeUnit.MINUTES.toSeconds(15);
          long maxToleranceSeconds = TimeUnit.DAYS.toSeconds(2);
          long configuredToleranceSeconds = SystemPropertyUtil.getLong("io.netty.handler.ssl.ocsp.clockSkew",
              SystemPropertyUtil.getLong("com.sun.security.ocsp.clockSkew", defaultToleranceSeconds));
          if (configuredToleranceSeconds < 0 || configuredToleranceSeconds > maxToleranceSeconds) {
              // Ignore negative and extremely large values.
              configuredToleranceSeconds = defaultToleranceSeconds;
          }
          return TimeUnit.SECONDS.toMillis(configuredToleranceSeconds);
      }
  
      private final boolean closeAndThrowIfNotValid;
      private final boolean validateNonce;
      private final IoTransport ioTransport;
      private final DnsNameResolver dnsNameResolver;
      private boolean ocspQueryInProgress;
      private boolean readPending;
  
      /**
       * Create a new {@link OcspServerCertificateValidator} instance without nonce validation
       * on OCSP response, using default {@link IoTransport#DEFAULT} instance,
       * default {@link DnsNameResolver} implementation and with {@link #closeAndThrowIfNotValid}
       * set to {@code true}
       */
      public OcspServerCertificateValidator() {
          this(false);
      }
  
      /**
       * Create a new {@link OcspServerCertificateValidator} instance with
       * default {@link IoTransport#DEFAULT} instance and default {@link DnsNameResolver} implementation
       * and {@link #closeAndThrowIfNotValid} set to {@code true}.
       *
       * @param validateNonce Set to {@code true} if we should force nonce validation on
       *                      OCSP response else set to {@code false}
       */
     public OcspServerCertificateValidator(boolean validateNonce) {
         this(validateNonce, IoTransport.DEFAULT);
     }
 
     /**
      * Create a new {@link OcspServerCertificateValidator} instance
      *
      * @param validateNonce Set to {@code true} if we should force nonce validation on
      *                      OCSP response else set to {@code false}
      * @param ioTransport   {@link IoTransport} to use
      */
     public OcspServerCertificateValidator(boolean validateNonce, IoTransport ioTransport) {
         this(validateNonce, ioTransport, createDefaultResolver(ioTransport));
     }
 
     /**
      * Create a new {@link IoTransport} instance with {@link #closeAndThrowIfNotValid} set to {@code true}
      *
      * @param validateNonce   Set to {@code true} if we should force nonce validation on
      *                        OCSP response else set to {@code false}
      * @param ioTransport     {@link IoTransport} to use
      * @param dnsNameResolver {@link DnsNameResolver} implementation to use
      */
     public OcspServerCertificateValidator(boolean validateNonce, IoTransport ioTransport,
                                           DnsNameResolver dnsNameResolver) {
         this(true, validateNonce, ioTransport, dnsNameResolver);
     }
 
     /**
      * Create a new {@link IoTransport} instance
      *
      * @param closeAndThrowIfNotValid If set to {@code true} then we will close the channel and throw an exception
      *                                when certificate is not {@link OcspResponse.Status#VALID}.
      *                                If set to {@code false} then we will simply pass the {@link OcspValidationEvent}
      *                                to the next handler in pipeline and let it decide what to do.
      * @param validateNonce           Set to {@code true} if we should force nonce validation on
      *                                OCSP response else set to {@code false}
      * @param ioTransport             {@link IoTransport} to use
      * @param dnsNameResolver         {@link DnsNameResolver} implementation to use
      */
     public OcspServerCertificateValidator(boolean closeAndThrowIfNotValid, boolean validateNonce,
                                           IoTransport ioTransport, DnsNameResolver dnsNameResolver) {
         this.closeAndThrowIfNotValid = closeAndThrowIfNotValid;
         this.validateNonce = validateNonce;
         this.ioTransport = checkNotNull(ioTransport, "IoTransport");
         this.dnsNameResolver = checkNotNull(dnsNameResolver, "DnsNameResolver");
     }
 
     protected static DnsNameResolver createDefaultResolver(final IoTransport ioTransport) {
         return new DnsNameResolverBuilder()
                 .eventLoop(ioTransport.eventLoop())
                 .datagramChannelFactory(ioTransport.datagramChannel())
                 .socketChannelFactory(ioTransport.socketChannel())
                 .build();
     }
 
     @Override
     protected void decode(ChannelHandlerContext ctx, ByteBuf in, List<Object> out) {
         // Just buffer until the handler is removed which will happen once we did finish the OCSP processing.
     }
 
     @Override
     public void userEventTriggered(final ChannelHandlerContext ctx, final Object evt) throws Exception {
         if (evt instanceof SslHandshakeCompletionEvent) {
             SslHandshakeCompletionEvent sslHandshakeCompletionEvent = (SslHandshakeCompletionEvent) evt;
 
             // If TLS handshake was successful then only we will perform OCSP certificate validation.
             // If not, then just forward the event to next handler in pipeline and remove ourselves from pipeline.
             if (sslHandshakeCompletionEvent.isSuccess()) {
                 Certificate[] certificates = ctx.pipeline().get(SslHandler.class)
                         .engine()
                         .getSession()
                         .getPeerCertificates();
 
                 assert certificates.length >= 2 : "There must an end-entity certificate and issuer certificate";
 
                 Promise<BasicOCSPResp> ocspRespPromise = ctx.executor().newPromise();
                 OcspClient.query((X509Certificate) certificates[0], (X509Certificate) certificates[1],
                         validateNonce, ioTransport, dnsNameResolver, ocspRespPromise);
                 ocspQueryInProgress = true;
                 ocspRespPromise.addListener((GenericFutureListener<Future<BasicOCSPResp>>) future -> {
                     ocspQueryInProgress = false;
                     try {
                         // If Future is success then we have successfully received OCSP response
                         // from OCSP responder. We will validate it now and process.
                         if (future.isSuccess()) {
                             SingleResp response = future.getNow().getResponses()[0];
 
                             Date thisUpdate = response.getThisUpdate();
                             Date nextUpdate = response.getNextUpdate();
                             long now = System.currentTimeMillis();
                             Date nowLower = new Date(now - CLOCK_SKEW_TOLERANCE_MILLIS);
                             Date nowUpper = new Date(now + CLOCK_SKEW_TOLERANCE_MILLIS);
                             if (thisUpdate == null || nowUpper.before(thisUpdate) ||
                                 nowLower.after(nextUpdate == null ? thisUpdate : nextUpdate)) {
                                 ctx.fireExceptionCaught(new IllegalStateException("OCSP Response is out-of-date"));
                                 if (closeAndThrowIfNotValid) {
                                     ctx.close();
                                 }
                                 return;
                             }
 
                             OcspResponse.Status status;
                             if (response.getCertStatus() == null) {
                                 // 'null' means certificate is valid
                                 status = OcspResponse.Status.VALID;
                             } else if (response.getCertStatus() instanceof RevokedStatus) {
                                 status = OcspResponse.Status.REVOKED;
                             } else {
                                 status = OcspResponse.Status.UNKNOWN;
                             }
 
                             ctx.fireUserEventTriggered(new OcspValidationEvent(
                                 new OcspResponse(status, thisUpdate, nextUpdate)));
 
                             // If Certificate is not VALID and 'closeAndThrowIfNotValid' is set
                             // to 'true' then close the channel and throw an exception.
                             if (status != OcspResponse.Status.VALID && closeAndThrowIfNotValid) {
                                 // Certificate is not valid. Throw
                                 ctx.fireExceptionCaught(new OCSPException(
                                     "Certificate not valid. Status: " + status));
                                 ctx.close();
                             }
                         } else {
                             ctx.fireExceptionCaught(future.cause());
                             if (closeAndThrowIfNotValid) {
                                 ctx.close();
                             }
                         }
                     } catch (Throwable th) {
                         ctx.fireExceptionCaught(th);
                         if (closeAndThrowIfNotValid) {
                             ctx.close();
                         }
                     } finally {
                         ctx.fireUserEventTriggered(evt);
                         // Lets remove ourselves from the pipeline because we are done processing validation.
                         ctx.pipeline().remove(this);
                         if (readPending) {
                             readPending = false;
                             ctx.read();
                         }
                     }
                 });
             } else {
                 ctx.fireUserEventTriggered(evt);
             }
         } else {
             ctx.fireUserEventTriggered(evt);
         }
     }
 
     @Override
     public void exceptionCaught(ChannelHandlerContext ctx, Throwable cause) {
         ctx.close();
     }
 
     @Override
     public void bind(ChannelHandlerContext ctx, SocketAddress localAddress, ChannelPromise promise) throws Exception {
         ctx.bind(localAddress, promise);
     }
 
     @Override
     public void connect(ChannelHandlerContext ctx, SocketAddress remoteAddress,
                         SocketAddress localAddress, ChannelPromise promise) throws Exception {
         ctx.connect(remoteAddress, localAddress, promise);
     }
 
     @Override
     public void disconnect(ChannelHandlerContext ctx, ChannelPromise promise) throws Exception {
         ctx.disconnect(promise);
     }
 
     @Override
     public void close(ChannelHandlerContext ctx, ChannelPromise promise) throws Exception {
         ctx.close(promise);
     }
 
     @Override
     public void deregister(ChannelHandlerContext ctx, ChannelPromise promise) throws Exception {
         ctx.deregister(promise);
     }
 
     @Override
     public void read(ChannelHandlerContext ctx) throws Exception {
         // Let's stop reading until we are done with the processing of the OCSP query.
         if (ocspQueryInProgress) {
             readPending = true;
         } else {
             readPending = false;
             ctx.read();
         }
     }
 
     @Override
     public void write(ChannelHandlerContext ctx, Object msg, ChannelPromise promise) throws Exception {
         ctx.write(msg, promise);
     }
 
     @Override
     public void flush(ChannelHandlerContext ctx) throws Exception {
         ctx.flush();
     }
 }