33 lines
964 B
C
33 lines
964 B
C
/* /secure/cmds/creator/cat.c
|
|
* from the Foundation II LPC Library
|
|
* command to display file contents
|
|
* created by Descartes of Borg 940124
|
|
* some updates made 950915
|
|
*/
|
|
|
|
#include <lib.h>
|
|
|
|
inherit LIB_DAEMON;
|
|
|
|
mixed cmd(string str) {
|
|
string *arr;
|
|
string tmp;
|
|
|
|
if( !str ) return "You must specify a file to cat.";
|
|
else str = absolute_path(this_player()->query_cwd(), str);
|
|
if( !file_exists(str) ) return "File " + str + " not found.";
|
|
else if( !(tmp = read_file(str)) )
|
|
return "Unable to read file " + str + ".";
|
|
if( sizeof(arr = explode(tmp, "\n")) > 100 )
|
|
tmp = implode(arr[0..99], "\n") + "\n\t*** TRUNCATED ***";
|
|
message("system", tmp, this_player());
|
|
return 1;
|
|
}
|
|
|
|
string GetHelp(){
|
|
return ("Syntax: cat <file>\n\n"
|
|
"Displays the contents of the file mentioned all at once. "
|
|
"May truncate output if it is a long file.\n"
|
|
"See also: longcat");
|
|
}
|