Function cliRegisterLua

Source/Basic/Application.cpp:392–448

}

void cliRegisterLua(lua_State* L, int argc, char* argv[], const fs::path& scriptPath, int cliIndex, const std::optional<fs::path>& assetPath) {
	luaL_openlibs(L);
	luaL_requiref(L, "json", luaopen_colibc_json, 1);
	lua_pop(L, 1);
	luaL_requiref(L, "yue", luaopen_yue, 1);
	lua_pop(L, 1);
	lua_getglobal(L, "package");
	lua_getfield(L, -1, "path");
	auto packagePath = cliGetString(L, -1);
	lua_pop(L, 1);
	auto scriptDir = scriptPath.parent_path().string();
	auto assetsScriptDir = scriptPath.parent_path().parent_path().string();
	packagePath = scriptDir + "/?.lua;" + assetsScriptDir + "/?.lua;" + assetsScriptDir + "/?/init.lua;" + packagePath;
	lua_pushlstring(L, packagePath.c_str(), packagePath.size());
	lua_setfield(L, -2, "path");
	lua_pop(L, 1);

	if (assetPath) {
		auto path = assetPath->string();
		lua_newtable(L); // Content
		lua_pushlstring(L, path.c_str(), path.size());
		lua_setfield(L, -2, "assetPath");
		lua_setglobal(L, "Content");
	}

	lua_newtable(L); // Dora
	lua_newtable(L); // Dora.CLI
	lua_newtable(L); // args
	int argIndex = 1;
	for (int i = cliIndex + 1; i < argc; i++) {
		if (cliIsAssetArgument(argc, argv, i)) continue;
		lua_pushstring(L, argv[i]);
		lua_rawseti(L, -2, argIndex++);
	}
	lua_setfield(L, -2, "args");
	auto executablePath = cliAbsolutePath(argv[0]).string();
	lua_pushlstring(L, executablePath.c_str(), executablePath.size());
	lua_setfield(L, -2, "executablePath");
	auto path = scriptPath.string();
	lua_pushlstring(L, path.c_str(), path.size());
	lua_setfield(L, -2, "scriptPath");
	cliSetFunc(L, "cwd", cliLuaCwd);
	cliSetFunc(L, "env", cliLuaEnv);
	cliSetFunc(L, "absolute", cliLuaAbsolute);
	cliSetFunc(L, "exists", cliLuaExists);
	cliSetFunc(L, "isDir", cliLuaIsDir);
	cliSetFunc(L, "isFile", cliLuaIsFile);
	cliSetFunc(L, "mkdirs", cliLuaMkdirs);
	cliSetFunc(L, "readFile", cliLuaReadFile);
	cliSetFunc(L, "writeFile", cliLuaWriteFile);
	cliSetFunc(L, "listDir", cliLuaListDir);
	cliSetFunc(L, "mtime", cliLuaMTime);
	cliSetFunc(L, "system", cliLuaSystem);
	cliSetFunc(L, "http", cliLuaHttp);
	lua_setfield(L, -2, "CLI");
	lua_setglobal(L, "Dora");
}