+#include "Body.hpp"
+#include "CreatureCreatureCollision.hpp"
+#include "Orbit.hpp"
#include "Planet.hpp"
+#include "Resource.hpp"
+#include "Set.hpp"
+#include "Simulation.hpp"
+#include "Sun.hpp"
#include "Tile.hpp"
+#include "TileType.hpp"
+
+#include "../app/Assets.hpp"
+#include "../creature/Composition.hpp"
+#include "../creature/Creature.hpp"
+#include "../graphics/Viewport.hpp"
+#include "../math/const.hpp"
+#include "../math/geometry.hpp"
+#include "../math/OctaveNoise.hpp"
+#include "../math/SimplexNoise.hpp"
#include <algorithm>
+#include <cmath>
+#include <iostream>
+#include <glm/gtc/matrix_transform.hpp>
+#include <glm/gtx/euler_angles.hpp>
+#include <glm/gtx/io.hpp>
+#include <glm/gtx/transform.hpp>
+
+using blobs::G;
+using blobs::PI_2p0;
+
+using std::sin;
+using std::cos;
+using std::pow;
+using std::sqrt;
namespace blobs {
namespace world {
-Planet::Planet(int radius)
-: radius(radius)
-, tiles(new Tile[TotalArea()]) {
+Body::Body()
+: sim(nullptr)
+, parent(nullptr)
+, children()
+, mass(1.0)
+, radius(1.0)
+, orbit()
+, surface_tilt(0.0, 0.0)
+, axis_tilt(0.0, 0.0)
+, rotation(0.0)
+, angular(0.0)
+, orbital(1.0)
+, inverse_orbital(1.0)
+, local(1.0)
+, inverse_local(1.0)
+, creatures()
+, atmosphere(-1) {
+}
+
+Body::~Body() {
+ for (creature::Creature *c : creatures) {
+ delete c;
+ }
+}
+void Body::SetSimulation(Simulation &s) noexcept {
+ sim = &s;
+ for (auto child : children) {
+ child->SetSimulation(s);
+ }
}
-Planet::~Planet() {
+void Body::SetParent(Body &p) {
+ if (HasParent()) {
+ UnsetParent();
+ }
+ parent = &p;
+ parent->AddChild(*this);
+}
+
+void Body::UnsetParent() {
+ if (!HasParent()) return;
+ parent->RemoveChild(*this);
+ parent = nullptr;
+}
+
+void Body::AddChild(Body &c) {
+ children.push_back(&c);
+ c.SetSimulation(*sim);
+}
+
+void Body::RemoveChild(Body &c) {
+ auto entry = std::find(children.begin(), children.end(), &c);
+ if (entry != children.end()) {
+ children.erase(entry);
+ }
+}
+
+double Body::Inertia() const noexcept {
+ // assume solid sphere for now
+ return (2.0/5.0) * Mass() * pow(Radius(), 2);
+}
+
+double Body::GravitationalParameter() const noexcept {
+ return G * Mass();
+}
+
+double Body::OrbitalPeriod() const noexcept {
+ if (parent) {
+ return PI_2p0 * sqrt(pow(orbit.SemiMajorAxis(), 3) / (G * (parent->Mass() + Mass())));
+ } else {
+ return 0.0;
+ }
+}
+
+double Body::RotationalPeriod() const noexcept {
+ if (std::abs(angular) < std::numeric_limits<double>::epsilon()) {
+ return std::numeric_limits<double>::infinity();
+ } else {
+ return PI_2p0 * Inertia() / angular;
+ }
+}
+
+glm::dmat4 Body::ToUniverse() const noexcept {
+ glm::dmat4 m(1.0);
+ const Body *b = this;
+ while (b->HasParent()) {
+ m = b->ToParent() * m;
+ b = &b->Parent();
+ }
+ return m;
+}
+
+glm::dmat4 Body::FromUniverse() const noexcept {
+ glm::dmat4 m(1.0);
+ const Body *b = this;
+ while (b->HasParent()) {
+ m *= b->FromParent();
+ b = &b->Parent();
+ }
+ return m;
+}
+
+namespace {
+std::vector<creature::Creature *> ccache;
+std::vector<CreatureCreatureCollision> collisions;
+}
+
+void Body::Tick(double dt) {
+ rotation += dt * AngularMomentum() / Inertia();
+ Cache();
+ ccache = Creatures();
+ for (creature::Creature *c : ccache) {
+ c->Tick(dt);
+ }
+ // first remove creatures so they don't collide
+ for (auto c = Creatures().begin(); c != Creatures().end();) {
+ if ((*c)->Removable()) {
+ delete *c;
+ c = Creatures().erase(c);
+ } else {
+ ++c;
+ }
+ }
+ CheckCollision();
}
-Planet::Planet(Planet &&other)
-: radius(other.radius)
-, tiles(other.tiles.release()) {
+void Body::Cache() noexcept {
+ if (parent) {
+ orbital =
+ orbit.Matrix(PI_2p0 * (GetSimulation().Time() / OrbitalPeriod()))
+ * glm::eulerAngleXY(axis_tilt.x, axis_tilt.y);
+ inverse_orbital =
+ glm::eulerAngleYX(-axis_tilt.y, -axis_tilt.x)
+ * orbit.InverseMatrix(PI_2p0 * (GetSimulation().Time() / OrbitalPeriod()));
+ } else {
+ orbital = glm::eulerAngleXY(axis_tilt.x, axis_tilt.y);
+ inverse_orbital = glm::eulerAngleYX(-axis_tilt.y, -axis_tilt.x);
+ }
+ local =
+ glm::eulerAngleY(rotation)
+ * glm::eulerAngleXY(surface_tilt.x, surface_tilt.y);
+ inverse_local =
+ glm::eulerAngleYX(-surface_tilt.y, -surface_tilt.x)
+ * glm::eulerAngleY(-rotation);
+}
+
+void Body::CheckCollision() noexcept {
+ if (Creatures().size() < 2) return;
+ collisions.clear();
+ auto end = Creatures().end();
+ for (auto i = Creatures().begin(); i != end; ++i) {
+ math::AABB i_box((*i)->CollisionBox());
+ glm::dmat4 i_mat((*i)->CollisionTransform());
+ for (auto j = (i + 1); j != end; ++j) {
+ glm::dvec3 diff((*i)->GetSituation().Position() - (*j)->GetSituation().Position());
+ double max_dist = ((*i)->Size() + (*j)->Size()) * 1.74;
+ if (length2(diff) > max_dist * max_dist) continue;
+ math::AABB j_box((*j)->CollisionBox());
+ glm::dmat4 j_mat((*j)->CollisionTransform());
+ glm::dvec3 normal;
+ double depth;
+ if (Intersect(i_box, i_mat, j_box, j_mat, normal, depth)) {
+ collisions.push_back({ **i, **j, normal, depth });
+ }
+ }
+ }
+ for (auto &c : collisions) {
+ c.A().GetSituation().Move(c.Normal() * (c.Depth() * -0.5));
+ c.B().GetSituation().Move(c.Normal() * (c.Depth() * 0.5));
+ // TODO: adjust velocities as well
+ // TODO: notify participants so they can be annoyed
+ }
+}
+
+void Body::AddCreature(creature::Creature *c) {
+ creatures.push_back(c);
+}
+
+void Body::RemoveCreature(creature::Creature *c) {
+ auto entry = std::find(creatures.begin(), creatures.end(), c);
+ if (entry != creatures.end()) {
+ creatures.erase(entry);
+ }
+}
+
+
+CreatureCreatureCollision::~CreatureCreatureCollision() {
+}
+
+const glm::dvec3 &CreatureCreatureCollision::APos() const noexcept {
+ return a->GetSituation().Position();
+}
+
+const glm::dvec3 &CreatureCreatureCollision::BPos() const noexcept {
+ return b->GetSituation().Position();
+}
+
+
+Orbit::Orbit()
+: sma(1.0)
+, ecc(0.0)
+, inc(0.0)
+, asc(0.0)
+, arg(0.0)
+, mna(0.0) {
+}
+
+Orbit::~Orbit() {
+}
+
+double Orbit::SemiMajorAxis() const noexcept {
+ return sma;
+}
+
+Orbit &Orbit::SemiMajorAxis(double s) noexcept {
+ sma = s;
+ return *this;
+}
+
+double Orbit::Eccentricity() const noexcept {
+ return ecc;
+}
+
+Orbit &Orbit::Eccentricity(double e) noexcept {
+ ecc = e;
+ return *this;
+}
+
+double Orbit::Inclination() const noexcept {
+ return inc;
}
-Planet &Planet::operator =(Planet &&other) {
- radius = other.radius;
- std::swap(tiles, other.tiles);
+Orbit &Orbit::Inclination(double i) noexcept {
+ inc = i;
return *this;
}
+double Orbit::LongitudeAscending() const noexcept {
+ return asc;
+}
+
+Orbit &Orbit::LongitudeAscending(double l) noexcept {
+ asc = l;
+ return *this;
+}
+
+double Orbit::ArgumentPeriapsis() const noexcept {
+ return arg;
+}
+
+Orbit &Orbit::ArgumentPeriapsis(double a) noexcept {
+ arg = a;
+ return *this;
+}
+
+double Orbit::MeanAnomaly() const noexcept {
+ return mna;
+}
+
+Orbit &Orbit::MeanAnomaly(double m) noexcept {
+ mna = m;
+ return *this;
+}
+
+namespace {
+
+double mean2eccentric(double M, double e) {
+ double E = M; // eccentric anomaly, solve M = E - e sin E
+ // limit to 100 steps to prevent deadlocks in impossible situations
+ for (int i = 0; i < 100; ++i) {
+ double dE = (E - e * sin(E) - M) / (1 - e * cos(E));
+ E -= dE;
+ if (abs(dE) < 1.0e-6) break;
+ }
+ return E;
+}
+
+}
+
+glm::dmat4 Orbit::Matrix(double t) const noexcept {
+ double M = mna + t;
+ double E = mean2eccentric(M, ecc);
+
+ // coordinates in orbital plane, P=x, Q=-z
+ double P = sma * (cos(E) - ecc);
+ double Q = sma * sin(E) * sqrt(1 - (ecc * ecc));
+
+ return glm::yawPitchRoll(asc, inc, arg) * glm::translate(glm::dvec3(P, 0.0, -Q));
+}
+
+glm::dmat4 Orbit::InverseMatrix(double t) const noexcept {
+ double M = mna + t;
+ double E = mean2eccentric(M, ecc);
+ double P = sma * (cos(E) - ecc);
+ double Q = sma * sin(E) * sqrt(1 - (ecc * ecc));
+ return glm::translate(glm::dvec3(-P, 0.0, Q)) * glm::transpose(glm::yawPitchRoll(asc, inc, arg));
+}
+
+
+Planet::Planet(int sidelength)
+: Body()
+, sidelength(sidelength)
+, tiles(TilesTotal())
+, vao() {
+ Radius(double(sidelength) / 2.0);
+}
+
+Planet::~Planet() {
+}
+
+const TileType &Planet::TypeAt(int srf, int x, int y) const {
+ return GetSimulation().TileTypes()[TileAt(srf, x, y).type];
+}
+
+glm::ivec2 Planet::SurfacePosition(int srf, const glm::dvec3 &pos) const noexcept {
+ return glm::ivec2(
+ PositionToTile(pos[(srf + 0) % 3]),
+ PositionToTile(pos[(srf + 1) % 3]));
+}
+
+double Planet::SurfaceElevation(int srf, const glm::dvec3 &pos) const noexcept {
+ return srf < 3
+ ? pos[(srf + 2) % 3] - Radius()
+ : -pos[(srf + 2) % 3] - Radius();
+}
+
+glm::dvec3 Planet::TileCenter(int srf, int x, int y, double e) const noexcept {
+ glm::dvec3 center(0.0f);
+ center[(srf + 0) % 3] = x + 0.5 - Radius();
+ center[(srf + 1) % 3] = y + 0.5 - Radius();
+ center[(srf + 2) % 3] = srf < 3 ? (Radius() + e) : -(Radius() + e);
+ return center;
+}
+
+void Planet::BuildVAO(const Set<TileType> &ts) {
+ vao.reset(new graphics::SimpleVAO<Attributes, unsigned int>);
+ vao->Bind();
+ vao->BindAttributes();
+ vao->EnableAttribute(0);
+ vao->EnableAttribute(1);
+ vao->AttributePointer<glm::vec3>(0, false, offsetof(Attributes, position));
+ vao->AttributePointer<glm::vec3>(1, false, offsetof(Attributes, tex_coord));
+ vao->ReserveAttributes(TilesTotal() * 4, GL_STATIC_DRAW);
+ {
+ auto attrib = vao->MapAttributes(GL_WRITE_ONLY);
+ float offset = Radius();
+
+ // srf 0 1 2 3 4 5
+ // up +Z +X +Y -Z -X -Y
+
+ for (int index = 0, surface = 0; surface < 6; ++surface) {
+ for (int y = 0; y < sidelength; ++y) {
+ for (int x = 0; x < sidelength; ++x, ++index) {
+ float tex = ts[TileAt(surface, x, y).type].texture;
+ const float tex_v_begin = surface < 3 ? 1.0f : 0.0f;
+ const float tex_v_end = surface < 3 ? 0.0f : 1.0f;
+ attrib[4 * index + 0].position[(surface + 0) % 3] = x + 0 - offset;
+ attrib[4 * index + 0].position[(surface + 1) % 3] = y + 0 - offset;
+ attrib[4 * index + 0].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
+ attrib[4 * index + 0].tex_coord[0] = 0.0f;
+ attrib[4 * index + 0].tex_coord[1] = tex_v_begin;
+ attrib[4 * index + 0].tex_coord[2] = tex;
+
+ attrib[4 * index + 1].position[(surface + 0) % 3] = x + 0 - offset;
+ attrib[4 * index + 1].position[(surface + 1) % 3] = y + 1 - offset;
+ attrib[4 * index + 1].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
+ attrib[4 * index + 1].tex_coord[0] = 0.0f;
+ attrib[4 * index + 1].tex_coord[1] = tex_v_end;
+ attrib[4 * index + 1].tex_coord[2] = tex;
+
+ attrib[4 * index + 2].position[(surface + 0) % 3] = x + 1 - offset;
+ attrib[4 * index + 2].position[(surface + 1) % 3] = y + 0 - offset;
+ attrib[4 * index + 2].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
+ attrib[4 * index + 2].tex_coord[0] = 1.0f;
+ attrib[4 * index + 2].tex_coord[1] = tex_v_begin;
+ attrib[4 * index + 2].tex_coord[2] = tex;
+
+ attrib[4 * index + 3].position[(surface + 0) % 3] = x + 1 - offset;
+ attrib[4 * index + 3].position[(surface + 1) % 3] = y + 1 - offset;
+ attrib[4 * index + 3].position[(surface + 2) % 3] = surface < 3 ? offset : -offset;
+ attrib[4 * index + 3].tex_coord[0] = 1.0f;
+ attrib[4 * index + 3].tex_coord[1] = tex_v_end;
+ attrib[4 * index + 3].tex_coord[2] = tex;
+ }
+ }
+ }
+ }
+ vao->BindElements();
+ vao->ReserveElements(TilesTotal() * 6, GL_STATIC_DRAW);
+ {
+ auto element = vao->MapElements(GL_WRITE_ONLY);
+ int index = 0;
+ for (int surface = 0; surface < 3; ++surface) {
+ for (int y = 0; y < sidelength; ++y) {
+ for (int x = 0; x < sidelength; ++x, ++index) {
+ element[6 * index + 0] = 4 * index + 0;
+ element[6 * index + 1] = 4 * index + 2;
+ element[6 * index + 2] = 4 * index + 1;
+ element[6 * index + 3] = 4 * index + 1;
+ element[6 * index + 4] = 4 * index + 2;
+ element[6 * index + 5] = 4 * index + 3;
+ }
+ }
+ }
+ for (int surface = 3; surface < 6; ++surface) {
+ for (int y = 0; y < sidelength; ++y) {
+ for (int x = 0; x < sidelength; ++x, ++index) {
+ element[6 * index + 0] = 4 * index + 0;
+ element[6 * index + 1] = 4 * index + 1;
+ element[6 * index + 2] = 4 * index + 2;
+ element[6 * index + 3] = 4 * index + 2;
+ element[6 * index + 4] = 4 * index + 1;
+ element[6 * index + 5] = 4 * index + 3;
+ }
+ }
+ }
+ }
+ vao->Unbind();
+}
+
+void Planet::Draw(app::Assets &assets, graphics::Viewport &viewport) {
+ if (!vao) return;
+
+ vao->Bind();
+ const glm::mat4 &MV = assets.shaders.planet_surface.MV();
+ assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, 0.0f, 1.0f, 0.0f)));
+ vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 0);
+ assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(1.0f, 0.0f, 0.0f, 0.0f)));
+ vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 1);
+ assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, 1.0f, 0.0f, 0.0f)));
+ vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 2);
+ assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, 0.0f, -1.0f, 0.0f)));
+ vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 3);
+ assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(-1.0f, 0.0f, 0.0f, 0.0f)));
+ vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 4);
+ assets.shaders.planet_surface.SetNormal(glm::vec3(MV * glm::vec4(0.0f, -1.0f, 0.0f, 0.0f)));
+ vao->DrawTriangles(TilesPerSurface() * 6, TilesPerSurface() * 6 * 5);
+}
+
+
+void GenerateEarthlike(const Set<TileType> &tiles, Planet &p) noexcept {
+ math::SimplexNoise elevation_gen(0);
+ math::SimplexNoise variation_gen(45623752346);
+
+ const int ice = tiles["ice"].id;
+ const int ocean = tiles["ocean"].id;
+ const int water = tiles["water"].id;
+ const int sand = tiles["sand"].id;
+ const int grass = tiles["grass"].id;
+ const int tundra = tiles["tundra"].id;
+ const int taiga = tiles["taiga"].id;
+ const int desert = tiles["desert"].id;
+ const int mntn = tiles["mountain"].id;
+ const int algae = tiles["algae"].id;
+ const int forest = tiles["forest"].id;
+ const int jungle = tiles["jungle"].id;
+ const int rock = tiles["rock"].id;
+ const int wheat = tiles["wheat"].id;
+
+ constexpr double ocean_thresh = -0.2;
+ constexpr double water_thresh = 0.0;
+ constexpr double beach_thresh = 0.05;
+ constexpr double highland_thresh = 0.4;
+ constexpr double mountain_thresh = 0.5;
+
+ const glm::dvec3 axis(glm::dvec4(0.0, 1.0, 0.0, 0.0) * glm::eulerAngleXY(p.SurfaceTilt().x, p.SurfaceTilt().y));
+ const double cap_thresh = std::abs(std::cos(p.AxialTilt().x));
+ const double equ_thresh = std::abs(std::sin(p.AxialTilt().x)) / 2.0;
+ const double fzone_start = equ_thresh - (equ_thresh - cap_thresh) / 3.0;
+ const double fzone_end = cap_thresh + (equ_thresh - cap_thresh) / 3.0;
-void GenerateTest(Planet &p) {
for (int surface = 0; surface <= 5; ++surface) {
- for (int y = -p.Radius(); y <= p.Radius(); ++y) {
- for (int x = -p.Radius(); x <= p.Radius(); ++x) {
- p.TileAt(surface, x, y).type = (x == 0) + (y == 0);
+ for (int y = 0; y < p.SideLength(); ++y) {
+ for (int x = 0; x < p.SideLength(); ++x) {
+ glm::dvec3 to_tile = p.TileCenter(surface, x, y);
+ double near_axis = std::abs(glm::dot(glm::normalize(to_tile), axis));
+ if (near_axis > cap_thresh) {
+ p.TileAt(surface, x, y).type = ice;
+ continue;
+ }
+ float elevation = math::OctaveNoise(
+ elevation_gen,
+ to_tile / p.Radius(),
+ 3, // octaves
+ 0.5, // persistence
+ 5 / p.Radius(), // frequency
+ 2, // amplitude
+ 2 // growth
+ );
+ float variation = math::OctaveNoise(
+ variation_gen,
+ to_tile / p.Radius(),
+ 3, // octaves
+ 0.5, // persistence
+ 16 / p.Radius(), // frequency
+ 2, // amplitude
+ 2 // growth
+ );
+ if (elevation < ocean_thresh) {
+ p.TileAt(surface, x, y).type = ocean;
+ } else if (elevation < water_thresh) {
+ if (variation > 0.3) {
+ p.TileAt(surface, x, y).type = algae;
+ } else {
+ p.TileAt(surface, x, y).type = water;
+ }
+ } else if (elevation < beach_thresh) {
+ p.TileAt(surface, x, y).type = sand;
+ } else if (elevation < highland_thresh) {
+ if (near_axis < equ_thresh) {
+ if (variation > 0.6) {
+ p.TileAt(surface, x, y).type = grass;
+ } else if (variation > 0.2) {
+ p.TileAt(surface, x, y).type = sand;
+ } else {
+ p.TileAt(surface, x, y).type = desert;
+ }
+ } else if (near_axis < fzone_start) {
+ if (variation > 0.4) {
+ p.TileAt(surface, x, y).type = forest;
+ } else if (variation < -0.5) {
+ p.TileAt(surface, x, y).type = jungle;
+ } else if (variation > -0.02 && variation < 0.02) {
+ p.TileAt(surface, x, y).type = wheat;
+ } else {
+ p.TileAt(surface, x, y).type = grass;
+ }
+ } else if (near_axis < fzone_end) {
+ p.TileAt(surface, x, y).type = tundra;
+ } else {
+ p.TileAt(surface, x, y).type = taiga;
+ }
+ } else if (elevation < mountain_thresh) {
+ if (variation > 0.3) {
+ p.TileAt(surface, x, y).type = mntn;
+ } else {
+ p.TileAt(surface, x, y).type = rock;
+ }
+ } else {
+ p.TileAt(surface, x, y).type = mntn;
+ }
}
}
}
+ p.BuildVAO(tiles);
+}
+
+void GenerateTest(const Set<TileType> &tiles, Planet &p) noexcept {
+ for (int surface = 0; surface <= 5; ++surface) {
+ for (int y = 0; y < p.SideLength(); ++y) {
+ for (int x = 0; x < p.SideLength(); ++x) {
+ if (x == p.SideLength() / 2 && y == p.SideLength() / 2) {
+ p.TileAt(surface, x, y).type = surface;
+ } else {
+ p.TileAt(surface, x, y).type = (x == p.SideLength()/2) + (y == p.SideLength()/2) + 6;
+ }
+ }
+ }
+ }
+ p.BuildVAO(tiles);
+}
+
+
+Sun::Sun()
+: Body() {
+}
+
+Sun::~Sun() {
+}
+
+
+std::vector<TileType::Yield>::const_iterator TileType::FindResource(int r) const {
+ auto yield = resources.cbegin();
+ for (; yield != resources.cend(); ++yield) {
+ if (yield->resource == r) {
+ break;
+ }
+ }
+ return yield;
+}
+
+std::vector<TileType::Yield>::const_iterator TileType::FindBestResource(const creature::Composition &comp) const {
+ auto best = resources.cend();
+ double best_value = 0.0;
+ for (auto yield = resources.cbegin(); yield != resources.cend(); ++yield) {
+ double value = comp.Get(yield->resource);
+ if (value > best_value) {
+ best = yield;
+ best_value = value;
+ }
+ }
+ return best;
}
}
projects / blobs.git / blobdiff