Function Script_LoadFromFile

src/script/script.c:617–696

* Clears the given scriptInfo. * * @param filename The name of the file to load. * @param scriptInfo The scriptInfo to load in the script. * @param functions Pointer to the functions to call via script. * @param data Pointer to preallocated space to load data. */

 * @param data Pointer to preallocated space to load data.
 */
uint16 Script_LoadFromFile(const char *filename, ScriptInfo *scriptInfo, const ScriptFunction *functions, uint8 *data)
{
	uint32 total = 0;
	uint32 length = 0;
	uint8 index;
	int16 i;

	if (scriptInfo == NULL) return 0;
	if (filename == NULL) return 0;

	Script_ClearInfo(scriptInfo);

	scriptInfo->isAllocated = (data == NULL);

	scriptInfo->functions = functions;

	if (!File_Exists(filename)) return 0;

	index = ChunkFile_Open(filename);

	length = ChunkFile_Seek(index, HTOBE32(CC_TEXT));
	total += length;

	if (length != 0) {
		if (data != NULL) {
			scriptInfo->text = (uint16 *)data;
			data += length;
		} else {
			scriptInfo->text = calloc(1, length);
		}

		ChunkFile_Read(index, HTOBE32(CC_TEXT), scriptInfo->text, length);
	}

	length = ChunkFile_Seek(index, HTOBE32(CC_ORDR));
	total += length;

	if (length == 0) {
		Script_ClearInfo(scriptInfo);
		ChunkFile_Close(index);
		return 0;
	}

	if (data != NULL) {
		scriptInfo->offsets = (uint16 *)data;
		data += length;
	} else {
		scriptInfo->offsets = calloc(1, length);
	}

	scriptInfo->offsetsCount = (length >> 1) & 0xFFFF;
	ChunkFile_Read(index, HTOBE32(CC_ORDR), scriptInfo->offsets, length);

	for(i = 0; i < (int16)((length >> 1) & 0xFFFF); i++) {
		scriptInfo->offsets[i] = BETOH16(scriptInfo->offsets[i]);
	}

	length = ChunkFile_Seek(index, HTOBE32(CC_DATA));