2a47b0679a4887d4eb867f31fba891af705525af
[empserver] / src / lib / player / empmod.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2021, 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-2015
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     {"force", 0, force, C_MOD, GOD},
118     {"fortify <UNITS> <MOB>", 1, fort, C_MOD, NORM + CAP},
119     {"give <COMM> <SECTS> <NUM>", 0, give, C_MOD, GOD},
120     {"grind <SECTS> <NUM>", 1, grin, C_MOD, NORM + MONEY + CAP},
121     {"harden <PLANES> <NUM>", 2, hard, C_MOD, NORM + MONEY + CAP},
122     {"headlines [days]", 0, head, 0, 0},
123     {"help <topic>", 0, info, 0, 0},
124     {"improve <road|rail|defense> <SECTS> <NUM>",
125      1, improve, C_MOD, NORM + MONEY + CAP},
126     {"info <topic>", 0, info, 0, 0},
127     {"land <UNITS>", 0, land, 0, NORM},
128     {"launch <PLANES> <SECT|SHIP>", 3, laun, C_MOD, NORM + MONEY + CAP},
129     {"lbmap <SECTS|LAND UNIT> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
130     {"lboard <to-LAND> [<from-sector>]",
131      3, lboa, C_MOD, NORM + MONEY + CAP},
132     {"lcargo <UNITS>", 0, lcarg, 0, NORM},
133     {"ldump <UNITS> [<fields>]", 0, ldump, 0, NORM},
134     {"ledger <LOANS>", 0, ledg, 0, NORM},
135     {"level <SECTS>", 0, leve, 0, NORM},
136     {"list", 0, explain, 0, 0},
137     {"lload <COMM|\"land\"|\"plane\"> <UNITS> <NUM|UNITS|PLANES>",
138      1, lload, C_MOD, NORM + CAP},
139     {"llookout <UNITS>", 1, llook, 0, NORM + CAP},
140     {"lmap <SECTS|LAND UNIT> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
141     {"lmine <UNITS>", 2, landmine, C_MOD, NORM + MONEY + CAP},
142     {"load <COMM|\"land\"|\"plane\"> <SHIPS> <NUM|UNITS|PLANES>",
143      1, load, C_MOD, NORM + CAP},
144     {"lookout <SHIPS>", 1, look, 0, NORM + CAP},
145     {"lost", 0, lost, 0, NORM},
146     {"lradar <UNITS | SECTS>", 1, lrad, C_MOD, NORM + CAP},
147     {"lretreat <UNITS|ARMY> [q | <PATH> <i|h|b|c>]",
148      1, lretr, C_MOD, NORM + CAP},
149     {"lstat <UNITS>", 0, lsta, 0, NORM},
150     {"ltend <COMM> <tender-SHIPS> <NUM> <UNITS>",
151      1, ltend, C_MOD, NORM + CAP},
152     {"lunload <COMM|\"land\"|\"plane\"> <UNITS> <NUM|UNITS|PLANES>",
153      1, lload, C_MOD, NORM + CAP},
154     {"map <SECTS|SHIP> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
155     {"march <UNITS> <PATH|DESTINATION>", 1, march, C_MOD, NORM + CAP},
156     {"market <COMM|\"all\">", 0, mark, C_MOD, NORM},
157     {"mine <SHIPS>", 2, mine, C_MOD, NORM + MONEY + CAP},
158     {"mission <TYPE> <PLANES|SHIPS|UNITS> <mission type> <op sect> [<radius>]",
159      2, mission, C_MOD, NORM + CAP},
160     {"morale <UNITS> <retreat%>", 1, morale, C_MOD, NORM + CAP},
161     {"motd", 0, show_motd, 0, 0},
162     {"move <COMM> <SECT> <NUM> <PATH|DESTINATION>",
163      1, move, C_MOD, NORM + CAP},
164     {"name <SHIPS> <NAME>", 0, name, C_MOD, NORM},
165     {"nation [as-COUNTRY]", 0, nati, 0, 0},
166     {"navigate <SHIPS> <PATH|DESTINATION>", 1, navi, C_MOD, NORM + CAP},
167     {"nbmap <SECTS|NUKE> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
168     {"ndump <NUKES>", 0, ndump, 0, NORM},
169     {"newcap <NAT> <SECTOR>", 0, new, C_MOD, GOD},
170     {"neweff <SECTS>", 0, newe, 0, NORM},
171     {"newspaper [days]", 0, news, 0, 0},
172     {"nmap <SECTS|NUKE> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
173     {"nuke <NUKES>", 0, nuke, 0, NORM},
174     {"offer <loan> <NAT> [<NUM> <DAYS> <IRATE>]",
175      1, offe, C_MOD, NORM + MONEY + CAP},
176     {"origin <SECT|COUNTRY|~>", 1, orig, C_MOD, NORM},
177     {"paradrop <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
178      3, para, C_MOD, NORM + MONEY + CAP},
179     {"path <SECT>", 0, path, C_MOD, NORM},
180     {"payoff <SHIPS>", 0, payo, 0, NORM},
181     {"pbmap <SECTS|PLANE> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
182     {"pboard <PLANES>", 3, pboa, C_MOD, NORM + MONEY + CAP},
183     {"pdump <PLANES> [<fields>]", 0, pdump, 0, NORM},
184     {"peek <SECTS>", 0, peek, 0, GOD},
185     {"plane <SECTS>", 0, plan, 0, NORM},
186     {"players", 0, play, 0, 0},
187     {"pmap <SECTS|PLANE> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
188     {"power [\"new\"|\"update\"] [<NUMBER OF COUNTRIES> | \"country\" <NATS>]",
189      0, powe, C_MOD, 0},
190     {"pray", 0, tele, C_MOD, NORM},
191     {"production <SECTS>", 0, prod, 0, NORM},
192     {"pstat <PLANES>", 0, pstat, 0, NORM},
193     {"quit", 0, quit, 0, 0},
194     {"radar <SHIPS | SECTS>", 1, rada, C_MOD, NORM + CAP},
195     {"range <PLANES> <range>", 1, range, C_MOD, NORM + CAP},
196     {"read [yes|no|<CNUM/CNAME>]", 0, rea, C_MOD, NONVIS},
197     {"realm <number> [<SECTS>]", 0, real, C_MOD, NORM},
198     {"recon <spy-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
199      3, reco, C_MOD, NORM + MONEY + CAP},
200     {"reject <reject|accept> <announcements|mail|loans> <NAT>",
201      2, reje, C_MOD, NORM},
202     {"relations  [as-COUNTRY]", 0, rela, 0, 0},
203     {"reload", 0, relo, C_MOD, GOD},
204     {"repay <LOAN> <NUM>", 1, repa, C_MOD, NORM + MONEY + CAP},
205     {"report <NATS>", 0, repo, 0, 0},
206     {"reset <lot #> <0|price>", 1, rese, C_MOD, NORM + CAP},
207     {"resource <SECTS>", 0, reso, 0, NONVIS},
208     {"retreat <SHIPS|FLEET> [q | <PATH> <i|t|s|h|b|d|u|c>]",
209      1, retr, C_MOD, NORM + CAP},
210     {"route <COMM> <SECTS>", 1, rout, C_MOD, NORM},
211     {"sabotage <UNITS>", 1, sabo, C_MOD, NORM + MONEY + CAP},
212     {"satellite <PLANE> [<se|sh|l> [?cond&cond&...]]",
213      1, sate, C_MOD, NORM + CAP},
214     {"sbmap <SECTS|SHIP> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
215     {"scrap <s|p|l> <SHIPS|PLANES|UNITS>",
216      2, scra, C_MOD, NORM + MONEY + CAP},
217     {"scuttle <s|p|l> <SHIPS|PLANES|UNITS>", 5, scut, C_MOD, NORM + CAP},
218     {"sdump <SHIPS> [<fields>]", 0, sdump, 0, NORM},
219     {"sect <SECTS>", 0, sct, C_MOD, NORM},
220     {"sell <COMM> <SECTS> <NUM> <NUM>", 1, sell, C_MOD, NORM + CAP},
221     {"set <TYPE> <SHIPS|PLANES|UNITS|NUKES> <PRICE>",
222      1, set, C_MOD, NORM + CAP},
223     {"setresource <type> <SECTS> <NUM>", 0, setres, C_MOD, GOD},
224     {"setsector <type> <SECTS> <NUM>", 0, setsector, C_MOD, GOD},
225     {"sharebmap <CNUM/CNAME> <SECTS> [<des>]", 0, shar, C_MOD, NORM},
226     {"shark <LOAN>", 25, shark, C_MOD, NORM + MONEY + CAP},
227     {"ship <SHIPS>", 0, shi, 0, NORM},
228     {"shoot <c|u> <SECTS> <NUMBER>", 3, shoo, C_MOD, NORM + MONEY + CAP},
229     {"show <TYPE> <\"build\"|\"stats\"|\"cap\"> [<tech>]\n"
230      "\tshow <bridge|item|news|product|tower>\n"
231      "\tshow updates [<NUM>]>",
232      0, show, 0, 0},
233     {"shutdown <minutes> <disable update?>", 0, shut, 0, GOD},
234     {"sinfrastructure <SECTS>", 0, sinfra, 0, NONVIS},
235     {"skywatch <SECTS>", 1, skyw, C_MOD, NORM + CAP},
236     {"smap <SECTS|SHIP> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
237     {"sonar <SHIPS> <brief?>", 1, sona, C_MOD, NORM + CAP},
238     {"spy <SECTS>", 1, spy, C_MOD, NORM + CAP},
239     {"sstat <SHIPS>", 0, sstat, 0, NORM},
240     {"start <TYPE> <SECTS|PLANES|SHIPS|UNITS|NUKES>", 1, start, C_MOD, NORM},
241     {"starvation [<SECTS>|l <UNITS>|s <SHIPS>]", 0, starve, 0, NORM},
242     {"stockpile <STOCKPILE> <NUKES>", 0, stoc, C_MOD, NORM},
243     {"stop <TYPE> <SECTS|PLANES|SHIPS|UNITS|NUKES>", 1, stop, C_MOD, NORM},
244     {"strength <SECTS>", 1, stre, C_MOD, NORM},
245     {"supply <LAND UNITS>", 1, supp, C_MOD, NORM + CAP},
246     {"survey <SELECTOR> <SECTS>", 0, surv, C_MOD, NORM},
247     {"swapsector <SECT> <SECT>", 0, swaps, C_MOD, GOD},
248     {"sweep <sweep-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
249      3, reco, C_MOD, NORM + MONEY + CAP},
250     {"telegram <NATS>...", 0, tele, C_MOD, NORM},
251     {"tend <COMM|\"land\"> <tender-SHIPS> <NUM|UNIT> <dest-SHIPS>",
252      1, tend, C_MOD, NORM + CAP},
253     {"territory <SECTS> <NUMBER> [<FIELD>]", 0, terr, C_MOD, NORM},
254     {"test <COMM> <SECT> <NUM> <PATH|DESTINATION>",
255      1, move, C_MOD, NORM},
256     {"threshold <COMM> <SECTS> <THRESH>", 1, thre, C_MOD, NORM},
257     {"toggle [inform|flash|beep|coastwatch|sonar|techlists] [on|off]",
258      0, togg, C_MOD, 0},
259     {"torpedo <submarine-SHIPS> <target-SHIP>",
260      3, torp, C_MOD, NORM + MONEY + CAP},
261     {"trade", 1, trad, C_MOD, NORM + MONEY + CAP},
262     {"transport <\"nuke\"|\"plane\"> <NUKES|PLANES> <PATH|DESTINATION>",
263      1, tran, C_MOD, NORM + CAP},
264     {"turn <\"on\"|\"off\"|\"mess\">", 0, turn, C_MOD, GOD},
265     {"unload <COMM|\"land\"|\"plane\"> <SHIPS> <NUM|UNIT|PLANE>",
266      1, load, C_MOD, NORM + CAP},
267     {"update", 0, upda, 0, 0},
268     {"upgrade <s|p|l> <SHIPS|PLANES|UNITS>",
269      1, upgr, C_MOD, NORM + MONEY + CAP},
270     {"version", 0, vers, 0, 0},
271     {"wall [<message>]", 0, wall, 0, NORM},
272     {"wingadd <WING> <PLANES>", 0, wing, C_MOD, NORM},
273     {"wipe <SECTS>", 1, wipe, C_MOD, NORM},
274     {"wire [yes|no|<days>]", 0, rea, C_MOD, 0},
275     {"work <LAND UNITS> <AMOUNT>", 1, work, C_MOD, NORM + MONEY + CAP},
276     {"xdump [\"meta\"] <TYPE> [<RECORDS>]", 0, xdump, 0, 0},
277     {"zdone <y|n|c>", 0, zdon, C_MOD, NORM},
278     {"__cmd \"added\" <NUM> <NUM> <NUM>", 0, testing_cmd, 0, TESTING},
279     {NULL, 0, NULL, 0, 0}
280 };