1

#include "Terrain.hh"

     2

#include "Graphics.hh"

     3

#include "Engine.hh"

     4

     5

#include <cmath>

     6

#include <cassert>

     7

#include <algorithm>

     8

#include <ClanLib/display.h>

     9

    21

Terrain::Terrain (void) :

    22

    map_width(0), map_height(0)

    23

{

    24

}

    25

    26

Terrain::Terrain (PixelDimension map_width, PixelDimension map_height, int seed) :

    27

    terrain(map_width, std::vector<TerrainType>(map_height, TERRAIN_DIRT)),

    28

    map_width(map_width), 

    29

    map_height(map_height)

    30

{

    31

    generateTerrain(seed);

    32

}

    33

    34

Terrain::Terrain (const Terrain &t) 

    35

{

    36

    map_width = t.map_width;

    37

    map_height = t.map_height;

    38

    terrain = t.terrain;

    39

    40

    generatePixelBuffer();

    41

}

    42

    43

/*

    44

 * Texture generation util functions

    45

 */

    46

static void fractal_step(std::vector<double>& land, int size, double str, int dist) {

    47

    for(int i = 0; i < size; i += dist*2) {

    48

        for(int j = dist; j < size; j += dist*2) {

    49

            double sum = 0;

    50

            sum += land[((i+size-dist)%size)+(j*size)];

    51

            sum += land[i+((j+size-dist)%size)*size];

    52

            sum += land[((i+dist)%size)+j*size];

    53

            sum += land[i+((j+dist)%size)*size];

    54

            land[i+j*size] = sum/4 + (rand()%10000-5000)*str;

    55

        }

    56

    }

    57

    for(int i = dist; i < size; i += dist*2) {

    58

        for(int j = 0; j < size; j += dist*2) {

    59

            double sum = 0;

    60

            sum += land[((i+size-dist)%size)+(j*size)];

    61

            sum += land[i+((j+size-dist)%size)*size];

    62

            sum += land[((i+dist)%size)+j*size];

    63

            sum += land[i+((j+dist)%size)*size];

    64

            land[i+j*size] = sum/4 + (rand()%10000-5000)*str;

    65

        }

    66

    }

    67

}

    68

    69

static void fractal_diamond(std::vector<double>& land, int size, double str, int dist) {

    70

    for(int i = dist; i < size; i += dist*2) {

    71

        for(int j = dist; j < size; j += dist*2) {

    72

            double sum = 0;

    73

            sum += land[((i+size-dist)%size)+(((j+size-dist)%size)*size)];

    74

            sum += land[((i+dist)%size)+((j+size-dist)%size)*size];

    75

            sum += land[(i+size-dist)%size+((j+dist)%size)*size];

    76

            sum += land[(i+dist)%size+((j+dist)%size)*size];

    77

            land[i+j*size] = sum/4 + (rand()%10000-5000)*str;

    78

        }

    79

    }

    80

}

    81

    82

/**

    83

 * Algorithm read from http://www.gameprogrammer.com/fractal.html

    84

 */

    85

void Terrain::generate_texture (void) {

    86

    int texturesize = 128;

    87

    texture = std::vector<std::vector<int> >(texturesize, std::vector<int>(texturesize));

    88

    std::vector<double> land(texture.size()*texture.size());

    89

    double str = 0.8;

    90

    double H = 0.8;

    91

    for(int i = 512; i >= 1; i /= 2) {

    92

        fractal_diamond(land, texturesize, str, i);

    93

        fractal_step(land, texturesize, str, i);

    94

        str *= H;

    95

    }

    96

    double min = 100000;

    97

    double max = -100000;

    98

    for(int i = 0; i < texturesize*texturesize; i++) {

    99

        if(land[i] < min) min = land[i];

   100

        if(land[i] > max) max = land[i];

   101

    }

   102

    max -= min;

   103

    for(int i = 0; i < texturesize*texturesize; i++) {

   104

        land[i] -= min;

   105

    }

   106

    for(int i = 0; i < texturesize*texturesize; i++) {

   107

        land[i] = land[i]*255/max;

   108

        texture[i%texturesize][i/texturesize] = (int)(land[i]);

   109

    }

   110

}

   111

   112

/**

   113

 * Changes color depending on x and y values

   114

 * x and y should be valid coordinates (not outside)

   115

 */

   116

void Terrain::noisifyPixel(CL_Color& color, PixelCoordinate pc) {

   117

    int tx = pc.x % texture.size();

   118

    int ty = pc.y % texture[0].size();

   119

    int red = color.get_red();

   120

    int green = color.get_green();

   121

    int blue = color.get_blue();

   122

   123

    red += texture[tx][ty] / 8 - 16;

   124

    green += texture[tx][ty] / 8 - 16;

   125

    blue += texture[tx][ty] / 8 - 16;

   126

   127

    if (red < 0)

   128

        red = 0;

   129

    else if (red >= 256)

   130

        red = 255;

   131

   132

    if (green < 0)

   133

        green = 0;

   134

    else if (green >= 256)

   135

        green = 255;

   136

   137

    if (blue < 0)

   138

        blue = 0;

   139

    else if (blue >= 256)

   140

        blue = 255;

   141

   142

    color = CL_Color(red, green, blue);

   143

}

   144

   145

/**

   146

 * Sets to color the correct color of pixel in (x,y)

   147

 */

   148

void Terrain::loadPixelColor(CL_Color& color, PixelCoordinate pc) {

   149

    if ((pc.x < 0) || (pc.y < 0) || (pc.x >= map_width) || (pc.y >= map_height)) {

   150

        color = CL_Color(0, 0, 0);

   151

        return;

   152

    }

   153

   154

    switch (terrain[pc.x][pc.y]) {

   155

    case TERRAIN_EMPTY:

   156

        color = COLOR_EMPTY;

   157

        break;

   158

   159

    case TERRAIN_DIRT:

   160

        color = COLOR_DIRT;

   161

        break;

   162

   163

    case TERRAIN_ROCK:

   164

        color = COLOR_ROCK;

   165

        break;

   166

    }

   167

   168

    noisifyPixel(color, pc);

   169

}

   170

   171

void Terrain::generatePixelBuffer (void) {

   172

    // initialze texture

   173

    generate_texture();

   174

   175

    // create pixel buffer

   176

    pixbuf = CL_PixelBuffer(map_width, map_height, 4 * map_width, CL_PixelFormat::rgba8888);

   177

   178

    CL_Color color;

   179

   180

    for (PixelDimension x = 0; x < map_width; x++) {

   181

        for (PixelDimension y = 0; y < map_height; y++) {

   182

            PixelCoordinate pc(x, y);

   183

   184

            loadPixelColor(color, pc);

   185

   186

            pixbuf.draw_pixel(pc.x, pc.y, color);

   187

        }

   188

    }

   189

}

   190

   191

PixelCoordinate Terrain::getPixelCoordinate (Vector point) const {

   192

    // XXX: assume 1:1

   193

    return PixelCoordinate((int) point.x, (int) point.y);

   194

}

   195

   196

PixelCoordinate Terrain::getDimensions (void) const {

   197

    return PixelCoordinate(map_width, map_height);

   198

}

   199

   200

TerrainType Terrain::getType (PixelDimension px, PixelDimension py) const {

   201

    if ((px < 0) || (py < 0) ||(px >= map_width) || (py >= map_height))

   202

        return TERRAIN_ROCK;

   203

   204

    return terrain[px][py];

   205

}

   206

   207

TerrainType Terrain::getType (PixelCoordinate pc) const {

   208

    return getType(pc.x, pc.y);

   209

}

   210

   211

TerrainType Terrain::getType (Vector point) const {

   212

    return getType((PixelDimension) point.x, (PixelDimension) point.y);

   213

}

   214

   215

bool Terrain::collides (const Vector &point) const {

   216

    return (getType(point) != TERRAIN_EMPTY);

   217

}

   218

   219

bool Terrain::collides (const Vector &begin, const Vector &end) const {

   220

    // TODO: Maybe we should have another function prototype that also

   221

    // returns the point where we collided.

   222

   223

    // We'll use Bresenhams line algorithm to go trough all the

   224

    // "pixels" of the line.

   225

    PixelCoordinate b = getPixelCoordinate(begin);

   226

    PixelCoordinate e = getPixelCoordinate(end);

   227

   228

    bool steep = (abs(e.y - b.y) > abs(e.x - b.x)); // k > 1

   229

   230

    if (steep) { 

   231

        // Line is steep -> swap x and y coordinates

   232

        std::swap(b.x, b.y);

   233

        std::swap(e.x, e.y);

   234

    }

   235

   236

    if (b.x > e.x) { 

   237

        // Line goes down -> make it go up

   238

        std::swap(b, e);

   239

    }

   240

   241

    PixelDimension dx = e.x - b.x, dy = abs(e.y - b.y);

   242

    PixelDimension err = dx / 2;

   243

    PixelDimension ystep, y = b.y;

   244

   245

    // Is the line ascending or descending

   246

    if (b.y < e.y) 

   247

        ystep = 1;

   248

   249

    else 

   250

        ystep = -1;

   251

   252

    // Go trough the line

   253

    for (PixelDimension x =  b.x; x <= e.x; x++) {

   254

        if (steep) { 

   255

            // X and Y coordinates must be switched if steep

   256

            if (getType(y, x) != TERRAIN_EMPTY) { 

   257

                // Collision!

   258

                return true;

   259

            }

   260

        } else {

   261

            if (getType(x, y) != TERRAIN_EMPTY) { 

   262

                // Collision!

   263

                return true;

   264

            }

   265

        }

   266

   267

        err = err - dy;

   268

   269

        if (err < 0) { 

   270

            // Check if we want to make an ystep

   271

            y = y + ystep;

   272

            err = err + dx;

   273

        }

   274

    }

   275

   276

    return false; // No Collision

   277

}

   278

   279

void Terrain::removeGround (const Vector &pos, float radius) {

   280

    // TODO: Implement. Some circle algoritmh should be usefull here,

   281

    // though the current impelementation doesn't seem too bad either.

   282

   283

    PixelCoordinate mid = getPixelCoordinate(pos);

   284

    PixelDimension r = (unsigned int) radius; // XXX: scale

   285

   286

    for (PixelDimension i = mid.x - r; i < mid.x + r; i++) {

   287

        for (PixelDimension j = mid.y-r; j < mid.y+r; j++) {

   288

            PixelCoordinate pc(i, j);

   289

   290

            if (getType(pc) != TERRAIN_ROCK) { 

   291

                // getType returns ROCK if out of bounds

   292

   293

                if ((i - mid.x) * (i - mid.x) + (j - mid.y) * (j - mid.y) < r * r) {

   294

                    terrain[i][j] = TERRAIN_EMPTY;

   295

   296

                    CL_Color color;

   297

                    loadPixelColor(color, pc);

   298

                    pixbuf.draw_pixel(pc.x, pc.y, color);

   299

                }

   300

            }

   301

        }

   302

    }

   303

}

   304

   305

/**

   306

 * Gets the index of the given coordinate direction

   307

 * referring to the DIRECTIONS table in Physics.hh

   308

 */

   309

static int getDirectionIndex (Vector direction) {

   310

    Vector dir = direction.roundToInt();

   311

    if(dir.x == 0 && dir.y == -1) {

   312

        return 0;

   313

    } else if (dir.x == 1 && dir.y == -1) {

   314

        return 1;

   315

    } else if (dir.x == 1 && dir.y == 0) {

   316

        return 2;

   317

    } else if (dir.x == 1 && dir.y == 1) {

   318

        return 3;

   319

    } else if (dir.x == 0 && dir.y == 1) {

   320

        return 4;

   321

    } else if (dir.x == -1 && dir.y == 1) {

   322

        return 5;

   323

    } else if (dir.x == -1 && dir.y == 0) {

   324

        return 6;

   325

    } else if (dir.x == -1 && dir.y == -1) {

   326

        return 7;

   327

    }

   328

   329

    Engine::log(DEBUG, "Terrain.getDirectionIndex ") << "invalid direction: " << direction;

   330

    return 0;

   331

}

   332

   333

/**

   334

 * point should be ground and prevPoint air, but it's easy to assure that

   335

 * @param point - pixel on ground to which was collided

   336

 * @param prevPoint - pixel where we are when we collide

   337

 */

   338

Vector Terrain::getNormal(Vector point, Vector prevPoint) const {

   339

    PixelCoordinate p = getPixelCoordinate(point);

   340

   341

    assert(point != prevPoint);

   342

   343

    Vector normal(0,0);

   344

   345

    // These two must be rounded separately

   346

    int dirIdx = getDirectionIndex(prevPoint.roundToInt() - point.roundToInt());

   347

   348

    normal += DIRECTIONS[dirIdx];

   349

   350

    for (int i = 1; i <= 2; i++) {

   351

        if (getType(point + DIRECTIONS[(dirIdx+i+8)%8]) == TERRAIN_EMPTY) {

   352

            normal += DIRECTIONS[(dirIdx+i+8)%8];

   353

        }

   354

    }

   355

   356

    for (int i = 1; i <= 2; i++) {

   357

        if (getType(point + DIRECTIONS[(dirIdx-i+8)%8]) == TERRAIN_EMPTY) {

   358

            normal += DIRECTIONS[(dirIdx-i+8)%8];

   359

        }

   360

    }

   361

   362

    if (getType(point) == TERRAIN_EMPTY || getType(prevPoint) != TERRAIN_EMPTY) {

   363

        Engine::log(DEBUG, "Physics.getNormal ") << "logic ground error";

   364

    }

   365

   366

    return normal;

   367

}

   368

   369

// XXX: weird vectors

   370

Vector direction (const Vector &v) {

   371

    Vector tmp(v);

   372

   373

    if (tmp.length() > 0) 

   374

        tmp /= tmp.length();

   375

   376

    tmp.x = (uint16_t)(tmp.x);

   377

    tmp.y = (uint16_t)(tmp.y);

   378

   379

    return tmp;

   380

}

   381

   382

// TODO: This could better :)

   383

// TODO: And this need some cleaning :)

   384

void Terrain::generateTerrain (int seed) {

   385

    srand(seed); // Set random number generator seed.

   386

   387

    // Some constants to control random generation

   388

    const int min_range = 25;

   389

    const int max_range = 80;

   390

    const int num = 50;

   391

    const int rock_rarity = 4;

   392

   393

    // Generate circles (or whatever)

   394

    for (int i = 0; i < num; i++) {

   395

        // Random generate circle attributes

   396

        PixelCoordinate mid(rand() % map_width, rand() % map_width);

   397

   398

        int range = rand()%(max_range-min_range)+min_range;

   399

   400

        // Make sure that there's a circle in the midle of the cave

   401

        if (i == 0) {

   402

            mid.x = map_width / 2;

   403

            mid.y = map_height / 2;

   404

            range = 150;

   405

        }

   406

   407

        TerrainType type = TERRAIN_EMPTY;

   408

   409

        if (rand() % rock_rarity == 0) {

   410

            type = TERRAIN_ROCK;

   411

        }

   412

   413

        // Loops for every pixel of the cirlcle (or square as it seems

   414

        // now)

   415

        for (

   416

            PixelDimension x = std::max((PixelDimension) 0, mid.x - range); 

   417

            x < std::min(map_width, mid.x + range); 

   418

            x++

   419

        ) {

   420

            for (

   421

                PixelDimension y = std::max((PixelDimension) 0, mid.y - range);

   422

                y < std::min(map_height, mid.y + range);

   423

                y++

   424

            ) {

   425

                if ((x - mid.x) * (x - mid.x) + (y - mid.y) * (y - mid.y) < range * range) {

   426

                    terrain[x][y] = type;

   427

                }

   428

            }

   429

        } 

   430

    }

   431

   432

    // regenerate pixel buffer

   433

    this->generatePixelBuffer();

   434

}

   435

   436

void Terrain::draw (Graphics *g, PixelCoordinate camera) {

   437

    CL_Surface surf (pixbuf);

   438

    surf.draw(-camera.x, -camera.y, g->get_gc());

   439

}

   440

   441

std::vector<std::vector<TerrainType> > Terrain::getTerrain() const {

   442

    return terrain;

   443

}

   444