room_object.cc

Go to the documentation of this file.

#include "room_object.h"
 
#include "absl/status/status.h"
#include "absl/strings/str_format.h"
#include "util/log.h"
#include "zelda3/dungeon/object_parser.h"
 
namespace yaze {
namespace zelda3 {
 
namespace {
struct SubtypeTableInfo {
  int base_ptr;    // base address of subtype table in ROM (PC)
  int index_mask;  // mask to apply to object id for index
  int id_offset;   // offset to subtract from object_id before masking
 
  SubtypeTableInfo(int base, int mask, int offset = 0)
      : base_ptr(base), index_mask(mask), id_offset(offset) {}
};
 
SubtypeTableInfo GetSubtypeTable(int object_id) {
  // Heuristic: 0x00-0xFF => subtype1, 0x100-0x1FF => subtype2, >=0xF80 =>
  // subtype3.  Type 3 IDs from decoding are 0xF80-0xFFF (b3 0xF8-0xFF shifted).
  if (object_id >= 0xF80) {
    // Type 3: IDs 0xF80-0xFFF map to table indices 0-127
    // Subtract 0xF80 first, then mask with 0x7F
    return SubtypeTableInfo(kRoomObjectSubtype3, 0x7F, 0xF80);
  } else if (object_id >= 0x100) {
    // Type 2: IDs 0x100-0x1FF map to table indices 0-255
    return SubtypeTableInfo(kRoomObjectSubtype2, 0xFF, 0x100);
  } else {
    // Type 1: IDs 0x00-0xFF map directly to table indices
    return SubtypeTableInfo(kRoomObjectSubtype1, 0xFF, 0);
  }
}
}  // namespace
 
ObjectOption operator|(ObjectOption lhs, ObjectOption rhs) {
  return static_cast<ObjectOption>(static_cast<int>(lhs) |
                                   static_cast<int>(rhs));
}
 
ObjectOption operator&(ObjectOption lhs, ObjectOption rhs) {
  return static_cast<ObjectOption>(static_cast<int>(lhs) &
                                   static_cast<int>(rhs));
}
 
ObjectOption operator^(ObjectOption lhs, ObjectOption rhs) {
  return static_cast<ObjectOption>(static_cast<int>(lhs) ^
                                   static_cast<int>(rhs));
}
 
ObjectOption operator~(ObjectOption option) {
  return static_cast<ObjectOption>(~static_cast<int>(option));
}
 
// NOTE: DrawTile was legacy ZScream code that is no longer used.
// Modern rendering uses ObjectDrawer which draws directly to BackgroundBuffer
// bitmaps.
 
void RoomObject::EnsureTilesLoaded() {
  if (tiles_loaded_) {
    return;
  }
 
  if (rom_ == nullptr) {
    // DEBUG: Log wall/corner objects
    if (id_ == 0x001 || id_ == 0x002 || id_ == 0x061 || id_ == 0x062 ||
        (id_ >= 0x100 && id_ <= 0x103)) {
      LOG_DEBUG("RoomObject", "EnsureTilesLoaded: obj=0x%03X ROM is NULL!",
                id_);
    }
    return;
  }
 
  // Try the new parser first - this is more efficient and accurate
  auto parser_status = LoadTilesWithParser();
  if (parser_status.ok()) {
    tiles_loaded_ = true;
    // DEBUG: Log wall/corner objects
    if (id_ == 0x001 || id_ == 0x002 || id_ == 0x061 || id_ == 0x062 ||
        (id_ >= 0x100 && id_ <= 0x103)) {
      LOG_DEBUG("RoomObject",
                "EnsureTilesLoaded: obj=0x%03X loaded %zu tiles via parser",
                id_, tiles_.size());
    }
    return;
  }
 
  // DEBUG: Log parser failure for wall/corner objects
  if (id_ == 0x001 || id_ == 0x002 || id_ == 0x061 || id_ == 0x062 ||
      (id_ >= 0x100 && id_ <= 0x103)) {
    LOG_DEBUG("RoomObject",
              "EnsureTilesLoaded: obj=0x%03X parser failed: %s, trying legacy",
              id_, std::string(parser_status.message()).c_str());
  }
 
  // Fallback to legacy method for compatibility with enhanced validation
  auto rom_data = rom_->data();
 
  // Determine which subtype table to use and compute the tile data offset.
  SubtypeTableInfo sti = GetSubtypeTable(id_);
  // Apply offset first (for Type 2/3 objects), then mask
  int index = ((id_ - sti.id_offset) & sti.index_mask);
  int tile_ptr = sti.base_ptr + (index * 2);
 
  // Enhanced bounds checking
  if (tile_ptr < 0 || tile_ptr + 1 >= (int)rom_->size()) {
    // Log error but don't crash
    LOG_DEBUG("RoomObject", "Tile pointer out of bounds for object %04X", id_);
    tiles_.clear();
    tiles_loaded_ = true;  // Mark as loaded (empty) to prevent retry
    return;
  }
 
  int tile_rel = (int16_t)((rom_data[tile_ptr + 1] << 8) + rom_data[tile_ptr]);
  int pos = kRoomObjectTileAddress + tile_rel;
  tile_data_ptr_ = pos;
 
  // Enhanced bounds checking for tile data
  if (pos < 0 || pos + 7 >= (int)rom_->size()) {
    // Log error but don't crash
    LOG_DEBUG("RoomObject", "Tile data position out of bounds for object %04X",
              id_);
    tiles_.clear();
    tiles_loaded_ = true;  // Mark as loaded (empty) to prevent retry
    return;
  }
 
  // Read tile data with validation
  uint16_t w0 = (uint16_t)(rom_data[pos] | (rom_data[pos + 1] << 8));
  uint16_t w1 = (uint16_t)(rom_data[pos + 2] | (rom_data[pos + 3] << 8));
  uint16_t w2 = (uint16_t)(rom_data[pos + 4] | (rom_data[pos + 5] << 8));
  uint16_t w3 = (uint16_t)(rom_data[pos + 6] | (rom_data[pos + 7] << 8));
 
  tiles_.clear();
  tiles_.push_back(gfx::WordToTileInfo(w0));
  tiles_.push_back(gfx::WordToTileInfo(w1));
  tiles_.push_back(gfx::WordToTileInfo(w2));
  tiles_.push_back(gfx::WordToTileInfo(w3));
  tile_count_ = 1;
  tiles_loaded_ = true;
}
 
absl::Status RoomObject::LoadTilesWithParser() {
  if (rom_ == nullptr) {
    return absl::InvalidArgumentError("ROM is null");
  }
 
  ObjectParser parser(rom_);
  auto result = parser.ParseObject(id_);
  if (!result.ok()) {
    return result.status();
  }
 
  tiles_ = std::move(result.value());
  tile_count_ = tiles_.size();
  return absl::OkStatus();
}
 
absl::StatusOr<std::span<const gfx::TileInfo>> RoomObject::GetTiles() const {
  if (!tiles_loaded_) {
    const_cast<RoomObject*>(this)->EnsureTilesLoaded();
  }
 
  if (tiles_.empty()) {
    return absl::FailedPreconditionError("No tiles loaded for object");
  }
 
  return std::span<const gfx::TileInfo>(tiles_.data(), tiles_.size());
}
 
absl::StatusOr<const gfx::TileInfo*> RoomObject::GetTile(int index) const {
  if (!tiles_loaded_) {
    const_cast<RoomObject*>(this)->EnsureTilesLoaded();
  }
 
  if (index < 0 || index >= static_cast<int>(tiles_.size())) {
    return absl::OutOfRangeError(absl::StrFormat(
        "Tile index %d out of range (0-%d)", index, tiles_.size() - 1));
  }
 
  return &tiles_[index];
}
 
int RoomObject::GetTileCount() const {
  if (!tiles_loaded_) {
    const_cast<RoomObject*>(this)->EnsureTilesLoaded();
  }
 
  return tile_count_;
}
 
// ============================================================================
// Object Encoding/Decoding Implementation (Phase 1, Task 1.1)
// ============================================================================
 
int RoomObject::DetermineObjectType(uint8_t b1, uint8_t b3) {
  // IMPORTANT: Check Type 2 FIRST to avoid boundary collision with Type 3.
  // Type 2 objects with certain Y positions can produce b3 >= 0xF8, which
  // would incorrectly trigger Type 3 decoding if we checked b3 first.
  //
  // Type 2: 111111xx xxxxyyyy yyiiiiii
  // Discriminator: b1 >= 0xFC (top 6 bits all 1)
  if (b1 >= 0xFC) {
    return 2;
  }
 
  // Type 3: Objects with ID >= 0xF00
  // These have b3 >= 0xF8 (top nibble is 0xF)
  if (b3 >= 0xF8) {
    return 3;
  }
 
  // Type 1: Standard objects (ID 0x00-0xFF)
  return 1;
}
 
RoomObject RoomObject::DecodeObjectFromBytes(uint8_t b1, uint8_t b2, uint8_t b3,
                                             uint8_t layer) {
  uint8_t x = 0;
  uint8_t y = 0;
  uint8_t size = 0;
  uint16_t id = 0;
 
  // IMPORTANT: Check Type 2 FIRST to avoid boundary collision with Type 3.
  // Type 2 objects with certain Y positions can produce b3 >= 0xF8, which
  // would incorrectly trigger Type 3 decoding if we checked b3 first.
 
  // Type 2: 111111xx xxxxyyyy yyiiiiii
  // Discriminator: b1 >= 0xFC (top 6 bits all 1)
  if (b1 >= 0xFC) {
    id = (b3 & 0x3F) | 0x100;
    x = ((b2 & 0xF0) >> 4) | ((b1 & 0x03) << 4);
    y = ((b2 & 0x0F) << 2) | ((b3 & 0xC0) >> 6);
    size = 0;
    LOG_DEBUG("ObjectParser",
              "Type2: b1=%02X b2=%02X b3=%02X -> id=%04X x=%d y=%d size=%d", b1,
              b2, b3, id, x, y, size);
  }
  // Type 3: xxxxxxii yyyyyyii 11111iii
  // Discriminator: b3 >= 0xF8 (top 5 bits all 1)
  else if (b3 >= 0xF8) {
    id = (static_cast<uint16_t>(b3) << 4) | 0x80 |
         ((static_cast<uint16_t>(b2 & 0x03) << 2) + (b1 & 0x03));
    x = (b1 & 0xFC) >> 2;
    y = (b2 & 0xFC) >> 2;
    size = ((b1 & 0x03) << 2) | (b2 & 0x03);
    LOG_DEBUG("ObjectParser",
              "Type3: b1=%02X b2=%02X b3=%02X -> id=%04X x=%d y=%d size=%d", b1,
              b2, b3, id, x, y, size);
  }
  // Type 1: xxxxxxss yyyyyyss iiiiiiii
  else {
    id = b3;
    x = (b1 & 0xFC) >> 2;
    y = (b2 & 0xFC) >> 2;
    size = ((b1 & 0x03) << 2) | (b2 & 0x03);
    LOG_DEBUG("ObjectParser",
              "Type1: b1=%02X b2=%02X b3=%02X -> id=%04X x=%d y=%d size=%d", b1,
              b2, b3, id, x, y, size);
  }
 
  auto obj = RoomObject(static_cast<int16_t>(id), x, y, size, layer);
 
  // Set all_bgs flag for objects that draw to both BG1 and BG2
  // Based on ZScream/ObjectDrawer logic
  if ((id >= 0x03 && id <= 0x04) ||  // Routine 3
      (id >= 0x63 && id <= 0x64) ||  // Routine 9
      // Routine 17 (Acute Diagonals)
      id == 0x0C || id == 0x0D || id == 0x10 || id == 0x11 || id == 0x14 ||
      id == 0x15 || id == 0x18 || id == 0x19 || id == 0x1C || id == 0x1D ||
      id == 0x20 ||
      // Routine 18 (Grave Diagonals)
      id == 0x0E || id == 0x0F || id == 0x12 || id == 0x13 || id == 0x16 ||
      id == 0x17 || id == 0x1A || id == 0x1B || id == 0x1E || id == 0x1F) {
    obj.all_bgs_ = true;
  }
 
  return obj;
}
 
RoomObject::ObjectBytes RoomObject::EncodeObjectToBytes() const {
  ObjectBytes bytes;
 
  // Determine type based on object ID
  if (id_ >= 0x100 && id_ < 0x200) {
    // Type 2: 111111xx xxxxyyyy yyiiiiii
    bytes.b1 = 0xFC | ((x_ & 0x30) >> 4);
    bytes.b2 = ((x_ & 0x0F) << 4) | ((y_ & 0x3C) >> 2);
    bytes.b3 = ((y_ & 0x03) << 6) | (id_ & 0x3F);
  } else if (id_ >= 0xF00) {
    // Type 3: xxxxxxii yyyyyyii 11111iii
    bytes.b1 = (x_ << 2) | (id_ & 0x03);
    bytes.b2 = (y_ << 2) | ((id_ >> 2) & 0x03);
    bytes.b3 = (id_ >> 4) & 0xFF;
  } else {
    // Type 1: xxxxxxss yyyyyyss iiiiiiii
    uint8_t clamped_size = size_ > 15 ? 15 : size_;
    bytes.b1 = (x_ << 2) | ((clamped_size >> 2) & 0x03);
    bytes.b2 = (y_ << 2) | (clamped_size & 0x03);
    bytes.b3 = static_cast<uint8_t>(id_);
  }
 
  return bytes;
}
 
}  // namespace zelda3
}  // namespace yaze