]> git.pond.sub.org Git - empserver/blob - src/lib/player/empmod.c
4f17df558e017c4216561573e171d9f63b2902cc
[empserver] / src / lib / player / empmod.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2013, 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-2012
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
50 struct cmndstr player_coms[] = {
51 /*  command form                       cost     addr    permit */
52     {"accept  [as-COUNTRY]", 0, acce, C_MOD, NORM},
53     {"add <NAT> <NAME> <REP> <STATUS>", 0, add, C_MOD, GOD},
54     {"announce", 0, tele, C_MOD, 0},
55     {"anti <SECTS>", 3, anti, C_MOD, NORM + MONEY + CAP},
56     {"apropos <topic>", 0, apro, 0, 0},
57     {"arm <PLANE> <NUKE> <airburst?>", 3, arm, C_MOD, NORM + CAP},
58     {"army <ARMY> <UNITS>", 0, army, C_MOD, NORM},
59     {"assault <to-SECT> <from-SHIP> [<forts?> <ships?> <arty?> <planes?>]",
60      3, assa, C_MOD, NORM + MONEY + CAP},
61     {"attack <SECT> [<forts?> <ships?> <arty?> <planes?>]",
62      3, atta, C_MOD, NORM + MONEY + CAP},
63     {"bdes <SECTS> <type>", 0, bdes, C_MOD, NORM},
64     {"bestpath <SECTS> <SECTS>", 0, best, 0, NORM},
65     {"bmap <SECTS|SHIP> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
66     {"board <to-SHIP> [<from-SHIP>|<from-sector>]",
67      3, boar, C_MOD, NORM + MONEY + CAP},
68     {"bomb <bomber-PLANES> <fighter-PLANES> <pin|strat> <ap-SECT> <PATH|DESTINATION>",
69      2, bomb, C_MOD, NORM + MONEY + CAP},
70     {"break", 0, brea, C_MOD, SANCT},
71     {"budget", 1, budg, 0, NORM},
72     {"build <s|l|b|p|n|t> <SECTS> <type|dir> [<number> <tech> <sure?>]",
73      1, buil, C_MOD, NORM + MONEY + CAP},
74     {"buy <COMM> <LOT#> <BID/UNIT> <DEST>",
75      1, buy, C_MOD, NORM + MONEY + CAP},
76     {"bye", 0, quit, 0, 0},
77     {"capital <SECT>", 0, capi, C_MOD, NORM},
78     {"cargo <SHIPS>", 0, carg, 0, NORM},
79     {"census <SECTS>", 0, cens, 0, NONVIS},
80     {"change <country|representative> <NAME>", 0, chan, C_MOD, NONVIS},
81     {"coastwatch <SECTS>", 1, coas, C_MOD, NORM + CAP},
82     {"collect <LOAN> <SECT>", 2, coll, C_MOD, NORM + MONEY + CAP},
83     {"commodity <SECTS>", 0, comm, 0, NONVIS},
84     {"consider <loan|treaty> <LOAN/TREATY> <acc|decl|post>",
85      1, cons, C_MOD, NORM + CAP},
86     {"convert <SECTS> <NUM>", 2, conv, C_MOD, NORM + MONEY + CAP},
87     {"country <NATS>", 0, coun, 0, 0},
88     {"cutoff <SECTS>", 0, cuto, 0, NORM},
89     {"declare <all|friend|neut|hos|war> <NATS>",
90      2, decl, C_MOD, NORM + CAP},
91     {"deliver <COMM> <SECTS> [q|<THRESH>] [<DIR>]", 1, deli, C_MOD, NORM},
92     {"demobilize <SECTS> <NUM> <active-reserve?>", 1, demo, C_MOD,
93      NORM + MONEY + CAP},
94     {"designate <SECTS> <type>", 1, desi, C_MOD, NORM},
95     {"disable", 0, disa, C_MOD, GOD},
96     {"disarm <PLANE>", 2, disarm, C_MOD, NORM + CAP},
97     {"distribute <SECTS> <DISTSECT|.|h>", 1, dist, C_MOD, NORM},
98     {"drop <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION> <COMM>",
99      1, drop, C_MOD, NORM + MONEY + CAP},
100     {"dump <SECTS> [<fields>]", 0, dump, 0, NORM},
101     {"echo [<string>]", 0, echo, 0, 0},
102     {"edit <country|land|ship|plane|unit> <NAT|SECT|SHIP|PLANE|LAND> [<KEY> <VALUE>]...",
103      0, edit, C_MOD, GOD},
104     {"enable", 0, enab, C_MOD, GOD},
105     {"enlist <SECTS> <NUM>", 2, enli, C_MOD, NORM + MONEY + CAP},
106     {"execute <INPUT FILE>", 0, execute, 0, EXEC},
107     {"explore <c|m> <SECT> <NUM> <PATH|DESTINATION>",
108      1, explore, C_MOD, NORM + MONEY + CAP},
109     {"financial", 0, fina, 0, 0},
110     {"fire <TYPE> <from-SECTS | SHIPS | UNITS> [TO-SECT | SHIP]",
111      1, multifire, C_MOD, NORM + MONEY + CAP},
112     {"flash <COUNTRY> [<message>]", 0, flash, 0, 0},
113     {"fleetadd <FLEET> <SHIPS>", 0, flee, C_MOD, NORM},
114     {"fly <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION> <COM>",
115      2, fly, C_MOD, NORM + MONEY + CAP},
116     {"follow <leader> <SHIPS>", 1, foll, C_MOD, NORM + 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> <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     {"mquota <SHIPS> <value>", 2, mobq, C_MOD, NORM + CAP},
165     {"name <SHIPS> <NAME>", 0, name, C_MOD, NORM},
166     {"nation [as-COUNTRY]", 0, nati, 0, 0},
167     {"navigate <SHIPS> <PATH|DESTINATION>", 1, navi, C_MOD, NORM + CAP},
168     {"nbmap <SECTS|NUKE> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
169     {"ndump <SECTS>", 0, ndump, 0, NORM},
170     {"newcap <NAT> <SECTOR>", 0, new, C_MOD, GOD},
171     {"neweff <SECTS>", 0, newe, 0, NORM},
172     {"newspaper [days]", 0, news, 0, 0},
173     {"nmap <SECTS|NUKE> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
174     {"nuke <SECTS>", 0, nuke, 0, NORM},
175     {"offer <loan|treaty> <NAT> [<NUM> <DAYS> <IRATE>]",
176      1, offe, C_MOD, NORM + MONEY + CAP},
177     {"order <SHIPS> <c|s|r|d|l> ", 1, orde, C_MOD, NORM + CAP},
178     {"origin <SECT|COUNTRY|~>", 1, orig, C_MOD, NORM},
179     {"paradrop <cargo-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
180      3, para, C_MOD, NORM + MONEY + CAP},
181     {"path <SECT>", 0, path, C_MOD, NORM},
182     {"payoff <SHIPS>", 0, payo, 0, NORM},
183     {"pbmap <SECTS|PLANE> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
184     {"pboard <PLANES>", 3, pboa, C_MOD, NORM + MONEY + CAP},
185     {"pdump <PLANES> [<fields>]", 0, pdump, 0, NORM},
186     {"peek <SECTS>", 0, peek, 0, GOD},
187     {"plane <SECTS>", 0, plan, 0, NORM},
188     {"players", 0, play, 0, 0},
189     {"pmap <SECTS|PLANE> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
190     {"power [\"new\"|\"update\"] [<NUMBER OF COUNTRIES> | \"country\" <NATS>]",
191      0, powe, C_MOD, 0},
192     {"pray", 0, tele, C_MOD, NORM},
193     {"production <SECTS>", 0, prod, 0, NORM},
194     {"pstat <PLANES>", 0, pstat, 0, NORM},
195     {"qorder <SHIPS>", 0, qorde, 0, NORM},
196     {"quit", 0, quit, 0, 0},
197     {"radar <SHIPS | SECTS>", 1, rada, C_MOD, NORM + CAP},
198     {"range <PLANES> <range>", 1, range, C_MOD, NORM + CAP},
199     {"read [yes|no|<CNUM/CNAME>]", 0, rea, C_MOD, NONVIS},
200     {"realm <number> [<SECTS>]", 0, real, C_MOD, NORM},
201     {"recon <spy-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
202      3, reco, C_MOD, NORM + MONEY + CAP},
203     {"reject <reject|accept> <announcements|mail|treaties|loans> <NAT>",
204      2, reje, C_MOD, NORM},
205     {"relations  [as-COUNTRY]", 0, rela, 0, 0},
206     {"reload", 0, relo, C_MOD, GOD},
207     {"repay <LOAN> <NUM>", 1, repa, C_MOD, NORM + MONEY + CAP},
208     {"report <NATS>", 0, repo, 0, 0},
209     {"reset <lot #> <0|price>", 1, rese, C_MOD, NORM + CAP},
210     {"resource <SECTS>", 0, reso, 0, NONVIS},
211     {"retreat <SHIPS|FLEET> <PATH> [i|t|s|h|b|d|u|c]",
212      1, retr, C_MOD, NORM + CAP},
213     {"route <COMM> <SECTS>", 1, rout, C_MOD, NORM},
214     {"sabotage <UNITS>", 1, sabo, C_MOD, NORM + MONEY + CAP},
215     {"sail <SHIPS> <PATH>", 1, sail, C_MOD, NORM + CAP},
216     {"satellite <PLANE> [<se|sh|l> [?cond&cond&...]]",
217      1, sate, C_MOD, NORM + CAP},
218     {"sbmap <SECTS|SHIP> [s|l|n|p|r|t|*|h]", 0, map, C_MOD, NORM},
219     {"scrap <s|p|l> <SHIPS|PLANES|UNITS>",
220      2, scra, C_MOD, NORM + MONEY + CAP},
221     {"scuttle <s|p|l> <SHIPS|PLANES|UNITS>", 5, scut, C_MOD, NORM + CAP},
222     {"sdump <SHIPS> [<fields>]", 0, sdump, 0, NORM},
223     {"sect <SECTS>", 0, sct, C_MOD, NORM},
224     {"sell <COMM> <SECTS> <NUM> <NUM>", 1, sell, C_MOD, NORM + CAP},
225     {"set <TYPE> <SHIPS|PLANES|UNITS|NUKES> <PRICE>",
226      1, set, C_MOD, NORM + CAP},
227     {"setresource <type> <SECTS> <NUM>", 0, setres, C_MOD, GOD},
228     {"setsector <type> <SECTS> <NUM>", 0, setsector, C_MOD, GOD},
229     {"sharebmap <CNUM/CNAME> <SECTS> [<des>]", 0, shar, C_MOD, NORM},
230     {"shark <LOAN>", 25, shark, C_MOD, NORM + MONEY + CAP},
231     {"ship <SHIPS>", 0, shi, 0, NORM},
232     {"shoot <c|u> <SECTS> <NUMBER>", 3, shoo, C_MOD, NORM + MONEY + CAP},
233     {"show <TYPE> <\"build\"|\"stats\"|\"cap\"> [<tech>]\n"
234      "\tshow <bridge|item|news|product|tower>\n"
235      "\tshow updates [<NUM>]>",
236      0, show, 0, 0},
237     {"shutdown <minutes> <disable update?>", 0, shut, 0, GOD},
238     {"sinfrastructure <SECTS>", 0, sinfra, 0, NONVIS},
239     {"skywatch <SECTS>", 1, skyw, C_MOD, NORM + CAP},
240     {"smap <SECTS|SHIP> [s|l|n|p|*|h]", 0, map, C_MOD, NORM},
241     {"sonar <SHIPS> <brief?>", 1, sona, C_MOD, NORM + CAP},
242     {"sorder <SHIPS>", 0, sorde, 0, NORM},
243     {"spy <SECTS>", 1, spy, C_MOD, NORM + CAP},
244     {"sstat <SHIPS>", 0, sstat, 0, NORM},
245     {"start <TYPE> <SECTS|PLANES|SHIPS|UNITS>", 1, start, C_MOD, NORM},
246     {"starvation [<SECTS>|l <UNITS>|s <SHIPS>]", 0, starve, 0, NORM},
247     {"stop <TYPE> <SECTS|PLANES|SHIPS|UNITS>", 1, stop, C_MOD, NORM},
248     {"strength <SECTS>", 1, stre, C_MOD, NORM},
249     {"supply <LAND UNITS>", 1, supp, C_MOD, NORM + CAP},
250     {"survey <SELECTOR> <SECTS>", 0, surv, C_MOD, NORM},
251     {"swapsector <SECT> <SECT>", 0, swaps, C_MOD, GOD},
252     {"sweep <sweep-PLANES> <fighter-PLANES> <ap-SECT> <PATH|DESTINATION>",
253      3, reco, C_MOD, NORM + MONEY + CAP},
254     {"telegram <NATS>...", 0, tele, C_MOD, NORM},
255     {"tend <COMM|\"land\"> <tender-SHIPS> <NUM|UNIT> <dest-SHIPS>",
256      1, tend, C_MOD, NORM + CAP},
257     {"territory <SECTS> <NUMBER> [<FIELD>]", 0, terr, C_MOD, NORM},
258     {"test <COMM> <SECT> <NUM> <PATH|DESTINATION>",
259      1, move, C_MOD, NORM},
260     {"threshold <COMM> <SECTS> <THRESH>", 1, thre, C_MOD, NORM},
261     {"toggle [inform|flash|beep|coastwatch|sonar|techlists] [on|off]",
262      0, togg, C_MOD, 0},
263     {"torpedo <submarine-SHIPS> <target-SHIP>",
264      3, torp, C_MOD, NORM + MONEY + CAP},
265     {"trade", 1, trad, C_MOD, NORM + MONEY + CAP},
266     {"transport <\"nuke\"|\"plane\"> <NUKES|PLANES> <PATH|DESTINATION>",
267      1, tran, C_MOD, NORM + CAP},
268     {"treaty <TREATIES>", 0, trea, 0, NORM + MONEY + CAP},
269     {"turn <\"on\"|\"off\"|\"mess\">", 0, turn, C_MOD, GOD},
270     {"unload <COMM|\"land\"|\"plane\"> <SHIPS> <NUM|UNIT|PLANE>",
271      1, load, C_MOD, NORM + CAP},
272     {"unsail <SHIPS>", 1, sail, C_MOD, NORM + CAP},
273     {"update", 0, upda, 0, 0},
274     {"upgrade <s|p|l> <SHIPS|PLANES|UNITS>",
275      1, upgr, C_MOD, NORM + MONEY + CAP},
276     {"version", 0, vers, 0, 0},
277     {"wall [<message>]", 0, wall, 0, NORM},
278     {"wingadd <WING> <PLANES>", 1, wing, C_MOD, NORM},
279     {"wipe <SECTS>", 1, wipe, C_MOD, NORM},
280     {"wire [yes|no|<days>]", 0, rea, C_MOD, 0},
281     {"work <LAND UNITS> <AMOUNT>", 1, work, C_MOD, NORM + MONEY + CAP},
282     {"xdump [\"meta\"] <TYPE> [<RECORDS>]", 0, xdump, 0, 0},
283     {"zdone <y|n|c>", 0, zdon, C_MOD, NORM},
284     {NULL, 0, NULL, 0, 0}
285 };