PrintBack

"cmd/god/dyh"->PrintBack(5,sprintf("day/copy_quit_%s.txt",short_time(time())),who);

void PrintBack( int d ,string filepath,object me)
{

mixed * mxFileList = call_stack(0);
mixed * mxFuncList = call_stack(2);
#ifdef __PRINT_CALL_OBJ__
mixed * mxObjList = call_stack(1);
#endif
int i, size;
string msg;

// Assert( sizeof( mxFuncList) == sizeof(mxFileList));
size = sizeof( mxFuncList);
if( d <= 0 || d>= size) d = size-1;
d += 1;

msg = "stack print\n";

for( i = d-1; i>0; --i)
{
msg += sprintf("%d : %s",i, mxFileList[i]);
#ifdef __PRINT_CALL_OBJ__
msg += sprintf("#%x",clonep(mxObjList[i])?getoid(mxObjList[i]):0);
#endif
msg += sprintf(" -> %s\n", mxFuncList[i]);
//msg += sprintf("%d : %s -> %s\n", i, mxFileList[i], mxFuncList[i]);
}
if(me)
log_file(filepath,sprintf("id:%d msg:%s\n",me->get_number(),msg));
// _DEBUG(msg);

}