98 lines
3.2 KiB
C
98 lines
3.2 KiB
C
/* /secure/cmds/creator/lsed.c
|
|
* from the Dead Souls LPC Library
|
|
* an LPC scripted editor
|
|
* created by Descartes of Borg 950407
|
|
*/
|
|
|
|
#include <lib.h>
|
|
|
|
inherit LIB_DAEMON;
|
|
|
|
static void LsedFile(string file, string *cmds, int num_cmds);
|
|
|
|
mixed cmd(string args) {
|
|
string *files, *lines, *tmp;
|
|
string total, script, pwd;
|
|
int i, maxi, x;
|
|
|
|
if( args == "" || !args ) return "Syntax: <lsed [script] [filelist]>";
|
|
if( (maxi = sizeof(files = explode(args, " "))) == 1 )
|
|
return "You must specify the name of a file to run the script on.";
|
|
pwd = this_player()->query_cwd();
|
|
script = absolute_path( pwd, files[0] );
|
|
files = files[1..];
|
|
maxi--;
|
|
for(i=0, tmp = ({}); i<maxi; i++) {
|
|
files[i] = absolute_path(pwd, files[i]);
|
|
tmp += wild_card(files[i]);
|
|
}
|
|
maxi = sizeof(files = tmp);
|
|
if( !(total = read_file(script)) ) return "Failed to load script: "+script;
|
|
x = sizeof(lines = explode(total, "\n"));
|
|
for(i=0; i<maxi; i++){
|
|
int y;
|
|
|
|
y = file_size(files[i]);
|
|
if( y == -2 ) {
|
|
message("system", "lsed: File " + files[i] + " is a directory.",
|
|
this_player());
|
|
continue;
|
|
}
|
|
else if( y == -1 ) {
|
|
message("system", "lsed: File " + files[i] + " does not exist.",
|
|
this_player());
|
|
continue;
|
|
}
|
|
LsedFile(files[i], lines, x);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
static void LsedFile(string file, string *cmds, int num_cmds) {
|
|
string ret;
|
|
int i;
|
|
|
|
ed_start(file, 0);
|
|
if( query_ed_mode() == -1 ) {
|
|
message("system", "lsed: Failed to read file " + file, this_player());
|
|
return;
|
|
}
|
|
for(i=0; i<num_cmds; i++) {
|
|
ret = ed_cmd(cmds[i]);
|
|
if( query_ed_mode() == -1 ) {
|
|
message("system", "lsed: Script quit unexpectedly on line " +
|
|
(i+1) + " for file " + file + " with message: " + ret,
|
|
this_player());
|
|
return;
|
|
}
|
|
}
|
|
ret = ed_cmd("x");
|
|
if( query_ed_mode() != -1 ) {
|
|
ed_cmd("Q");
|
|
message("system", "lsed: permission denied for " + file,
|
|
this_player());
|
|
return;
|
|
}
|
|
message("system", ret, this_player());
|
|
}
|
|
|
|
string GetHelp() {
|
|
return ("Syntax: lsed <script> <filelist>\n\n"
|
|
"Allows you to perform editor commands on a file or set of files "
|
|
"from a script. You simply write a script of editor commands "
|
|
"and save it to a file. For example, say that you wanted to "
|
|
"change set_item_functions() to SetItems() and "
|
|
"set_search_function() to SetSearch() in every file in your home "
|
|
"directory. You would write a script that looks like:\n\n"
|
|
"s/set_item_functions/SetItems/g\n"
|
|
"s/set_search_function/SetSearch/g\n\n"
|
|
"save it as convert.lsed, and then at the command line type: "
|
|
"\"lsed sconvert.lsed *\". Keep in mind that the MudOS "
|
|
"driver will only let an execution thread run so long "
|
|
"before automatically terminating it with a too long evaluation "
|
|
"error, so avoid running lsed on a large number of files at "
|
|
"once.\n"
|
|
"See also: ed");
|
|
}
|
|
|