git.itanic.dy.fi Git - sdl-planets/blob - planet.c

   1 #include <math.h>
   2
   3 #include "random.h"
   4 #include "planet.h"
   5 #include "utils.h"
   6
   7 static void putpixel(struct SDL_Surface *screen, const int x, const int y,
   8                      const unsigned char r, const unsigned char g,
   9                      const unsigned char b)
  10 {
  11         int offset = y * screen->pitch + x * 4;
  12         unsigned char *buf = screen->pixels;
  13
  14         buf[offset++] = b;
  15         buf[offset++] = g;
  16         buf[offset]   = r;
  17 }
  18
  19 static void reshape_planet(struct planet *p)
  20 {
  21         p->radius = pow(p->mass / 100, 1 / 3.0);
  22 }
  23
  24 void init_planet(struct planet *p)
  25 {
  26         p->speed.x = 0;
  27         p->speed.y = 0;
  28         p->pos.x = 0;
  29         p->pos.y = 0;
  30         p->mass = 0;
  31         reshape_planet(p);
  32         p->r = get_random() % 256;
  33         p->g = get_random() % 256;
  34         p->b = get_random() % 256;
  35
  36         INIT_LIST_HEAD(&p->list);
  37 }
  38
  39 /**
  40  * setup_planet - set the planet on a "solarsystem"
  41  * @p:          pointer to struct planet to set up
  42  * @mass:       mass of the planet to set up
  43  * @total_mass: total mass of the system
  44  * @radius:     maximum radius of the system
  45  */
  46
  47 static void setup_planet(struct planet *p, double mass, double total_mass,
  48                          double radius)
  49 {
  50         double angle = M_PI * 2 * get_random_double();
  51         double velocity;
  52         double distance;
  53
  54         distance = radius * pow(get_random_double(), 2);
  55         velocity = sqrt(total_mass / radius);
  56
  57         velocity *= pow(distance / radius, 0.2);
  58
  59         p->pos.x = cos(angle) * distance;
  60         p->pos.y = sin(angle) * distance;
  61
  62         p->speed.x = -sin(angle) * velocity;
  63         p->speed.y = cos(angle) * velocity;
  64
  65         p->mass = mass;
  66
  67         reshape_planet(p);
  68 }
  69
  70 void create_planets(struct planet *p, int num, double total_mass, double radius)
  71 {
  72         int i;
  73         double sum = 0;
  74         struct planet *new_planet;
  75
  76         for (i = 1; i < num; i++) {
  77                 new_planet = malloc(sizeof(*new_planet));
  78                 init_planet(new_planet);
  79                 list_add(&new_planet->list, &p->list);
  80                 setup_planet(new_planet,
  81                              total_mass / num * 2 * get_random_double(),
  82                              total_mass,
  83                              radius);
  84
  85                 sum += new_planet->mass;
  86         }
  87 }
  88
  89 void draw_planet(SDL_Surface *screen, struct planet *p,
  90                  const struct camera *cam)
  91 {
  92         struct vector pos;
  93         float radius = p->radius * cam->zoom;
  94         float r2 = radius * radius;
  95         int x, x_start, y, x_end;
  96
  97         vector_sub(&p->pos, &cam->pos, &pos);
  98         vector_scale(&pos, cam->zoom, &pos);
  99         pos.x += screen->w / 2;
 100         pos.y += screen->h / 2;
 101
 102         y = MAX(pos.y - radius, 0);
 103
 104         if (radius * 2 <= 1) {
 105                 if (pos.x >= 0 && pos.x < screen->w &&
 106                     pos.y >= 0 && pos.y < screen->h)
 107                         putpixel(screen, (int)pos.x, (int)pos.y,
 108                                  p->r, p->g, p->b);
 109                 return;
 110         }
 111
 112         for (; y < MIN(pos.y + radius, screen->h); y++) {
 113                 int offset;
 114                 unsigned char *buf = screen->pixels;
 115                 float y2 = (y - pos.y);
 116
 117                 y2 = sqrt(r2 - y2 * y2);
 118                 x_start = pos.x - y2;
 119                 x_end = pos.x + y2;
 120                 x_start = MAX(0, x_start);
 121                 x_end = MIN(x_end, screen->w);
 122
 123                 offset = y * screen->pitch + x_start * 4;
 124                 for (x = x_start; x < x_end; x++) {
 125                         buf[offset++] = p->b;
 126                         buf[offset++] = p->g;
 127                         buf[offset++] = p->r;
 128                         offset++;
 129                 }
 130         }
 131 }
 132
 133 int gravitize_planets(struct planet *a, struct planet *b, const double time)
 134 {
 135         struct vector distance, sum;
 136         double dist, f, acc;
 137
 138         vector_sub(&a->pos, &b->pos, &distance);
 139
 140         dist = vector_abs(&distance);
 141
 142         /* Return true in case of a collision */
 143         if (dist < (a->radius + b->radius))
 144                 return 1;
 145
 146         vector_div(&distance, dist, &distance);
 147
 148         f = a->mass * b->mass / (dist * dist) * time;
 149
 150         acc = f / b->mass;
 151         vector_scale(&distance, acc, &sum);
 152         vector_add(&b->speed, &sum, &b->speed);
 153
 154         acc = f / a->mass;
 155         vector_scale(&distance, acc, &sum);
 156         vector_sub(&a->speed, &sum, &a->speed);
 157
 158         return 0;
 159 }
 160
 161 /*
 162  * Merge planets a and b into planet a
 163  *
 164  * It is left for the caller to deal with the scrap planet b
 165  */
 166 static void _merge_planets(struct planet *a, struct planet *b)
 167 {
 168         struct vector pa, pb, p;
 169
 170         vector_scale(&a->speed, a->mass, &pa);
 171         vector_scale(&b->speed, b->mass, &pb);
 172         vector_add(&pa, &pb, &p);
 173
 174         if (a->mass < b->mass)
 175                 a->pos = b->pos;
 176
 177         a->mass += b->mass;
 178         reshape_planet(a);
 179         vector_div(&p, a->mass, &a->speed);
 180 }
 181
 182 /*
 183  * Merge planets a and b into a the new planet a, which pointer is
 184  * returned to the caller. Planet b is removed from the linked list
 185  * and it's memory is freed. The merged planet will retain in the
 186  * list.
 187  */
 188 struct planet *merge_planets(struct planet *a, struct planet *b)
 189 {
 190         _merge_planets(a, b);
 191
 192         list_del(&b->list);
 193         free(b);
 194         return a;
 195 }
 196
 197 void move_planet(struct planet *p, const double time)
 198 {
 199         struct vector tmp;
 200         vector_scale(&p->speed, time, &tmp);
 201         vector_add(&p->pos, &tmp, &p->pos);
 202 }
 203
 204 void print_planet(const struct planet *p)
 205 {
 206         printf("pos: (%f,%f), speed: (%f,%f), mass: %f, radius %f\n",
 207                p->pos.x, p->pos.y, p->speed.x, p->speed.y, p->mass, p->radius);
 208 }