//
// Copyright (c) 2008 Advanced Micro Devices, Inc. All rights reserved.
//

#include "device/cpu/cpubuiltins.hpp"
#include "device/cpu/cpucommand.hpp"

#include <amdocl/cl_kernel.h>
#include <cstdio>  // for printf
#include <stdarg.h>

#define BUF_SIZE_PRINTF 4095
// In the current implementation of printf in gcc 4.5.2 runtime libraries,inf/infinity and nan are
// not supported
// The [-]infinity value is printed as [-]1.#INF00
// The [-]nan value is printed as [-]1.#INF00
// bufOutUpdate converts the all printed instanced of [-]1.#INF00 to inf,and
//                          all printed instanced of [-]1.#IND00 to nan
void bufOutUpdate(std::string& sBufOut, const char* strToReplace, const char* strReplace) {
  size_t foundIdx = 0;
  while ((foundIdx = sBufOut.find(strToReplace, foundIdx)) != std::string::npos) {
    sBufOut.replace(foundIdx, strlen(strToReplace), strReplace, strlen(strReplace));
    foundIdx += 3;
  }
}
int cpuprintf(const char* format, ...) {
  char cBufOut[BUF_SIZE_PRINTF];
  std::string sBufOut;
  va_list args;
  va_start(args, format);
  // write to the buffer
  vsprintf(cBufOut, format, args);
  sBufOut = cBufOut;

  // convert to correct infinity/nan representation
  bufOutUpdate(sBufOut, "1.#INF00", "inf");
  bufOutUpdate(sBufOut, "1.#IND00", "nan");
  bufOutUpdate(sBufOut, "1.#QNAN0", "nan");
  int ret = amd::Os::printf("%s", sBufOut.c_str());
  fflush(stdout);
  va_end(args);
  return ret;
}
namespace cpu {

const clk_builtins_t Builtins::dispatchTable_ = {
    /* Synchronization functions */
    &WorkItem::barrier,
    /* AMD Only builtins: FIXME_lmoriche: remove or add an extension */
    NULL, cpuprintf};

}  // namespace cpu