ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/noise.C
(Generate patch)

Comparing deliantra/server/common/noise.C (file contents):
Revision 1.11 by root, Tue Apr 26 03:35:36 2011 UTC vs.
Revision 1.12 by root, Tue Apr 26 14:41:35 2011 UTC

226}; 226};
227 227
228///////////////////////////////////////////////////////////////////////////// 228/////////////////////////////////////////////////////////////////////////////
229 229
230template<int N, typename T> 230template<int N, typename T>
231template<class random_generator>
232void 231void
233permutation<N,T>::seed (random_generator &rng) 232permutation<N,T>::seed (seedable_rand_gen &rng)
234{ 233{
235 for (int i = 0; i < N; ++i) 234 for (int i = 0; i < N; ++i)
236 pmap[i] = i; 235 pmap[i] = i;
237 236
238 // fisher-yates to randomly perturb 237 // fisher-yates to randomly perturb
242 241
243template class permutation<256, uint8_t>; 242template class permutation<256, uint8_t>;
244 243
245///////////////////////////////////////////////////////////////////////////// 244/////////////////////////////////////////////////////////////////////////////
246 245
246// various s-shaped curves, smooth to, first, or second derivative
247// used for smooth interpolation from 0..1
248
249// linear
250template<typename T>
251inline T
252sigmoid0 (T x)
253{
254 return x;
255}
256
257// 3x²-2x³
258template<typename T>
259inline T
260sigmoid1 (T x)
261{
262 return (3 - 2 * x) * x * x;
263}
264
265// 6x⁵ - 15x⁴ + 10x³
266template<typename T>
267inline T
268sigmoid2 (T x)
269{
270#ifdef MORE_PARALLELITY
271 float x2 = x * x;
272 float x4 = x2 * x2;
273
274 return (6 * x4 + 10 * x2) * x - 15 * x4;
275#endif
276
277 // simple horner
278 return ((6 * x - 15) * x + 10) * x * x * x;
279}
280
281// blend between a and b
282// c is the control function - if lower than ca
283// then return a, if higher than cb, return b
284template<typename T, typename U>
285inline T
286blend (T a, T b, U c, U ca, U cb, T weight (U) = sigmoid1)
287{
288 if (c <= ca) return a;
289 if (c >= cb) return b;
290
291 T w = weight (lerp (c, ca, cb, T(0), T(1)));
292 return (T(1) - w) * a + w * b;
293}
294
295// blend between a and b
296// c is the control function - if lower than -c_w
297// then return a, if higher than +c_w then b.
298template<typename T, typename U>
299inline T
300blend0 (T a, T b, U c, U c_w, T weight (U) = sigmoid1)
301{
302 return blend<T,U> (a, b, c, -c_w, c_w, weight);
303}
304
305/////////////////////////////////////////////////////////////////////////////
306
247static vec2d 307static vec2d
248floor (vec2d v) 308floor (vec2d v)
249{ 309{
250 return vec2d (std::floor (v[0]), std::floor (v[1])); 310 return vec2d (fastfloor (v[0]), fastfloor (v[1]));
251} 311}
252 312
253static vec3d 313static vec3d
254floor (vec3d v) 314floor (vec3d v)
255{ 315{
256 return vec3d (std::floor (v[0]), std::floor (v[1]), std::floor (v[2])); 316 return vec3d (fastfloor (v[0]), fastfloor (v[1]), fastfloor (v[2]));
257} 317}
258 318
259noise_gen<vec2d>::noise_gen (uint32_t seed) 319template<class vec_t>
320void
321noise_gen_base<vec_t>::seed (seedable_rand_gen &rng)
322{
323 for (int i = 0; i < array_length (rvmap); ++i)
324 rvmap[i].seed (rng);
325}
326
327template<class vec_t>
328void
329noise_gen_base<vec_t>::seed (seed_t seed)
260{ 330{
261 seedable_rand_gen rng (seed); 331 seedable_rand_gen rng (seed);
262 332
263 rvmap[0].seed (rng); 333 this->seed (rng);
264 rvmap[1].seed (rng);
265} 334}
266 335
336template<>
267vec2d::T_numtype 337vec2d::T_numtype
268noise_gen<vec2d>::operator() (vec2d P) 338noise_gen_base<vec2d>::operator() (vec2d P)
269{ 339{
270 vec2d I = floor (P); 340 vec2d I = floor (P);
271 vec2d F = P - I; 341 vec2d F = P - I;
272 342
273 float v = 0; 343 float v = 0;
292 362
293 v += dot (A, G) * p; 363 v += dot (A, G) * p;
294 } 364 }
295 } 365 }
296 366
297 return clamp (v, -.9999999, .9999999); 367 return v;
298} 368}
299 369
300///////////////////////////////////////////////////////////////////////////// 370/////////////////////////////////////////////////////////////////////////////
301 371
302noise_gen<vec3d>::noise_gen (uint32_t seed) 372template<>
303{
304 seedable_rand_gen rng (seed);
305
306 rvmap [0].seed (rng);
307 rvmap [1].seed (rng);
308 rvmap [2].seed (rng);
309}
310
311vec3d::T_numtype 373vec3d::T_numtype
312noise_gen<vec3d>::operator() (vec3d P) 374noise_gen_base<vec3d>::operator() (vec3d P)
313{ 375{
314 vec3d I = floor (P); 376 vec3d I = floor (P);
315 vec3d F = P - I; 377 vec3d F = P - I;
316 378
317 float v = 0; 379 float v = 0;
337 399
338 v += dot (A, vec3d (G[0], G[1], G[2])) * p; 400 v += dot (A, vec3d (G[0], G[1], G[2])) * p;
339 } 401 }
340 } 402 }
341 403
342 return clamp (v * 2, -.9999999, .9999999); 404 return v * 2;
343} 405}
344 406
345vec3d::T_numtype 407vec3d::T_numtype
346noise_gen<vec3d>::operator() (vec3d P, vec3d N) 408noise_gen<vec3d>::operator() (vec3d P, vec3d N)
347{ 409{
381 v += dot (A, vec3d (G[0], G[1], G[2])) * p; 443 v += dot (A, vec3d (G[0], G[1], G[2])) * p;
382 } 444 }
383 } 445 }
384 } 446 }
385 447
386 return clamp (v, -.9999999, .9999999); 448 return v;
387} 449}
388 450
389template class noise_gen<vec2d>; 451template class noise_gen<vec2d>;
390template class noise_gen<vec3d>; 452template class noise_gen<vec3d>;
391 453
403 r[1] += i * 2; 465 r[1] += i * 2;
404 return r; 466 return r;
405} 467}
406 468
407template<class vec_t> 469template<class vec_t>
408frac_gen<vec_t>::frac_gen (value_t hurst_expo, value_t lacunarity) 470frac_gen<vec_t>::frac_gen (value_t hurst_expo, value_t lacunarity, seed_t seed)
409: h (hurst_expo), lac (lacunarity), noise_gen<vec_t> (0) 471: h (hurst_expo), lac (lacunarity)
410{ 472{
473 this->seed (seed);
474
411 value_t exsum = 0; 475 value_t exsum = 0;
412 value_t phi = noise (vec_t (value_t (0))) * 0.5 + 1; 476 value_t phi = noise (vec_t (value_t (0))) * 0.5 + 1;
413 477
414 for (int i = 0; i < MAX_OCTAVES; ++i) 478 for (int i = 0; i < MAX_OCTAVES; ++i)
415 { 479 {
431 rot [i](P); 495 rot [i](P);
432 v += noise (ith_octave (P, i)) * ex [i]; 496 v += noise (ith_octave (P, i)) * ex [i];
433 P *= lac; 497 P *= lac;
434 } 498 }
435 499
436 return clamp<value_t> (v * fbm_mul [octaves - 1] + 0.5, 0, .9999999); 500 return v * fbm_mul [octaves - 1];
437} 501}
438 502
439template<class vec_t> 503template<class vec_t>
440typename frac_gen<vec_t>::value_t 504typename frac_gen<vec_t>::value_t
441frac_gen<vec_t>::turbulence (vec_t P, int octaves) 505frac_gen<vec_t>::turbulence (vec_t P, int octaves)
447 rot [i](P); 511 rot [i](P);
448 v += abs (noise (ith_octave (P, i))) * ex [i]; 512 v += abs (noise (ith_octave (P, i))) * ex [i];
449 P *= lac; 513 P *= lac;
450 } 514 }
451 515
452 return clamp<value_t> (v * fbm_mul [octaves - 1] * (0.5 / noise_gen<vec_t>::abs_avg ()), 0, .9999999); 516 return v * fbm_mul [octaves - 1] * (0.5 / noise_gen<vec_t>::abs_avg ());
453} 517}
454 518
455template<class vec_t> 519template<class vec_t>
456typename frac_gen<vec_t>::value_t 520typename frac_gen<vec_t>::value_t
457frac_gen<vec_t>::multifractal (vec_t P, int octaves, value_t offset) 521frac_gen<vec_t>::multifractal (vec_t P, int octaves, value_t offset)
463 rot [i](P); 527 rot [i](P);
464 v *= noise (P) * ex [i] + offset; 528 v *= noise (P) * ex [i] + offset;
465 P *= lac; 529 P *= lac;
466 } 530 }
467 531
468 return clamp<value_t> (v * 0.5, 0, .9999999); 532 return v * value_t (0.5);
469} 533}
470 534
471template<class vec_t> 535template<class vec_t>
472typename frac_gen<vec_t>::value_t 536typename frac_gen<vec_t>::value_t
473frac_gen<vec_t>::heterofractal (vec_t P, int octaves, value_t offset) 537frac_gen<vec_t>::heterofractal (vec_t P, int octaves, value_t offset)
501 value_t sig = (noise (P) + offset) * ex [i]; 565 value_t sig = (noise (P) + offset) * ex [i];
502 v += weight * sig; 566 v += weight * sig;
503 weight *= gain * sig; 567 weight *= gain * sig;
504 } 568 }
505 569
506 return clamp<value_t> (v * 0.5 + 0.5, 0, .9999999); 570 return v * value_t (0.5) + value_t (0.5);
507} 571}
508 572
509template<class vec_t> 573template<class vec_t>
510typename frac_gen<vec_t>::value_t 574typename frac_gen<vec_t>::value_t
511frac_gen<vec_t>::ridgedmultifractal (vec_t P, int octaves, value_t offset, value_t gain) 575frac_gen<vec_t>::ridgedmultifractal (vec_t P, int octaves, value_t offset, value_t gain)
526 sig *= w; 590 sig *= w;
527 591
528 v += sig * ex [i]; 592 v += sig * ex [i];
529 } 593 }
530 594
531 return clamp<value_t> (v * 0.25, 0, .9999999); 595 return v * value_t (0.25);
532} 596}
533 597
534template<class vec_t> 598template<class vec_t>
535typename frac_gen<vec_t>::value_t 599typename frac_gen<vec_t>::value_t
536frac_gen<vec_t>::billowfractal (vec_t P, int octaves, value_t offset, value_t gain) 600frac_gen<vec_t>::billowfractal (vec_t P, int octaves, value_t offset, value_t gain)
544 rot [i](P); 608 rot [i](P);
545 v += (abs (noise (ith_octave (P, i))) * gain - offset) * ex [i]; 609 v += (abs (noise (ith_octave (P, i))) * gain - offset) * ex [i];
546 P *= lac; 610 P *= lac;
547 } 611 }
548 612
549 return clamp<value_t> (v, -.9999999, .9999999); 613 return v;
550} 614}
551 615
552// http://www.gamasutra.com/view/feature/3098/a_realtime_procedural_universe_.php?page=2 616// http://www.gamasutra.com/view/feature/3098/a_realtime_procedural_universe_.php?page=2
553template<class vec_t> 617template<class vec_t>
554typename frac_gen<vec_t>::value_t 618typename frac_gen<vec_t>::value_t
597///////////////////////////////////////////////////////////////////////////// 661/////////////////////////////////////////////////////////////////////////////
598 662
599void noise_test (); 663void noise_test ();
600void noise_test () 664void noise_test ()
601{ 665{
602 frac_gen<vec2d> gen (0.5, 1.9); 666 frac_gen<vec2d> gen;
603 frac_gen<vec3d> gen3; 667 frac_gen<vec3d> gen3;
604 668
605#if 1 669#if 1
606 int N = 1024; 670 int N = 1024;
607 671
610 for (int y = 0; y < N; ++y) 674 for (int y = 0; y < N; ++y)
611 { 675 {
612 if (!(y&63))fprintf (stderr, "y %d\n", y);//D 676 if (!(y&63))fprintf (stderr, "y %d\n", y);//D
613 for (int x = 0; x < N; ++x) 677 for (int x = 0; x < N; ++x)
614 { 678 {
679 vec2d P = vec2d (x, y) * (5000.f / N);
680
615 //putc (127 * gen.noise (vec2d (x * 0.01, y * 0.01)) + 128, stdout); 681 //putc (127 * gen.noise (vec2d (x * 0.01, y * 0.01)) + 128, stdout);
616 //putc (256 * gen.terrain2 (x * 0.004, y * 0.004, 8), stdout); 682 //putc (256 * gen.terrain2 (x * 0.004, y * 0.004, 8), stdout);
617 //putc (256 * gen.fBm (vec2d(x * 0.01, y * 0.01), 16), stdout); 683 //putc (256 * gen.fBm (vec2d(x * 0.01, y * 0.01), 16), stdout);
618 putc (256 * gen.turbulence (vec2d (x * 0.004 - 1, y * 0.004 - 1), 10), stdout); 684 //putc (256 * gen.turbulence (vec2d (x * 0.004 - 1, y * 0.004 - 1), 10), stdout);
619 //putc (256 * gen.heterofractal (vec2d (x * 0.008, y * 0.008), 8, 0.9), stdout); 685 //putc (256 * gen.heterofractal (vec2d (x * 0.008, y * 0.008), 8, 0.9), stdout);
620 686
621 // mountais or somesuch(?) 687 // mountais or somesuch(?)
622 //putc (256 * gen.hybridfractal (vec2d (x * 0.01, y * 0.01), 8, -.4, -4), stdout); 688 //putc (256 * gen.hybridfractal (vec2d (x * 0.01, y * 0.01), 8, -.4, -4), stdout);
623 689
624 // temperature 690 // temperature
625 //putc (256 * gen.fBm (vec2d (x * 0.002, y * 0.002), 2), stdout); 691 //putc (256 * gen.fBm (vec2d (x * 0.002, y * 0.002), 2), stdout);
626 // rain 692 // rain
627 693
628 putc (255 * gen.ridgedmultifractal (vec2d (x * 0.01, y * 0.01), 1, 0.9, 1), stdout); 694 float continent = gen.fBm (P * 0.0004, 12) + 0.1f;
695 float mountain = gen.ridgedmultifractal (P * 0.004, 8, 0.8, 10) * 2;
696 float river = gen.ridgedmultifractal (P * 0.004, 3, 0.8, 10);
697 float sel1 = gen.noise (P * 0.001 + vec2d (5,0));
698
699 {
700 const float W = 100;
701 const float N = 5000 - 1;
702
703 float border = W; // within n places of the border
704
705 min_it (border, P [0]);
706 min_it (border, N - P [0]);
707 min_it (border, P [1]);
708 min_it (border, N - P [1]);
709
710 continent = blend (-1.f, continent, border, 0.f, W);
711 }
712
713 //float v = blend (mountain, 0.f, river + sel1 * 0.2f, 0.25f, 0.1f);
714 float v = blend0 (0.f, 1.f, continent, 0.05f);
715
716
717 putc (255 * clamp (v, 0.f, 1.f), stdout);
629 718
630 //cells 719 //cells
631 //putc (127.49 * gen.billowfractal (vec2d (x * 0.01, y * 0.01), 9) + 128, stdout); 720 //putc (127.49 * gen.billowfractal (vec2d (x * 0.01, y * 0.01), 9) + 128, stdout);
632 } 721 }
633 } 722 }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines