// Copyright 2016 Google Inc. All Rights Reserved.
//
// Licensed 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.

#include "SkTypes.h"
#include "starboard/memory.h"
#include "starboard/system.h"

#define SK_DEBUGFAILF(fmt, ...) \
  SkASSERT((SkDebugf(fmt "\n", __VA_ARGS__), false))

static inline void sk_out_of_memory(size_t size) {
  SK_DEBUGFAILF("sk_out_of_memory (asked for " SK_SIZE_T_SPECIFIER " bytes)",
                size);
  SbSystemBreakIntoDebugger();
}

static inline void* throw_on_failure(size_t size, void* p) {
  if (size > 0 && p == NULL) {
    // If we've got a NULL here, the only reason we should have failed is
    // running out of RAM.
    sk_out_of_memory(size);
  }
  return p;
}

void sk_throw() {
  SkDEBUGFAIL("sk_throw");
  SbSystemBreakIntoDebugger();
}

void sk_out_of_memory(void) {
  SkDEBUGFAIL("sk_out_of_memory");
  SbSystemBreakIntoDebugger();
}

void* sk_malloc_throw(size_t size) {
  return sk_malloc_flags(size, SK_MALLOC_THROW);
}

void* sk_realloc_throw(void* addr, size_t size) {
  return throw_on_failure(size, SbMemoryReallocate(addr, size));
}

void sk_free(void* p) {
  if (p) {
    SbMemoryDeallocate(p);
  }
}

void* sk_malloc_flags(size_t size, unsigned flags) {
  void* p = SbMemoryAllocate(size);
  if (flags & SK_MALLOC_THROW) {
    return throw_on_failure(size, p);
  } else {
    return p;
  }
}

void* sk_calloc(size_t size) {
  void* p = SbMemoryAllocate(size);
  if (p && size) {
    SbMemorySet(p, 0, size);
  }
  return p;
}

void* sk_calloc_throw(size_t size) {
  return throw_on_failure(size, sk_calloc(size));
}