/*

Copyright (c) 2012-2021 Roger Light <roger@atchoo.org>

All rights reserved. This program and the accompanying materials

are made available under the terms of the Eclipse Public License 2.0

and Eclipse Distribution License v1.0 which accompany this distribution.

The Eclipse Public License is available at

   https://www.eclipse.org/legal/epl-2.0/

and the Eclipse Distribution License is available at

  http://www.eclipse.org/org/documents/edl-v10.php.

SPDX-License-Identifier: EPL-2.0 OR BSD-3-Clause

Contributors:

   Roger Light - initial implementation and documentation.

*/

#include "config.h"

#include <errno.h>

#ifdef WITH_TLS

#  include <openssl/opensslv.h>

#  include <openssl/evp.h>

#  include <openssl/rand.h>

#  include <openssl/buffer.h>

#endif

#include <signal.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include "mosquitto.h"

#include "mosquitto_broker.h"

#include "base64_mosq.h"

#include "memory_mosq.h"

#ifdef WITH_TLS

int base64__encode(const unsigned char *in, size_t in_len, char **encoded)

{

  BIO *bmem, *b64;

  BUF_MEM *bptr = NULL;

  b64 = BIO_new(BIO_f_base64());

  if(b64 == NULL) return 1;

  BIO_set_flags(b64, BIO_FLAGS_BASE64_NO_NL);

  bmem = BIO_new(BIO_s_mem());

  if(bmem == NULL){

    BIO_free_all(b64);

    return 1;

  }

  b64 = BIO_push(b64, bmem);

  BIO_write(b64, in, (int)in_len);

  if(BIO_flush(b64) != 1){

    BIO_free_all(b64);

    return 1;

  }

  BIO_get_mem_ptr(b64, &bptr);

  *encoded = malloc(bptr->length+1);

  if(!(*encoded)){

    BIO_free_all(b64);

    return 1;

  }

  memcpy(*encoded, bptr->data, bptr->length);

  (*encoded)[bptr->length] = '\0';

  BIO_free_all(b64);

  return 0;

}

int base64__decode(const char *in, unsigned char **decoded, unsigned int *decoded_len)

{

  BIO *bmem, *b64;

  size_t slen;

  int len;

  slen = strlen(in);

  b64 = BIO_new(BIO_f_base64());

  if(!b64){

    return 1;

  }

  BIO_set_flags(b64, BIO_FLAGS_BASE64_NO_NL);

  bmem = BIO_new(BIO_s_mem());

  if(!bmem){

    BIO_free_all(b64);

    return 1;

  }

  b64 = BIO_push(b64, bmem);

  BIO_write(bmem, in, (int)slen);

  if(BIO_flush(bmem) != 1){

    BIO_free_all(b64);

    return 1;

  }

  *decoded = calloc(slen, 1);

  if(!(*decoded)){

    BIO_free_all(b64);

    return 1;

  }

  len = BIO_read(b64, *decoded, (int)slen);

  BIO_free_all(b64);

  if(len <= 0){

    SAFE_FREE(*decoded);

    *decoded_len = 0;

    return 1;

  }

  *decoded_len = (unsigned int)len;

  return 0;

}

#endif