/* /lib/history.c
* from the Dead Souls Object Library
* handles command line histories
* created by Descartes of Borg 960511
*/
#include <config.h>
#include <message_class.h>
#include "include/history.h"
private int HistorySize = MIN_HISTORY_SIZE;
private static int CommandNumber = 1;
private static array History;
static void create(){
if( HistorySize < MIN_HISTORY_SIZE ) HistorySize = MIN_HISTORY_SIZE;
if( HistorySize > MAX_HISTORY_SIZE ) HistorySize = MAX_HISTORY_SIZE;
History = allocate(HistorySize);
}
static string eventHistory(string str){
string cmd, args, old, neu;
int len, num;
if( str[0] == '^' ) str = "!!" + str;
if( (len = strlen(str)) < 2 || str[0] != '!' ) return Push(str);
if( str[0..1] == "!!" || str[0..2] == "!-1"){
cmd = GetHistory(CommandNumber-1);
if( str[1] == '!' ){
if( len == 2 ) args = "";
else args = str[2..];
}
else {
if( len == 3 ) args = "";
else args = str[3..];
}
}
else {
int x;
if( str[1] == '-' ){
sscanf(str, "!-%d%s", x, args);
if( !x ) cmd = "";
else cmd = GetHistory(CommandNumber-x);
}
else if( sscanf(str, "!%d%s", x, args) == 2 ){
if( !x ) cmd = "";
else cmd = GetHistory(x);
}
else {
str = str[1..];
cmd = GetHistory(str);
args = "";
}
}
if( !cmd || cmd == "" ){
eventPrint("Invalid history command.", MSG_ERROR);
return "";
}
if( !args || args == "" ) return Push(cmd);
len = strlen(args);
if( args[0] != '^' && args[0] != 's' ){
if( len > 1 && args[0] == '\\' && (args[1] == '^' || args[1] == 's') )
args = args[1..];
return Push(cmd + args);
}
if( len < 3 ){
if( args[0] == 's' ){
if( len < 2 || args[1] != '/' ) return Push(cmd + args);
}
eventPrint("Invalid replacement syntax.", MSG_ERROR);
return "";
}
if( args[0] == '^' ){
int i;
args = args[1..];
i = strsrch(args, "^");
if( i == 0 ) i = -1;
while( i != -1 && args[i-1] == '\\' ){
args = args[0..i-2] + args[i..];
if( strlen(args) == i+1 ) i = -1;
else i = strsrch(args, "^", i+1);
}
if( i == -1 ){
eventPrint("Invalid replacement syntax.", MSG_ERROR);
return "";
}
old = args[0..(i-1)];
if( i == strlen(args) - 1 ) neu = "";
else neu = args[(i+1)..];
num = 1;
neu = replace_string(neu, "\\^", "^");
}
else {
int i;
args = args[2..];
i = strsrch(args, "/");
if( i == 0 ) i = -1;
while( i != -1 && args[i-1] == '\\' ){
args = args[0..i-2] + args[i..];
if( strlen(args) == i+1 ) i = -1;
else i = strsrch(args, "/", i+1);
}
if( i == -1 ){
eventPrint("Invalid replacement syntax.", MSG_ERROR);
return "";
}
old = args[0..(i-1)];
if( i == strlen(args) - 1 ) neu = "";
else neu = args[(i+1)..];
len = strlen(neu);
if( len > 1 ){
if( neu[<2..] == "/g" ){
if( len > 2 && neu[<3] != '\\' ){
num = 0;
neu = neu[0..<3];
}
else if( len > 2 ) num = 1;
else {
num = 0;
neu = "";
}
}
}
else num = 1;
neu = replace_string(neu, "\\/", "/");
}
cmd = replace_string(cmd, old, neu, num);
return Push(cmd);
}
nomask private static string Push(string cmd){
int x;
x = (CommandNumber-1) % sizeof(History);
History[x] = cmd;
CommandNumber++;
return cmd;
}
int GetCommandNumber(){
return CommandNumber;
}
private string GetHistory(mixed val){
if( CommandNumber == 1 ) return "";
if( intp(val) ){
if( val < 1 ) return "";
else if( val > CommandNumber -1 ) return "";
else if( val < (CommandNumber - sizeof(History)) ) return "";
val = (val-1) % sizeof(History);
return History[val];
}
else if( stringp(val) ){
int i, x;
x = (CommandNumber-2) % sizeof(History);
for(i = x; i>=0; i--){
if( !History[i] ) continue;
if( strsrch(History[i], val) == 0 ) return History[i];
}
for(i = sizeof(History)-1; i>x; i--){
if( !History[i] ) continue;
if( strsrch(History[i], val) == 0 ) return History[i];
}
return "";
}
else error("Invalid argument to GetHistory().\n");
}
string *GetHistoryList(){
if( !((int)master()->valid_apply(({ GetKeyName() }))) ) return ({});
return copy(History);
}
int SetHistorySize(int x){
if( !((int)master()->valid_apply(({ GetKeyName() }))) )
return HistorySize;
if( x == HistorySize ) return HistorySize;
if( x > MAX_HISTORY_SIZE ) return HistorySize;
else if( x < MIN_HISTORY_SIZE ) return HistorySize;
CommandNumber = 1;
return sizeof(History = allocate(HistorySize = x));
}
