/*

 * ngtcp2

 *

 * Copyright (c) 2017 ngtcp2 contributors

 * Copyright (c) 2014 nghttp2 contributors

 *

 * Permission is hereby granted, free of charge, to any person obtaining

 * a copy of this software and associated documentation files (the

 * "Software"), to deal in the Software without restriction, including

 * without limitation the rights to use, copy, modify, merge, publish,

 * distribute, sublicense, and/or sell copies of the Software, and to

 * permit persons to whom the Software is furnished to do so, subject to

 * the following conditions:

 *

 * The above copyright notice and this permission notice shall be

 * included in all copies or substantial portions of the Software.

 *

 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,

 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND

 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE

 * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION

 * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION

 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

 */

#include "ngtcp2_mem.h"

#include <stdio.h>

static void *default_malloc(size_t size, void *user_data) {

  (void)user_data;

  return malloc(size);

}

static void default_free(void *ptr, void *user_data) {

  (void)user_data;

  free(ptr);

}

static void *default_calloc(size_t nmemb, size_t size, void *user_data) {

  (void)user_data;

  return calloc(nmemb, size);

}

static void *default_realloc(void *ptr, size_t size, void *user_data) {

  (void)user_data;

  return realloc(ptr, size);

}

static const ngtcp2_mem mem_default = {

  .malloc = default_malloc,

  .free = default_free,

  .calloc = default_calloc,

  .realloc = default_realloc,

};

const ngtcp2_mem *ngtcp2_mem_default(void) { return &mem_default; }

#ifndef MEMDEBUG

void *ngtcp2_mem_malloc(const ngtcp2_mem *mem, size_t size) {

  return mem->malloc(size, mem->user_data);

}

void ngtcp2_mem_free(const ngtcp2_mem *mem, void *ptr) {

  mem->free(ptr, mem->user_data);

}

void *ngtcp2_mem_calloc(const ngtcp2_mem *mem, size_t nmemb, size_t size) {

  return mem->calloc(nmemb, size, mem->user_data);

}

void *ngtcp2_mem_realloc(const ngtcp2_mem *mem, void *ptr, size_t size) {

  return mem->realloc(ptr, size, mem->user_data);

}

#else  /* defined(MEMDEBUG) */

void *ngtcp2_mem_malloc_debug(const ngtcp2_mem *mem, size_t size,

                              const char *func, const char *file, size_t line) {

  void *nptr = mem->malloc(size, mem->user_data);

  fprintf(stderr, "malloc %p size=%zu in %s at %s:%zu\n", nptr, size, func,

          file, line);

  return nptr;

}

void ngtcp2_mem_free_debug(const ngtcp2_mem *mem, void *ptr, const char *func,

                           const char *file, size_t line) {

  fprintf(stderr, "free ptr=%p in %s at %s:%zu\n", ptr, func, file, line);

  mem->free(ptr, mem->user_data);

}

void *ngtcp2_mem_calloc_debug(const ngtcp2_mem *mem, size_t nmemb, size_t size,

                              const char *func, const char *file, size_t line) {

  void *nptr = mem->calloc(nmemb, size, mem->user_data);

  fprintf(stderr, "calloc %p nmemb=%zu size=%zu in %s at %s:%zu\n", nptr, nmemb,

          size, func, file, line);

  return nptr;

}

void *ngtcp2_mem_realloc_debug(const ngtcp2_mem *mem, void *ptr, size_t size,

                               const char *func, const char *file,

                               size_t line) {

  void *nptr = mem->realloc(ptr, size, mem->user_data);

  fprintf(stderr, "realloc %p ptr=%p size=%zu in %s at %s:%zu\n", nptr, ptr,

          size, func, file, line);

  return nptr;

}

#endif /* defined(MEMDEBUG) */