#pragma strict_types
#pragma no_clone

#include "topornicy.h"
#include <mail.h>

#define MAILCHECKER "/secure/mail_checker"
#define MAILREADER "/secure/mail_reader"
#define MAILREADER_ID "mailread"

inherit STD_PATH + "war_in.c";

void
create_warownia_room()
{
    set_short ("Poczta");

    add_exit (WPATH + "dziedz3.c", "wschod");
}

int
init() 
{
  object obj;

  ::init();

  if (present(READER_ID, this_player()))
    return 1;
  if ((obj = clone_object(MAILREADER)) != 0)
    {
	obj->move(this_player());
    }
}

void
leave_inv(object who, object where) 
{
  object obj;

  if (who && 
      where && 
      where != this_object() &&
      (obj = present(READER_ID, who)) != 0)
    obj->remove_object();
  ::leave_inv(who, where);
}

int
query_mail(int silent) 
{
  int mail;
  string tekst;

  seteuid(getuid());
  mail = MAILCHECKER->query_mail();
  if (!mail)
    return 0;
  if (silent)
    return 1;
  tekst = "";
  if (mail == 2)
    tekst += "\n-------------------------------------------------------------";
    
  tekst += "\nCzeka na ciebie ";
  
  if (mail == 2)
    tekst += "NOWA";
  
  if (mail == 3)
    tekst += "nieprzeczytana";
  
  tekst += " poczta w najblizszym urzedzie pocztowym.\n";
  
  if (mail == 2)
    tekst += "-------------------------------------------------------------\n";
    
  tekst += "\n\n";

  write(tekst);    
  return 1;
}