common/spaceship.c

   1 /**********************************************************************
   2  Freeciv - Copyright (C) 1996 - A Kjeldberg, L Gregersen, P Unold
   3    This program is free software; you can redistribute it and/or modify
   4    it under the terms of the GNU General Public License as published by
   5    the Free Software Foundation; either version 2, or (at your option)
   6    any later version.
   7
   8    This program is distributed in the hope that it will be useful,
   9    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11    GNU General Public License for more details.
  12 ***********************************************************************/
  13
  14 #ifdef HAVE_CONFIG_H
  15 #include <fc_config.h>
  16 #endif
  17
  18 #include "shared.h"             /* TRUE, FALSE */
  19
  20 #include "spaceship.h"
  21
  22 const struct sship_part_info structurals_info[NUM_SS_STRUCTURALS] = {
  23   {19, 13, -1},         /* -1 means none required */
  24   {19, 15,  0},
  25   {19, 11,  0},
  26   {19, 17,  1},
  27   {19,  9,  2},
  28   {19, 19,  3},
  29   {17,  9,  4},
  30   {17, 19,  5},
  31   {21, 11,  2},
  32   {21, 17,  3},
  33   {15,  9,  6},
  34   {15, 19,  7},
  35   {23, 11,  8},
  36   {23, 17,  9},
  37   {13,  9, 10},
  38   {13, 19, 11},
  39   {11,  9, 14},
  40   {11, 19, 15},
  41   { 9,  9, 16},
  42   { 9, 19, 17},
  43   { 7,  9, 18},
  44   { 7, 19, 19},
  45   {19,  7,  4},
  46   {19, 21,  5},
  47   {19,  5, 22},
  48   {19, 23, 23},
  49   {21,  5, 24},
  50   {21, 23, 25},
  51   {23,  5, 26},
  52   {23, 23, 27},
  53   { 5,  9, 20},
  54   { 5, 19, 21}
  55 };
  56
  57 const struct sship_part_info components_info[NUM_SS_COMPONENTS] = {
  58   {21, 13,  0},
  59   {24, 13, 12},
  60   {21, 15,  1},
  61   {24, 15, 13},
  62   {21,  9,  8},  /* or 4 */
  63   {24,  9, 12},
  64   {21, 19,  9},  /* or 5 */
  65   {24, 19, 13},
  66   {21,  7, 22},
  67   {24,  7, 28},
  68   {21, 21, 23},
  69   {24, 21, 29},
  70   {21,  3, 26},
  71   {24,  3, 28},
  72   {21, 25, 27},
  73   {24, 25, 29}
  74 };
  75
  76 const struct sship_part_info modules_info[NUM_SS_MODULES] = {
  77   {16, 12,  0},
  78   {16, 16,  1},
  79   {14,  6, 10},
  80   {12, 16, 15},
  81   {12, 12, 14},
  82   {14, 22, 11},
  83   { 8, 12, 18},
  84   { 8, 16, 19},
  85   { 6,  6, 20},
  86   { 4, 16, 31},
  87   { 4, 12, 30},
  88   { 6, 22, 21}
  89 };
  90
  91 /**********************************************************************
  92 Initialize spaceship struct; could also be used to "cancel" a
  93 spaceship (eg, if/when capital-capture effect implemented).
  94 **********************************************************************/
  95 void spaceship_init(struct player_spaceship *ship)
  96 {
  97   ship->structurals = ship->components = ship->modules = 0;
  98   BV_CLR_ALL(ship->structure);
  99   ship->fuel = ship->propulsion = 0;
 100   ship->habitation = ship->life_support = ship->solar_panels = 0;
 101   ship->state = SSHIP_NONE;
 102   ship->launch_year = 9999;
 103
 104   ship->population = ship->mass = 0;
 105   ship->support_rate = ship->energy_rate =
 106     ship->success_rate = ship->travel_time = 0.0;
 107 }
 108
 109 /**********************************************************************
 110 Count the number of structurals placed; that is, in ship->structure[]
 111 **********************************************************************/
 112 int num_spaceship_structurals_placed(const struct player_spaceship *ship)
 113 {
 114   int i, num = 0;
 115   for(i=0; i<NUM_SS_STRUCTURALS; i++) {
 116     if (BV_ISSET(ship->structure, i)) num++;
 117   }
 118   return num;
 119 }
 120
 121 /****************************************************************************
 122   Find (default) place for next spaceship component.
 123 ****************************************************************************/
 124 bool next_spaceship_component(struct player *pplayer,
 125                               struct player_spaceship *ship,
 126                               struct spaceship_component *fill)
 127 {
 128   fc_assert_ret_val(fill != NULL, FALSE);
 129
 130   if (ship->modules > (ship->habitation + ship->life_support
 131                        + ship->solar_panels)) {
 132     /* "nice" governments prefer to keep success 100%;
 133      * others build habitation first (for score?)  (Thanks Massimo.)
 134      */
 135     fill->type =
 136       (ship->habitation == 0)   ? SSHIP_PLACE_HABITATION :
 137       (ship->life_support == 0) ? SSHIP_PLACE_LIFE_SUPPORT :
 138       (ship->solar_panels == 0) ? SSHIP_PLACE_SOLAR_PANELS :
 139       ((ship->habitation < ship->life_support)
 140        && (ship->solar_panels*2 >= ship->habitation + ship->life_support + 1))
 141                               ? SSHIP_PLACE_HABITATION :
 142       (ship->solar_panels*2 < ship->habitation + ship->life_support)
 143                               ? SSHIP_PLACE_SOLAR_PANELS :
 144       (ship->life_support < ship->habitation)
 145                               ? SSHIP_PLACE_LIFE_SUPPORT :
 146       ((ship->life_support <= ship->habitation)
 147        && (ship->solar_panels * 2 >= ship->habitation + ship->life_support + 1))
 148                               ? SSHIP_PLACE_LIFE_SUPPORT :
 149                                 SSHIP_PLACE_SOLAR_PANELS;
 150
 151     if (fill->type == SSHIP_PLACE_HABITATION) {
 152       fill->num = ship->habitation + 1;
 153     } else if (fill->type == SSHIP_PLACE_LIFE_SUPPORT) {
 154       fill->num = ship->life_support + 1;
 155     } else {
 156       fill->num = ship->solar_panels + 1;
 157     }
 158     fc_assert(fill->num <= NUM_SS_MODULES / 3);
 159
 160     return TRUE;
 161   }
 162   if (ship->components > ship->fuel + ship->propulsion) {
 163     if (ship->fuel <= ship->propulsion) {
 164       fill->type = SSHIP_PLACE_FUEL;
 165       fill->num = ship->fuel + 1;
 166     } else {
 167       fill->type = SSHIP_PLACE_PROPULSION;
 168       fill->num = ship->propulsion + 1;
 169     }
 170     return TRUE;
 171   }
 172   if (ship->structurals > num_spaceship_structurals_placed(ship)) {
 173     /* Want to choose which structurals are most important.
 174        Else we first want to connect one of each type of module,
 175        then all placed components, pairwise, then any remaining
 176        modules, or else finally in numerical order.
 177     */
 178     int req = -1;
 179     int i;
 180
 181     if (!BV_ISSET(ship->structure, 0)) {
 182       /* if we don't have the first structural, place that! */
 183       fill->type = SSHIP_PLACE_STRUCTURAL;
 184       fill->num = 0;
 185       return TRUE;
 186     }
 187
 188     if (ship->habitation >= 1
 189         && !BV_ISSET(ship->structure, modules_info[0].required)) {
 190       req = modules_info[0].required;
 191     } else if (ship->life_support >= 1
 192                && !BV_ISSET(ship->structure, modules_info[1].required)) {
 193       req = modules_info[1].required;
 194     } else if (ship->solar_panels >= 1
 195                && !BV_ISSET(ship->structure, modules_info[2].required)) {
 196       req = modules_info[2].required;
 197     } else {
 198       for (i = 0; i < NUM_SS_COMPONENTS; i++) {
 199         if ((i % 2 == 0 && ship->fuel > (i/2))
 200             || (i % 2 == 1 && ship->propulsion > (i/2))) {
 201           if (!BV_ISSET(ship->structure, components_info[i].required)) {
 202             req = components_info[i].required;
 203             break;
 204           }
 205         }
 206       }
 207     }
 208     if (req == -1) {
 209       for (i = 0; i < NUM_SS_MODULES; i++) {
 210         if ((i % 3 == 0 && ship->habitation > (i/3))
 211             || (i % 3 == 1 && ship->life_support > (i/3))
 212             || (i % 3 == 2 && ship->solar_panels > (i/3))) {
 213           if (!BV_ISSET(ship->structure, modules_info[i].required)) {
 214             req = modules_info[i].required;
 215             break;
 216           }
 217         }
 218       }
 219     }
 220     if (req == -1) {
 221       for (i = 0; i < NUM_SS_STRUCTURALS; i++) {
 222         if (!BV_ISSET(ship->structure, i)) {
 223           req = i;
 224           break;
 225         }
 226       }
 227     }
 228     /* sanity: */
 229     fc_assert(req != -1);
 230     fc_assert(!BV_ISSET(ship->structure, req));
 231
 232     /* Now we want to find a structural we can build which leads to req.
 233        This loop should bottom out, because everything leads back to s0,
 234        and we made sure above that we do s0 first.
 235      */
 236     while(!BV_ISSET(ship->structure, structurals_info[req].required)) {
 237       req = structurals_info[req].required;
 238     }
 239     fill->type = SSHIP_PLACE_STRUCTURAL;
 240     fill->num = req;
 241
 242     return TRUE;
 243   }
 244
 245   return FALSE;
 246 }