git.pond.sub.org Git - empserver/blob - src/lib/common/cnumb.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2017, 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  *  cnumb.c: Return country number give country name
  28  *
  29  *  Known contributors to this file:
  30  *
  31  */
  32
  33 #include <config.h>
  34
  35 #include "match.h"
  36 #include "nat.h"
  37 #include "prototypes.h"
  38
  39 /*
  40  * Search for a country matching @cntry, return its number.
  41  * Return M_NOTFOUND if no such country exists, M_NOTUNIQUE if there
  42  * are several.
  43  */
  44 int
  45 cnumb(char *cntry)
  46 {
  47     char *ncp;
  48     char *cp;
  49     struct natstr *natp;
  50     int res;
  51     natid cn;
  52
  53     res = M_NOTFOUND;
  54     for (cn = 0; cn < MAXNOC; cn++) {
  55         if (!(natp = getnatp(cn)))
  56             break;
  57         if (natp->nat_stat == STAT_UNUSED)
  58             continue;
  59         ncp = natp->nat_cnam;
  60         for (cp = cntry; *cp == *ncp; cp++, ncp++) {
  61             if (*cp == 0)
  62                 return cn;      /* exact match */
  63         }
  64         if (*cp == 0) {
  65             /* is a prefix */
  66             if (res >= 0)
  67                 return M_NOTUNIQUE;
  68             res = cn;
  69         }
  70     }
  71     return res;
  72 }