#include <SDL2/SDL.h>
-#include <assert.h>
+#include "system/stacktrace.h"
+#include "broadcast.h"
#include "color.h"
+#include "ebisp/builtins.h"
+#include "ebisp/interpreter.h"
#include "game/camera.h"
#include "game/level.h"
#include "game/level/background.h"
#include "game/level/physical_world.h"
#include "game/level/platforms.h"
#include "game/level/player.h"
-#include "system/error.h"
+#include "game/level/regions.h"
+#include "game/level/rigid_bodies.h"
+#include "system/line_stream.h"
#include "system/lt.h"
#include "system/lt/lt_adapters.h"
+#include "system/nth_alloc.h"
-struct level_t
+#define LEVEL_LINE_MAX_LENGTH 512
+#define LEVEL_GRAVITY 1500.0f
+
+struct Level
{
- lt_t *lt;
-
- physical_world_t *physical_world;
- player_t *player;
- platforms_t *platforms;
- goals_t *goals;
- lava_t *lava;
- color_t background_color;
- platforms_t *back_platforms;
- background_t *background;
- boxes_t *boxes;
- labels_t *labels;
+ Lt *lt;
+
+ Background *background;
+ Player *player;
+ Platforms *platforms;
+ Goals *goals;
+ Lava *lava;
+ Platforms *back_platforms;
+ Boxes *boxes;
+ Labels *labels;
+ Regions *regions;
+ Physical_world *physical_world;
+ RigidBodies *rigid_bodies;
};
-level_t *create_level_from_file(const char *file_name)
+Level *create_level_from_file(const char *file_name, Broadcast *broadcast)
{
- assert(file_name);
+ trace_assert(file_name);
- lt_t *const lt = create_lt();
+ Lt *const lt = create_lt();
if (lt == NULL) {
return NULL;
}
- level_t *const level = PUSH_LT(lt, malloc(sizeof(level_t)), free);
+ Level *const level = PUSH_LT(lt, nth_alloc(sizeof(Level)), free);
if (level == NULL) {
- throw_error(ERROR_TYPE_LIBC);
RETURN_LT(lt, NULL);
}
- FILE *level_file = PUSH_LT(lt, fopen(file_name, "r"), fclose_lt);
- if (level_file == NULL) {
- throw_error(ERROR_TYPE_LIBC);
+ LineStream *level_stream = PUSH_LT(
+ lt,
+ create_line_stream(
+ file_name,
+ "r",
+ LEVEL_LINE_MAX_LENGTH),
+ destroy_line_stream);
+ if (level_stream == NULL) {
RETURN_LT(lt, NULL);
}
-
- char color[7];
- if (fscanf(level_file, "%6s", color) == EOF) {
- throw_error(ERROR_TYPE_LIBC);
+ level->background = PUSH_LT(
+ lt,
+ create_background_from_line_stream(level_stream),
+ destroy_background);
+ if (level->background == NULL) {
RETURN_LT(lt, NULL);
}
- level->background_color = color_from_hexstr(color);
- level->player = PUSH_LT(lt, create_player_from_stream(level_file), destroy_player);
+ level->player = PUSH_LT(
+ lt,
+ create_player_from_line_stream(level_stream, broadcast),
+ destroy_player);
if (level->player == NULL) {
RETURN_LT(lt, NULL);
}
- level->platforms = PUSH_LT(lt, create_platforms_from_stream(level_file), destroy_platforms);
+ level->platforms = PUSH_LT(
+ lt,
+ create_platforms_from_line_stream(level_stream),
+ destroy_platforms);
if (level->platforms == NULL) {
RETURN_LT(lt, NULL);
}
- level->goals = PUSH_LT(lt, create_goals_from_stream(level_file), destroy_goals);
+ level->goals = PUSH_LT(
+ lt,
+ create_goals_from_line_stream(level_stream),
+ destroy_goals);
if (level->goals == NULL) {
RETURN_LT(lt, NULL);
}
- level->lava = PUSH_LT(lt, create_lava_from_stream(level_file), destroy_lava);
+ level->lava = PUSH_LT(
+ lt,
+ create_lava_from_line_stream(level_stream),
+ destroy_lava);
if (level->lava == NULL) {
RETURN_LT(lt, NULL);
}
- level->back_platforms = PUSH_LT(lt, create_platforms_from_stream(level_file), destroy_platforms);
+ level->back_platforms = PUSH_LT(
+ lt,
+ create_platforms_from_line_stream(level_stream),
+ destroy_platforms);
if (level->back_platforms == NULL) {
RETURN_LT(lt, NULL);
}
- level->boxes = PUSH_LT(lt, create_boxes_from_stream(level_file), destroy_boxes);
+ level->boxes = PUSH_LT(
+ lt,
+ create_boxes_from_line_stream(level_stream),
+ destroy_boxes);
if (level->boxes == NULL) {
RETURN_LT(lt, NULL);
}
- level->labels = PUSH_LT(lt, create_labels_from_stream(level_file), destroy_labels);
+ level->labels = PUSH_LT(
+ lt,
+ create_labels_from_line_stream(level_stream),
+ destroy_labels);
if (level->labels == NULL) {
RETURN_LT(lt, NULL);
}
- level->background = PUSH_LT(lt, create_background(level->background_color), destroy_background);
- if (level->background == NULL) {
+ level->regions = PUSH_LT(
+ lt,
+ create_regions_from_line_stream(level_stream, broadcast),
+ destroy_regions);
+ if (level->regions == NULL) {
RETURN_LT(lt, NULL);
}
level->boxes,
level->physical_world) < 0) { RETURN_LT(lt, NULL); }
+ level->rigid_bodies = PUSH_LT(lt, create_rigid_bodies(1024), destroy_rigid_bodies);
+ if (level->rigid_bodies == NULL) {
+ RETURN_LT(lt, NULL);
+ }
+ rigid_bodies_add(
+ level->rigid_bodies,
+ rect(0.0, -1000.0, 100.0, 100.0),
+ rgba(1.0f, 0.0f, 0.0f, 1.0f));
+
+ rigid_bodies_add(
+ level->rigid_bodies,
+ rect(150.0, -1000.0, 100.0, 100.0),
+ rgba(0.0f, 1.0f, 0.0f, 1.0f));
+
+
level->lt = lt;
- fclose(RELEASE_LT(lt, level_file));
+ destroy_line_stream(RELEASE_LT(lt, level_stream));
return level;
}
-void destroy_level(level_t *level)
+void destroy_level(Level *level)
{
- assert(level);
+ trace_assert(level);
RETURN_LT0(level->lt);
}
-int level_render(const level_t *level, camera_t *camera)
+int level_render(const Level *level, Camera *camera)
{
- assert(level);
-
- player_focus_camera(level->player, camera);
-
- if (camera_clear_background(camera, level->background_color) < 0) {
- return -1;
- }
+ trace_assert(level);
if (background_render(level->background, camera) < 0) {
return -1;
return -1;
}
+ if (regions_render(level->regions, camera) < 0) {
+ return -1;
+ }
+
+ if (rigid_bodies_render(level->rigid_bodies, camera) < 0) {
+ return -1;
+ }
+
return 0;
}
-int level_update(level_t *level, float delta_time)
+int level_update(Level *level, float delta_time)
{
- assert(level);
- assert(delta_time > 0);
+ trace_assert(level);
+ trace_assert(delta_time > 0);
physical_world_apply_gravity(level->physical_world);
+ boxes_float_in_lava(level->boxes, level->lava);
+ rigid_bodies_apply_omniforce(level->rigid_bodies, vec(0.0f, LEVEL_GRAVITY));
+ rigid_bodies_update(level->rigid_bodies, delta_time);
boxes_update(level->boxes, delta_time);
player_update(level->player, delta_time);
+ rigid_bodies_collide_with_itself(level->rigid_bodies);
+ rigid_bodies_collide_with_platforms(level->rigid_bodies, level->platforms);
physical_world_collide_solids(level->physical_world, level->platforms);
player_hide_goals(level->player, level->goals);
player_die_from_lava(level->player, level->lava);
+ regions_player_enter(level->regions, level->player);
+ regions_player_leave(level->regions, level->player);
goals_update(level->goals, delta_time);
lava_update(level->lava, delta_time);
+ labels_update(level->labels, delta_time);
return 0;
}
-int level_event(level_t *level, const SDL_Event *event)
+int level_event(Level *level, const SDL_Event *event)
{
- assert(level);
- assert(event);
+ trace_assert(level);
+ trace_assert(event);
switch (event->type) {
case SDL_KEYDOWN:
return 0;
}
-int level_input(level_t *level,
+int level_input(Level *level,
const Uint8 *const keyboard_state,
SDL_Joystick *the_stick_of_joy)
{
- assert(level);
- assert(keyboard_state);
+ trace_assert(level);
+ trace_assert(keyboard_state);
(void) the_stick_of_joy;
if (keyboard_state[SDL_SCANCODE_A]) {
return 0;
}
-int level_reload_preserve_player(level_t *level, const char *file_name)
+int level_reload_preserve_player(Level *level, const char *file_name, Broadcast *broadcast)
{
- lt_t * const lt = create_lt();
+ Lt * const lt = create_lt();
if (lt == NULL) {
return -1;
}
/* TODO(#104): duplicate code in create_level_from_file and level_reload_preserve_player */
-
-
- FILE * const level_file = PUSH_LT(lt, fopen(file_name, "r"), fclose_lt);
- if (level_file == NULL) {
- throw_error(ERROR_TYPE_LIBC);
+ LineStream * const level_stream = PUSH_LT(
+ lt,
+ create_line_stream(
+ file_name,
+ "r",
+ LEVEL_LINE_MAX_LENGTH),
+ destroy_line_stream);
+ if (level_stream == NULL) {
RETURN_LT(lt, -1);
}
- char color[7];
- if (fscanf(level_file, "%6s", color) == EOF) {
- throw_error(ERROR_TYPE_LIBC);
+ Background * const background = create_background_from_line_stream(level_stream);
+ if (background == NULL) {
RETURN_LT(lt, -1);
}
- level->background_color = color_from_hexstr(color);
+ level->background = RESET_LT(level->lt, level->background, background);
- player_t * const skipped_player = create_player_from_stream(level_file);
+ Player * const skipped_player = create_player_from_line_stream(level_stream, broadcast);
if (skipped_player == NULL) {
RETURN_LT(lt, -1);
}
destroy_player(skipped_player);
- platforms_t * const platforms = create_platforms_from_stream(level_file);
+ Platforms * const platforms = create_platforms_from_line_stream(level_stream);
if (platforms == NULL) {
RETURN_LT(lt, -1);
}
level->platforms = RESET_LT(level->lt, level->platforms, platforms);
- goals_t * const goals = create_goals_from_stream(level_file);
+ Goals * const goals = create_goals_from_line_stream(level_stream);
if (goals == NULL) {
RETURN_LT(lt, -1);
}
level->goals = RESET_LT(level->lt, level->goals, goals);
- lava_t * const lava = create_lava_from_stream(level_file);
+ Lava * const lava = create_lava_from_line_stream(level_stream);
if (lava == NULL) {
RETURN_LT(lt, -1);
}
level->lava = RESET_LT(level->lt, level->lava, lava);
- platforms_t * const back_platforms = create_platforms_from_stream(level_file);
+ Platforms * const back_platforms = create_platforms_from_line_stream(level_stream);
if (back_platforms == NULL) {
RETURN_LT(lt, -1);
}
level->back_platforms = RESET_LT(level->lt, level->back_platforms, back_platforms);
- boxes_t * const boxes = create_boxes_from_stream(level_file);
+ Boxes * const boxes = create_boxes_from_line_stream(level_stream);
if (boxes == NULL) {
RETURN_LT(lt, -1);
}
level->boxes = RESET_LT(level->lt, level->boxes, boxes);
- labels_t * const labels = create_labels_from_stream(level_file);
+ Labels * const labels = create_labels_from_line_stream(level_stream);
if (labels == NULL) {
RETURN_LT(lt, -1);
}
level->labels = RESET_LT(level->lt, level->labels, labels);
+ Regions * const regions = create_regions_from_line_stream(level_stream, broadcast);
+ if (regions == NULL) {
+ RETURN_LT(lt, -1);
+ }
+ level->regions = RESET_LT(level->lt, level->regions, regions);
+
physical_world_clean(level->physical_world);
if (physical_world_add_solid(
level->physical_world,
RETURN_LT(lt, 0);
}
-int level_sound(level_t *level, sound_samples_t *sound_samples)
+int level_sound(Level *level, Sound_samples *sound_samples)
{
if (goals_sound(level->goals, sound_samples) < 0) {
return -1;
return 0;
}
-void level_toggle_debug_mode(level_t *level)
+void level_toggle_debug_mode(Level *level)
{
background_toggle_debug_mode(level->background);
}
-int level_enter_camera_event(level_t *level,
- const camera_t *camera)
+int level_enter_camera_event(Level *level, Camera *camera)
{
+ player_focus_camera(level->player, camera);
goals_cue(level->goals, camera);
goals_checkpoint(level->goals, level->player);
+ labels_enter_camera_event(level->labels, camera);
return 0;
}
+
+Rigid_rect *level_rigid_rect(Level *level,
+ const char *rigid_rect_id)
+{
+ trace_assert(level);
+ trace_assert(rigid_rect_id);
+
+ Rigid_rect *rigid_rect = player_rigid_rect(level->player,
+ rigid_rect_id);
+ if (rigid_rect != NULL) {
+ return rigid_rect;
+ }
+
+ rigid_rect = boxes_rigid_rect(level->boxes, rigid_rect_id);
+ if (rigid_rect != NULL) {
+ return rigid_rect;
+ }
+
+ return NULL;
+}
+
+struct EvalResult level_send(Level *level, Gc *gc, struct Scope *scope, struct Expr path)
+{
+ trace_assert(level);
+ trace_assert(gc);
+ trace_assert(scope);
+
+ const char *target = NULL;
+ struct Expr rest = void_expr();
+ struct EvalResult res = match_list(gc, "q*", path, &target, &rest);
+ if (res.is_error) {
+ return res;
+ }
+
+ if (strcmp(target, "goal") == 0) {
+ return goals_send(level->goals, gc, scope, rest);
+ } else if (strcmp(target, "label") == 0) {
+ return labels_send(level->labels, gc, scope, rest);
+ } else if (strcmp(target, "box") == 0) {
+ return boxes_send(level->boxes, gc, scope, rest);
+ }
+
+ return unknown_target(gc, "level", target);
+}