src/mg_ore.cpp

   1 /*
   2 Minetest
   3 Copyright (C) 2010-2014 kwolekr, Ryan Kwolek <kwolekr@minetest.net>
   4
   5 This program is free software; you can redistribute it and/or modify
   6 it under the terms of the GNU Lesser General Public License as published by
   7 the Free Software Foundation; either version 2.1 of the License, or
   8 (at your option) any later version.
   9
  10 This program is distributed in the hope that it will be useful,
  11 but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 GNU Lesser General Public License for more details.
  14
  15 You should have received a copy of the GNU Lesser General Public License along
  16 with this program; if not, write to the Free Software Foundation, Inc.,
  17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 */
  19
  20 #include "mg_ore.h"
  21 #include "mapgen.h"
  22 #include "noise.h"
  23 #include "util/numeric.h"
  24 #include "map.h"
  25 #include "log.h"
  26
  27 FlagDesc flagdesc_ore[] = {
  28         {"absheight", OREFLAG_ABSHEIGHT},
  29         {NULL,        0}
  30 };
  31
  32
  33 ///////////////////////////////////////////////////////////////////////////////
  34
  35
  36 OreManager::OreManager(IGameDef *gamedef) :
  37         ObjDefManager(gamedef, OBJDEF_ORE)
  38 {
  39 }
  40
  41
  42 size_t OreManager::placeAllOres(Mapgen *mg, u32 blockseed, v3s16 nmin, v3s16 nmax)
  43 {
  44         size_t nplaced = 0;
  45
  46         for (size_t i = 0; i != m_objects.size(); i++) {
  47                 Ore *ore = (Ore *)m_objects[i];
  48                 if (!ore)
  49                         continue;
  50
  51                 nplaced += ore->placeOre(mg, blockseed, nmin, nmax);
  52                 blockseed++;
  53         }
  54
  55         return nplaced;
  56 }
  57
  58
  59 void OreManager::clear()
  60 {
  61         for (size_t i = 0; i < m_objects.size(); i++) {
  62                 Ore *ore = (Ore *)m_objects[i];
  63                 delete ore;
  64         }
  65         m_objects.clear();
  66 }
  67
  68
  69 ///////////////////////////////////////////////////////////////////////////////
  70
  71
  72 Ore::Ore()
  73 {
  74         flags = 0;
  75         noise = NULL;
  76 }
  77
  78
  79 Ore::~Ore()
  80 {
  81         delete noise;
  82 }
  83
  84
  85 void Ore::resolveNodeNames(NodeResolveInfo *nri)
  86 {
  87         m_ndef->getIdFromResolveInfo(nri, "", CONTENT_AIR, c_ore);
  88         m_ndef->getIdsFromResolveInfo(nri, c_wherein);
  89 }
  90
  91
  92 size_t Ore::placeOre(Mapgen *mg, u32 blockseed, v3s16 nmin, v3s16 nmax)
  93 {
  94         int in_range = 0;
  95
  96         in_range |= (nmin.Y <= y_max && nmax.Y >= y_min);
  97         if (flags & OREFLAG_ABSHEIGHT)
  98                 in_range |= (nmin.Y >= -y_max && nmax.Y <= -y_min) << 1;
  99         if (!in_range)
 100                 return 0;
 101
 102         int actual_ymin, actual_ymax;
 103         if (in_range & ORE_RANGE_MIRROR) {
 104                 actual_ymin = MYMAX(nmin.Y, -y_max);
 105                 actual_ymax = MYMIN(nmax.Y, -y_min);
 106         } else {
 107                 actual_ymin = MYMAX(nmin.Y, y_min);
 108                 actual_ymax = MYMIN(nmax.Y, y_max);
 109         }
 110         if (clust_size >= actual_ymax - actual_ymin + 1)
 111                 return 0;
 112
 113         nmin.Y = actual_ymin;
 114         nmax.Y = actual_ymax;
 115         generate(mg->vm, mg->seed, blockseed, nmin, nmax);
 116
 117         return 1;
 118 }
 119
 120
 121 ///////////////////////////////////////////////////////////////////////////////
 122
 123
 124 void OreScatter::generate(MMVManip *vm, int mapseed, u32 blockseed,
 125         v3s16 nmin, v3s16 nmax)
 126 {
 127         PseudoRandom pr(blockseed);
 128         MapNode n_ore(c_ore, 0, ore_param2);
 129
 130         int volume = (nmax.X - nmin.X + 1) *
 131                                  (nmax.Y - nmin.Y + 1) *
 132                                  (nmax.Z - nmin.Z + 1);
 133         int csize     = clust_size;
 134         int orechance = (csize * csize * csize) / clust_num_ores;
 135         int nclusters = volume / clust_scarcity;
 136
 137         for (int i = 0; i != nclusters; i++) {
 138                 int x0 = pr.range(nmin.X, nmax.X - csize + 1);
 139                 int y0 = pr.range(nmin.Y, nmax.Y - csize + 1);
 140                 int z0 = pr.range(nmin.Z, nmax.Z - csize + 1);
 141
 142                 if ((flags & OREFLAG_USE_NOISE) &&
 143                         (NoisePerlin3D(&np, x0, y0, z0, mapseed) < nthresh))
 144                         continue;
 145
 146                 for (int z1 = 0; z1 != csize; z1++)
 147                 for (int y1 = 0; y1 != csize; y1++)
 148                 for (int x1 = 0; x1 != csize; x1++) {
 149                         if (pr.range(1, orechance) != 1)
 150                                 continue;
 151
 152                         u32 i = vm->m_area.index(x0 + x1, y0 + y1, z0 + z1);
 153                         if (!CONTAINS(c_wherein, vm->m_data[i].getContent()))
 154                                 continue;
 155
 156                         vm->m_data[i] = n_ore;
 157                 }
 158         }
 159 }
 160
 161
 162 ///////////////////////////////////////////////////////////////////////////////
 163
 164
 165 void OreSheet::generate(MMVManip *vm, int mapseed, u32 blockseed,
 166         v3s16 nmin, v3s16 nmax)
 167 {
 168         PseudoRandom pr(blockseed + 4234);
 169         MapNode n_ore(c_ore, 0, ore_param2);
 170
 171         int max_height = clust_size;
 172         int y_start = pr.range(nmin.Y, nmax.Y - max_height);
 173
 174         if (!noise) {
 175                 int sx = nmax.X - nmin.X + 1;
 176                 int sz = nmax.Z - nmin.Z + 1;
 177                 noise = new Noise(&np, 0, sx, sz);
 178         }
 179         noise->seed = mapseed + y_start;
 180         noise->perlinMap2D(nmin.X, nmin.Z);
 181
 182         size_t index = 0;
 183         for (int z = nmin.Z; z <= nmax.Z; z++)
 184         for (int x = nmin.X; x <= nmax.X; x++) {
 185                 float noiseval = noise->result[index++];
 186                 if (noiseval < nthresh)
 187                         continue;
 188
 189                 int height = max_height * (1. / pr.range(1, 3));
 190                 int y0 = y_start + np.scale * noiseval; //pr.range(1, 3) - 1;
 191                 int y1 = y0 + height;
 192                 for (int y = y0; y != y1; y++) {
 193                         u32 i = vm->m_area.index(x, y, z);
 194                         if (!vm->m_area.contains(i))
 195                                 continue;
 196                         if (!CONTAINS(c_wherein, vm->m_data[i].getContent()))
 197                                 continue;
 198
 199                         vm->m_data[i] = n_ore;
 200                 }
 201         }
 202 }
 203
 204
 205 ///////////////////////////////////////////////////////////////////////////////
 206
 207 void OreBlob::generate(MMVManip *vm, int mapseed, u32 blockseed,
 208         v3s16 nmin, v3s16 nmax)
 209 {
 210         PseudoRandom pr(blockseed + 2404);
 211         MapNode n_ore(c_ore, 0, ore_param2);
 212
 213         int volume = (nmax.X - nmin.X + 1) *
 214                                  (nmax.Y - nmin.Y + 1) *
 215                                  (nmax.Z - nmin.Z + 1);
 216         int csize  = clust_size;
 217         int nblobs = volume / clust_scarcity;
 218
 219         if (!noise)
 220                 noise = new Noise(&np, mapseed, csize, csize, csize);
 221
 222         for (int i = 0; i != nblobs; i++) {
 223                 int x0 = pr.range(nmin.X, nmax.X - csize + 1);
 224                 int y0 = pr.range(nmin.Y, nmax.Y - csize + 1);
 225                 int z0 = pr.range(nmin.Z, nmax.Z - csize + 1);
 226
 227                 bool noise_generated = false;
 228                 noise->seed = blockseed + i;
 229
 230                 size_t index = 0;
 231                 for (int z1 = 0; z1 != csize; z1++)
 232                 for (int y1 = 0; y1 != csize; y1++)
 233                 for (int x1 = 0; x1 != csize; x1++, index++) {
 234                         u32 i = vm->m_area.index(x0 + x1, y0 + y1, z0 + z1);
 235                         if (!CONTAINS(c_wherein, vm->m_data[i].getContent()))
 236                                 continue;
 237
 238                         // Lazily generate noise only if there's a chance of ore being placed
 239                         // This simple optimization makes calls 6x faster on average
 240                         if (!noise_generated) {
 241                                 noise_generated = true;
 242                                 noise->perlinMap3D(x0, y0, z0);
 243                         }
 244
 245                         float noiseval = noise->result[index];
 246
 247                         float xdist = x1 - csize / 2;
 248                         float ydist = y1 - csize / 2;
 249                         float zdist = z1 - csize / 2;
 250
 251                         noiseval -= (sqrt(xdist * xdist + ydist * ydist + zdist * zdist) / csize);
 252
 253                         if (noiseval < nthresh)
 254                                 continue;
 255
 256                         vm->m_data[i] = n_ore;
 257                 }
 258         }
 259 }
 260
 261
 262 ///////////////////////////////////////////////////////////////////////////////
 263
 264 OreVein::OreVein()
 265 {
 266         noise2 = NULL;
 267 }
 268
 269
 270 OreVein::~OreVein()
 271 {
 272         delete noise2;
 273 }
 274
 275
 276 void OreVein::generate(MMVManip *vm, int mapseed, u32 blockseed,
 277         v3s16 nmin, v3s16 nmax)
 278 {
 279         PseudoRandom pr(blockseed + 520);
 280         MapNode n_ore(c_ore, 0, ore_param2);
 281
 282         if (!noise) {
 283                 int sx = nmax.X - nmin.X + 1;
 284                 int sy = nmax.Y - nmin.Y + 1;
 285                 int sz = nmax.Z - nmin.Z + 1;
 286                 noise  = new Noise(&np, mapseed, sx, sy, sz);
 287                 noise2 = new Noise(&np, mapseed + 436, sx, sy, sz);
 288         }
 289         bool noise_generated = false;
 290
 291         size_t index = 0;
 292         for (int z = nmin.Z; z <= nmax.Z; z++)
 293         for (int y = nmin.Y; y <= nmax.Y; y++)
 294         for (int x = nmin.X; x <= nmax.X; x++, index++) {
 295                 u32 i = vm->m_area.index(x, y, z);
 296                 if (!vm->m_area.contains(i))
 297                         continue;
 298                 if (!CONTAINS(c_wherein, vm->m_data[i].getContent()))
 299                         continue;
 300
 301                 // Same lazy generation optimization as in OreBlob
 302                 if (!noise_generated) {
 303                         noise_generated = true;
 304                         noise->perlinMap3D(nmin.X, nmin.Y, nmin.Z);
 305                         noise2->perlinMap3D(nmin.X, nmin.Y, nmin.Z);
 306                 }
 307
 308                 // randval ranges from -1..1
 309                 float randval   = (float)pr.next() / (pr.RANDOM_RANGE / 2) - 1.f;
 310                 float noiseval  = contour(noise->result[index]);
 311                 float noiseval2 = contour(noise2->result[index]);
 312                 if (noiseval * noiseval2 + randval * random_factor < nthresh)
 313                         continue;
 314
 315                 vm->m_data[i] = n_ore;
 316         }
 317 }