]> git.pond.sub.org Git - empserver/blob - src/lib/common/type.c
Import of Empire 4.2.12
[empserver] / src / lib / common / type.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
4  *                           Ken Stevens, Steve McClure
5  *
6  *  This program 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 2 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, write to the Free Software
18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  *  ---
21  *
22  *  See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23  *  related information and legal notices. It is expected that any future
24  *  projects/authors will amend these files as needed.
25  *
26  *  ---
27  *
28  *  type.c: typename to array offset translation
29  * 
30  *  Known contributors to this file:
31  *     Dave Pare, 1989
32  *     Steve McClure, 2000
33  */
34
35 #ifdef Rel4
36 #include <string.h>
37 #endif /* Rel4 */
38 #include "misc.h"
39 #include "ship.h"
40 #include "land.h"
41 #include "plane.h"
42 #include "sect.h"
43 #include "nuke.h"
44 #include "file.h"
45 #include "common.h"
46
47 int
48 typematch(s_char *buf, int type)
49 {
50         register int n;
51         int     len;
52
53         len = strlen(buf);
54         switch (type) {
55         case EF_SECTOR: {
56                 register struct dchrstr *dcp;
57         
58                 if (!buf[0] || buf[1])
59                         return -1;
60                 for (dcp=dchr,n=0; dcp->d_name; n++,dcp++)
61                         if (dcp->d_mnem == *buf)
62                                 return n;
63                 }
64                 break;
65         case EF_SHIP: {
66                 register struct mchrstr *mcp;
67         
68                 for (mcp=mchr,n=0; *mcp->m_name; n++,mcp++)
69                         if (strncmp(mcp->m_name, buf, len) == 0)
70                                 return n;
71                 }
72                 break;
73         case EF_LAND: {
74                 register struct lchrstr *lcp;
75
76                 for (lcp=lchr,n=0; *lcp->l_name; n++,lcp++)
77                         if (strncmp(lcp->l_name, buf, len) == 0)
78                                 return n;
79                 }
80                 break;
81         case EF_PLANE: {
82                 register struct plchrstr *pcp;
83         
84                 for (pcp=plchr,n=0; *pcp->pl_name; n++,pcp++)
85                         if (strncmp(pcp->pl_name, buf, len) == 0)
86                                 return n;
87                 }
88                 break;
89         case EF_NUKE: {
90                 register struct nchrstr *ncp;
91         
92                 for (ncp=nchr,n=0; *ncp->n_name; n++,ncp++)
93                         if (strncmp(ncp->n_name, buf, len) == 0)
94                                 return n;
95                 }
96                 break;
97         default:
98                 break;
99         }
100         return -1;
101 }