1 /*-
37  * Like loader.perform, except args are passed already parsed
128  * Accepts a space-delimited loader command and runs it through the standard
129  * loader parsing, as if it were executed at the loader prompt by the user.
252 	const char	*mode, *str;  in lua_openfile()  local
261 	mode = "r";  in lua_openfile()
263 		mode = lua_tostring(L, 2);  in lua_openfile()
264 		if (mode == NULL) {  in lua_openfile()
269 	FILE * f = fopen(str, mode);  in lua_openfile()
321 		size = (*f)->size;  in lua_readfile()
365 	for (i = 0; i < nargs - 1; i++) {  in lua_writefile()
376 	for (i = 0; i < nargs - 1; i++) {  in lua_writefile()
429 	lua_setfield(L, -2, name);  in lua_add_feature()
443 	lua_setfield(L, -2, "features");  in lua_add_features()
450 	/* Add loader.machine and loader.machine_arch properties */  in luaopen_loader()
452 	lua_setfield(L, -2, "machine");  in luaopen_loader()
454 	lua_setfield(L, -2, "machine_arch");  in luaopen_loader()
456 	lua_setfield(L, -2, "lua_path");  in luaopen_loader()
458 	lua_setfield(L, -2, "version");  in luaopen_loader()
460 	lua_setfield(L, -2, "CMD_OK");  in luaopen_loader()
462 	lua_setfield(L, -2, "CMD_WARN");  in luaopen_loader()
464 	lua_setfield(L, -2, "CMD_ERROR");  in luaopen_loader()
466 	lua_setfield(L, -2, "CMD_CRIT");  in luaopen_loader()
468 	lua_setfield(L, -2, "CMD_FATAL");  in luaopen_loader()
470 	/* Set global printc to loader.printc */  in luaopen_loader()