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 * get_random_double();
  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         printf("Requested mass: %f, got %f\n", total_mass, sum);
  89 }
  90
  91 void draw_planet(SDL_Surface *screen, struct planet *p,
  92                  const struct camera *cam)
  93 {
  94         struct vector pos;
  95         float radius = p->radius * cam->zoom;
  96         float r2 = radius * radius;
  97         int x, x_start, y, x_end, y_end;
  98
  99         vector_sub(&p->pos, &cam->pos, &pos);
 100         vector_scale(&pos, cam->zoom, &pos);
 101         pos.x += screen->w / 2;
 102         pos.y += screen->h / 2;
 103
 104         y = MAX(pos.y - radius, 0);
 105
 106         if (radius * 2 <= 1 ) {
 107                 if (pos.x >= 0 && pos.x < screen->w &&
 108                     pos.y >= 0 && pos.y < screen->h)
 109                         putpixel(screen, (int)pos.x, (int)pos.y,
 110                                  p->r, p->g, p->b);
 111                 return;
 112         }
 113
 114         for (; y < MIN(pos.y + radius, screen->h); y++) {
 115                 int offset;
 116                 unsigned char *buf = screen->pixels;
 117                 float y2 = (y - pos.y);
 118
 119                 y2 = sqrt(r2 - y2 * y2);
 120                 x_start = pos.x - y2;
 121                 x_end = pos.x + y2;
 122                 x_start = MAX(0, x_start);
 123                 x_end = MIN(x_end, screen->w);
 124
 125                 offset = y * screen->pitch + x_start * 4;
 126                 for (x = x_start; x < x_end; x++) {
 127                         buf[offset++] = p->b;
 128                         buf[offset++] = p->g;
 129                         buf[offset++] = p->r;
 130                         offset++;
 131                 }
 132         }
 133 }
 134
 135 int gravitize_planets(struct planet *a, struct planet *b, const double time)
 136 {
 137         struct vector distance, sum;
 138         double dist, f, acc;
 139
 140         vector_sub(&a->pos, &b->pos, &distance);
 141
 142         dist = vector_abs(&distance);
 143
 144         /* Return true in case of a collision */
 145         if (dist < (a->radius + b->radius))
 146                 return 1;
 147
 148         vector_div(&distance, dist, &distance);
 149
 150         f = a->mass * b->mass / (dist * dist) * time;
 151
 152         acc = f / b->mass;
 153         vector_scale(&distance, acc, &sum);
 154         vector_add(&b->speed, &sum, &b->speed);
 155
 156         acc = f / a->mass;
 157         vector_scale(&distance, acc, &sum);
 158         vector_sub(&a->speed, &sum, &a->speed);
 159
 160         return 0;
 161 }
 162
 163 /*
 164  * Merge planets a and b into planet a
 165  *
 166  * It is left for the caller to deal with the scrap planet b
 167  */
 168 static void _merge_planets(struct planet *a, struct planet *b)
 169 {
 170         struct vector pa, pb, p;
 171
 172         vector_scale(&a->speed, a->mass, &pa);
 173         vector_scale(&b->speed, b->mass, &pb);
 174         vector_add(&pa, &pb, &p);
 175
 176         if (a->mass < b->mass)
 177                 a->pos = b->pos;
 178
 179         a->mass += b->mass;
 180         reshape_planet(a);
 181         vector_div(&p, a->mass, &a->speed);
 182 }
 183
 184 /*
 185  * Merge planets a and b into a the new planet a, which pointer is
 186  * returned to the caller. Planet b is removed from the linked list
 187  * and it's memory is freed. The merged planet will retain in the
 188  * list.
 189  */
 190 struct planet *merge_planets(struct planet *a, struct planet *b)
 191 {
 192         _merge_planets(a, b);
 193
 194         list_del(&b->list);
 195         free(b);
 196         return a;
 197 }
 198
 199 void move_planet(struct planet *p, const double time)
 200 {
 201         struct vector tmp;
 202         vector_scale(&p->speed, time, &tmp);
 203         vector_add(&p->pos, &tmp, &p->pos);
 204 }
 205
 206 void print_planet(const struct planet *p)
 207 {
 208         printf("pos: (%f,%f), speed: (%f,%f), mass: %f, radius %f\n",
 209                p->pos.x, p->pos.y, p->speed.x, p->speed.y, p->mass, p->radius);
 210 }