MainForm.cpp

Go to the documentation of this file.

#include "MainForm.h"
#include "SimpleWeb.h"
#include <libsimple.h>


MainForm::MainForm(SimpleWeb& www)
:BaseForm(www, "MainForm")
{
}


MainForm::~MainForm()
{
}


void MainForm::Process()
{
        Database& db = GetWeb().GetDatabase();
        Query q(db);
        std::string action = GetForm() -> getvalue(GetFormName());
        long skill = GetWeb().GetSkill();
        long building = GetWeb().GetBuilding();
        char sql[1000];

        if (action == "logout")
        {
                sprintf(sql, "delete from valid where account=%ld", GetWeb().GetAccount());
                q.execute(sql);
                GetWeb().SetAccount(0);
                GetWeb().SetValid(0);
                GetWeb().SetPlayer(0);
                return;
        }
        else
        if (action == "player")
        {
                GetWeb().SetPlayer(0);
                return;
        }
        else
        if (action == "hire")
        {
                long num = atol(GetForm() -> getvalue("hire").c_str());
                db::Npc npc(db, num);
                db::Player pl(db, GetWeb().GetPlayer());
                sprintf(sql, "select count(*) from npc where player=%ld and location=%ld", GetWeb().GetPlayer(), pl.location);
                long qnpcs = q.get_count(sql);
                long qbeds = 0;
                sprintf(sql, "select * from playerbuilding where player=%ld and location=%ld", GetWeb().GetPlayer(), pl.location);
                q.get_result(sql);
                while (q.fetch_row())
                {
                        db::Playerbuilding x(&db, &q);
                        db::Building b(db, x.building);
                        qbeds += b.beds;
                }
                q.free_result();

                if (!npc.player && qnpcs < qbeds)
                {
                        sprintf(sql, "select * from npcskill where npc=%ld", npc.num);
                        db::Npcskill npcsk(&db, sql);
                        db::Resource gold(db, "Gold");
                        db::Linkskillresource x(db, npcsk.skill, gold.num);
                        db::Playerresource y(db, GetWeb().GetPlayer(), gold.num);
                        if (y.amount >= x.base_amount)
                        {
                                y.amount -= x.base_amount;
                                y.save();
                                npc.player = GetWeb().GetPlayer();
                                npc.paid = 1;
                                npc.location = pl.location;
                                npc.save();
                        }
                }
                return;
        }
        else
        if (action == "fire")
        {
                long num = atol(GetForm() -> getvalue("fire").c_str());
                db::Npc npc(db, num);
                if (npc.player == GetWeb().GetPlayer())
                {
                        npc.player = 0;
                        npc.save();
                }
                return;
        }
        else
        if (action == "travel")
        {
                long num = atol(GetForm() -> getvalue("travel").c_str());
                db::Player pl(db, GetWeb().GetPlayer());
                db::Locationlink x(db, pl.location, num);
                if (x.location1 == pl.location && x.location2 == num) // ok
                {
                        pl.location = num;
                        pl.save();
                }
                return;
        }
        db::Account acct(db, GetWeb().GetAccount());
        if (!acct.superuser)
        {
                return;
        }
        // superuser functions
        if (action == "skill_create")
        {
                std::string name = GetForm() -> getvalue("skill_name");
                std::string rname = GetForm() -> getvalue("resource_name");
                std::string prod = GetForm() -> getvalue("prod"); // p / c
                long num = atol(GetForm() -> getvalue("skill").c_str());
                long rtoadd = atol(GetForm() -> getvalue("resource").c_str());
                long amount = atol(GetForm() -> getvalue("amount").c_str());
                if (rname.size())
                {
                        db::Resource r(db, rname);
                        r.name = rname;
                        r.save();
                }
                if (name.size())
                {
                        db::Skill sk(db, name);
                        sk.name = name;
                        sk.save();
                }
                if (num)
                {
                        GetWeb().SetSkill(num);
                        skill = num;
                }
                if (skill && rtoadd)
                {
                        db::Linkskillresource x(db, skill, rtoadd);
                        x.skill = skill;
                        x.resource = rtoadd;
                        x.type = prod;
                        x.base_amount = amount;
                        x.save();
                }
        }
        else
        if (action == "unlink" && skill)
        {
                long resource = atol(GetForm() -> getvalue("unlink").c_str());
                db::Linkskillresource x(db, skill, resource);
                x.erase();
        }
        else
        if (action == "building")
        {
                long num = atol(GetForm() -> getvalue("building").c_str());
                long rtoadd = atol(GetForm() -> getvalue("resource").c_str());
                long amount = atol(GetForm() -> getvalue("amount").c_str());
                std::string name = GetForm() -> getvalue("building_name");
                long beds = atol(GetForm() -> getvalue("beds").c_str());
                if (name.size())
                {
                        db::Building b(db, name);
                        b.name = name;
                        b.beds = beds;
                        b.save();
                }
                if (num)
                {
                        GetWeb().SetBuilding(num);
                        building = num;
                }
                if (building && rtoadd)
                {
                        db::Buildingresource x(db, building, rtoadd);
                        x.building = building;
                        x.resource = rtoadd;
                        x.amount = amount;
                        x.save();
                }
        }
        else
        if (action == "unlinkbr" && building)
        {
                long resource = atol(GetForm() -> getvalue("unlinkbr").c_str());
                db::Buildingresource x(db, building, resource);
                x.erase();
        }
        else
        if (action == "run")
        {
                GetWeb().Run();
        }
        else
        if (action == "supervy")
        {
                GetWeb().SetSuperuservy(1);
        }
        else
        if (action == "normalvy")
        {
                GetWeb().SetSuperuservy(0);
        }
        else
        if (action == "loc_create")
        {
                std::string name = GetForm() -> getvalue("location_name");
                long max = atol(GetForm() -> getvalue("max").c_str());
                long num = atol(GetForm() -> getvalue("location").c_str());
                db::Location loc(db, name);
                if (num)
                {
                        GetWeb().SetLocation(num);
                }
                if (!loc.num && name.size())
                {
                        db::Player pl(db, GetWeb().GetPlayer());
                        loc.name = name;
                        loc.max_buildings = max;
                        loc.save();
                        {
                                db::Locationlink x(db, loc.num, pl.location);
                                x.location1 = loc.num;
                                x.location2 = pl.location;
                                x.save();
                        }
                        {
                                db::Locationlink x(db, pl.location, loc.num);
                                x.location1 = pl.location;
                                x.location2 = loc.num;
                                x.save();
                        }
                        q.get_result("select * from resource");
                        while (q.fetch_row())
                        {
                                db::Resource r(&db, &q);
                                if (random() % 100 >= 10)
                                {
                                        db::Locationresource x(db, loc.num, r.num);
                                        x.location = loc.num;
                                        x.resource = r.num;
                                        x.amount = 1000 + random() % 10000;
                                        x.save();
                                }
                        }
                        q.free_result();
                }
                if (name.size())
                {
                        loc.name = name;
                        loc.max_buildings = max;
                        loc.save();
                }
        }
}


void MainForm::Display(long)
{
        Database& db = GetWeb().GetDatabase();
        Query q(db);
        db::Account acct(db, GetWeb().GetAccount());
        db::Player pl(db, GetWeb().GetPlayer());
        db::Location loc(db, pl.location);
        char sql[1000];

        sprintf(sql, "select count(*) from npc where player=%ld and location=%ld", pl.num, pl.location);
        long qnpcs = q.get_count(sql);
        long qbeds = 0;

        sprintf(sql, "select * from playerbuilding where player=%ld and location=%ld", pl.num, pl.location);
        q.get_result(sql);
        while (q.fetch_row())
        {
                db::Playerbuilding x(&db, &q);
                db::Building b(db, x.building);
                qbeds += b.beds;
        }
        q.free_result();

        // ...
        Header(db, q, acct, pl, loc, sql);

        if (!GetWeb().GetSuperuservy() || !acct.superuser)
        {
                printf("<table cellpadding=0 cellspacing=0><tr>");
                printf("<td valign='top'>");
                // available npc's
                printf("<div class=box style='background: #e0ffe0'>");
                printf("<u>NPC's available for hire</u><br>");
                if (qnpcs < qbeds)
                {
                        q.get_result("select * from npc where player=0 order by name");
                        while (q.fetch_row())
                        {
                                db::Npc npc(&db, &q);
                                sprintf(sql, "select * from npcskill where npc=%ld", npc.num);
                                db::Npcskill npcsk(&db, sql);
                                db::Skill sk(db, npcsk.skill);
                                printf("<b>%s</b>, age <b>%ld</b> days, <b>%s</b> [ <a class=button href='%s?%s=hire&hire=%ld'>Hire</a> ]<br>",
                                        npc.name.c_str(), npc.age_days, sk.name.c_str(),
                                        GetWeb().GetCgiName().c_str(), GetFormName().c_str(), npc.num);
                        }
                        q.free_result();
                }
                else
                {
                        printf("<p>No space available - build more buildings.</p>");
                }
                printf("</div>");
                printf("</td>");
                // npcs
                sprintf(sql, "select * from npc where player=%ld", pl.num);
                q.get_result(sql);
                if (q.num_rows())
                {
                        printf("<td valign='top'>");
                        printf("<div class=box style='background: #ffffe0'>");

                        printf("<u>Your hired npc's</u><br>");
                        while (q.fetch_row())
                        {
                                db::Npc npc(&db, &q);
                                sprintf(sql, "select * from npcskill where npc=%ld", npc.num);
                                db::Npcskill npcsk(&db, sql);
                                db::Skill sk(db, npcsk.skill);
                                printf("<b>%s</b>, age <b>%ld</b> days, <b>%s</b> [ <a class=button href='%s?%s=fire&fire=%ld'>Fire</a> ]<br>",
                                        npc.name.c_str(), npc.age_days, sk.name.c_str(),
                                        GetWeb().GetCgiName().c_str(), GetFormName().c_str(), npc.num);
                        }
                        printf("</div>");
                        printf("</td>");
                }
                q.free_result();

                // resources
                printf("<td valign='top'>");
                printf("<div class=box style='background: #ffffe0'>");

                printf("<u>Your resources</u><br>");
                sprintf(sql, "select * from playerresource where player=%ld", pl.num);
                q.get_result(sql);
                while (q.fetch_row())
                {
                        db::Playerresource x(&db, &q);
                        db::Resource r(db, x.resource);
                        printf("<b>%s</b>, amount <b>%ld</b><br>", r.name.c_str(), x.amount);
                }
                q.free_result();

                printf("</div>");
                printf("</td>");
                // location / travel / found location / found road
                printf("<td valign='top'>");
                printf("<div class=box style='background: #ffffe0'>");
                printf("<u>Current location</u><br>");
                printf("<b>%s</b><br>", loc.name.c_str());
                sprintf(sql, "select * from locationlink where location1=%ld", loc.num);
                q.get_result(sql);
                while (q.fetch_row())
                {
                        db::Locationlink x(&db, &q);
                        db::Location l(db, x.location2);
                        printf("<a class=button href='%s?%s=travel&travel=%ld'>Travel to %s</a><br>",
                                GetWeb().GetCgiName().c_str(), GetFormName().c_str(), x.location2, l.name.c_str());
                }
                q.free_result();
                printf("</div>");
                // buildings / build
                printf("<div class=box style='background: #ffffe0'>");

                printf("<u>Your buildings in <b>%s</b></u><br>", loc.name.c_str());
                sprintf(sql, "select * from playerbuilding where player=%ld and location=%ld", pl.num, pl.location);
                q.get_result(sql);
                while (q.fetch_row())
                {
                        db::Playerbuilding x(&db, &q);
                        db::Building b(db, x.building);
                        printf("<b>%s</b>, <b>%ld</b> beds<br>",
                                b.name.c_str(), b.beds);
                }
                q.free_result();
                printf("<a class=button href='%s?BuildForm=try_build'>Build</a>", GetWeb().GetCgiName().c_str());

                printf("</div>");
                printf("</td>");
                printf("</tr></table>");
        }

        // superuser
        if (GetWeb().GetSuperuservy() && acct.superuser)
        {
                // create skill
                printf("<table cellpadding=0 cellspacing=0><tr><td valign='top'>");
                printf("<div class=box style='background: #ffe0e0'>");
                printf("<form method='POST' action='%s'>", GetWeb().GetCgiName().c_str());
                printf("<input type=hidden name='%s' value='skill_create'>", GetFormName().c_str());
                q.get_result("select * from skill order by name");
                printf("Edit Skill: <select name=skill><option>");
                while (q.fetch_row())
                {
                        db::Skill sk(&db, &q);
                        printf("<option value=%ld%s>%s", sk.num, 
                                (sk.num == GetWeb().GetSkill()) ? " selected" : "",
                                sk.name.c_str());
                }
                q.free_result();
                printf("</select><input type=submit name=submit value=' Select '><br>");
                if (GetWeb().GetSkill())
                {
                        db::Skill sk(db, GetWeb().GetSkill());
                        printf("<div class=box style='background: #ffc0c0'>");
                        printf("Selected skill: <b>%s</b><br>", sk.name.c_str());
                        printf("<div class=box style='background: #ffe0e0'>");
                        printf("Resource: <select name=resource><option>");
                        q.get_result("select * from resource order by name");
                        while (q.fetch_row())
                        {
                                db::Resource r(&db, &q);
                                printf("<option value=%ld>%s", r.num, r.name.c_str());
                        }
                        q.free_result();
                        printf("</select><br>");
                        printf("Type: <input type=radio name=prod value='Producer'>Producer\n");
                        printf("<input type=radio name=prod value='Consumer'>Consumer<br>");
                        printf("BaseAmount: <input type=text name=amount size=8> units/day");
                        printf("<br>");
                        printf("<input type=submit name=submit value=' Add selected resource '><br>");
                        printf("</div>");
                        sprintf(sql, "select * from linkskillresource where skill=%ld", sk.num);
                        q.get_result(sql);
                        while (q.fetch_row())
                        {
                                db::Linkskillresource l(&db, &q);
                                db::Resource r(db, l.resource);
                                printf("Linked resource: <b>%s</b> %s, %ld units/day [ <a href='%s?%s=unlink&unlink=%ld'>unlink resource</a> ]<br>", 
                                        r.name.c_str(), l.type.c_str(), l.base_amount,
                                        GetWeb().GetCgiName().c_str(), GetFormName().c_str(), r.num);
                        }
                        q.free_result();
                        printf("</div>");
                }
                printf("Skill name to create<br>");
                printf("<input type=text name=skill_name><br>");
                printf("Resource name to create<br>");
                printf("<input type=text name=resource_name><br>");
                printf("<input type=submit name=submit value=' Edit / Create Skill '>");
                //
                printf("</form>");
                printf("</div>"); // create skill
                printf("</td><td valign='top'>");
                printf("<div class=box style='background: #ffe0e0'>");
                printf("<form method='POST' action='%s'>", GetWeb().GetCgiName().c_str());
                printf("<input type=hidden name='%s' value='building'>", GetFormName().c_str());
                q.get_result("select * from building order by name");
                printf("Edit building: <select name=building><option>");
                while (q.fetch_row())
                {
                        db::Building b(&db, &q);
                        printf("<option value=%ld%s>%s", b.num, 
                                (b.num == GetWeb().GetBuilding()) ? " selected" : "",
                                b.name.c_str());
                }
                q.free_result();
                printf("</select><input type=submit name=submit value=' Select '><br>");
                //
                if (GetWeb().GetBuilding())
                {
                        db::Building sk(db, GetWeb().GetBuilding());
                        printf("<div class=box style='background: #ffc0c0'>");
                        printf("Selected building: <b>%s</b><br>", sk.name.c_str());
                        printf("Beds: <b>%ld</b><br>", sk.beds);
                        printf("<div class=box style='background: #ffe0e0'>");
                        printf("Resource: <select name=resource><option>");
                        q.get_result("select * from resource order by name");
                        while (q.fetch_row())
                        {
                                db::Resource r(&db, &q);
                                printf("<option value=%ld>%s", r.num, r.name.c_str());
                        }
                        q.free_result();
                        printf("</select><br>");
                        printf("Amount: <input type=text name=amount size=8> units");
                        printf("<br>");
                        printf("<input type=submit name=submit value=' Add selected resource '><br>");
                        printf("</div>");
                        sprintf(sql, "select * from buildingresource where building=%ld", sk.num);
                        q.get_result(sql);
                        while (q.fetch_row())
                        {
                                db::Buildingresource l(&db, &q);
                                db::Resource r(db, l.resource);
                                printf("Linked resource: <b>%s</b>, <b>%ld</b> units [ <a href='%s?%s=unlinkbr&unlinkbr=%ld'>unlink resource</a> ]<br>", 
                                        r.name.c_str(), l.amount,
                                        GetWeb().GetCgiName().c_str(), GetFormName().c_str(), r.num);
                        }
                        q.free_result();
                        printf("</div>");
                }
                printf("Building name to create<br>");
                printf("<input type=text name=building_name><br>");
                printf("Number of beds<br>");
                printf("<input type=text name=beds size=10><br>");
                printf("<input type=submit name=submit value=' Submit '>");

                printf("</form>");
                printf("</div>");
                //
                sprintf(sql, "select count(*) from locationlink where location1=%ld", pl.location);
                long qlinks = q.get_count(sql);
                if (qlinks < 3)
                {
                        printf("</td><td valign='top'>");
                        printf("<div class=box style='background: #ffe0e0'>");
                        printf("<form method='POST' action='%s'>", GetWeb().GetCgiName().c_str());
                        printf("<input type=hidden name='%s' value='loc_create'>", GetFormName().c_str());

                        q.get_result("select * from location order by name");
                        printf("Edit location: <select name=location><option>");
                        while (q.fetch_row())
                        {
                                db::Location sk(&db, &q);
                                printf("<option value=%ld%s>%s", sk.num, 
                                        (sk.num == GetWeb().GetLocation()) ? " selected" : "",
                                        sk.name.c_str());
                        }
                        q.free_result();
                        printf("</select><input type=submit name=submit value=' Select '><br>");
                        //
                        if (GetWeb().GetLocation())
                        {
                                db::Location sk(db, GetWeb().GetLocation());
                                printf("<div class=box style='background: #ffc0c0'>");
                                printf("Selected location: <b>%s</b><br>", sk.name.c_str());
                                printf("Max buildings: <b>%ld</b><br>", sk.max_buildings);
                                sprintf(sql, "select * from locationresource where location=%ld", sk.num);
                                q.get_result(sql);
                                while (q.fetch_row())
                                {
                                        db::Locationresource l(&db, &q);
                                        db::Resource r(db, l.resource);
                                        printf("Linked resource: <b>%s</b>, <b>%ld</b> units<br>", 
                                                r.name.c_str(), l.amount);
                                }
                                q.free_result();
                                printf("</div>");
                        }

                        printf("Create location<br>(Current location: <b>%s</b>)<br>", loc.name.c_str());
                        printf("<input type=text name=location_name><br>");
                        printf("Max buildings<br>");
                        printf("<input type=text name=max size=10><br>");
                        printf("<input type=submit name=submit value=' Create '>");
                        //
                        printf("</form>");
                        printf("</div>");
                }
                printf("</td></tr></table>");
        }
}

---