4 #include "Resource.hpp"
6 #include "Simulation.hpp"
9 #include "TileType.hpp"
11 #include "../app/Assets.hpp"
12 #include "../creature/Creature.hpp"
13 #include "../graphics/Viewport.hpp"
14 #include "../math/const.hpp"
15 #include "../math/OctaveNoise.hpp"
16 #include "../math/SimplexNoise.hpp"
21 #include <glm/gtc/matrix_transform.hpp>
22 #include <glm/gtx/euler_angles.hpp>
23 #include <glm/gtx/io.hpp>
24 #include <glm/gtx/transform.hpp>
45 , surface_tilt(0.0, 0.0)
50 , inverse_orbital(1.0)
58 for (creature::Creature *c : creatures) {
63 void Body::SetSimulation(Simulation &s) noexcept {
65 for (auto child : children) {
66 child->SetSimulation(s);
70 void Body::SetParent(Body &p) {
75 parent->AddChild(*this);
78 void Body::UnsetParent() {
79 if (!HasParent()) return;
80 parent->RemoveChild(*this);
84 void Body::AddChild(Body &c) {
85 children.push_back(&c);
86 c.SetSimulation(*sim);
89 void Body::RemoveChild(Body &c) {
90 auto entry = std::find(children.begin(), children.end(), &c);
91 if (entry != children.end()) {
92 children.erase(entry);
96 double Body::Inertia() const noexcept {
97 // assume solid sphere for now
98 return (2.0/5.0) * Mass() * pow(Radius(), 2);
101 double Body::GravitationalParameter() const noexcept {
105 double Body::OrbitalPeriod() const noexcept {
107 return PI_2p0 * sqrt(pow(orbit.SemiMajorAxis(), 3) / (G * (parent->Mass() + Mass())));
113 double Body::RotationalPeriod() const noexcept {
114 if (std::abs(angular) < std::numeric_limits<double>::epsilon()) {
115 return std::numeric_limits<double>::infinity();
117 return PI_2p0 * Inertia() / angular;
121 glm::dmat4 Body::ToUniverse() const noexcept {
123 const Body *b = this;
124 while (b->HasParent()) {
125 m = b->ToParent() * m;
131 glm::dmat4 Body::FromUniverse() const noexcept {
133 const Body *b = this;
134 while (b->HasParent()) {
135 m *= b->FromParent();
142 std::vector<creature::Creature *> ccache;
145 void Body::Tick(double dt) {
146 rotation += dt * AngularMomentum() / Inertia();
148 ccache = Creatures();
149 for (creature::Creature *c : ccache) {
152 for (auto c = Creatures().begin(); c != Creatures().end();) {
153 if ((*c)->Removable()) {
155 c = Creatures().erase(c);
162 void Body::Cache() noexcept {
165 orbit.Matrix(PI_2p0 * (GetSimulation().Time() / OrbitalPeriod()))
166 * glm::eulerAngleXY(axis_tilt.x, axis_tilt.y);
168 glm::eulerAngleYX(-axis_tilt.y, -axis_tilt.x)
169 * orbit.InverseMatrix(PI_2p0 * (GetSimulation().Time() / OrbitalPeriod()));
171 orbital = glm::eulerAngleXY(axis_tilt.x, axis_tilt.y);
172 inverse_orbital = glm::eulerAngleYX(-axis_tilt.y, -axis_tilt.x);
175 glm::eulerAngleY(rotation)
176 * glm::eulerAngleXY(surface_tilt.x, surface_tilt.y);
178 glm::eulerAngleYX(-surface_tilt.y, -surface_tilt.x)
179 * glm::eulerAngleY(-rotation);
182 void Body::AddCreature(creature::Creature *c) {
183 creatures.push_back(c);
186 void Body::RemoveCreature(creature::Creature *c) {
187 auto entry = std::find(creatures.begin(), creatures.end(), c);
188 if (entry != creatures.end()) {
189 creatures.erase(entry);
206 double Orbit::SemiMajorAxis() const noexcept {
210 Orbit &Orbit::SemiMajorAxis(double s) noexcept {
215 double Orbit::Eccentricity() const noexcept {
219 Orbit &Orbit::Eccentricity(double e) noexcept {
224 double Orbit::Inclination() const noexcept {
228 Orbit &Orbit::Inclination(double i) noexcept {
233 double Orbit::LongitudeAscending() const noexcept {
237 Orbit &Orbit::LongitudeAscending(double l) noexcept {
242 double Orbit::ArgumentPeriapsis() const noexcept {
246 Orbit &Orbit::ArgumentPeriapsis(double a) noexcept {
251 double Orbit::MeanAnomaly() const noexcept {
255 Orbit &Orbit::MeanAnomaly(double m) noexcept {
262 double mean2eccentric(double M, double e) {
263 double E = M; // eccentric anomaly, solve M = E - e sin E
264 // limit to 100 steps to prevent deadlocks in impossible situations
265 for (int i = 0; i < 100; ++i) {
266 double dE = (E - e * sin(E) - M) / (1 - e * cos(E));
268 if (abs(dE) < 1.0e-6) break;
275 glm::dmat4 Orbit::Matrix(double t) const noexcept {
277 double E = mean2eccentric(M, ecc);
279 // coordinates in orbital plane, P=x, Q=-z
280 double P = sma * (cos(E) - ecc);
281 double Q = sma * sin(E) * sqrt(1 - (ecc * ecc));
283 return glm::yawPitchRoll(asc, inc, arg) * glm::translate(glm::dvec3(P, 0.0, -Q));
286 glm::dmat4 Orbit::InverseMatrix(double t) const noexcept {
288 double E = mean2eccentric(M, ecc);
289 double P = sma * (cos(E) - ecc);
290 double Q = sma * sin(E) * sqrt(1 - (ecc * ecc));
291 return glm::translate(glm::dvec3(-P, 0.0, Q)) * glm::transpose(glm::yawPitchRoll(asc, inc, arg));
295 Planet::Planet(int sidelength)
297 , sidelength(sidelength)
298 , tiles(TilesTotal())
300 Radius(double(sidelength) / 2.0);
306 const TileType &Planet::TypeAt(int srf, int x, int y) const {
307 return GetSimulation().TileTypes()[TileAt(srf, x, y).type];
310 glm::ivec2 Planet::SurfacePosition(int srf, const glm::dvec3 &pos) const noexcept {
312 PositionToTile(pos[(srf + 0) % 3]),
313 PositionToTile(pos[(srf + 1) % 3]));
316 double Planet::SurfaceElevation(int srf, const glm::dvec3 &pos) const noexcept {
318 ? pos[(srf + 2) % 3] - Radius()
319 : -pos[(srf + 2) % 3] - Radius();
322 glm::dvec3 Planet::TileCenter(int srf, int x, int y, double e) const noexcept {
323 glm::dvec3 center(0.0f);
324 center[(srf + 0) % 3] = x + 0.5 - Radius();
325 center[(srf + 1) % 3] = y + 0.5 - Radius();
326 center[(srf + 2) % 3] = srf < 3 ? (Radius() + e) : -(Radius() + e);
330 void Planet::BuildVAO(const Set<TileType> &ts) {
331 vao.reset(new graphics::SimpleVAO<Attributes, unsigned int>);
333 vao->BindAttributes();
334 vao->EnableAttribute(0);
335 vao->EnableAttribute(1);
336 vao->AttributePointer<glm::vec3>(0, false, offsetof(Attributes, position));
337 vao->AttributePointer<glm::vec3>(1, false, offsetof(Attributes, tex_coord));
338 vao->ReserveAttributes(TilesTotal() * 4, GL_STATIC_DRAW);
340 auto attrib = vao->MapAttributes(GL_WRITE_ONLY);
341 float offset = Radius();
344 // up +Z +X +Y -Z -X -Y
346 for (int index = 0, surface = 0; surface < 6; ++surface) {
347 for (int y = 0; y < sidelength; ++y) {
348 for (int x = 0; x < sidelength; ++x, ++index) {
349 float tex = ts[TileAt(surface, x, y).type].texture;
350 const float tex_u_begin = surface < 3 ? 1.0f : 0.0f;
351 const float tex_u_end = surface < 3 ? 0.0f : 1.0f;
352 attrib[4 * index + 0].position[(surface + 0) % 3] = x + 0 - offset;
353 attrib[4 * index + 0].position[(surface + 1) % 3] = y + 0 - offset;
354 attrib[4 * index + 0].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
355 attrib[4 * index + 0].tex_coord[0] = tex_u_begin;
356 attrib[4 * index + 0].tex_coord[1] = 1.0f;
357 attrib[4 * index + 0].tex_coord[2] = tex;
359 attrib[4 * index + 1].position[(surface + 0) % 3] = x + 0 - offset;
360 attrib[4 * index + 1].position[(surface + 1) % 3] = y + 1 - offset;
361 attrib[4 * index + 1].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
362 attrib[4 * index + 1].tex_coord[0] = tex_u_end;
363 attrib[4 * index + 1].tex_coord[1] = 1.0f;
364 attrib[4 * index + 1].tex_coord[2] = tex;
366 attrib[4 * index + 2].position[(surface + 0) % 3] = x + 1 - offset;
367 attrib[4 * index + 2].position[(surface + 1) % 3] = y + 0 - offset;
368 attrib[4 * index + 2].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
369 attrib[4 * index + 2].tex_coord[0] = tex_u_begin;
370 attrib[4 * index + 2].tex_coord[1] = 0.0f;
371 attrib[4 * index + 2].tex_coord[2] = tex;
373 attrib[4 * index + 3].position[(surface + 0) % 3] = x + 1 - offset;
374 attrib[4 * index + 3].position[(surface + 1) % 3] = y + 1 - offset;
375 attrib[4 * index + 3].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
376 attrib[4 * index + 3].tex_coord[0] = tex_u_end;
377 attrib[4 * index + 3].tex_coord[1] = 0.0f;
378 attrib[4 * index + 3].tex_coord[2] = tex;
384 vao->ReserveElements(TilesTotal() * 6, GL_STATIC_DRAW);
386 auto element = vao->MapElements(GL_WRITE_ONLY);
388 for (int surface = 0; surface < 3; ++surface) {
389 for (int y = 0; y < sidelength; ++y) {
390 for (int x = 0; x < sidelength; ++x, ++index) {
391 element[6 * index + 0] = 4 * index + 0;
392 element[6 * index + 1] = 4 * index + 2;
393 element[6 * index + 2] = 4 * index + 1;
394 element[6 * index + 3] = 4 * index + 1;
395 element[6 * index + 4] = 4 * index + 2;
396 element[6 * index + 5] = 4 * index + 3;
400 for (int surface = 3; surface < 6; ++surface) {
401 for (int y = 0; y < sidelength; ++y) {
402 for (int x = 0; x < sidelength; ++x, ++index) {
403 element[6 * index + 0] = 4 * index + 0;
404 element[6 * index + 1] = 4 * index + 1;
405 element[6 * index + 2] = 4 * index + 2;
406 element[6 * index + 3] = 4 * index + 2;
407 element[6 * index + 4] = 4 * index + 1;
408 element[6 * index + 5] = 4 * index + 3;
416 void Planet::Draw(app::Assets &assets, graphics::Viewport &viewport) {
420 const glm::mat4 &MV = assets.shaders.planet_surface.MV();
421 assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, 0.0f, 1.0f, 0.0f)));
422 vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 0);
423 assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(1.0f, 0.0f, 0.0f, 0.0f)));
424 vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 1);
425 assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, 1.0f, 0.0f, 0.0f)));
426 vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 2);
427 assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, 0.0f, -1.0f, 0.0f)));
428 vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 3);
429 assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(-1.0f, 0.0f, 0.0f, 0.0f)));
430 vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 4);
431 assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, -1.0f, 0.0f, 0.0f)));
432 vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 5);
436 void GenerateEarthlike(const Set<TileType> &tiles, Planet &p) noexcept {
437 math::SimplexNoise elevation_gen(0);
438 math::SimplexNoise variation_gen(45623752346);
440 const int ice = tiles["ice"].id;
441 const int ocean = tiles["ocean"].id;
442 const int water = tiles["water"].id;
443 const int sand = tiles["sand"].id;
444 const int grass = tiles["grass"].id;
445 const int tundra = tiles["tundra"].id;
446 const int taiga = tiles["taiga"].id;
447 const int desert = tiles["desert"].id;
448 const int mntn = tiles["mountain"].id;
449 const int algae = tiles["algae"].id;
450 const int forest = tiles["forest"].id;
451 const int jungle = tiles["jungle"].id;
452 const int rock = tiles["rock"].id;
453 const int wheat = tiles["wheat"].id;
455 constexpr double ocean_thresh = -0.2;
456 constexpr double water_thresh = 0.0;
457 constexpr double beach_thresh = 0.05;
458 constexpr double highland_thresh = 0.4;
459 constexpr double mountain_thresh = 0.5;
461 const glm::dvec3 axis(glm::dvec4(0.0, 1.0, 0.0, 0.0) * glm::eulerAngleXY(p.SurfaceTilt().x, p.SurfaceTilt().y));
462 const double cap_thresh = std::abs(std::cos(p.AxialTilt().x));
463 const double equ_thresh = std::abs(std::sin(p.AxialTilt().x)) / 2.0;
464 const double fzone_start = equ_thresh - (equ_thresh - cap_thresh) / 3.0;
465 const double fzone_end = cap_thresh + (equ_thresh - cap_thresh) / 3.0;
467 for (int surface = 0; surface <= 5; ++surface) {
468 for (int y = 0; y < p.SideLength(); ++y) {
469 for (int x = 0; x < p.SideLength(); ++x) {
470 glm::dvec3 to_tile = p.TileCenter(surface, x, y);
471 double near_axis = std::abs(glm::dot(glm::normalize(to_tile), axis));
472 if (near_axis > cap_thresh) {
473 p.TileAt(surface, x, y).type = ice;
476 float elevation = math::OctaveNoise(
478 to_tile / p.Radius(),
481 5 / p.Radius(), // frequency
485 float variation = math::OctaveNoise(
487 to_tile / p.Radius(),
490 16 / p.Radius(), // frequency
494 if (elevation < ocean_thresh) {
495 p.TileAt(surface, x, y).type = ocean;
496 } else if (elevation < water_thresh) {
497 if (variation > 0.3) {
498 p.TileAt(surface, x, y).type = algae;
500 p.TileAt(surface, x, y).type = water;
502 } else if (elevation < beach_thresh) {
503 p.TileAt(surface, x, y).type = sand;
504 } else if (elevation < highland_thresh) {
505 if (near_axis < equ_thresh) {
506 if (variation > 0.6) {
507 p.TileAt(surface, x, y).type = grass;
508 } else if (variation > 0.2) {
509 p.TileAt(surface, x, y).type = sand;
511 p.TileAt(surface, x, y).type = desert;
513 } else if (near_axis < fzone_start) {
514 if (variation > 0.4) {
515 p.TileAt(surface, x, y).type = forest;
516 } else if (variation < -0.5) {
517 p.TileAt(surface, x, y).type = jungle;
518 } else if (variation > -0.02 && variation < 0.02) {
519 p.TileAt(surface, x, y).type = wheat;
521 p.TileAt(surface, x, y).type = grass;
523 } else if (near_axis < fzone_end) {
524 p.TileAt(surface, x, y).type = tundra;
526 p.TileAt(surface, x, y).type = taiga;
528 } else if (elevation < mountain_thresh) {
529 if (variation > 0.3) {
530 p.TileAt(surface, x, y).type = mntn;
532 p.TileAt(surface, x, y).type = rock;
535 p.TileAt(surface, x, y).type = mntn;
543 void GenerateTest(const Set<TileType> &tiles, Planet &p) noexcept {
544 for (int surface = 0; surface <= 5; ++surface) {
545 for (int y = 0; y < p.SideLength(); ++y) {
546 for (int x = 0; x < p.SideLength(); ++x) {
547 if (x == p.SideLength() / 2 && y == p.SideLength() / 2) {
548 p.TileAt(surface, x, y).type = surface;
550 p.TileAt(surface, x, y).type = (x == p.SideLength()/2) + (y == p.SideLength()/2) + 6;
567 std::vector<TileType::Yield>::const_iterator TileType::FindResource(int r) const {
568 auto yield = resources.cbegin();
569 for (; yield != resources.cend(); ++yield) {
570 if (yield->resource == r) {