-#include <assert.h>
+#include "system/stacktrace.h"
+#include "broadcast.h"
+#include "dynarray.h"
+#include "ebisp/builtins.h"
+#include "ebisp/interpreter.h"
#include "game/level/boxes.h"
-#include "game/level/physical_world.h"
+#include "game/level/level_editor/rect_layer.h"
#include "game/level/player.h"
-#include "game/level/player/rigid_rect.h"
-#include "system/error.h"
+#include "game/level/rigid_bodies.h"
+#include "math/rand.h"
+#include "system/line_stream.h"
+#include "system/log.h"
#include "system/lt.h"
+#include "system/nth_alloc.h"
+#include "system/str.h"
-struct boxes_t
+struct Boxes
{
- lt_t *lt;
- size_t count;
- rigid_rect_t **bodies;
+ Lt *lt;
+ RigidBodies *rigid_bodies;
+ Dynarray *body_ids;
+ Dynarray *body_colors;
};
-boxes_t *create_boxes_from_stream(FILE *stream)
+Boxes *create_boxes_from_rect_layer(const RectLayer *layer, RigidBodies *rigid_bodies)
{
- assert(stream);
+ trace_assert(layer);
+ trace_assert(rigid_bodies);
- lt_t *lt = create_lt();
+ Lt *lt = create_lt();
- if (lt == NULL) {
- return NULL;
- }
-
- boxes_t *boxes = PUSH_LT(lt, malloc(sizeof(boxes_t)), free);
+ Boxes *boxes = PUSH_LT(lt, nth_calloc(1, sizeof(Boxes)), free);
if (boxes == NULL) {
- throw_error(ERROR_TYPE_LIBC);
RETURN_LT(lt, NULL);
}
+ boxes->lt = lt;
- if (fscanf(stream, "%lu", &boxes->count) == EOF) {
- throw_error(ERROR_TYPE_LIBC);
+ boxes->rigid_bodies = rigid_bodies;
+
+ boxes->body_ids = PUSH_LT(lt, create_dynarray(sizeof(RigidBodyId)), destroy_dynarray);
+ if (boxes->body_ids == NULL) {
RETURN_LT(lt, NULL);
}
- boxes->bodies = PUSH_LT(lt, malloc(sizeof(rigid_rect_t*) * boxes->count), free);
- if (boxes->bodies == NULL) {
- throw_error(ERROR_TYPE_LIBC);
+ boxes->body_colors = PUSH_LT(lt, create_dynarray(sizeof(Color)), destroy_dynarray);
+ if (boxes->body_colors == NULL) {
RETURN_LT(lt, NULL);
}
- for (size_t i = 0; i < boxes->count; ++i) {
- boxes->bodies[i] = PUSH_LT(
- lt,
- create_rigid_rect_from_stream(stream),
- destroy_rigid_rect);
- if (boxes->bodies[i] == NULL) {
- RETURN_LT(lt, NULL);
- }
- }
+ const size_t count = rect_layer_count(layer);
+ Rect const *rects = rect_layer_rects(layer);
+ Color const *colors = rect_layer_colors(layer);
- boxes->lt = lt;
+ for (size_t i = 0; i < count; ++i) {
+ RigidBodyId body_id = rigid_bodies_add(rigid_bodies, rects[i]);
+ dynarray_push(boxes->body_ids, &body_id);
+ dynarray_push(boxes->body_colors, &colors[i]);
+ }
return boxes;
}
-void destroy_boxes(boxes_t *boxes)
+void destroy_boxes(Boxes *boxes)
{
- assert(boxes);
+ trace_assert(boxes);
+
+ const size_t count = dynarray_count(boxes->body_ids);
+ RigidBodyId *body_ids = dynarray_data(boxes->body_ids);
+
+ for (size_t i = 0; i < count; ++i) {
+ rigid_bodies_remove(boxes->rigid_bodies, body_ids[i]);
+ }
+
RETURN_LT0(boxes->lt);
}
-int boxes_render(boxes_t *boxes, camera_t *camera)
+int boxes_render(Boxes *boxes, Camera *camera)
{
- assert(boxes);
- assert(camera);
-
- for (size_t i = 0; i < boxes->count; ++i) {
- if (rigid_rect_render(boxes->bodies[i], camera) < 0) {
+ trace_assert(boxes);
+ trace_assert(camera);
+
+ const size_t count = dynarray_count(boxes->body_ids);
+ RigidBodyId *body_ids = dynarray_data(boxes->body_ids);
+ Color *body_colors = dynarray_data(boxes->body_colors);
+
+ for (size_t i = 0; i < count; ++i) {
+ if (rigid_bodies_render(
+ boxes->rigid_bodies,
+ body_ids[i],
+ body_colors[i],
+ camera) < 0) {
return -1;
}
}
return 0;
}
-int boxes_update(boxes_t *boxes,
+int boxes_update(Boxes *boxes,
float delta_time)
{
- assert(boxes);
- assert(delta_time);
+ trace_assert(boxes);
+ trace_assert(delta_time);
- for (size_t i = 0; i < boxes->count; ++i) {
- if (rigid_rect_update(boxes->bodies[i], delta_time) < 0) {
+ const size_t count = dynarray_count(boxes->body_ids);
+ RigidBodyId *body_ids = dynarray_data(boxes->body_ids);
+
+ for (size_t i = 0; i < count; ++i) {
+ if (rigid_bodies_update(boxes->rigid_bodies, body_ids[i], delta_time) < 0) {
return -1;
}
}
return 0;
}
-int boxes_add_to_physical_world(const boxes_t *boxes,
- physical_world_t *physical_world)
+void boxes_float_in_lava(Boxes *boxes, Lava *lava)
{
- assert(boxes);
- assert(physical_world);
+ trace_assert(boxes);
+ trace_assert(lava);
- for (size_t i = 0; i < boxes->count; ++i) {
- if (physical_world_add_solid(
- physical_world,
- rigid_rect_as_solid(boxes->bodies[i])) < 0) {
- return -1;
- }
+ const size_t count = dynarray_count(boxes->body_ids);
+ RigidBodyId *body_ids = dynarray_data(boxes->body_ids);
+
+ for (size_t i = 0; i < count; ++i) {
+ lava_float_rigid_body(lava, boxes->rigid_bodies, body_ids[i]);
}
+}
+
+int boxes_add_box(Boxes *boxes, Rect rect, Color color)
+{
+ trace_assert(boxes);
+
+ RigidBodyId body_id = rigid_bodies_add(boxes->rigid_bodies, rect);
+ dynarray_push(boxes->body_ids, &body_id);
+ dynarray_push(boxes->body_colors, &color);
return 0;
}
-void boxes_float_in_lava(boxes_t *boxes, lava_t *lava)
+struct EvalResult
+boxes_send(Boxes *boxes, Gc *gc, struct Scope *scope, struct Expr path)
{
- for (size_t i = 0; i < boxes->count; ++i) {
- lava_float_rigid_rect(lava, boxes->bodies[i]);
+ trace_assert(boxes);
+ trace_assert(gc);
+ trace_assert(scope);
+
+ struct Expr target = void_expr();
+ struct Expr rest = void_expr();
+ struct EvalResult res = match_list(gc, "e*", path, &target, &rest);
+ if (res.is_error) {
+ return res;
+ }
+
+ if (symbol_p(target)) {
+ const char *action = target.atom->str;
+
+ if (strcmp(action, "new") == 0) {
+ struct Expr optional_args = void_expr();
+ long int x, y, w, h;
+ res = match_list(gc, "dddd*", rest, &x, &y, &w, &h, &optional_args);
+ if (res.is_error) {
+ return res;
+ }
+
+ Color color = rgba(rand_float(1.0f), rand_float(1.0f), rand_float(1.0f), 1.0f);
+ if (!nil_p(optional_args)) {
+ const char *color_hex = NULL;
+ res = match_list(gc, "s*", optional_args, &color_hex, NULL);
+ color = hexstr(color_hex);
+ }
+
+ boxes_add_box(boxes, rect((float) x, (float) y, (float) w, (float) h), color);
+
+ return eval_success(NIL(gc));
+ }
+
+ return unknown_target(gc, "box", action);
}
+
+ return wrong_argument_type(gc, "string-or-symbol-p", target);
+}
+
+
+int boxes_delete_at(Boxes *boxes, Vec position)
+{
+ trace_assert(boxes);
+
+ const size_t count = dynarray_count(boxes->body_ids);
+ RigidBodyId *body_ids = dynarray_data(boxes->body_ids);
+
+ for (size_t i = 0; i < count; ++i) {
+ const Rect hitbox = rigid_bodies_hitbox(
+ boxes->rigid_bodies,
+ body_ids[i]);
+ if (rect_contains_point(hitbox, position)) {
+ rigid_bodies_remove(boxes->rigid_bodies, body_ids[i]);
+ dynarray_delete_at(boxes->body_ids, i);
+ dynarray_delete_at(boxes->body_colors, i);
+ return 0;
+ }
+ }
+
+ return 0;
}