3 Copyright (C) 2014-2016 kwolekr, Ryan Kwolek <kwolekr@minetest.net>
4 Copyright (C) 2014-2017 paramat
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU Lesser General Public License as published by
8 the Free Software Foundation; either version 2.1 of the License, or
9 (at your option) any later version.
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 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License along
17 with this program; if not, write to the Free Software Foundation, Inc.,
18 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
22 #include "mg_decoration.h"
26 #include "map.h" //for MMVManip
27 #include "util/numeric.h"
32 ///////////////////////////////////////////////////////////////////////////////
35 BiomeManager::BiomeManager(Server *server) :
36 ObjDefManager(server, OBJDEF_BIOME)
40 // Create default biome to be used in case none exist
46 b->depth_filler = -MAX_MAP_GENERATION_LIMIT;
47 b->depth_water_top = 0;
48 b->depth_riverbed = 0;
49 b->y_min = -MAX_MAP_GENERATION_LIMIT;
50 b->y_max = MAX_MAP_GENERATION_LIMIT;
52 b->humidity_point = 0.0;
53 b->vertical_blend = 0;
55 b->m_nodenames.emplace_back("mapgen_stone");
56 b->m_nodenames.emplace_back("mapgen_stone");
57 b->m_nodenames.emplace_back("mapgen_stone");
58 b->m_nodenames.emplace_back("mapgen_water_source");
59 b->m_nodenames.emplace_back("mapgen_water_source");
60 b->m_nodenames.emplace_back("mapgen_river_water_source");
61 b->m_nodenames.emplace_back("mapgen_stone");
62 b->m_nodenames.emplace_back("ignore");
63 m_ndef->pendNodeResolve(b);
69 void BiomeManager::clear()
71 EmergeManager *emerge = m_server->getEmergeManager();
73 // Remove all dangling references in Decorations
74 DecorationManager *decomgr = emerge->decomgr;
75 for (size_t i = 0; i != decomgr->getNumObjects(); i++) {
76 Decoration *deco = (Decoration *)decomgr->getRaw(i);
80 // Don't delete the first biome
81 for (size_t i = 1; i < m_objects.size(); i++)
82 delete (Biome *)m_objects[i];
87 ////////////////////////////////////////////////////////////////////////////////
90 void BiomeParamsOriginal::readParams(const Settings *settings)
92 settings->getNoiseParams("mg_biome_np_heat", np_heat);
93 settings->getNoiseParams("mg_biome_np_heat_blend", np_heat_blend);
94 settings->getNoiseParams("mg_biome_np_humidity", np_humidity);
95 settings->getNoiseParams("mg_biome_np_humidity_blend", np_humidity_blend);
99 void BiomeParamsOriginal::writeParams(Settings *settings) const
101 settings->setNoiseParams("mg_biome_np_heat", np_heat);
102 settings->setNoiseParams("mg_biome_np_heat_blend", np_heat_blend);
103 settings->setNoiseParams("mg_biome_np_humidity", np_humidity);
104 settings->setNoiseParams("mg_biome_np_humidity_blend", np_humidity_blend);
108 ////////////////////////////////////////////////////////////////////////////////
110 BiomeGenOriginal::BiomeGenOriginal(BiomeManager *biomemgr,
111 BiomeParamsOriginal *params, v3s16 chunksize)
117 noise_heat = new Noise(¶ms->np_heat,
118 params->seed, m_csize.X, m_csize.Z);
119 noise_humidity = new Noise(¶ms->np_humidity,
120 params->seed, m_csize.X, m_csize.Z);
121 noise_heat_blend = new Noise(¶ms->np_heat_blend,
122 params->seed, m_csize.X, m_csize.Z);
123 noise_humidity_blend = new Noise(¶ms->np_humidity_blend,
124 params->seed, m_csize.X, m_csize.Z);
126 heatmap = noise_heat->result;
127 humidmap = noise_humidity->result;
128 biomemap = new biome_t[m_csize.X * m_csize.Z];
131 BiomeGenOriginal::~BiomeGenOriginal()
136 delete noise_humidity;
137 delete noise_heat_blend;
138 delete noise_humidity_blend;
142 Biome *BiomeGenOriginal::calcBiomeAtPoint(v3s16 pos) const
145 NoisePerlin2D(&m_params->np_heat, pos.X, pos.Z, m_params->seed) +
146 NoisePerlin2D(&m_params->np_heat_blend, pos.X, pos.Z, m_params->seed);
148 NoisePerlin2D(&m_params->np_humidity, pos.X, pos.Z, m_params->seed) +
149 NoisePerlin2D(&m_params->np_humidity_blend, pos.X, pos.Z, m_params->seed);
151 return calcBiomeFromNoise(heat, humidity, pos.Y);
155 void BiomeGenOriginal::calcBiomeNoise(v3s16 pmin)
159 noise_heat->perlinMap2D(pmin.X, pmin.Z);
160 noise_humidity->perlinMap2D(pmin.X, pmin.Z);
161 noise_heat_blend->perlinMap2D(pmin.X, pmin.Z);
162 noise_humidity_blend->perlinMap2D(pmin.X, pmin.Z);
164 for (s32 i = 0; i < m_csize.X * m_csize.Z; i++) {
165 noise_heat->result[i] += noise_heat_blend->result[i];
166 noise_humidity->result[i] += noise_humidity_blend->result[i];
171 biome_t *BiomeGenOriginal::getBiomes(s16 *heightmap)
173 for (s32 i = 0; i != m_csize.X * m_csize.Z; i++) {
174 Biome *biome = calcBiomeFromNoise(
175 noise_heat->result[i],
176 noise_humidity->result[i],
179 biomemap[i] = biome->index;
186 Biome *BiomeGenOriginal::getBiomeAtPoint(v3s16 pos) const
188 return getBiomeAtIndex(
189 (pos.Z - m_pmin.Z) * m_csize.X + (pos.X - m_pmin.X),
194 Biome *BiomeGenOriginal::getBiomeAtIndex(size_t index, s16 y) const
196 return calcBiomeFromNoise(
197 noise_heat->result[index],
198 noise_humidity->result[index],
203 Biome *BiomeGenOriginal::calcBiomeFromNoise(float heat, float humidity, s16 y) const
205 Biome *biome_closest = nullptr;
206 Biome *biome_closest_blend = nullptr;
207 float dist_min = FLT_MAX;
208 float dist_min_blend = FLT_MAX;
210 for (size_t i = 1; i < m_bmgr->getNumObjects(); i++) {
211 Biome *b = (Biome *)m_bmgr->getRaw(i);
212 if (!b || y > b->y_max + b->vertical_blend || y < b->y_min)
215 float d_heat = heat - b->heat_point;
216 float d_humidity = humidity - b->humidity_point;
217 float dist = (d_heat * d_heat) + (d_humidity * d_humidity);
219 if (y <= b->y_max) { // Within y limits of biome b
220 if (dist < dist_min) {
224 } else if (dist < dist_min_blend) { // Blend area above biome b
225 dist_min_blend = dist;
226 biome_closest_blend = b;
230 // Carefully tune pseudorandom seed variation to avoid single node dither
231 // and create larger scale blending patterns.
232 mysrand(y + (heat - humidity) * 2);
234 if (biome_closest_blend &&
235 myrand_range(0, biome_closest_blend->vertical_blend) >=
236 y - biome_closest_blend->y_max)
237 return biome_closest_blend;
239 return (biome_closest) ? biome_closest : (Biome *)m_bmgr->getRaw(BIOME_NONE);
243 ////////////////////////////////////////////////////////////////////////////////
245 void Biome::resolveNodeNames()
247 getIdFromNrBacklog(&c_top, "mapgen_stone", CONTENT_AIR);
248 getIdFromNrBacklog(&c_filler, "mapgen_stone", CONTENT_AIR);
249 getIdFromNrBacklog(&c_stone, "mapgen_stone", CONTENT_AIR);
250 getIdFromNrBacklog(&c_water_top, "mapgen_water_source", CONTENT_AIR);
251 getIdFromNrBacklog(&c_water, "mapgen_water_source", CONTENT_AIR);
252 getIdFromNrBacklog(&c_river_water, "mapgen_river_water_source", CONTENT_AIR);
253 getIdFromNrBacklog(&c_riverbed, "mapgen_stone", CONTENT_AIR);
254 getIdFromNrBacklog(&c_dust, "ignore", CONTENT_IGNORE);