#include <lib.h>
#include <daemons.h>

inherit LIB_DAEMON;

string file;

mixed cmd(string args) {
    string ip, name;
    int port, octet1, octet2, octet3, octet4;

    if(!archp(previous_object())) return "No.";

    if(!args || args == ""){
        object omud = find_object(INTERMUD_D);
        if(!omud){
            write("The intermud daemon is not loaded. Try: help switchrouter");
            write("It may also be disabled. Try: help mudconfig");
            return 1;
        }
        name = omud->GetNameservers()[0][0];
        ip = omud->GetNameservers()[0][1];
        if(!name || !ip){
            write("There appears to be something wrong with your intermud daemon config.");
            return 1;
        }
        write("Your current direct router connection is to "+name+" "+ip);
        if(sizeof(omud->GetNameservers()) > 1){
            write("NOTE: You have multiple routers configured. The array "+
              "of routers you are connected to is: "+identify(omud->GetNameservers()));
        }
        return 1;
    }

    if(find_object(INTERMUD_D))find_object(INTERMUD_D)->eventClearVars();
    if(find_object(INTERMUD_D))find_object(INTERMUD_D)->eventDestruct();


    if(args == "reload"){
        write("Reloading intermud daemon.");
        if( load_object(INTERMUD_D) ) write("Intermud daemon reloaded.");
        else write("Failed to reload intermud daemon.");
        return 1;
    }

    if(sscanf(args,"%s %s %d", name, ip, port) != 3 || port > 65534 ||
      sscanf(ip,"%d.%d.%d.%d", octet1, octet2, octet3, octet4) != 4){
        write("Invalid router reference. \nTry: switchrouter <ROUTERNAME> <NUMERICAL IP> <PORT>");
        write("For example: switchrouter yatmim 149.152.218.102 23");
        if( load_object(INTERMUD_D) ) write("Intermud daemon reloaded.");
        else write("Failed to reload intermud daemon.");
        return 1;
    }

    file = read_file(INTERMUD_D+".c");

    file = replace_matching_line(file, "//Nameservers", "");

    if(first(name,1) != "*") name = "*"+name;

    file = replace_matching_line(file, "Nameservers = ({",
      "    Nameservers = ({ ({ \""+name+"\", \""+ip+" "+port+"\" }) });", 1);

    unguarded( (: write_file(INTERMUD_D+".c",file,1) :) );

    if( load_object(INTERMUD_D) ) write("Intermud daemon reloaded.");
    else write("Failed to reload intermud daemon.");

    write("Done.");
    return 1;
}


string GetHelp(string args) {
    return ("Syntax: switchrouter <NAME> <IP> <PORT>\n\n"
      "Stops the intermud daemon, changes the default intermud "
      "router to the ip and port you specify, wipes the previous "
      "router data, and reloads INTERMUD_D. Without arguments, "
      "this command will clear your intermud cache and reload "
      "the daemon. Known routers are:\n"
      //"*gjs 198.144.203.194 9000 (The \"official\" intermud.org router)\n"
      //"*adsr 62.49.9.82 9000 (Arren's unmoderated router)\n"
      "*yatmim 149.152.218.102 23 (The \"official\" Dead Souls router)\n"
      "*i4 204.209.44.3 8080 (The backup/alternate router for *yatmim)\n"
      "The official current Dead Souls router's IP will always be "
      "available at:\n"
      "http://dead-souls.net/router.html"
      "\n\n"
      "See also: mudlist, mudconfig");
}