libs/rs/rsScriptC_Lib.cpp - LeafOS-Project/android_frameworks_base - Gitiles

 /*
  * Copyright (C) 2009 The Android Open Source Project
  *
  * 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 "rsContext.h"
 #include "rsScriptC.h"
 #include "rsMatrix.h"

 #include "acc/acc.h"
 #include "utils/Timers.h"

 #include <time.h>

 using namespace android;
 using namespace android::renderscript;

 #define GET_TLS()  Context::ScriptTLSStruct * tls = \
     (Context::ScriptTLSStruct *)pthread_getspecific(Context::gThreadTLSKey); \
     Context * rsc = tls->mContext; \
     ScriptC * sc = (ScriptC *) tls->mScript


 //////////////////////////////////////////////////////////////////////////////
 // Math routines
 //////////////////////////////////////////////////////////////////////////////

 static float SC_sinf_fast(float x)
 {
     const float A =   1.0f / (2.0f * M_PI);
     const float B = -16.0f;
     const float C =   8.0f;

     // scale angle for easy argument reduction
     x *= A;

     if (fabsf(x) >= 0.5f) {
         // argument reduction
         x = x - ceilf(x + 0.5f) + 1.0f;
     }

     const float y = B * x * fabsf(x) + C * x;
     return 0.2215f * (y * fabsf(y) - y) + y;
 }

 static float SC_cosf_fast(float x)
 {
     x += float(M_PI / 2);

     const float A =   1.0f / (2.0f * M_PI);
     const float B = -16.0f;
     const float C =   8.0f;

     // scale angle for easy argument reduction
     x *= A;

     if (fabsf(x) >= 0.5f) {
         // argument reduction
         x = x - ceilf(x + 0.5f) + 1.0f;
     }

     const float y = B * x * fabsf(x) + C * x;
     return 0.2215f * (y * fabsf(y) - y) + y;
 }


 static float SC_randf(float max)
 {
     float r = (float)rand();
     return r / RAND_MAX * max;
 }

 static float SC_randf2(float min, float max)
 {
     float r = (float)rand();
     return r / RAND_MAX * (max - min) + min;
 }

 static int SC_randi(int max)
 {
     return (int)SC_randf(max);
 }

 static int SC_randi2(int min, int max)
 {
     return (int)SC_randf2(min, max);
 }

 static float SC_frac(float v)
 {
     int i = (int)floor(v);
     return fmin(v - i, 0x1.fffffep-1f);
 }

 //////////////////////////////////////////////////////////////////////////////
 // Time routines
 //////////////////////////////////////////////////////////////////////////////

 static int32_t SC_second()
 {
     GET_TLS();

     time_t rawtime;
     time(&rawtime);

     struct tm *timeinfo;
     timeinfo = localtime(&rawtime);
     return timeinfo->tm_sec;
 }

 static int32_t SC_minute()
 {
     GET_TLS();

     time_t rawtime;
     time(&rawtime);

     struct tm *timeinfo;
     timeinfo = localtime(&rawtime);
     return timeinfo->tm_min;
 }

 static int32_t SC_hour()
 {
     GET_TLS();

     time_t rawtime;
     time(&rawtime);

     struct tm *timeinfo;
     timeinfo = localtime(&rawtime);
     return timeinfo->tm_hour;
 }

 static int32_t SC_day()
 {
     GET_TLS();

     time_t rawtime;
     time(&rawtime);

     struct tm *timeinfo;
     timeinfo = localtime(&rawtime);
     return timeinfo->tm_mday;
 }

 static int32_t SC_month()
 {
     GET_TLS();

     time_t rawtime;
     time(&rawtime);

     struct tm *timeinfo;
     timeinfo = localtime(&rawtime);
     return timeinfo->tm_mon;
 }

 static int32_t SC_year()
 {
     GET_TLS();

     time_t rawtime;
     time(&rawtime);

     struct tm *timeinfo;
     timeinfo = localtime(&rawtime);
     return timeinfo->tm_year;
 }

 static int64_t SC_uptimeMillis2()
 {
     return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC));
 }

 static int64_t SC_startTimeMillis2()
 {
     GET_TLS();
     return sc->mEnviroment.mStartTimeMillis;
 }

 static int64_t SC_elapsedTimeMillis2()
 {
     GET_TLS();
     return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC))
             - sc->mEnviroment.mStartTimeMillis;
 }

 static int32_t SC_uptimeMillis()
 {
     return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC));
 }

 static int32_t SC_startTimeMillis()
 {
     GET_TLS();
     return sc->mEnviroment.mStartTimeMillis;
 }

 static int32_t SC_elapsedTimeMillis()
 {
     GET_TLS();
     return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC))
             - sc->mEnviroment.mStartTimeMillis;
 }

 //////////////////////////////////////////////////////////////////////////////
 // Matrix routines
 //////////////////////////////////////////////////////////////////////////////


 static void SC_matrixLoadIdentity(rsc_Matrix *mat)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->loadIdentity();
 }

 static void SC_matrixLoadFloat(rsc_Matrix *mat, const float *f)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->load(f);
 }

 static void SC_matrixLoadMat(rsc_Matrix *mat, const rsc_Matrix *newmat)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->load(reinterpret_cast<const Matrix *>(newmat));
 }

 static void SC_matrixLoadRotate(rsc_Matrix *mat, float rot, float x, float y, float z)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->loadRotate(rot, x, y, z);
 }

 static void SC_matrixLoadScale(rsc_Matrix *mat, float x, float y, float z)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->loadScale(x, y, z);
 }

 static void SC_matrixLoadTranslate(rsc_Matrix *mat, float x, float y, float z)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->loadTranslate(x, y, z);
 }

 static void SC_matrixLoadMultiply(rsc_Matrix *mat, const rsc_Matrix *lhs, const rsc_Matrix *rhs)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->loadMultiply(reinterpret_cast<const Matrix *>(lhs),
                     reinterpret_cast<const Matrix *>(rhs));
 }

 static void SC_matrixMultiply(rsc_Matrix *mat, const rsc_Matrix *rhs)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->multiply(reinterpret_cast<const Matrix *>(rhs));
 }

 static void SC_matrixRotate(rsc_Matrix *mat, float rot, float x, float y, float z)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->rotate(rot, x, y, z);
 }

 static void SC_matrixScale(rsc_Matrix *mat, float x, float y, float z)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->scale(x, y, z);
 }

 static void SC_matrixTranslate(rsc_Matrix *mat, float x, float y, float z)
 {
     Matrix *m = reinterpret_cast<Matrix *>(mat);
     m->translate(x, y, z);
 }


 //////////////////////////////////////////////////////////////////////////////
 //
 //////////////////////////////////////////////////////////////////////////////

 static uint32_t SC_allocGetDimX(RsAllocation va)
 {
     GET_TLS();
     const Allocation *a = static_cast<const Allocation *>(va);
     //LOGE("SC_allocGetDimX a=%p", a);
     //LOGE(" type=%p", a->getType());
     return a->getType()->getDimX();
 }

 static uint32_t SC_allocGetDimY(RsAllocation va)
 {
     GET_TLS();
     const Allocation *a = static_cast<const Allocation *>(va);
     return a->getType()->getDimY();
 }

 static uint32_t SC_allocGetDimZ(RsAllocation va)
 {
     GET_TLS();
     const Allocation *a = static_cast<const Allocation *>(va);
     return a->getType()->getDimZ();
 }

 static uint32_t SC_allocGetDimLOD(RsAllocation va)
 {
     GET_TLS();
     const Allocation *a = static_cast<const Allocation *>(va);
     return a->getType()->getDimLOD();
 }

 static uint32_t SC_allocGetDimFaces(RsAllocation va)
 {
     GET_TLS();
     const Allocation *a = static_cast<const Allocation *>(va);
     return a->getType()->getDimFaces();
 }


 static void SC_debugF(const char *s, float f) {
     LOGE("%s %f, 0x%08x", s, f, *((int *) (&f)));
 }
 static void SC_debugFv2(const char *s, rsvF_2 fv) {
     float *f = (float *)&fv;
     LOGE("%s {%f, %f}", s, f[0], f[1]);
 }
 static void SC_debugFv3(const char *s, rsvF_4 fv) {
     float *f = (float *)&fv;
     LOGE("%s {%f, %f, %f}", s, f[0], f[1], f[2]);
 }
 static void SC_debugFv4(const char *s, rsvF_4 fv) {
     float *f = (float *)&fv;
     LOGE("%s {%f, %f, %f, %f}", s, f[0], f[1], f[2], f[3]);
 }
 static void SC_debugI32(const char *s, int32_t i) {
     LOGE("%s %i  0x%x", s, i, i);
 }

 static uint32_t SC_toClient(void *data, int cmdID, int len, int waitForSpace)
 {
     GET_TLS();
     //LOGE("SC_toClient %i %i %i", cmdID, len, waitForSpace);
     return rsc->sendMessageToClient(data, cmdID, len, waitForSpace != 0);
 }

 static void SC_scriptCall(int scriptID)
 {
     GET_TLS();
     rsc->runScript((Script *)scriptID);
 }

 int SC_divsi3(int a, int b)
 {
     return a / b;
 }

 int SC_getAllocation(const void *ptr)
 {
     GET_TLS();
     const Allocation *alloc = sc->ptrToAllocation(ptr);
     return (int)alloc;
 }


 void SC_ForEachii(RsScript vs, RsAllocation vin)
 {
     GET_TLS();
     Script *s = static_cast<Script *>(vs);
     Allocation *ain = static_cast<Allocation *>(vin);
     s->runForEach(rsc, ain, NULL);
 }

 void SC_ForEachiii(RsScript vs, RsAllocation vin, RsAllocation vout)
 {
     GET_TLS();
     Script *s = static_cast<Script *>(vs);
     Allocation *ain = static_cast<Allocation *>(vin);
     Allocation *aout = static_cast<Allocation *>(vout);
     s->runForEach(rsc, ain, aout);
 }

 void SC_ForEachiiii(RsScript vs, RsAllocation vin, int xStart, int xEnd)
 {
     GET_TLS();
     Script *s = static_cast<Script *>(vs);
     Allocation *ain = static_cast<Allocation *>(vin);
     s->runForEach(rsc, ain, NULL, xStart, xEnd);
 }

 void SC_ForEachiiiii(RsScript vs, RsAllocation vin, RsAllocation vout, int xStart, int xEnd)
 {
     GET_TLS();
     Script *s = static_cast<Script *>(vs);
     Allocation *ain = static_cast<Allocation *>(vin);
     Allocation *aout = static_cast<Allocation *>(vout);
     s->runForEach(rsc, ain, aout, xStart, xEnd);
 }

 void SC_ForEachiiiiii(RsScript vs, RsAllocation vin, int xStart, int yStart, int xEnd, int yEnd)
 {
     GET_TLS();
     Script *s = static_cast<Script *>(vs);
     Allocation *ain = static_cast<Allocation *>(vin);
     s->runForEach(rsc, ain, NULL, xStart, yStart, xEnd, yEnd);
 }

 void SC_ForEachiiiiiii(RsScript vs, RsAllocation vin, RsAllocation vout, int xStart, int yStart, int xEnd, int yEnd)
 {
     GET_TLS();
     Script *s = static_cast<Script *>(vs);
     Allocation *ain = static_cast<Allocation *>(vin);
     Allocation *aout = static_cast<Allocation *>(vout);
     s->runForEach(rsc, ain, aout, xStart, yStart, xEnd, yEnd);
 }


 //////////////////////////////////////////////////////////////////////////////
 // Class implementation
 //////////////////////////////////////////////////////////////////////////////

 // llvm name mangling ref
 //  <builtin-type> ::= v  # void
 //                 ::= b  # bool
 //                 ::= c  # char
 //                 ::= a  # signed char
 //                 ::= h  # unsigned char
 //                 ::= s  # short
 //                 ::= t  # unsigned short
 //                 ::= i  # int
 //                 ::= j  # unsigned int
 //                 ::= l  # long
 //                 ::= m  # unsigned long
 //                 ::= x  # long long, __int64
 //                 ::= y  # unsigned long long, __int64
 //                 ::= f  # float
 //                 ::= d  # double

 static ScriptCState::SymbolTable_t gSyms[] = {
     { "__divsi3", (void *)&SC_divsi3 },

     // allocation
     { "rsAllocationGetDimX", (void *)&SC_allocGetDimX },
     { "rsAllocationGetDimY", (void *)&SC_allocGetDimY },
     { "rsAllocationGetDimZ", (void *)&SC_allocGetDimZ },
     { "rsAllocationGetDimLOD", (void *)&SC_allocGetDimLOD },
     { "rsAllocationGetDimFaces", (void *)&SC_allocGetDimFaces },
     { "rsGetAllocation", (void *)&SC_getAllocation },

     // Debug
     { "_Z7rsDebugPKcf", (void *)&SC_debugF },
     { "_Z7rsDebugPKcDv2_f", (void *)&SC_debugFv2 },
     { "_Z7rsDebugPKcDv3_f", (void *)&SC_debugFv3 },
     { "_Z7rsDebugPKcDv4_f", (void *)&SC_debugFv4 },
     { "_Z7rsDebugPKci", (void *)&SC_debugI32 },
     //extern void __attribute__((overloadable))rsDebug(const char *, const void *);


     // RS Math
     { "_Z6rsRandi", (void *)&SC_randi },
     { "_Z6rsRandii", (void *)&SC_randi2 },
     { "_Z6rsRandf", (void *)&SC_randf },
     { "_Z6rsRandff", (void *)&SC_randf2 },
     { "_Z6rsFracf", (void *)&SC_frac },

     // time
     { "rsSecond", (void *)&SC_second },
     { "rsMinute", (void *)&SC_minute },
     { "rsHour", (void *)&SC_hour },
     { "rsDay", (void *)&SC_day },
     { "rsMonth", (void *)&SC_month },
     { "rsYear", (void *)&SC_year },
     { "rsUptimeMillis", (void*)&SC_uptimeMillis2 },
     { "rsStartTimeMillis", (void*)&SC_startTimeMillis2 },
     { "rsElapsedTimeMillis", (void*)&SC_elapsedTimeMillis2 },

     { "rsSendToClient", (void *)&SC_toClient },

     // matrix
     { "rsMatrixLoadIdentity", (void *)&SC_matrixLoadIdentity },
     { "rsMatrixLoadFloat", (void *)&SC_matrixLoadFloat },
     { "rsMatrixLoadMat", (void *)&SC_matrixLoadMat },
     { "rsMatrixLoadRotate", (void *)&SC_matrixLoadRotate },
     { "rsMatrixLoadScale", (void *)&SC_matrixLoadScale },
     { "rsMatrixLoadTranslate", (void *)&SC_matrixLoadTranslate },
     { "rsMatrixLoadMultiply", (void *)&SC_matrixLoadMultiply },
     { "rsMatrixMultiply", (void *)&SC_matrixMultiply },
     { "rsMatrixRotate", (void *)&SC_matrixRotate },
     { "rsMatrixScale", (void *)&SC_matrixScale },
     { "rsMatrixTranslate", (void *)&SC_matrixTranslate },

     { "_Z9rsForEachii", (void *)&SC_ForEachii },
     { "_Z9rsForEachiii", (void *)&SC_ForEachiii },
     { "_Z9rsForEachiiii", (void *)&SC_ForEachiiii },
     { "_Z9rsForEachiiiii", (void *)&SC_ForEachiiiii },
     { "_Z9rsForEachiiiiii", (void *)&SC_ForEachiiiiii },
     { "_Z9rsForEachiiiiiii", (void *)&SC_ForEachiiiiiii },

 ////////////////////////////////////////////////////////////////////

     //{ "sinf_fast", (void *)&SC_sinf_fast },
     //{ "cosf_fast", (void *)&SC_cosf_fast },

     { "scriptCall", (void *)&SC_scriptCall },


     { NULL, NULL }
 };

 const ScriptCState::SymbolTable_t * ScriptCState::lookupSymbol(const char *sym)
 {
     ScriptCState::SymbolTable_t *syms = gSyms;

     while (syms->mPtr) {
         if (!strcmp(syms->mName, sym)) {
             return syms;
         }
         syms++;
     }
     return NULL;
 }
	/*
	* Copyright (C) 2009 The Android Open Source Project
	*
	* 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 "rsContext.h"
	#include "rsScriptC.h"
	#include "rsMatrix.h"

	#include "acc/acc.h"
	#include "utils/Timers.h"

	#include <time.h>

	using namespace android;
	using namespace android::renderscript;

	#define GET_TLS() Context::ScriptTLSStruct * tls = \
	(Context::ScriptTLSStruct *)pthread_getspecific(Context::gThreadTLSKey); \
	Context * rsc = tls->mContext; \
	ScriptC * sc = (ScriptC *) tls->mScript


	//////////////////////////////////////////////////////////////////////////////
	// Math routines
	//////////////////////////////////////////////////////////////////////////////

	static float SC_sinf_fast(float x)
	{
	const float A = 1.0f / (2.0f * M_PI);
	const float B = -16.0f;
	const float C = 8.0f;

	// scale angle for easy argument reduction
	x *= A;

	if (fabsf(x) >= 0.5f) {
	// argument reduction
	x = x - ceilf(x + 0.5f) + 1.0f;
	}

	const float y = B * x * fabsf(x) + C * x;
	return 0.2215f * (y * fabsf(y) - y) + y;
	}

	static float SC_cosf_fast(float x)
	{
	x += float(M_PI / 2);

	const float A = 1.0f / (2.0f * M_PI);
	const float B = -16.0f;
	const float C = 8.0f;

	// scale angle for easy argument reduction
	x *= A;

	if (fabsf(x) >= 0.5f) {
	// argument reduction
	x = x - ceilf(x + 0.5f) + 1.0f;
	}

	const float y = B * x * fabsf(x) + C * x;
	return 0.2215f * (y * fabsf(y) - y) + y;
	}


	static float SC_randf(float max)
	{
	float r = (float)rand();
	return r / RAND_MAX * max;
	}

	static float SC_randf2(float min, float max)
	{
	float r = (float)rand();
	return r / RAND_MAX * (max - min) + min;
	}

	static int SC_randi(int max)
	{
	return (int)SC_randf(max);
	}

	static int SC_randi2(int min, int max)
	{
	return (int)SC_randf2(min, max);
	}

	static float SC_frac(float v)
	{
	int i = (int)floor(v);
	return fmin(v - i, 0x1.fffffep-1f);
	}

	//////////////////////////////////////////////////////////////////////////////
	// Time routines
	//////////////////////////////////////////////////////////////////////////////

	static int32_t SC_second()
	{
	GET_TLS();

	time_t rawtime;
	time(&rawtime);

	struct tm *timeinfo;
	timeinfo = localtime(&rawtime);
	return timeinfo->tm_sec;
	}

	static int32_t SC_minute()
	{
	GET_TLS();

	time_t rawtime;
	time(&rawtime);

	struct tm *timeinfo;
	timeinfo = localtime(&rawtime);
	return timeinfo->tm_min;
	}

	static int32_t SC_hour()
	{
	GET_TLS();

	time_t rawtime;
	time(&rawtime);

	struct tm *timeinfo;
	timeinfo = localtime(&rawtime);
	return timeinfo->tm_hour;
	}

	static int32_t SC_day()
	{
	GET_TLS();

	time_t rawtime;
	time(&rawtime);

	struct tm *timeinfo;
	timeinfo = localtime(&rawtime);
	return timeinfo->tm_mday;
	}

	static int32_t SC_month()
	{
	GET_TLS();

	time_t rawtime;
	time(&rawtime);

	struct tm *timeinfo;
	timeinfo = localtime(&rawtime);
	return timeinfo->tm_mon;
	}

	static int32_t SC_year()
	{
	GET_TLS();

	time_t rawtime;
	time(&rawtime);

	struct tm *timeinfo;
	timeinfo = localtime(&rawtime);
	return timeinfo->tm_year;
	}

	static int64_t SC_uptimeMillis2()
	{
	return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC));
	}

	static int64_t SC_startTimeMillis2()
	{
	GET_TLS();
	return sc->mEnviroment.mStartTimeMillis;
	}

	static int64_t SC_elapsedTimeMillis2()
	{
	GET_TLS();
	return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC))
	- sc->mEnviroment.mStartTimeMillis;
	}

	static int32_t SC_uptimeMillis()
	{
	return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC));
	}

	static int32_t SC_startTimeMillis()
	{
	GET_TLS();
	return sc->mEnviroment.mStartTimeMillis;
	}

	static int32_t SC_elapsedTimeMillis()
	{
	GET_TLS();
	return nanoseconds_to_milliseconds(systemTime(SYSTEM_TIME_MONOTONIC))
	- sc->mEnviroment.mStartTimeMillis;
	}

	//////////////////////////////////////////////////////////////////////////////
	// Matrix routines
	//////////////////////////////////////////////////////////////////////////////


	static void SC_matrixLoadIdentity(rsc_Matrix *mat)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->loadIdentity();
	}

	static void SC_matrixLoadFloat(rsc_Matrix mat, const float f)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->load(f);
	}

	static void SC_matrixLoadMat(rsc_Matrix mat, const rsc_Matrix newmat)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->load(reinterpret_cast<const Matrix *>(newmat));
	}

	static void SC_matrixLoadRotate(rsc_Matrix *mat, float rot, float x, float y, float z)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->loadRotate(rot, x, y, z);
	}

	static void SC_matrixLoadScale(rsc_Matrix *mat, float x, float y, float z)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->loadScale(x, y, z);
	}

	static void SC_matrixLoadTranslate(rsc_Matrix *mat, float x, float y, float z)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->loadTranslate(x, y, z);
	}

	static void SC_matrixLoadMultiply(rsc_Matrix mat, const rsc_Matrix lhs, const rsc_Matrix *rhs)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->loadMultiply(reinterpret_cast<const Matrix *>(lhs),
	reinterpret_cast<const Matrix *>(rhs));
	}

	static void SC_matrixMultiply(rsc_Matrix mat, const rsc_Matrix rhs)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->multiply(reinterpret_cast<const Matrix *>(rhs));
	}

	static void SC_matrixRotate(rsc_Matrix *mat, float rot, float x, float y, float z)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->rotate(rot, x, y, z);
	}

	static void SC_matrixScale(rsc_Matrix *mat, float x, float y, float z)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->scale(x, y, z);
	}

	static void SC_matrixTranslate(rsc_Matrix *mat, float x, float y, float z)
	{
	Matrix m = reinterpret_cast<Matrix >(mat);
	m->translate(x, y, z);
	}


	//////////////////////////////////////////////////////////////////////////////
	//
	//////////////////////////////////////////////////////////////////////////////

	static uint32_t SC_allocGetDimX(RsAllocation va)
	{
	GET_TLS();
	const Allocation a = static_cast<const Allocation >(va);
	//LOGE("SC_allocGetDimX a=%p", a);
	//LOGE(" type=%p", a->getType());
	return a->getType()->getDimX();
	}

	static uint32_t SC_allocGetDimY(RsAllocation va)
	{
	GET_TLS();
	const Allocation a = static_cast<const Allocation >(va);
	return a->getType()->getDimY();
	}

	static uint32_t SC_allocGetDimZ(RsAllocation va)
	{
	GET_TLS();
	const Allocation a = static_cast<const Allocation >(va);
	return a->getType()->getDimZ();
	}

	static uint32_t SC_allocGetDimLOD(RsAllocation va)
	{
	GET_TLS();
	const Allocation a = static_cast<const Allocation >(va);
	return a->getType()->getDimLOD();
	}

	static uint32_t SC_allocGetDimFaces(RsAllocation va)
	{
	GET_TLS();
	const Allocation a = static_cast<const Allocation >(va);
	return a->getType()->getDimFaces();
	}



	static void SC_debugF(const char *s, float f) {
	LOGE("%s %f, 0x%08x", s, f, ((int ) (&f)));
	}
	static void SC_debugFv2(const char *s, rsvF_2 fv) {
	float f = (float )&fv;
	LOGE("%s {%f, %f}", s, f[0], f[1]);
	}
	static void SC_debugFv3(const char *s, rsvF_4 fv) {
	float f = (float )&fv;
	LOGE("%s {%f, %f, %f}", s, f[0], f[1], f[2]);
	}
	static void SC_debugFv4(const char *s, rsvF_4 fv) {
	float f = (float )&fv;
	LOGE("%s {%f, %f, %f, %f}", s, f[0], f[1], f[2], f[3]);
	}
	static void SC_debugI32(const char *s, int32_t i) {
	LOGE("%s %i 0x%x", s, i, i);
	}

	static uint32_t SC_toClient(void *data, int cmdID, int len, int waitForSpace)
	{
	GET_TLS();
	//LOGE("SC_toClient %i %i %i", cmdID, len, waitForSpace);
	return rsc->sendMessageToClient(data, cmdID, len, waitForSpace != 0);
	}

	static void SC_scriptCall(int scriptID)
	{
	GET_TLS();
	rsc->runScript((Script *)scriptID);
	}

	int SC_divsi3(int a, int b)
	{
	return a / b;
	}

	int SC_getAllocation(const void *ptr)
	{
	GET_TLS();
	const Allocation *alloc = sc->ptrToAllocation(ptr);
	return (int)alloc;
	}


	void SC_ForEachii(RsScript vs, RsAllocation vin)
	{
	GET_TLS();
	Script s = static_cast<Script >(vs);
	Allocation ain = static_cast<Allocation >(vin);
	s->runForEach(rsc, ain, NULL);
	}

	void SC_ForEachiii(RsScript vs, RsAllocation vin, RsAllocation vout)
	{
	GET_TLS();
	Script s = static_cast<Script >(vs);
	Allocation ain = static_cast<Allocation >(vin);
	Allocation aout = static_cast<Allocation >(vout);
	s->runForEach(rsc, ain, aout);
	}

	void SC_ForEachiiii(RsScript vs, RsAllocation vin, int xStart, int xEnd)
	{
	GET_TLS();
	Script s = static_cast<Script >(vs);
	Allocation ain = static_cast<Allocation >(vin);
	s->runForEach(rsc, ain, NULL, xStart, xEnd);
	}

	void SC_ForEachiiiii(RsScript vs, RsAllocation vin, RsAllocation vout, int xStart, int xEnd)
	{
	GET_TLS();
	Script s = static_cast<Script >(vs);
	Allocation ain = static_cast<Allocation >(vin);
	Allocation aout = static_cast<Allocation >(vout);
	s->runForEach(rsc, ain, aout, xStart, xEnd);
	}

	void SC_ForEachiiiiii(RsScript vs, RsAllocation vin, int xStart, int yStart, int xEnd, int yEnd)
	{
	GET_TLS();
	Script s = static_cast<Script >(vs);
	Allocation ain = static_cast<Allocation >(vin);
	s->runForEach(rsc, ain, NULL, xStart, yStart, xEnd, yEnd);
	}

	void SC_ForEachiiiiiii(RsScript vs, RsAllocation vin, RsAllocation vout, int xStart, int yStart, int xEnd, int yEnd)
	{
	GET_TLS();
	Script s = static_cast<Script >(vs);
	Allocation ain = static_cast<Allocation >(vin);
	Allocation aout = static_cast<Allocation >(vout);
	s->runForEach(rsc, ain, aout, xStart, yStart, xEnd, yEnd);
	}


	//////////////////////////////////////////////////////////////////////////////
	// Class implementation
	//////////////////////////////////////////////////////////////////////////////

	// llvm name mangling ref
	// <builtin-type> ::= v # void
	// ::= b # bool
	// ::= c # char
	// ::= a # signed char
	// ::= h # unsigned char
	// ::= s # short
	// ::= t # unsigned short
	// ::= i # int
	// ::= j # unsigned int
	// ::= l # long
	// ::= m # unsigned long
	// ::= x # long long, __int64
	// ::= y # unsigned long long, __int64
	// ::= f # float
	// ::= d # double

	static ScriptCState::SymbolTable_t gSyms[] = {
	{ "__divsi3", (void *)&SC_divsi3 },

	// allocation
	{ "rsAllocationGetDimX", (void *)&SC_allocGetDimX },
	{ "rsAllocationGetDimY", (void *)&SC_allocGetDimY },
	{ "rsAllocationGetDimZ", (void *)&SC_allocGetDimZ },
	{ "rsAllocationGetDimLOD", (void *)&SC_allocGetDimLOD },
	{ "rsAllocationGetDimFaces", (void *)&SC_allocGetDimFaces },
	{ "rsGetAllocation", (void *)&SC_getAllocation },

	// Debug
	{ "_Z7rsDebugPKcf", (void *)&SC_debugF },
	{ "_Z7rsDebugPKcDv2_f", (void *)&SC_debugFv2 },
	{ "_Z7rsDebugPKcDv3_f", (void *)&SC_debugFv3 },
	{ "_Z7rsDebugPKcDv4_f", (void *)&SC_debugFv4 },
	{ "_Z7rsDebugPKci", (void *)&SC_debugI32 },
	//extern void __attribute__((overloadable))rsDebug(const char , const void );


	// RS Math
	{ "_Z6rsRandi", (void *)&SC_randi },
	{ "_Z6rsRandii", (void *)&SC_randi2 },
	{ "_Z6rsRandf", (void *)&SC_randf },
	{ "_Z6rsRandff", (void *)&SC_randf2 },
	{ "_Z6rsFracf", (void *)&SC_frac },

	// time
	{ "rsSecond", (void *)&SC_second },
	{ "rsMinute", (void *)&SC_minute },
	{ "rsHour", (void *)&SC_hour },
	{ "rsDay", (void *)&SC_day },
	{ "rsMonth", (void *)&SC_month },
	{ "rsYear", (void *)&SC_year },
	{ "rsUptimeMillis", (void*)&SC_uptimeMillis2 },
	{ "rsStartTimeMillis", (void*)&SC_startTimeMillis2 },
	{ "rsElapsedTimeMillis", (void*)&SC_elapsedTimeMillis2 },

	{ "rsSendToClient", (void *)&SC_toClient },

	// matrix
	{ "rsMatrixLoadIdentity", (void *)&SC_matrixLoadIdentity },
	{ "rsMatrixLoadFloat", (void *)&SC_matrixLoadFloat },
	{ "rsMatrixLoadMat", (void *)&SC_matrixLoadMat },
	{ "rsMatrixLoadRotate", (void *)&SC_matrixLoadRotate },
	{ "rsMatrixLoadScale", (void *)&SC_matrixLoadScale },
	{ "rsMatrixLoadTranslate", (void *)&SC_matrixLoadTranslate },
	{ "rsMatrixLoadMultiply", (void *)&SC_matrixLoadMultiply },
	{ "rsMatrixMultiply", (void *)&SC_matrixMultiply },
	{ "rsMatrixRotate", (void *)&SC_matrixRotate },
	{ "rsMatrixScale", (void *)&SC_matrixScale },
	{ "rsMatrixTranslate", (void *)&SC_matrixTranslate },

	{ "_Z9rsForEachii", (void *)&SC_ForEachii },
	{ "_Z9rsForEachiii", (void *)&SC_ForEachiii },
	{ "_Z9rsForEachiiii", (void *)&SC_ForEachiiii },
	{ "_Z9rsForEachiiiii", (void *)&SC_ForEachiiiii },
	{ "_Z9rsForEachiiiiii", (void *)&SC_ForEachiiiiii },
	{ "_Z9rsForEachiiiiiii", (void *)&SC_ForEachiiiiiii },

	////////////////////////////////////////////////////////////////////

	//{ "sinf_fast", (void *)&SC_sinf_fast },
	//{ "cosf_fast", (void *)&SC_cosf_fast },

	{ "scriptCall", (void *)&SC_scriptCall },


	{ NULL, NULL }
	};

	const ScriptCState::SymbolTable_t * ScriptCState::lookupSymbol(const char *sym)
	{
	ScriptCState::SymbolTable_t *syms = gSyms;

	while (syms->mPtr) {
	if (!strcmp(syms->mName, sym)) {
	return syms;
	}
	syms++;
	}
	return NULL;
	}