/*    /daemon/news.c
 *    from the Dead Soulsr2 Object Library
 *    responsible for leading players through news
 *    created by Descartes of borg 951104
 */
#include <lib.h>
#include <news.h>
#include "include/news.h"
inherit LIB_DAEMON;
void GeneralNews() {
    if( file_exists(NEWS_GENERAL) ) {
        int s;
        s = stat(NEWS_GENERAL)[1];
        if( s != (int)this_player()->GetNews("general") ) {
            string news;
            news = GetNews("general");
            this_player()->SetNews("general", s);
            message("news", "\n%^RED%^General news:", this_player());
            this_player()->eventPrint(news);
            message("prompt", "Press <return> to continue: ", this_player());
            if( !((int)this_player()->GetClass()) && !creatorp(this_player()) )
                input_to((: NewbieNews :));
            else input_to((: ClassNews, "" :));
            return;
        }
    }
    if( !((int)this_player()->GetClass()) && !creatorp(this_player()) )
        NewbieNews();
    else ClassNews("");
}
static void NewbieNews() {
    if( file_exists(NEWS_NEWBIE) ) {
        string news;
        news = GetNews("newbie");
        message("news", "\n%^RED%^Newbie news:", this_player());
        message("news", news, this_player());
        message("prompt", "Press <return> to continue: ", this_player());
        input_to((: ClassNews, "" :));
        return;
    }
    ClassNews("");
}
void ClassNews(string cl) {
    if( !cl || cl == "" ) cl = "cleric";
    else {
        switch(cl) {
        case "cleric":
            cl = "fighter";
            break;
        case "fighter":
            cl = "fisher";
            break;
        case "fisher":
            cl = "kataan";
            break;
        case "kataan":
            cl = "mage";
            break;
        case "mage":
            cl = "monk";
            break;
        case "monk":
            cl = "rogue";
            break;
        case "rogue":
            HighMortalNews();
            return;
        }
    }
    if( (int)this_player()->ClassMember(cl) && file_exists(DIR_NEWS "/"+cl) ) {
        int s;
        s = stat(DIR_NEWS "/" + cl)[1];
        if( s != (int)this_player()->GetNews(cl) ) {
            string news;
            news = GetNews(cl);
            this_player()->SetNews(cl, s);
            message("news", "\n%^RED%^" + capitalize(cl) + " news:",
              this_player());
            message("news", news, this_player());
            message("prompt", "Press <return> to continue: ", this_player());
            input_to( (: ClassNews, cl :));
            return;
        }
    }
    ClassNews(cl);
}
static void HighMortalNews() {
    if( high_mortalp(this_player() ) && file_exists(NEWS_HM) ) {
        int s;
        s = stat(NEWS_HM)[1];
        if( s != (int)this_player()->GetNews("hm") ) {
            string news;
            news = GetNews("hm");
            this_player()->SetNews("hm", s);
            message("news", "\n%^RED%^High mortal news:", this_player());
            message("news", news, this_player());
            message("prompt", "Press <return> to continue: ", this_player());
            input_to( (: AvatarNews :));
            return;
        }
    }
    AvatarNews();
}
static void AvatarNews() {
    if( avatarp(this_player() ) && file_exists(NEWS_AVATAR) ) {
        int s;
        s = stat(NEWS_AVATAR)[1];
        if( s != (int)this_player()->GetNews("avatar") ) {
            string news;
            news = GetNews("avatar");
            this_player()->SetNews("avatar", s);
            message("news", "\n%^RED%^Avatar news:", this_player());
            message("news", news, this_player());
            message("prompt", "Press <return> to continue: ", this_player());
            input_to( (: CreatorNews :));
            return;
        }
    }
    CreatorNews();
}
static void CreatorNews() {
    if( creatorp(this_player() ) && file_exists(NEWS_CREATOR) ) {
        int s;
        s = stat(NEWS_CREATOR)[1];
        if( s != (int)this_player()->GetNews("creator") ) {
            string news;
            news = GetNews("creator");
            this_player()->SetNews("creator", s);
            message("news", "\n%^RED%^Creator news:", this_player());
            message("news", news, this_player());
            message("prompt", "Press <return> to continue: ", this_player());
            input_to( (: AdminNews :));
            return;
        }
    }
    AdminNews();
}
static void AdminNews() {
    if(archp(this_player() ) && file_exists(NEWS_ADMIN) ) {
        int s;
        s = stat(NEWS_ADMIN)[1];
        if( s != (int)this_player()->GetNews("admin") ) {
            string news;
            news = GetNews("admin");
            this_player()->SetNews("admin", s);
            message("news", "\n%^RED%^Admin news:", this_player());
            message("news", news, this_player());
            message("prompt", "Press <return> to continue: ", this_player());
            input_to( (: EndNews :));
            return;
        }
    }
    EndNews();
}
static void EndNews() {
    this_player()->eventDescribeEnvironment(0);
}
string GetNews(string type) {
    string file;
    switch(type) {
    case "admin":
        file = NEWS_ADMIN;
        break;
    case "avatar":
        file = NEWS_AVATAR;
        break;
    case "creator":
        file = NEWS_CREATOR;
        break;
    case "general":
        file = NEWS_GENERAL;
        break;
    case "hm":
        file = NEWS_HM;
        break;
    case "newbie":
        file = NEWS_NEWBIE;
        break;
    default:
        file = DIR_NEWS "/" + type;
        break;
    }
    if( !file_exists(file) ) return "No " + type + " news.";
    file = read_file(file) || ("No " + type + " news.");
    return file;
}