2 #include "system/stacktrace.h"
6 #include "ebisp/builtins.h"
7 #include "ebisp/interpreter.h"
8 #include "game/camera.h"
9 #include "game/level.h"
10 #include "game/level/background.h"
11 #include "game/level/boxes.h"
12 #include "game/level/goals.h"
13 #include "game/level/labels.h"
14 #include "game/level/lava.h"
15 #include "game/level/platforms.h"
16 #include "game/level/player.h"
17 #include "game/level/regions.h"
18 #include "game/level/rigid_bodies.h"
19 #include "game/level_metadata.h"
20 #include "game/level/level_editor/proto_rect.h"
21 #include "game/level/level_editor/layer.h"
22 #include "system/line_stream.h"
23 #include "system/log.h"
24 #include "system/lt.h"
25 #include "system/lt/lt_adapters.h"
26 #include "system/nth_alloc.h"
27 #include "system/str.h"
28 #include "game/level/level_editor.h"
30 #define LEVEL_LINE_MAX_LENGTH 512
31 #define LEVEL_GRAVITY 1500.0f
37 const char *file_name;
38 LevelMetadata *metadata;
39 // TODO(#812): LevelEditor does not support Background
40 Background *background;
41 RigidBodies *rigid_bodies;
42 // TODO(#813): LevelEditor does not support Player
45 // TODO(#815): LevelEditor does not support Goals
47 // TODO(#816): LevelEditor does not support Lava
49 Platforms *back_platforms;
51 // TODO(#818): LevelEditor does not support Labels
53 // TODO(#819): LevelEditor does not support Regions
57 LevelEditor *level_editor;
60 Level *create_level_from_file(const char *file_name, Broadcast *broadcast)
62 trace_assert(file_name);
64 Lt *const lt = create_lt();
69 Level *const level = PUSH_LT(lt, nth_calloc(1, sizeof(Level)), free);
75 level->file_name = PUSH_LT(lt, string_duplicate(file_name, NULL), free);
76 if (level->file_name == NULL) {
80 LineStream *level_stream = PUSH_LT(
85 LEVEL_LINE_MAX_LENGTH),
87 if (level_stream == NULL) {
91 level->metadata = PUSH_LT(
93 create_level_metadata_from_line_stream(level_stream),
94 destroy_level_metadata);
95 if (level->metadata == NULL) {
99 level->background = PUSH_LT(
101 create_background_from_line_stream(level_stream),
103 if (level->background == NULL) {
107 level->rigid_bodies = PUSH_LT(lt, create_rigid_bodies(1024), destroy_rigid_bodies);
108 if (level->rigid_bodies == NULL) {
112 level->player = PUSH_LT(
114 create_player_from_line_stream(level_stream, level->rigid_bodies, broadcast),
116 if (level->player == NULL) {
120 Layer *platforms_layer = create_layer_from_line_stream(level_stream);
121 if (platforms_layer == NULL) {
125 level->platforms = PUSH_LT(
127 create_platforms_from_layer(platforms_layer),
129 if (level->platforms == NULL) {
133 level->goals = PUSH_LT(
135 create_goals_from_line_stream(level_stream),
137 if (level->goals == NULL) {
141 level->lava = PUSH_LT(
143 create_lava_from_line_stream(level_stream),
145 if (level->lava == NULL) {
149 Layer *back_platforms_layer = create_layer_from_line_stream(level_stream);
150 if (back_platforms_layer == NULL) {
154 level->back_platforms = PUSH_LT(
156 create_platforms_from_layer(back_platforms_layer),
158 if (level->back_platforms == NULL) {
162 Layer *boxes_layer = create_layer_from_line_stream(level_stream);
163 if (boxes_layer == NULL) {
167 level->boxes = PUSH_LT(
169 create_boxes_from_layer(boxes_layer, level->rigid_bodies),
171 if (level->boxes == NULL) {
175 level->labels = PUSH_LT(
177 create_labels_from_line_stream(level_stream),
179 if (level->labels == NULL) {
183 level->regions = PUSH_LT(
185 create_regions_from_line_stream(level_stream, broadcast),
187 if (level->regions == NULL) {
191 level->edit_mode = false;
192 level->level_editor = PUSH_LT(
197 back_platforms_layer),
198 destroy_level_editor);
199 if (level->level_editor == NULL) {
203 destroy_line_stream(RELEASE_LT(lt, level_stream));
208 void destroy_level(Level *level)
211 RETURN_LT0(level->lt);
215 int level_render(const Level *level, Camera *camera)
219 if (background_render(level->background, camera) < 0) {
223 if (level->edit_mode) {
224 if (level_editor_render(level->level_editor, camera) < 0) {
231 if (platforms_render(level->back_platforms, camera) < 0) {
235 if (player_render(level->player, camera) < 0) {
239 if (boxes_render(level->boxes, camera) < 0) {
243 if (lava_render(level->lava, camera) < 0) {
247 if (platforms_render(level->platforms, camera) < 0) {
251 if (goals_render(level->goals, camera) < 0) {
255 if (labels_render(level->labels, camera) < 0) {
259 if (regions_render(level->regions, camera) < 0) {
266 int level_update(Level *level, float delta_time)
269 trace_assert(delta_time > 0);
271 boxes_float_in_lava(level->boxes, level->lava);
272 rigid_bodies_apply_omniforce(level->rigid_bodies, vec(0.0f, LEVEL_GRAVITY));
274 boxes_update(level->boxes, delta_time);
275 player_update(level->player, delta_time);
277 rigid_bodies_collide(level->rigid_bodies, level->platforms);
279 player_hide_goals(level->player, level->goals);
280 player_die_from_lava(level->player, level->lava);
281 regions_player_enter(level->regions, level->player);
282 regions_player_leave(level->regions, level->player);
284 goals_update(level->goals, delta_time);
285 lava_update(level->lava, delta_time);
286 labels_update(level->labels, delta_time);
288 if (level->edit_mode) {
289 level_editor_update(level->level_editor, delta_time);
295 int level_event(Level *level, const SDL_Event *event, const Camera *camera)
300 switch (event->type) {
302 switch (event->key.keysym.sym) {
304 player_jump(level->player);
308 level->edit_mode = !level->edit_mode;
309 SDL_SetRelativeMouseMode(level->edit_mode);
310 if (!level->edit_mode) {
311 level->boxes = RESET_LT(
314 create_boxes_from_layer(
315 level_editor_boxes(level->level_editor),
316 level->rigid_bodies));
317 if (level->boxes == NULL) {
321 level->platforms = RESET_LT(
324 create_platforms_from_layer(
325 level_editor_platforms(
326 level->level_editor)));
327 if (level->platforms == NULL) {
335 case SDL_JOYBUTTONDOWN:
336 if (event->jbutton.button == 1) {
337 player_jump(level->player);
342 if (level->edit_mode) {
343 level_editor_event(level->level_editor, event, camera);
349 int level_input(Level *level,
350 const Uint8 *const keyboard_state,
351 SDL_Joystick *the_stick_of_joy)
354 trace_assert(keyboard_state);
355 (void) the_stick_of_joy;
357 if (keyboard_state[SDL_SCANCODE_A]) {
358 player_move_left(level->player);
359 } else if (keyboard_state[SDL_SCANCODE_D]) {
360 player_move_right(level->player);
361 } else if (the_stick_of_joy && SDL_JoystickGetAxis(the_stick_of_joy, 0) < 0) {
362 player_move_left(level->player);
363 } else if (the_stick_of_joy && SDL_JoystickGetAxis(the_stick_of_joy, 0) > 0) {
364 player_move_right(level->player);
366 player_stop(level->player);
372 int level_sound(Level *level, Sound_samples *sound_samples)
374 if (goals_sound(level->goals, sound_samples) < 0) {
378 if (player_sound(level->player, sound_samples) < 0) {
385 void level_toggle_debug_mode(Level *level)
387 background_toggle_debug_mode(level->background);
390 int level_enter_camera_event(Level *level, Camera *camera)
392 if (!level->edit_mode) {
393 player_focus_camera(level->player, camera);
394 camera_scale(camera, 1.0f);
396 level_editor_focus_camera(
401 goals_cue(level->goals, camera);
402 goals_checkpoint(level->goals, level->player);
403 labels_enter_camera_event(level->labels, camera);
407 struct EvalResult level_send(Level *level, Gc *gc, struct Scope *scope, struct Expr path)
413 const char *target = NULL;
414 struct Expr rest = void_expr();
415 struct EvalResult res = match_list(gc, "q*", path, &target, &rest);
420 if (strcmp(target, "goal") == 0) {
421 return goals_send(level->goals, gc, scope, rest);
422 } else if (strcmp(target, "label") == 0) {
423 return labels_send(level->labels, gc, scope, rest);
424 } else if (strcmp(target, "box") == 0) {
425 return boxes_send(level->boxes, gc, scope, rest);
426 } else if (strcmp(target, "body-push") == 0) {
427 long int id = 0, x = 0, y = 0;
428 res = match_list(gc, "ddd", rest, &id, &x, &y);
433 rigid_bodies_apply_force(level->rigid_bodies, (size_t) id, vec((float) x, (float) y));
435 return eval_success(NIL(gc));
436 } else if (strcmp(target, "edit") == 0) {
437 level->edit_mode = !level->edit_mode;
438 SDL_SetRelativeMouseMode(level->edit_mode);
439 return eval_success(NIL(gc));
442 return unknown_target(gc, "level", target);
445 bool level_edit_mode(const Level *level)
448 return level->edit_mode;