Example #1
0
int pref_InitInitialObjects() {
    MochaBoolean ok;
    MochaDatum result;
	HRSRC hFound;
	HGLOBAL hRes;
	char * lpBuff = NULL;
	XP_File fp;
	XP_StatStruct stats;
	long fileLength;


#ifdef FROM_RES
	hFound = FindResource(m_hInstance, "init_prefs", RT_RCDATA);
	hRes = LoadResource(m_hInstance, hFound);
	lpBuff = (char *)LockResource(hRes);
    ok = MOCHA_EvaluateBuffer(m_mochaContext,m_mochaPrefObject,
			      lpBuff, strlen(lpBuff), NULL, 0,
			      &result);
#else
	_stat("c:\\dog\\initprefs", &stats);

	fileLength = stats.st_size;
	fp = fopen("c:\\dog\\initprefs", "r");

	if (fp) {
		char* readBuf = (char *) malloc(fileLength * sizeof(char));
		if (readBuf) {
			fileLength = XP_FileRead(readBuf, fileLength, fp);
			
			ok = MOCHA_EvaluateBuffer(m_mochaContext,m_mochaPrefObject,
				  readBuf, fileLength, NULL, 0, &result);
			free(readBuf);
			XP_FileClose(fp);
		}
	}
#endif
	return TRUE;
}
Example #2
0
CStreamOutFile::~CStreamOutFile(){
    XP_FileClose( m_outputFile );
}