40 #include <QtCore/qdatetime.h>

    42 #include <QtCore/qnumeric.h>

    43 #include <QtCore/qregexp.h>

    58 #include "ErrorInstance.h"

    59 #include "JSArray.h"

    62 #include "RegExpConstructor.h"

    63 #include "RegExpObject.h"

    66 #include "UString.h"

   102     qint32 ToInt32(qsreal);

   103     quint32 ToUInt32(qsreal);

   104     quint16 ToUInt16(qsreal);

   105     qsreal ToInteger(qsreal);

   106 

   107     inline bool ToBool(qsreal);

   108     inline bool ToBool(const QString &);

   109     inline qint32 ToInt32(const QString &);

   110     inline quint32 ToUInt32(const QString &);

   111     inline quint16 ToUInt16(const QString &);

   112     inline qsreal ToInteger(const QString &);

   113 #ifdef Q_CC_MSVC

   114     // MSVC2008 crashes if these are inlined.

   115     qsreal ToNumber(const QString &);

   116     QString ToString(qsreal);

   117 #else

   118     inline qsreal ToNumber(const QString &);

   119     inline QString ToString(qsreal);

   120 #endif

   121 

   125 

   126     inline void convertToLatin1_helper(const UChar *i, int length, char *s);

   127     inline QByteArray convertToLatin1(const JSC::UString &str);

   247     void reportAdditionalMemoryCost(int size);

   263     static inline void saveException(JSC::ExecState *, JSC::JSValue *);

   264     static inline void restoreException(JSC::ExecState *, JSC::JSValue);

   265 

   269 

   270     static QScriptSyntaxCheckResult checkSyntax(const QString &program);

   271     static bool canEvaluate(const QString &program);

   272 

   273     inline QScriptValuePrivate *allocateScriptValuePrivate(size_t);

   274     inline void freeScriptValuePrivate(QScriptValuePrivate *p);

   275 

   276     inline void registerScriptValue(QScriptValuePrivate *value);

   277     inline void unregisterScriptValue(QScriptValuePrivate *value);

   278     void detachAllRegisteredScriptValues();

   279 

   280     inline void registerScriptString(QScriptStringPrivate *value);

   281     inline void unregisterScriptString(QScriptStringPrivate *value);

   282     void detachAllRegisteredScriptStrings();

   283     QScriptString toStringHandle(const JSC::Identifier &name);

   284 

   285     static inline JSC::JSValue newArray(JSC::ExecState *, uint length);

   286     static inline JSC::JSValue newDate(JSC::ExecState *, qsreal value);

   287     static inline JSC::JSValue newDate(JSC::ExecState *, const QDateTime &);

   288     inline JSC::JSValue newObject();

   289 

   290 #ifndef QT_NO_REGEXP

   291     static JSC::JSValue newRegExp(JSC::ExecState *, const QRegExp &);

   292 #endif

   293 

   294     static JSC::JSValue newRegExp(JSC::ExecState *, const QString &pattern, const QString &flags);

   295     JSC::JSValue newVariant(const QVariant &);

   296     JSC::JSValue newVariant(JSC::JSValue objectValue, const QVariant &);

   297 

   298     static inline QScriptDeclarativeClass *declarativeClass(JSC::JSValue);

   299     static inline QScriptDeclarativeClass::Object *declarativeObject(JSC::JSValue);

   300 

   301     JSC::UString translationContextFromUrl(const JSC::UString &);

   372     JSC::UString cachedTranslationUrl;

   373     JSC::UString cachedTranslationContext;

   374 

   392 

   393 class APIShim

   394 {

   395 public:

   396     APIShim(QScriptEnginePrivate *engine)

   397         : m_engine(engine), m_oldTable(JSC::setCurrentIdentifierTable(engine->globalData->identifierTable))

   398     {

   399     }

   400     ~APIShim()

   401     {

   402         JSC::setCurrentIdentifierTable(m_oldTable);

   403     }

   404 

   405 private:

   406     QScriptEnginePrivate *m_engine;

   407     JSC::IdentifierTable *m_oldTable;

   408 };

   501 #ifndef Q_CC_MSVC

   502 // MSVC2008 crashes if these are inlined.

   503 

   504 inline QString ToString(qsreal value)

   505 {

   506     return JSC::UString::from(value);

   507 }

   508 

   509 inline qsreal ToNumber(const QString &value)

   510 {

   511     return ((JSC::UString)value).toDouble();

   512 }

   513 

   514 #endif

   515 

   516 inline qint32 ToInt32(const QString &value)

   517 {

   518     return ToInt32(ToNumber(value));

   519 }

   520 

   521 inline quint32 ToUInt32(const QString &value)

   522 {

   523     return ToUInt32(ToNumber(value));

   524 }

   525 

   526 inline quint16 ToUInt16(const QString &value)

   527 {

   528     return ToUInt16(ToNumber(value));

   529 }

   530 

   531 inline qsreal ToInteger(const QString &value)

   532 {

   533     return ToInteger(ToNumber(value));

   534 }

   535 

   536 inline bool ToBool(qsreal value)

   537 {

   538     return (value != 0) && !qIsNaN(value);

   539 }

   540 

   541 inline bool ToBool(const QString &value)

   542 {

   543      return !value.isEmpty();

   544 }

   545 

   546 inline void convertToLatin1_helper(const UChar *i, int length, char *s)

   547 {

   548     const UChar *e = i + length;

   549     while (i != e)

   550         *(s++) = (uchar) *(i++);

   551     *s = '\0';

   552 }

   553 

   554 inline QByteArray convertToLatin1(const JSC::UString &str)

   555 {

   556     QByteArray ba(str.size(), Qt::Uninitialized);

   557     convertToLatin1_helper(str.data(), str.size(), ba.data());

   558     return ba;

   559 }

   560 

   604 }

   605 

   606 inline JSC::JSValue QScriptEnginePrivate::jscValueFromVariant(JSC::ExecState *exec, const QVariant &v)

   607 {

   608     JSC::JSValue result = create(exec, v.userType(), v.data());

   609     Q_ASSERT(result);

   610     return result;

   833 inline JSC::JSValue QScriptEnginePrivate::newArray(JSC::ExecState *exec, uint length)

   834 {

   835     return JSC::constructEmptyArray(exec, length);

   836 }

   837 

   838 inline JSC::JSValue QScriptEnginePrivate::newDate(JSC::ExecState *exec, qsreal value)

   839 {

   840     JSC::JSValue val = JSC::jsNumber(exec, value);

   841     JSC::ArgList args(&val, 1);

   842     return JSC::constructDate(exec, args);

   843 }

   844 

   845 inline JSC::JSValue QScriptEnginePrivate::newDate(JSC::ExecState *exec, const QDateTime &value)

   846 {

   847     return newDate(exec, QScript::FromDateTime(value));

   848 }

   849 

   850 inline JSC::JSValue QScriptEnginePrivate::newObject()

   851 {

   852     return new (currentFrame)QScriptObject(scriptObjectStructure);

   853 }

   854 

   855 inline bool QScriptEnginePrivate::isObject(JSC::JSValue value)

   856 {

   857     return value && value.isObject();

   858 }

   859 

   860 inline bool QScriptEnginePrivate::isArray(JSC::JSValue value)

   861 {

   862     return isObject(value) && value.inherits(&JSC::JSArray::info);

   863 }

   864 

   865 inline bool QScriptEnginePrivate::isDate(JSC::JSValue value)

   866 {

   867     return isObject(value) && value.inherits(&JSC::DateInstance::info);

   868 }

   869 

   870 inline bool QScriptEnginePrivate::isError(JSC::JSValue value)

   871 {

   872     return isObject(value) && value.inherits(&JSC::ErrorInstance::info);

   873 }

   874 

   875 inline bool QScriptEnginePrivate::isRegExp(JSC::JSValue value)

   876 {

   877     return isObject(value) && value.inherits(&JSC::RegExpObject::info);

   878 }

   879 

   880 inline bool QScriptEnginePrivate::isVariant(JSC::JSValue value)

   881 {

   882     if (!isObject(value) || !value.inherits(&QScriptObject::info))

   883         return false;

   884     QScriptObject *object = static_cast<QScriptObject*>(JSC::asObject(value));

   885     QScriptObjectDelegate *delegate = object->delegate();

   886     return (delegate && (delegate->type() == QScriptObjectDelegate::Variant));

   887 }

   888 

   889 inline bool QScriptEnginePrivate::isQObject(JSC::JSValue value)

   890 {

   891 #ifndef QT_NO_QOBJECT

   892     if (!isObject(value) || !value.inherits(&QScriptObject::info))

   893         return false;

   894     QScriptObject *object = static_cast<QScriptObject*>(JSC::asObject(value));

   895     QScriptObjectDelegate *delegate = object->delegate();

   896     return (delegate && (delegate->type() == QScriptObjectDelegate::QtObject ||

   897                          (delegate->type() == QScriptObjectDelegate::DeclarativeClassObject &&

   898                           static_cast<QScript::DeclarativeObjectDelegate*>(delegate)->scriptClass()->isQObject())));

   899 #else

   900     return false;

   901 #endif

   902 }

   903 

   904 inline bool QScriptEnginePrivate::isQMetaObject(JSC::JSValue value)

   905 {

   906 #ifndef QT_NO_QOBJECT

   907     return isObject(value) && JSC::asObject(value)->inherits(&QScript::QMetaObjectWrapperObject::info);

   908 #else

   909     return false;

   910 #endif

   911 }

   912 

   913 inline bool QScriptEnginePrivate::toBool(JSC::ExecState *exec, JSC::JSValue value)

   914 {

   915     JSC::JSValue savedException;

   916     saveException(exec, &savedException);

   917     bool result = value.toBoolean(exec);

   918     restoreException(exec, savedException);

   919     return result;

   920 }

   921 

   922 inline qsreal QScriptEnginePrivate::toInteger(JSC::ExecState *exec, JSC::JSValue value)

   923 {

   924     JSC::JSValue savedException;

   925     saveException(exec, &savedException);

   926     qsreal result = value.toInteger(exec);

   927     restoreException(exec, savedException);

   928     return result;

   929 }

   930 

   931 inline qsreal QScriptEnginePrivate::toNumber(JSC::ExecState *exec, JSC::JSValue value)

   932 {

   933     JSC::JSValue savedException;

   934     saveException(exec, &savedException);

   935     qsreal result = value.toNumber(exec);

   936     restoreException(exec, savedException);

   937     return result;

   938 }

   939 

   940 inline qint32 QScriptEnginePrivate::toInt32(JSC::ExecState *exec, JSC::JSValue value)

   941 {

   942     JSC::JSValue savedException;

   943     saveException(exec, &savedException);

   944     qint32 result = value.toInt32(exec);

   945     restoreException(exec, savedException);

   946     return result;

   947 }

   948 

   949 inline quint32 QScriptEnginePrivate::toUInt32(JSC::ExecState *exec, JSC::JSValue value)

   950 {

   951     JSC::JSValue savedException;

   952     saveException(exec, &savedException);

   953     quint32 result = value.toUInt32(exec);

   954     restoreException(exec, savedException);

   955     return result;

   956 }

   957 

   958 inline quint16 QScriptEnginePrivate::toUInt16(JSC::ExecState *exec, JSC::JSValue value)

   959 {

   960     // ### no equivalent function in JSC

   961     return QScript::ToUInt16(toNumber(exec, value));

   962 }

   963 

   964 inline JSC::UString QScriptEnginePrivate::toString(JSC::ExecState *exec, JSC::JSValue value)

   965 {

   966     JSC::JSValue savedException;

   967     saveException(exec, &savedException);

   968     JSC::UString str = value.toString(exec);

   969     if (exec && exec->hadException() && !str.size()) {

   970         JSC::JSValue savedException2;

   971         saveException(exec, &savedException2);

   972         str = savedException2.toString(exec);

   973         restoreException(exec, savedException2);

   974     }

   975     if (savedException)

   976         restoreException(exec, savedException);

   977     return str;

   978 }

   979 

   980 inline QDateTime QScriptEnginePrivate::toDateTime(JSC::ExecState *, JSC::JSValue value)

   981 {

   982     if (!isDate(value))

   983         return QDateTime();

   984     qsreal t = static_cast<JSC::DateInstance*>(JSC::asObject(value))->internalNumber();

   985     return QScript::ToDateTime(t, Qt::LocalTime);

   986 }

   987 

   988 inline QObject *QScriptEnginePrivate::toQObject(JSC::ExecState *exec, JSC::JSValue value)

   989 {

   990 #ifndef QT_NO_QOBJECT

   991     if (isObject(value) && value.inherits(&QScriptObject::info)) {

   992         QScriptObject *object = static_cast<QScriptObject*>(JSC::asObject(value));

   993         QScriptObjectDelegate *delegate = object->delegate();

   994         if (!delegate)

   995             return 0;

   996         if (delegate->type() == QScriptObjectDelegate::QtObject)

   997             return static_cast<QScript::QObjectDelegate*>(delegate)->value();

   998         if (delegate->type() == QScriptObjectDelegate::DeclarativeClassObject)

   999             return static_cast<QScript::DeclarativeObjectDelegate*>(delegate)->scriptClass()->toQObject(declarativeObject(value));

  1000         if (delegate->type() == QScriptObjectDelegate::Variant) {

  1001             QVariant var = variantValue(value);

  1002             int type = var.userType();

  1003             if ((type == QMetaType::QObjectStar) || (type == QMetaType::QWidgetStar))

  1004                 return *reinterpret_cast<QObject* const *>(var.constData());

  1005         }

  1006     }

  1007 #endif

  1008     return 0;

  1009 }

  1010 

  1011 inline const QMetaObject *QScriptEnginePrivate::toQMetaObject(JSC::ExecState*, JSC::JSValue value)

  1012 {

  1013 #ifndef QT_NO_QOBJECT

  1014     if (isQMetaObject(value))

  1015         return static_cast<QScript::QMetaObjectWrapperObject*>(JSC::asObject(value))->value();

  1016 #endif

  1017     return 0;

  1018 }

  1019 

  1020 inline QVariant &QScriptEnginePrivate::variantValue(JSC::JSValue value)

  1021 {

  1022     Q_ASSERT(value.inherits(&QScriptObject::info));

  1023     QScriptObjectDelegate *delegate = static_cast<QScriptObject*>(JSC::asObject(value))->delegate();

  1024     Q_ASSERT(delegate && (delegate->type() == QScriptObjectDelegate::Variant));

  1025     return static_cast<QScript::QVariantDelegate*>(delegate)->value();

  1026 }

  1027 

  1028 inline void QScriptEnginePrivate::setVariantValue(JSC::JSValue objectValue, const QVariant &value)

  1029 {

  1030     Q_ASSERT(objectValue.inherits(&QScriptObject::info));

  1031     QScriptObjectDelegate *delegate = static_cast<QScriptObject*>(JSC::asObject(objectValue))->delegate();

  1032     Q_ASSERT(delegate && (delegate->type() == QScriptObjectDelegate::Variant));

  1033     static_cast<QScript::QVariantDelegate*>(delegate)->setValue(value);

  1034 }

  1035 

  1036 inline QScriptDeclarativeClass *QScriptEnginePrivate::declarativeClass(JSC::JSValue v)

  1037 {

  1038     if (!QScriptEnginePrivate::isObject(v) || !v.inherits(&QScriptObject::info))

  1039         return 0;

  1040     QScriptObject *scriptObject = static_cast<QScriptObject*>(JSC::asObject(v));

  1041     QScriptObjectDelegate *delegate = scriptObject->delegate();

  1042     if (!delegate || (delegate->type() != QScriptObjectDelegate::DeclarativeClassObject))

  1043         return 0;

  1044     return static_cast<QScript::DeclarativeObjectDelegate*>(delegate)->scriptClass();

  1045 }

  1046 

  1047 inline QScriptDeclarativeClass::Object *QScriptEnginePrivate::declarativeObject(JSC::JSValue v)

  1048 {

  1049     if (!QScriptEnginePrivate::isObject(v) || !v.inherits(&QScriptObject::info))

  1050         return 0;

  1051     QScriptObject *scriptObject = static_cast<QScriptObject*>(JSC::asObject(v));

  1052     QScriptObjectDelegate *delegate = scriptObject->delegate();

  1053     if (!delegate || (delegate->type() != QScriptObjectDelegate::DeclarativeClassObject))

  1054         return 0;

  1055     return static_cast<QScript::DeclarativeObjectDelegate*>(delegate)->object();

  1056 }

  1057