/* * stubs.c — окружение движка для прогона под ucsim_z80. * * Под тестом крутится НАСТОЯЩАЯ физика (pop_map) с настоящим * интерпретатором последовательностей (pop_kid): это единственный способ * проверить порт seg005/seg006, потому что вся его суть — в точных * величинах кадров и seqtbl. А вот всё, что вокруг, в ucsim не существует: * видеопамять, EMM-страницы, файлы, клавиатура. Здесь они заглушены. * * Три категории: * 1. libc/libbgi (графика, память, файлы, клавиатура) — пустышки. Код * отрисовки из pop_kid.c линкуется, но не вызывается. * 2. Соседние модули движка (pop_bg/pop_trob/pop_level/pop_redraw) — * минимальные модели: room_modif живёт здесь массивом, пометки * перерисовки и падающие куски ЖУРНАЛИРУЮТСЯ (тест может проверить, * что физика их дёрнула), уровень отдаёт стартовую комнату. * 3. Состояние стража — просто данные: страж в тестах физики не тикает, * но pop_map/pop_ctrl на его поля смотрят. * * Клавиатура сделана НЕ пустышкой: `tk_keys` — набор «нажатых» скан-кодов, * и `kbd_raw_down` отвечает по нему. Так под тест попадают и read_input, и * read_user_control, то есть весь путь ввода, а не только диспетчер. */ #include #include #include #include #include #include #include "pop_kid.h" #include "pop_guard.h" #include "pop_bg.h" #include "pop_map.h" #include "pop_trob.h" #include "pop_level.h" #include "pop_redraw.h" #include "_pop_draw.h" #include "stubs.h" #include "kidblob.h" /* ---- 1. libc / libbgi ---------------------------------------------- */ uint8_t _gfx_visible_page, _gfx_draw_page, _gfx_bank; /* ISR-стаб W0-страницы: продукт берёт его АДРЕС и вписывает в страницу. * Здесь достаточно, чтобы символ существовал. */ void _gfx_w0_isr(void) { } void gfx_w0_map(uint8_t page) { (void)page; } void gfx_w0_unmap(void) { } void gfx_blit_cols(int x, int y, const void *img, uint8_t flip) { (void)x; (void)y; (void)img; (void)flip; } void gfx_blit_cols_part(int x, int y, const void *img, uint8_t flip, int skip, int rows) { (void)x; (void)y; (void)img; (void)flip; (void)skip; (void)rows; } void gfx_blit_cols_part_w(int x, int y, const void *img, uint8_t flip, int skip, int rows, uint8_t maxw) { (void)x; (void)y; (void)img; (void)flip; (void)skip; (void)rows; (void)maxw; } void gfx_blit_cols_part_noclip(int x, int y, const void *img, uint8_t flip, uint8_t skip, uint8_t rows) { (void)x; (void)y; (void)img; (void)flip; (void)skip; (void)rows; } int atlas_load(atlas_t *a, const char *path) { (void)a; (void)path; return -1; } void atlas_free(atlas_t *a) { (void)a; } const void *atlas_image(const atlas_t *a, uint8_t idx) { (void)a; (void)idx; return 0; } /* EMM: страниц нет, но блок обязан выделиться — иначе pop_kid_data_load * сдастся на первом же шаге и молча оставит kdat_ok = 0, а play_seq тогда * просто ничего не делает (и трасса выходит из одного застывшего кадра). */ uint8_t mem_alloc_pages_bios(uint8_t n) { (void)n; return 1; } void mem_free_block_bios(uint8_t blk) { (void)blk; } uint8_t mem_get_page_bios(uint8_t blk, uint8_t idx) { (void)blk; (void)idx; return 1; } /* Файловая система: единственный «файл» — таблицы анимации. Сделано не * пустышкой, а рабочим чтением, чтобы pop_kid_data_load отработал целиком * (включая правку ISR-стаба страницы) и сам взвёл свой kdat_ok — тест не * лезет во внутренние статики продукта. Данные, по которым потом ходят * аксессоры, кладёт kid_blob_install по KID_BLOB_ADDR: на устройстве туда * же их приводит маппинг W0. */ int open(const char *p, int f) { (void)p; (void)f; return 3; } int read(int fd, void *b, int n) { unsigned char *d = (unsigned char *)b; const unsigned char *s = kid_blob; unsigned int i, cnt = kid_blob_size; if (fd != 3) return -1; if ((unsigned int)n < cnt) cnt = (unsigned int)n; for (i = 0; i < cnt; i++) d[i] = s[i]; return (int)cnt; } int close(int fd) { (void)fd; return 0; } /* ---- клавиатура: управляемая тестом --------------------------------- */ uint16_t tk_keys[TK_KEYS_MAX]; int kbd_raw_open(void) { return 0; } void kbd_raw_close(void) { } void kbd_raw_sync(void) { } uint8_t kbd_raw_down(uint16_t code) { uint8_t i; for (i = 0; i < TK_KEYS_MAX; i++) if (tk_keys[i] == code) return 1; return 0; } void tk_keys_clear(void) { uint8_t i; for (i = 0; i < TK_KEYS_MAX; i++) tk_keys[i] = 0; } void tk_key_down(uint16_t code) { uint8_t i; for (i = 0; i < TK_KEYS_MAX; i++) if (tk_keys[i] == 0) { tk_keys[i] = code; return; } } /* ---- 2. соседние модули движка -------------------------------------- */ /* room_modif текущей комнаты: пики (счётчик фазы), ворота (высота), * зелья (тип). Физика читает и пишет его напрямую через pop_trob_modif. */ uint8_t tk_modif[30]; uint8_t tk_start_room; uint8_t *pop_trob_modif(uint8_t room) __banked { (void)room; return tk_modif; } uint8_t pop_level_start_room(void) { return tk_start_room; } /* Журнал: что физика попросила у соседей. Тест сверяет ФАКТ и параметры * (какой тайл помечен, где заспавнен кусок) — заглушка-пустышка этого не * дала бы, а именно такие баги (BUG-GATE-ANIM-1) мы и ловим. */ tk_log_t tk_log; static void log_put(uint8_t kind, uint8_t a, uint8_t b, uint8_t c) { if (tk_log.n >= TK_LOG_MAX) { tk_log.overflow = 1; return; } tk_log.e[tk_log.n].kind = kind; tk_log.e[tk_log.n].a = a; tk_log.e[tk_log.n].b = b; tk_log.e[tk_log.n].c = c; tk_log.n++; } void tk_log_clear(void) { tk_log.n = 0; tk_log.overflow = 0; } uint8_t tk_log_count(uint8_t kind) { uint8_t i, c = 0; for (i = 0; i < tk_log.n; i++) if (tk_log.e[i].kind == kind) c++; return c; } void pop_add_trob(uint8_t room, uint8_t tilepos, int8_t type) __banked { log_put(TK_TROB, room, tilepos, (uint8_t)type); } void pop_trigger_button(uint8_t room, uint8_t tilepos, uint8_t button_type, uint8_t modifier) __banked { (void)modifier; log_put(TK_BUTTON, room, tilepos, button_type); } void pop_set_redraw(uint8_t tilepos, uint8_t kind, uint8_t pages) { log_put(TK_REDRAW, tilepos, kind, pages); } void pop_set_redraw_above(uint8_t col, uint8_t kind, uint8_t pages) { log_put(TK_REDRAW_ABOVE, col, kind, pages); } void pop_loose_mob_spawn(int row, int col) __banked { log_put(TK_MOB_SPAWN, (uint8_t)row, (uint8_t)col, 0); } void pop_loose_mob_tick(void) __banked { } void pop_loose_mob_room_changed(void) __banked { } uint8_t pop_loose_mob_pos(int *col, int *y) __banked { (void)col; (void)y; return 0; } /* Отрисовочные хвосты, которые физика дёргает напрямую. */ void pop_fore_set_clip(int x, int y, int w, int h) __banked { (void)x; (void)y; (void)w; (void)h; } void pop_clip_sprite(int x, int w, int sy_top, int h) __banked { (void)x; (void)w; (void)sy_top; (void)h; } void pop_heal_fast(int x, int y, int w, int h) { (void)x; (void)y; (void)w; (void)h; } /* ---- 3. страж ------------------------------------------------------- * * Само состояние (Guard, guardhp_*, can_guard_see_kid, is_guard_notice…) и * pop_take_hp даёт НАСТОЯЩИЙ pop_guard.c — он линкуется в набор. Здесь * только то, что он тянет из уровня: данных уровня под тестом нет, страж * поднимается вручную (tk_guard_spawn в scene.c). */ uint8_t pop_current_level; /* pop_level.c под тест не линкуется; sc_init ставит 1 */ /* Цвет стража — подмена палитры, живёт в pop_gdraw (отрисовка, в набор не * линкуется). Здесь важен только факт вызова из pop_guard_enter. */ void pop_guard_set_palette(uint8_t color) __banked { (void)color; } /* Связи комнат: нужны check_guard_fallout (возрождение скелета в комнате * снизу). Тест задаёт их через tk_link_down. */ uint8_t tk_link_down; uint8_t pop_room_link(uint8_t room, uint8_t side) { (void)room; return side == 3 ? tk_link_down : 0; } int8_t pop_level_guard_type(uint8_t level) { (void)level; return 0; } uint8_t pop_level_guard_hp(uint8_t level) { (void)level; return 3; } /* Тайлы «уровня» для соседних комнат: pop_map_set_edges забирает fg соседей * слева/справа сам (кэш на входе в комнату), значит тесту нужен источник. * Заполняет сам тест — по умолчанию комнат нет и всё стена. */ uint8_t tk_room_fg[TK_ROOMS][30]; void pop_level_access_begin(void) { } void pop_level_access_end(void) { } uint8_t pop_level_tile_raw(uint8_t room, uint8_t tilepos) { if (room == 0 || room >= TK_ROOMS || tilepos >= 30) return 20; /* стена */ return tk_room_fg[room][tilepos]; } /* Живое состояние стражей по комнатам — как gstate в pop_level.c, только на * 8 комнат и без данных уровня: тесту нужно ровно то, на что смотрит * follow_guard (есть ли в целевой комнате свой страж и не труп ли он). * tk_guard_room != 0 — комната, в которой «по данным уровня» страж есть. */ uint8_t tk_guard_room; uint8_t tk_gs_tile[TK_ROOMS]; /* 30 = стража нет (как в pop_level) */ uint16_t tk_gs_seq[TK_ROOMS]; /* != 0 — запомнен ТРУП */ void tk_guard_state_clear(void) { uint8_t i; for (i = 0; i < TK_ROOMS; i++) { tk_gs_tile[i] = 30; tk_gs_seq[i] = 0; } tk_guard_room = 0; } uint8_t pop_level_guard(uint8_t room, uint8_t *tile, int8_t *dir, uint8_t *color, uint8_t *skill) { if (room < 1 || room > TK_ROOMS) return 0; if (tk_gs_tile[room - 1] < 30) { /* запомненный (в т.ч. труп) */ *tile = tk_gs_tile[room - 1]; *dir = 0; *color = 0; *skill = 1; return 1; } if (room == tk_guard_room) { /* страж из данных уровня */ *tile = 11; *dir = 0; *color = 0; *skill = 1; return 1; } return 0; } void pop_guard_state_save(uint8_t room, uint8_t tile, int8_t dir, uint8_t x, uint8_t skill, uint16_t seq, uint8_t dead) { (void)dir; (void)x; (void)skill; if (room < 1 || room > TK_ROOMS) return; tk_gs_tile[room - 1] = tile; tk_gs_seq[room - 1] = dead ? seq : 0; if (tile >= 30) tk_guard_room = (tk_guard_room == room) ? 0 : tk_guard_room; } uint16_t pop_guard_state_seq(uint8_t room) { return (room >= 1 && room <= TK_ROOMS) ? tk_gs_seq[room - 1] : 0; } uint8_t pop_guard_state_x(uint8_t room) { (void)room; return 0; }