#include "config.h"
#include "value.h"
#include "error_object.h"
#include "nodes.h"
#include "operations.h"
#include <stdio.h>
#include <string.h>
#include <wtf/MathExtras.h>
namespace KJS {
static const double D16 = 65536.0;
static const double D32 = 4294967296.0;
void *JSCell::operator new(size_t size)
{
return Collector::allocate(size);
}
bool JSCell::getUInt32(unsigned&) const
{
return false;
}
double JSValue::toInteger(ExecState *exec) const
{
uint32_t i;
if (getUInt32(i))
return i;
return roundValue(exec, const_cast<JSValue*>(this));
}
inline int32_t JSValue::toInt32Inline(ExecState* exec, bool& ok) const
{
ok = true;
uint32_t i;
if (getUInt32(i))
return i;
double d = roundValue(exec, const_cast<JSValue*>(this));
if (isNaN(d) || isInf(d)) {
ok = false;
return 0;
}
double d32 = fmod(d, D32);
if (d32 >= D32 / 2)
d32 -= D32;
else if (d32 < -D32 / 2)
d32 += D32;
return static_cast<int32_t>(d32);
}
int32_t JSValue::toInt32(ExecState* exec) const
{
bool ok;
return toInt32(exec, ok);
}
int32_t JSValue::toInt32(ExecState* exec, bool& ok) const
{
return toInt32Inline(exec, ok);
}
uint32_t JSValue::toUInt32(ExecState *exec) const
{
uint32_t i;
if (getUInt32(i))
return i;
double d = roundValue(exec, const_cast<JSValue*>(this));
if (isNaN(d) || isInf(d))
return 0;
double d32 = fmod(d, D32);
if (d32 < 0)
d32 += D32;
return static_cast<uint32_t>(d32);
}
uint16_t JSValue::toUInt16(ExecState *exec) const
{
uint32_t i;
if (getUInt32(i))
return i;
double d = roundValue(exec, const_cast<JSValue*>(this));
if (isNaN(d) || isInf(d))
return 0;
double d16 = fmod(d, D16);
if (d16 < 0)
d16 += D16;
return static_cast<uint16_t>(d16);
}
bool JSCell::getNumber(double &numericValue) const
{
if (!isNumber())
return false;
numericValue = static_cast<const NumberImp *>(this)->value();
return true;
}
double JSCell::getNumber() const
{
return isNumber() ? static_cast<const NumberImp *>(this)->value() : NaN;
}
bool JSCell::getString(UString &stringValue) const
{
if (!isString())
return false;
stringValue = static_cast<const StringImp *>(this)->value();
return true;
}
UString JSCell::getString() const
{
return isString() ? static_cast<const StringImp *>(this)->value() : UString();
}
JSObject *JSCell::getObject()
{
return isObject() ? static_cast<JSObject *>(this) : 0;
}
const JSObject *JSCell::getObject() const
{
return isObject() ? static_cast<const JSObject *>(this) : 0;
}
JSCell *jsString(const char *s)
{
return new StringImp(s ? s : "");
}
JSCell *jsString(const UString &s)
{
return s.isNull() ? new StringImp("") : new StringImp(s);
}
JSValue *jsNumberCell(double d)
{
return new NumberImp(d);
}
}