void fxLoadModuleXML(txMachine* the, txString path, txID moduleID)
{
FskFileMapping map = NULL;
txFileMapStream fileMapStream;
txStringStream stringStream;
txScript* script = NULL;
mxTry(the) {
fxBeginHost(the);
xsThrowIfFskErr(FskFileMap(path, &fileMapStream.buffer, &fileMapStream.size, 0, &map));
fileMapStream.offset = 0;
mxPushInteger(0);
mxPushInteger(0);
mxPushInteger(0);
mxPushInteger(0);
mxPushInteger(3);
fxParse(the, &fileMapStream, fxFileMapGetter, path, 1, xsSourceFlag | xsDebugFlag);
fxCallID(the, fxID(the, "generate"));
fxToString(the, the->stack);
stringStream.slot = the->stack;
stringStream.size = c_strlen(stringStream.slot->value.string);
stringStream.offset = 0;
script = fxParseScript(the, &stringStream, fxStringGetter, mxDebugFlag);
fxEndHost(the);
}
mxCatch(the) {
break;
}
FskFileDisposeMap(map);
fxResolveModule(the, moduleID, script, NULL, NULL);
}
void fxLoadModuleJS(txMachine* the, txString path, txID moduleID)
{
FskErr err = kFskErrNone;
FskFileMapping map = NULL;
txFileMapStream stream;
txParser _parser;
txParser* parser = &_parser;
txParserJump jump;
txScript* script = NULL;
bailIfError(FskFileMap(path, (unsigned char**)&(stream.buffer), &(stream.size), 0, &map));
stream.offset = 0;
fxInitializeParser(parser, the, 32*1024, 1993);
parser->firstJump = &jump;
parser->path = fxNewParserSymbol(parser, path);
if (c_setjmp(jump.jmp_buf) == 0) {
fxParserTree(parser, &stream, fxFileMapGetter, 2, NULL);
fxParserHoist(parser);
fxParserBind(parser);
script = fxParserCode(parser);
}
fxTerminateParser(parser);
bail:
FskFileDisposeMap(map);
if (err && script) {
fxDeleteScript(script);
script = NULL;
}
fxResolveModule(the, moduleID, script, NULL, NULL);
}
xsBooleanValue fxFindModuleLoadAsDirectory(xsMachine* the, xsStringValue base, xsStringValue name, xsIndex* id)
{
char node[1024];
UInt32 nodeSize;
xsStringValue slash;
FskErr err;
FskFileMapping map = NULL;
xsBooleanValue result = 0;
xsStringValue path = NULL;
unsigned char* data;
FskInt64 size;
xsSlot slot;
nodeSize = sizeof(node);
FskStrNCopy(node, base, nodeSize);
slash = FskStrRChr(node, '/');
if (slash)
*slash = 0;
FskStrNCat(node, "/", nodeSize);
FskStrNCat(node, name, nodeSize);
if (FskStrTail(node, "/") != 0)
FskStrNCat(node, "/", nodeSize);
FskStrNCat(node, "package.json", nodeSize);
err = KprURLToPath(node, &path);
if (err == kFskErrNone) {
err = FskFileMap(path, &data, &size, 0, &map);
if (err == kFskErrNone) {
xsTry {
slot = xsNewInstanceOf(xsChunkPrototype);
xsSetHostData(slot, data);
xsSetHostDestructor(slot, NULL);
xsSet(slot, xsID("length"), xsInteger(size));
slot = xsCall1(xsGet(xsGlobal, xsID("JSON")), xsID("parse"), slot);
}
xsCatch {
slot = xsUndefined;
}
if (xsTest(slot)) {
slot = xsGet(slot, xsID("main"));
if (xsTest(slot)) {
FskStrNCopy(node, name, nodeSize);
if (FskStrTail(node, "/") != 0)
FskStrNCat(node, "/", nodeSize);
FskStrNCat(node, xsToString(slot), nodeSize);
if (fxFindModuleLoadAsFile(the, base, node, id))
result = 1;
}
}
}
void KPR_system_get_backGesture(xsMachine *the)
{
FskErr err = kFskErrNone;
char* path = NULL;
char* pathName = NULL;
FskFileMapping map = NULL;
unsigned char *data;
FskInt64 size;
#if MINITV
pathName = TOUCHD_CONF;
#else
bailIfError(FskDirectoryGetSpecialPath(kFskDirectorySpecialTypeApplicationPreference, true, NULL, &path));
pathName = FskStrDoCat(path, "touchd.conf");
bailIfNULL(pathName);
#endif
bailIfError(FskFileMap(pathName, &data, &size, 0, &map));
xsResult = xsStringBuffer((xsStringValue)data, (xsIntegerValue)size);
bail:
FskFileDisposeMap(map);
if (path) {
FskMemPtrDispose(path);
FskMemPtrDispose(pathName);
}
}
FskErr FskTextFreeTypeInstallFonts(char* fontsPath, char* defaultFont)
{
FskErr err = kFskErrNone;
FskTextEngine fte;
char *fromDirectory = NULL;
char* fromPath = NULL;
FskDirectoryIterator iterator = NULL;
char *name = NULL;
UInt32 type;
#if TARGET_OS_ANDROID
char *toDirectory = NULL;
char* toPath = NULL;
FskFileInfo itemInfo;
FskFileMapping map = NULL;
unsigned char *data;
FskInt64 dataSize;
FskFile file = NULL;
#endif
err = FskTextEngineNew(&fte, NULL);
if (err) goto bail;
fromDirectory = FskEnvironmentDoApply(FskStrDoCopy(fontsPath));
if (!fromDirectory) { err = kFskErrMemFull; goto bail; }
#if TARGET_OS_ANDROID
if (!FskStrCompareWithLength(fromDirectory, "/data/app/", 10)) {
err = FskDirectoryGetSpecialPath(kFskDirectorySpecialTypeApplicationPreference, false, NULL, &toDirectory);
if (err) goto bail;
}
#endif
err = FskDirectoryIteratorNew(fromDirectory, &iterator, 0);
if (err) goto bail;
while (kFskErrNone == FskDirectoryIteratorGetNext(iterator, &name, &type)) {
if (type == kFskDirectoryItemIsFile) {
fromPath = FskStrDoCat(fromDirectory, name);
if (!fromPath) { err = kFskErrMemFull; goto bail; }
FskDebugStr("from %s", fromPath);
#if TARGET_OS_ANDROID
if (toDirectory) {
toPath = FskStrDoCat(toDirectory, name);
FskDebugStr("to %s", toPath);
if (kFskErrNone != FskFileGetFileInfo(toPath, &itemInfo)) {
err = FskFileMap(fromPath, &data, &dataSize, 0, &map);
if (err) goto bail;
err = FskFileCreate(toPath);
if (err) goto bail;
err = FskFileOpen(toPath, kFskFilePermissionReadWrite, &file);
if (err) goto bail;
err = FskFileWrite(file, dataSize, data, NULL);
if (err) goto bail;
FskFileClose(file);
file = NULL;
FskFileDisposeMap(map);
map = NULL;
}
FskDebugStr("add %s", toPath);
FskTextAddFontFile(fte, toPath);
FskMemPtrDisposeAt(&toPath);
}
else
#endif
FskTextAddFontFile(fte, fromPath);
FskMemPtrDisposeAt(&fromPath);
}
FskMemPtrDisposeAt(&name);
}
#if TARGET_OS_ANDROID
if (gAndroidCallbacks->getModelInfoCB) {
char* osVersion;
gAndroidCallbacks->getModelInfoCB(NULL, &osVersion, NULL, NULL, NULL);
if ((FskStrStr(osVersion, "android.5") == osVersion) // for KPR applications
|| (FskStrStr(osVersion, "5.") == osVersion)) { // for tests
BAIL_IF_ERR(err = FskFTAddMapping("/system/etc/fonts.xml"));
}
if ((FskStrStr(osVersion, "android.4") == osVersion) // for KPR applications
|| (FskStrStr(osVersion, "4.") == osVersion)) { // for tests
BAIL_IF_ERR(err = FskFTAddMapping("/system/etc/system_fonts.xml"));
err = FskFTAddMapping("/vendor/etc/fallback_fonts.xml");
if (err != kFskErrFileNotFound) BAIL(err);
BAIL_IF_ERR(err = FskFTAddMapping("/system/etc/fallback_fonts.xml"));
}
else {
defaultFont = "Droid Sans";
BAIL_IF_ERR(err = FskFTAddMapping(NULL));
}
}
#endif
if (defaultFont)
FskTextDefaultFontSet(fte, defaultFont);
bail:
#if TARGET_OS_ANDROID
if (file)
FskFileClose(file);
if (map)
FskFileDisposeMap(map);
FskMemPtrDispose(toPath);
FskMemPtrDispose(toDirectory);
#endif
FskMemPtrDispose(name);
FskDirectoryIteratorDispose(iterator);
FskMemPtrDispose(fromPath);
FskMemPtrDispose(fromDirectory);
FskTextEngineDispose(fte);
return err;
}
void* fxMapArchive(txString base, txCallbackAt callbackAt)
{
FskErr err = kFskErrNone;
txArchive* archive = NULL;
txString p;
Atom atom;
int c, i;
txString* symbol;
txScript* script;
bailIfError(FskMemPtrNewClear(sizeof(txArchive), &archive));
c_strcpy(archive->base, base);
bailIfError(FskFileMap(base, (unsigned char**)&(archive->address), &(archive->size), 0, &(archive->map)));
p = archive->address;
p = fxMapAtom(p, &atom);
bailAssert(atom.atomType == XS_ATOM_ARCHIVE);
p = fxMapAtom(p, &atom);
bailAssert(atom.atomType == XS_ATOM_VERSION);
bailAssert(*p++ == XS_MAJOR_VERSION);
bailAssert(*p++ == XS_MINOR_VERSION);
bailAssert(*p++ == XS_PATCH_VERSION);
if ((*p++) && !callbackAt) {
char* dot;
dot = c_strrchr(archive->base, '.');
if (dot)
*dot = 0;
#if mxWindows
c_strcat(archive->base, ".dll");
#else
c_strcat(archive->base, ".so");
#endif
bailIfError(FskLibraryLoad(&(archive->library), archive->base));
bailIfError(FskLibraryGetSymbolAddress(archive->library, "xsHostModuleAt", &callbackAt));
archive->keys = callbackAt(0);
}
p = fxMapAtom(p, &atom);
bailAssert(atom.atomType == XS_ATOM_SYMBOLS);
mxDecode2(p, archive->symbolCount);
c = archive->symbolCount;
if (c) {
bailIfError(FskMemPtrNew(c * sizeof(txString), &(archive->symbols)));
symbol = archive->symbols;
for (i = 0; i < c; i++) {
*symbol = p;
p += c_strlen(p) + 1;
symbol++;
}
}
p = fxMapAtom(p, &atom);
bailAssert(atom.atomType == XS_ATOM_PATHS);
mxDecode2(p, archive->scriptCount);
c = archive->scriptCount;
bailIfError(FskMemPtrNewClear(c * sizeof(txScript), &(archive->scripts)));
script = archive->scripts;
for (i = 1; i <= c; i++) {
if (callbackAt)
script->callback = callbackAt(i);
script->path = p;
bailIfNULL(script->path);
p += c_strlen(p) + 1;
script++;
}
script = archive->scripts;
for (i = 0; i < c; i++) {
p = fxMapAtom(p, &atom);
bailAssert(atom.atomType == XS_ATOM_CODE);
script->codeSize = atom.atomSize - sizeof(atom);
script->codeBuffer = (txS1*)p;
p += script->codeSize;
script++;
}
p = c_strrchr(archive->base, '/');
if (p) {
p++;
*p = 0;
archive->baseLength = p - archive->base;
}
bail:
if (err) {
fxUnmapArchive(archive);
archive = NULL;
}
return archive;
}
void fxIncludeScript(txParser* parser, txString string)
{
txBoolean done = 0;
char* base = NULL;
char name[PATH_MAX];
char* slash = NULL;
char* dot = NULL;
char* extension = NULL;
char* url = NULL;
char* path = NULL;
FskFileInfo fileInfo;
FskFileMapping map= NULL;
txFileMapStream fileMapStream;
txStringStream stringStream;
txMachine* the = parser->console;
fxBeginHost(the);
{
mxTry(the) {
xsThrowIfFskErr(KprPathToURL(parser->path->string, &base));
FskStrCopy(name, string);
slash = FskStrRChr(name, '/');
if (!slash)
slash = name;
dot = FskStrRChr(slash, '.');
if (dot)
extension = dot;
else
extension = name + FskStrLen(name);
if (!dot)
FskStrCopy(extension, ".js");
if (!FskStrCompare(extension, ".js")) {
xsThrowIfFskErr(KprURLMerge(base, name, &url));
xsThrowIfFskErr(KprURLToPath(url, &path));
if (kFskErrNone == FskFileGetFileInfo(path, &fileInfo)) {
xsThrowIfFskErr(FskFileMap(path, (unsigned char**)&(fileMapStream.buffer), &(fileMapStream.size), 0, &map));
fileMapStream.offset = 0;
fxIncludeTree(parser, &fileMapStream, fxFileMapGetter, parser->flags, path);
done = 1;
FskFileDisposeMap(map);
map = NULL;
}
FskMemPtrDisposeAt(&path);
FskMemPtrDisposeAt(&url);
}
if (!dot)
FskStrCopy(extension, ".xml");
if (!FskStrCompare(extension, ".xml")) {
xsThrowIfFskErr(KprURLMerge(base, name, &url));
xsThrowIfFskErr(KprURLToPath(url, &path));
if (kFskErrNone == FskFileGetFileInfo(path, &fileInfo)) {
xsThrowIfFskErr(FskFileMap(path, &fileMapStream.buffer, &fileMapStream.size, 0, &map));
fileMapStream.offset = 0;
mxPushInteger(0);
mxPushInteger(0);
mxPushInteger(0);
mxPushInteger(0);
mxPushInteger(3);
fxParse(the, &fileMapStream, fxFileMapGetter, path, 1, xsSourceFlag | xsDebugFlag);
fxCallID(the, fxID(the, "generate"));
fxToString(the, the->stack);
stringStream.slot = the->stack;
stringStream.size = c_strlen(stringStream.slot->value.string);
stringStream.offset = 0;
fxIncludeTree(parser, &stringStream, fxStringGetter, parser->flags, path);
done = 1;
FskFileDisposeMap(map);
map = NULL;
}
FskMemPtrDisposeAt(&path);
FskMemPtrDisposeAt(&url);
}
FskMemPtrDispose(base);
}
mxCatch(the) {
FskFileDisposeMap(map);
FskMemPtrDispose(path);
FskMemPtrDispose(url);
FskMemPtrDispose(base);
break;
}
}
fxEndHost(the);
if (!done)
fxReportParserError(parser, "include file not found: %s", string);
}