git.pond.sub.org Git - empserver/blob - src/lib/player/empmod.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2014, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                Ken Stevens, Steve McClure, Markus Armbruster
   5  *
   6  *  Empire is free software: you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation, either version 3 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  *
  19  *  ---
  20  *
  21  *  See files README, COPYING and CREDITS in the root of the source
  22  *  tree for related information and legal notices.  It is expected
  23  *  that future projects/authors will amend these files as needed.
  24  *
  25  *  ---
  26  *
  27  *  empmod.c: List all commands for Empire
  28  *
  29  *  Known contributors to this file:
  30  *     Dave Pare, 1986
  31  *     Jeff Bailey
  32  *     Thomas Ruschak, 1992
  33  *     Ken Stevens, 1995
  34  *     Steve McClure, 1996-2000
  35  *     Markus Armbruster, 2004-2014
  36  */
  37
  38 /*
  39  * Fun fact: named empmod for historical reasons --- Empire used to be
  40  * broken into seven modules on the venerable PDP-11 so it could fit
  41  * in 64k I/D space.
  42  */
  43
  44 #include <config.h>
  45
  46 #include "com.h"
  47 #include "player.h"
  48 #include "prototypes.h"
  49 #include "testing.h"
  50
  51 struct cmndstr player_coms[] = {
  52 /*  command form                       cost     addr    permit */
  53     {"accept  [as-COUNTRY]", 0, acce, C_MOD, NORM},
  54     {"add <NAT> <NAME> <REP> <STATUS>", 0, add, C_MOD, GOD},
  55     {"announce", 0, tele, C_MOD, 0},
  56     {"anti <SECTS>", 3, anti, C_MOD, NORM + MONEY + CAP},
  57     {"apropos <topic>", 0, apro, 0, 0},
  58     {"arm <PLANE> <NUKE> <airburst?>", 3, arm, C_MOD, NORM + CAP},
  59     {"army <ARMY> <UNITS>", 0, army, C_MOD, NORM},
  60     {"assault <to-SECT> <from-SHIP> [<forts?> <ships?> <arty?> <planes?>]",
  61      3, assa, C_MOD, NORM + MONEY + CAP},
  62     {"attack <SECT> [<forts?> <ships?> <arty?> <planes?>]",
  63      3, atta, C_MOD, NORM + MONEY + CAP},
  64     {"bdes <SECTS> <type>", 0, bdes, C_MOD, NORM},
  65     {"bestpath <SECTS> <SECTS>", 0, best, 0, NORM},
  66     {"bmap <SECTS|SHIP> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
  67     {"board <to-SHIP> [<from-SHIP>|<from-sector>]",
  68      3, boar, C_MOD, NORM + MONEY + CAP},
  69     {"bomb <bomber-PLANES> <fighter-PLANES> <pin|strat> <ap-SECT> <PATH|DESTINATION>",
  70      2, bomb, C_MOD, NORM + MONEY + CAP},
  71     {"break", 0, brea, C_MOD, SANCT},
  72     {"budget", 1, budg, 0, NORM},
  73     {"build <s|l|b|p|n|t> <SECTS> <type|dir> [<number> <tech> <sure?>]",
  74      1, buil, C_MOD, NORM + MONEY + CAP},
  75     {"buy <COMM> <LOT#> <BID/UNIT> <DEST>",
  76      1, buy, C_MOD, NORM + MONEY + CAP},
  77     {"bye", 0, quit, 0, 0},
  78     {"capital <SECT>", 0, capi, C_MOD, NORM},
  79     {"cargo <SHIPS>", 0, carg, 0, NORM},
  80     {"census <SECTS>", 0, cens, 0, NONVIS},
  81     {"change <country|representative> <NAME>", 0, chan, C_MOD, NONVIS},
  82     {"coastwatch <SECTS>", 1, coas, C_MOD, NORM + CAP},
  83     {"collect <LOAN> <SECT>", 2, coll, C_MOD, NORM + MONEY + CAP},
  84     {"commodity <SECTS>", 0, comm, 0, NONVIS},
  85     {"consider <loan> <LOAN> <acc|decl|post>",
  86      1, cons, C_MOD, NORM + CAP},
  87     {"convert <SECTS> <NUM>", 2, conv, C_MOD, NORM + MONEY + CAP},
  88     {"country <NATS>", 0, coun, 0, 0},
  89     {"cutoff <SECTS>", 0, cuto, 0, NORM},
  90     {"declare <all|friend|neut|hos|war> <NATS>",
  91      2, decl, C_MOD, NORM + CAP},
  92     {"deliver <COMM> <SECTS> [q|<THRESH>] [<DIR>]", 1, deli, C_MOD, NORM},
  93     {"demobilize <SECTS> <NUM> <active-reserve?>", 1, demo, C_MOD,
  94      NORM + MONEY + CAP},
  95     {"designate <SECTS> <type>", 1, desi, C_MOD, NORM},
  96     {"disable", 0, disa, C_MOD, GOD},
  97     {"disarm <PLANE>", 2, disarm, C_MOD, NORM + CAP},
  98     {"distribute <SECTS> <DISTSECT|.|h>", 1, dist, C_MOD, NORM},
  99     {"drop <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION> <COMM>",
 100      1, drop, C_MOD, NORM + MONEY + CAP},
 101     {"dump <SECTS> [<fields>]", 0, dump, 0, NORM},
 102     {"echo [<string>]", 0, echo, 0, 0},
 103     {"edit <l|s|p|u|n|c> <SECTS|SHIPS|PLANES|LANDS|NUKES|NATS> [<KEY> <VALUE>]...",
 104      0, edit, C_MOD, GOD},
 105     {"enable", 0, enab, C_MOD, GOD},
 106     {"enlist <SECTS> <NUM>", 2, enli, C_MOD, NORM + MONEY + CAP},
 107     {"execute <INPUT FILE>", 0, execute, 0, EXEC},
 108     {"explore <c|m> <SECT> <NUM> <PATH|DESTINATION>",
 109      1, explore, C_MOD, NORM + MONEY + CAP},
 110     {"financial", 0, fina, 0, 0},
 111     {"fire <TYPE> <from-SECTS | SHIPS | UNITS> [TO-SECT | SHIP]",
 112      1, multifire, C_MOD, NORM + MONEY + CAP},
 113     {"flash <COUNTRY> [<message>]", 0, flash, 0, 0},
 114     {"fleetadd <FLEET> <SHIPS>", 0, flee, C_MOD, NORM},
 115     {"fly <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION> <COM>",
 116      2, fly, C_MOD, NORM + MONEY + CAP},
 117     {"follow <leader> <SHIPS>", 1, foll, C_MOD, NORM + CAP},
 118     {"force", 0, force, C_MOD, GOD},
 119     {"fortify <UNITS> <MOB>", 1, fort, C_MOD, NORM + CAP},
 120     {"give <COMM> <SECTS> <NUM>", 0, give, C_MOD, GOD},
 121     {"grind <SECTS> <NUM>", 1, grin, C_MOD, NORM + MONEY + CAP},
 122     {"harden <PLANES> <NUM>", 2, hard, C_MOD, NORM + MONEY + CAP},
 123     {"headlines [days]", 0, head, 0, 0},
 124     {"help <topic>", 0, info, 0, 0},
 125     {"improve <road|rail|defense> <SECTS> <NUM>",
 126      1, improve, C_MOD, NORM + MONEY + CAP},
 127     {"info <topic>", 0, info, 0, 0},
 128     {"land <UNITS>", 0, land, 0, NORM},
 129     {"launch <PLANES> <SECT|SHIP>", 3, laun, C_MOD, NORM + MONEY + CAP},
 130     {"lbmap <SECTS|LAND UNIT> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
 131     {"lboard <to-LAND> [<from-sector>]",
 132      3, lboa, C_MOD, NORM + MONEY + CAP},
 133     {"lcargo <UNITS>", 0, lcarg, 0, NORM},
 134     {"ldump <UNITS> [<fields>]", 0, ldump, 0, NORM},
 135     {"ledger <LOANS>", 0, ledg, 0, NORM},
 136     {"level <SECTS>", 0, leve, 0, NORM},
 137     {"list", 0, explain, 0, 0},
 138     {"lload <COMM|\"land\"|\"plane\"> <UNITS> <NUM|UNITS|PLANES>",
 139      1, lload, C_MOD, NORM + CAP},
 140     {"llookout <UNITS>", 1, llook, 0, NORM + CAP},
 141     {"lmap <SECTS|LAND UNIT> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
 142     {"lmine <UNITS>", 2, landmine, C_MOD, NORM + MONEY + CAP},
 143     {"load <COMM|\"land\"|\"plane\"> <SHIPS> <NUM|UNITS|PLANES>",
 144      1, load, C_MOD, NORM + CAP},
 145     {"lookout <SHIPS>", 1, look, 0, NORM + CAP},
 146     {"lost", 0, lost, 0, NORM},
 147     {"lradar <UNITS | SECTS>", 1, lrad, C_MOD, NORM + CAP},
 148     {"lretreat <UNITS|ARMY> <PATH> [i|h|b|c]",
 149      1, lretr, C_MOD, NORM + CAP},
 150     {"lstat <UNITS>", 0, lsta, 0, NORM},
 151     {"ltend <COMM> <tender-SHIPS> <NUM> <UNITS>",
 152      1, ltend, C_MOD, NORM + CAP},
 153     {"lunload <COMM|\"land\"|\"plane\"> <UNITS> <NUM|UNITS|PLANES>",
 154      1, lload, C_MOD, NORM + CAP},
 155     {"map <SECTS|SHIP> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
 156     {"march <UNITS> <PATH|DESTINATION>", 1, march, C_MOD, NORM + CAP},
 157     {"market <COMM|\"all\">", 0, mark, C_MOD, NORM},
 158     {"mine <SHIPS>", 2, mine, C_MOD, NORM + MONEY + CAP},
 159     {"mission <TYPE> <PLANES|SHIPS|UNITS> <mission type> <op sect> [<radius>]",
 160      2, mission, C_MOD, NORM + CAP},
 161     {"morale <UNITS> <retreat%>", 1, morale, C_MOD, NORM + CAP},
 162     {"motd", 0, show_motd, 0, 0},
 163     {"move <COMM> <SECT> <NUM> <PATH|DESTINATION>",
 164      1, move, C_MOD, NORM + CAP},
 165     {"mquota <SHIPS> <value>", 2, mobq, C_MOD, NORM + CAP},
 166     {"name <SHIPS> <NAME>", 0, name, C_MOD, NORM},
 167     {"nation [as-COUNTRY]", 0, nati, 0, 0},
 168     {"navigate <SHIPS> <PATH|DESTINATION>", 1, navi, C_MOD, NORM + CAP},
 169     {"nbmap <SECTS|NUKE> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
 170     {"ndump <NUKES>", 0, ndump, 0, NORM},
 171     {"newcap <NAT> <SECTOR>", 0, new, C_MOD, GOD},
 172     {"neweff <SECTS>", 0, newe, 0, NORM},
 173     {"newspaper [days]", 0, news, 0, 0},
 174     {"nmap <SECTS|NUKE> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
 175     {"nuke <NUKES>", 0, nuke, 0, NORM},
 176     {"offer <loan> <NAT> [<NUM> <DAYS> <IRATE>]",
 177      1, offe, C_MOD, NORM + MONEY + CAP},
 178     {"order <SHIPS> <c|s|r|d|l>", 1, orde, C_MOD, NORM + CAP},
 179     {"origin <SECT|COUNTRY|~>", 1, orig, C_MOD, NORM},
 180     {"paradrop <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
 181      3, para, C_MOD, NORM + MONEY + CAP},
 182     {"path <SECT>", 0, path, C_MOD, NORM},
 183     {"payoff <SHIPS>", 0, payo, 0, NORM},
 184     {"pbmap <SECTS|PLANE> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
 185     {"pboard <PLANES>", 3, pboa, C_MOD, NORM + MONEY + CAP},
 186     {"pdump <PLANES> [<fields>]", 0, pdump, 0, NORM},
 187     {"peek <SECTS>", 0, peek, 0, GOD},
 188     {"plane <SECTS>", 0, plan, 0, NORM},
 189     {"players", 0, play, 0, 0},
 190     {"pmap <SECTS|PLANE> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
 191     {"power [\"new\"|\"update\"] [<NUMBER OF COUNTRIES> | \"country\" <NATS>]",
 192      0, powe, C_MOD, 0},
 193     {"pray", 0, tele, C_MOD, NORM},
 194     {"production <SECTS>", 0, prod, 0, NORM},
 195     {"pstat <PLANES>", 0, pstat, 0, NORM},
 196     {"qorder <SHIPS>", 0, qorde, 0, NORM},
 197     {"quit", 0, quit, 0, 0},
 198     {"radar <SHIPS | SECTS>", 1, rada, C_MOD, NORM + CAP},
 199     {"range <PLANES> <range>", 1, range, C_MOD, NORM + CAP},
 200     {"read [yes|no|<CNUM/CNAME>]", 0, rea, C_MOD, NONVIS},
 201     {"realm <number> [<SECTS>]", 0, real, C_MOD, NORM},
 202     {"recon <spy-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
 203      3, reco, C_MOD, NORM + MONEY + CAP},
 204     {"reject <reject|accept> <announcements|mail|loans> <NAT>",
 205      2, reje, C_MOD, NORM},
 206     {"relations  [as-COUNTRY]", 0, rela, 0, 0},
 207     {"reload", 0, relo, C_MOD, GOD},
 208     {"repay <LOAN> <NUM>", 1, repa, C_MOD, NORM + MONEY + CAP},
 209     {"report <NATS>", 0, repo, 0, 0},
 210     {"reset <lot #> <0|price>", 1, rese, C_MOD, NORM + CAP},
 211     {"resource <SECTS>", 0, reso, 0, NONVIS},
 212     {"retreat <SHIPS|FLEET> <PATH> [i|t|s|h|b|d|u|c]",
 213      1, retr, C_MOD, NORM + CAP},
 214     {"route <COMM> <SECTS>", 1, rout, C_MOD, NORM},
 215     {"sabotage <UNITS>", 1, sabo, C_MOD, NORM + MONEY + CAP},
 216     {"sail <SHIPS> <PATH>", 1, sail, C_MOD, NORM + CAP},
 217     {"satellite <PLANE> [<se|sh|l> [?cond&cond&...]]",
 218      1, sate, C_MOD, NORM + CAP},
 219     {"sbmap <SECTS|SHIP> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
 220     {"scrap <s|p|l> <SHIPS|PLANES|UNITS>",
 221      2, scra, C_MOD, NORM + MONEY + CAP},
 222     {"scuttle <s|p|l> <SHIPS|PLANES|UNITS>", 5, scut, C_MOD, NORM + CAP},
 223     {"sdump <SHIPS> [<fields>]", 0, sdump, 0, NORM},
 224     {"sect <SECTS>", 0, sct, C_MOD, NORM},
 225     {"sell <COMM> <SECTS> <NUM> <NUM>", 1, sell, C_MOD, NORM + CAP},
 226     {"set <TYPE> <SHIPS|PLANES|UNITS|NUKES> <PRICE>",
 227      1, set, C_MOD, NORM + CAP},
 228     {"setresource <type> <SECTS> <NUM>", 0, setres, C_MOD, GOD},
 229     {"setsector <type> <SECTS> <NUM>", 0, setsector, C_MOD, GOD},
 230     {"sharebmap <CNUM/CNAME> <SECTS> [<des>]", 0, shar, C_MOD, NORM},
 231     {"shark <LOAN>", 25, shark, C_MOD, NORM + MONEY + CAP},
 232     {"ship <SHIPS>", 0, shi, 0, NORM},
 233     {"shoot <c|u> <SECTS> <NUMBER>", 3, shoo, C_MOD, NORM + MONEY + CAP},
 234     {"show <TYPE> <\"build\"|\"stats\"|\"cap\"> [<tech>]\n"
 235      "\tshow <bridge|item|news|product|tower>\n"
 236      "\tshow updates [<NUM>]>",
 237      0, show, 0, 0},
 238     {"shutdown <minutes> <disable update?>", 0, shut, 0, GOD},
 239     {"sinfrastructure <SECTS>", 0, sinfra, 0, NONVIS},
 240     {"skywatch <SECTS>", 1, skyw, C_MOD, NORM + CAP},
 241     {"smap <SECTS|SHIP> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
 242     {"sonar <SHIPS> <brief?>", 1, sona, C_MOD, NORM + CAP},
 243     {"sorder <SHIPS>", 0, sorde, 0, NORM},
 244     {"spy <SECTS>", 1, spy, C_MOD, NORM + CAP},
 245     {"sstat <SHIPS>", 0, sstat, 0, NORM},
 246     {"start <TYPE> <SECTS|PLANES|SHIPS|UNITS|NUKES>", 1, start, C_MOD, NORM},
 247     {"starvation [<SECTS>|l <UNITS>|s <SHIPS>]", 0, starve, 0, NORM},
 248     {"stockpile <STOCKPILE> <NUKES>", 0, stoc, C_MOD, NORM},
 249     {"stop <TYPE> <SECTS|PLANES|SHIPS|UNITS|NUKES>", 1, stop, C_MOD, NORM},
 250     {"strength <SECTS>", 1, stre, C_MOD, NORM},
 251     {"supply <LAND UNITS>", 1, supp, C_MOD, NORM + CAP},
 252     {"survey <SELECTOR> <SECTS>", 0, surv, C_MOD, NORM},
 253     {"swapsector <SECT> <SECT>", 0, swaps, C_MOD, GOD},
 254     {"sweep <sweep-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
 255      3, reco, C_MOD, NORM + MONEY + CAP},
 256     {"telegram <NATS>...", 0, tele, C_MOD, NORM},
 257     {"tend <COMM|\"land\"> <tender-SHIPS> <NUM|UNIT> <dest-SHIPS>",
 258      1, tend, C_MOD, NORM + CAP},
 259     {"territory <SECTS> <NUMBER> [<FIELD>]", 0, terr, C_MOD, NORM},
 260     {"test <COMM> <SECT> <NUM> <PATH|DESTINATION>",
 261      1, move, C_MOD, NORM},
 262     {"threshold <COMM> <SECTS> <THRESH>", 1, thre, C_MOD, NORM},
 263     {"toggle [inform|flash|beep|coastwatch|sonar|techlists] [on|off]",
 264      0, togg, C_MOD, 0},
 265     {"torpedo <submarine-SHIPS> <target-SHIP>",
 266      3, torp, C_MOD, NORM + MONEY + CAP},
 267     {"trade", 1, trad, C_MOD, NORM + MONEY + CAP},
 268     {"transport <\"nuke\"|\"plane\"> <NUKES|PLANES> <PATH|DESTINATION>",
 269      1, tran, C_MOD, NORM + CAP},
 270     {"turn <\"on\"|\"off\"|\"mess\">", 0, turn, C_MOD, GOD},
 271     {"unload <COMM|\"land\"|\"plane\"> <SHIPS> <NUM|UNIT|PLANE>",
 272      1, load, C_MOD, NORM + CAP},
 273     {"unsail <SHIPS>", 1, sail, C_MOD, NORM + CAP},
 274     {"update", 0, upda, 0, 0},
 275     {"upgrade <s|p|l> <SHIPS|PLANES|UNITS>",
 276      1, upgr, C_MOD, NORM + MONEY + CAP},
 277     {"version", 0, vers, 0, 0},
 278     {"wall [<message>]", 0, wall, 0, NORM},
 279     {"wingadd <WING> <PLANES>", 0, wing, C_MOD, NORM},
 280     {"wipe <SECTS>", 1, wipe, C_MOD, NORM},
 281     {"wire [yes|no|<days>]", 0, rea, C_MOD, 0},
 282     {"work <LAND UNITS> <AMOUNT>", 1, work, C_MOD, NORM + MONEY + CAP},
 283     {"xdump [\"meta\"] <TYPE> [<RECORDS>]", 0, xdump, 0, 0},
 284     {"zdone <y|n|c>", 0, zdon, C_MOD, NORM},
 285     {"__cmd \"added\" <NUM> <NUM> <NUM>", 0, testing_cmd, 0, TESTING},
 286     {NULL, 0, NULL, 0, 0}
 287 };