view loadtools/ltscript.c @ 868:f6c379f0cbbe

ringtools/examples: move the old BU "melodies" into old subdir
author Mychaela Falconia <falcon@freecalypso.org>
date Mon, 28 Mar 2022 05:53:58 +0000
parents 6616f4e35579
children
line wrap: on
line source

/*
 * This module contains the code that implements the loadtool scripting
 * functionality: init-script setting and the exec command.
 */

#include <sys/param.h>
#include <stdio.h>
#include <string.h>
#include <strings.h>
#include <stdlib.h>

extern char default_helpers_dir[];

loadtool_exec_script(script_name, is_init_script)
	char *script_name;
{
	char pathbuf[MAXPATHLEN], *openfname;
	FILE *f;
	char linebuf[512], *cp;
	int lineno, retval = 0;

	if (!is_init_script || index(script_name, '/'))
		openfname = script_name;
	else {
		sprintf(pathbuf, "%s/%s", default_helpers_dir, script_name);
		openfname = pathbuf;
	}
	f = fopen(openfname, "r");
	if (!f) {
		perror(openfname);
		return(-1);
	}
	for (lineno = 1; fgets(linebuf, sizeof linebuf, f); lineno++) {
		cp = index(linebuf, '\n');
		if (!cp) {
			fprintf(stderr, "%s line %d: missing newline\n",
				openfname, lineno);
			fclose(f);
			return(-1);
		}
		*cp = '\0';
		retval = loadtool_dispatch_cmd(linebuf, 1);
		if (retval)
			break;
	}
	fclose(f);
	return(retval);
}

cmd_exec(argc, argv)
	char **argv;
{
	return loadtool_exec_script(argv[1], 0);
}