/* /secure/cmds/creator/tail.c * from the Foundation II Object Library * Displays the last screenful of information from a file * created by Descartes of Borg 950915 */ #include <lib.h> inherit LIB_DAEMON; mixed cmd(string args) { string *lines; string buff; int scr, err; if( !args ) return "You must specify a file to tail."; else args = absolute_path(this_player()->query_cwd(), args); if( !file_exists(args) ) return "File " + args + " not found."; err = catch(buff = read_file(args)); if( err || !buff ) return "Unable to tail " + args + "."; scr = ((this_player()->GetScreen())[1] || 24); if( scr > 100 ) scr = 100; if( sizeof(lines = explode(buff, "\n")) > scr ) buff = implode(lines[<scr..], "\n"); message("system", buff, this_player()); return 1; } string GetHelp() { return ("Syntax: tail <file>\n\n" "Displays the last lines of the specified " "file.\n" "See also: cat, head, more."); }