lpc4/lib/
lpc4/lib/doc/efun/
lpc4/lib/doc/lfun/
lpc4/lib/doc/operators/
lpc4/lib/doc/simul_efuns/
lpc4/lib/doc/types/
lpc4/lib/etc/
lpc4/lib/include/
lpc4/lib/include/arpa/
lpc4/lib/obj/d/
lpc4/lib/save/
lpc4/lib/secure/
lpc4/lib/std/
lpc4/lib/std/living/
#define SAVEFILE "/save/players"

string name;
string short_desc;
int level;
int last_login;
string plan;

static object finger(string s)
{
  object o;
	name=short_desc=plan=0;
	level=last_login=0;

  if(o=find_player(s)) o->save();
	s=db_get(SAVEFILE,s);
	if(!s) return 0;

	/* by doing this we can keep variables secret */
	restore_object(s);
	return o;
}


mapping m_finger(string s)
{
  object o;
  o=finger(s);
  return ([
    "name":name,
    "level":level,
    "short":short_desc,
    "last_login":last_login,
    "plan":plan,
    "logged_on":o,
  ]);
}

string s_finger(string s)
{
	finger(s);
	return save_object();
}