PredatorCZ / RevilLib / 185

Committed 21 Apr 2026 07:59PM UTC coverage: 8.612% (-2.1%) from 10.756%

Build # 185

Build Type

push

github

Committed by

PredatorCZ

Commit Message

update sdl

Coverage Stats

3 of 459 new or added lines in 1 file covered. (0.65%)

2404 existing lines in 10 files now uncovered.

762 of 8848 relevant lines covered (8.61%)

4773.72 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

0.13

/src/xfs.cpp

/*  Revil Format Library
    Copyright(C) 2021-2026 Lukas Cone

    This program is free software : you can redistribute it and / or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program.If not, see <https://www.gnu.org/licenses/>.
*/

#include "revil/xfs.hpp"
#include "property.hpp"
#include "pugixml.hpp"
#include "revil/hashreg.hpp"
#include "spike/io/binreader.hpp"
#include "spike/io/binwritter.hpp"
#include "spike/reflect/reflector.hpp"
#include "spike/reflect/reflector_xml.hpp"
#include "spike/type/bitfield.hpp"
#include "spike/type/matrix44.hpp"
#include "spike/type/vectors_simd.hpp"
#include <algorithm>
#include <deque>
#include <vector>

#include "shift_jis.inl"

// #define XFS_DEBUG

/*
lp pc: 4
lp ps3: 5
lp2 pc: 8
*/

using namespace revil;

struct XFSClassMember;

struct XFSSizeAndFlag {
  using Size = BitMemberDecl<0, 15>;
  using Disable = BitMemberDecl<1, 1>;
  using type = BitFieldType<uint16, Size, Disable>;
  type data;

  const type *operator->() const { return &data; }
};

struct XFSClassInfo {
  using NumMembers = BitMemberDecl<0, 15>;
  using Init = BitMemberDecl<1, 1>;
  using Reserved = BitMemberDecl<2, 16>;
  using type = BitFieldType<uint32, NumMembers, Init, Reserved>;
  type data;

  const type *operator->() const { return &data; }
};

struct XFSMeta {
  using Active = BitMemberDecl<0, 1>;
  using TypeIndex = BitMemberDecl<1, 15>;
  using Id = BitMemberDecl<2, 16>;
  using type = BitFieldType<uint32, Active, TypeIndex, Id>;
  type data;

  const type *operator->() const { return &data; }
};

struct XFSHeaderBase {
  uint32 id;
  uint16 versionMajor;
  uint16 versionMinor;

  void SwapEndian() {
    FByteswapper(id);
    FByteswapper(versionMajor);
    FByteswapper(versionMinor);
  }
};

struct XFSHeaderV1 : XFSHeaderBase {
  uint32 numLayouts;
  uint32 dataStart;

  void SwapEndian() {
    FByteswapper(numLayouts);
    FByteswapper(dataStart);
  }
};

struct XFSHeaderV2 : XFSHeaderBase {
  uint64 unk0; // num members/strings?
  uint32 numLayouts;
  uint32 dataStart;
};

template <class PadType> struct XFSClassMemberRaw {
  std::string memberName;
  MtPropertyType type;
  uint8 flags; // alignment flags??
  XFSSizeAndFlag memberSize;
  PadType null[4];

  void Read(BinReaderRef_e rd) {
    uint32 memNameOffset;
    rd.Read(memNameOffset);
    rd.Read(type);
    rd.Read(flags);
    rd.Read(memberSize.data);
    rd.Read(null);
    rd.Push();
    rd.Seek(memNameOffset);
    rd.ReadString(memberName);
    memberName = sj2utf8(memberName);
    rd.Pop();
  }
};

template <class PtrType, bool PSN> struct XFSClassMemberV2 {
  std::string memberName;
  MtPropertyType type;
  uint8 flags; // alignment flags??
  uint16 memberSize;
  PtrType null[4 * (PSN + 1)];

  void Read(BinReaderRef_e rd) {
    PtrType memNameOffset;
    rd.Read(memNameOffset);
    rd.Read(type);
    rd.Read(flags);
    rd.Read(memberSize);
    // Padding
    if constexpr (sizeof(PtrType) == 8) {
      rd.Skip(4);
    }
    rd.Read(null);
    rd.Push();
    rd.Seek(memNameOffset);
    rd.ReadString(memberName);
    memberName = sj2utf8(memberName);
    rd.Pop();
  }
};

template <class PadType> struct XFSClass {
  uint32 hash;
  XFSClassInfo info;
  std::vector<XFSClassMemberRaw<PadType>> members;

  void Read(BinReaderRef_e rd) {
    rd.Read(hash);
    rd.Read(info.data);
    rd.ReadContainer(members, info->Get<XFSClassInfo::NumMembers>());
  }
};

template <class PtrType, bool PSN> struct XFSClassV2 {
  uint32 hash;
  std::vector<XFSClassMemberV2<PtrType, PSN>> members;

  void Read(BinReaderRef_e rd) {
    rd.Read(hash);

    // Padding
    if constexpr (sizeof(PtrType) == 8) {
      rd.Skip(4);
    }

    rd.ReadContainer<PtrType>(members);
  }
};

struct XFSClassMember {
  std::string name;
  MtPropertyType type;
  uint8 flags;
  uint16 size;

  XFSClassMember() = default;
  template <class pad_type>
  XFSClassMember(XFSClassMemberRaw<pad_type> &&raw)
      : name(std::move(raw.memberName)), type(raw.type), flags(raw.flags),
        size(raw.memberSize->template Get<XFSSizeAndFlag::Size>()) {
    if (raw.memberSize->template Get<XFSSizeAndFlag::Disable>()) {
      throw es::RuntimeError("Some bullshit");
    }
  }

  template <class pad_type, bool psn>
  XFSClassMember(XFSClassMemberV2<pad_type, psn> &&raw)
      : name(std::move(raw.memberName)), type(raw.type), flags(raw.flags),
        size(raw.memberSize) {}
};

REFLECT(CLASS(XFSClassMember), MEMBER(name), MEMBER(type), MEMBER(flags));

struct XFSClassDesc {
  uint32 hash;
  std::string_view className;
  std::vector<XFSClassMember> members;

  XFSClassDesc() = default;
  template <class pad_type>
  XFSClassDesc(XFSClass<pad_type> &&raw) : hash(raw.hash) {
    members.reserve(raw.members.size());

    std::transform(std::make_move_iterator(raw.members.begin()),
                   std::make_move_iterator(raw.members.end()),
                   std::back_inserter(members),
                   [](auto &&item) { return std::move(item); });
  }

  template <class PtrType, bool PSN>
  XFSClassDesc(XFSClassV2<PtrType, PSN> &&raw) : hash(raw.hash) {
    members.reserve(raw.members.size());

    std::transform(std::make_move_iterator(raw.members.begin()),
                   std::make_move_iterator(raw.members.end()),
                   std::back_inserter(members),
                   [](auto &&item) { return std::move(item); });
  }

  void ToXML(pugi::xml_node node) const;
};

void XFSClassDesc::ToXML(pugi::xml_node node) const {
  auto cNode = node.append_child("class");

  if (className.empty()) {
    char buffer[0x10]{};
    snprintf(buffer, sizeof(buffer), "%X", hash);
    cNode.append_attribute("hash").set_value(buffer);
  } else {
    std::string resNme(className);
    cNode.append_attribute("name").set_value(resNme.c_str());
  }

  for (auto &m : members) {
    ReflectorWrap<const XFSClassMember> refl(m);
    auto mNode = cNode.append_child("member");
    ReflectorXMLUtil::Save(refl, mNode,
                           {ReflectorXMLUtil::Flags_StringAsAttribute});
  }
}

struct XFSDataResource {
  std::string type;
  std::string file;

  void Read(BinReaderRef_e rd) {
    uint8 numStrings;
    rd.Read(numStrings); // ctype?

    if (numStrings != 2) {
      throw es::ImplementationError("Unexpected number!");
    }

    rd.ReadString(type); // rtype?
    rd.ReadString(file); // path?
  }
};

struct XFSData {
  union TypeData {
    bool asBool;
    int8 asInt8;
    uint8 asUInt8;
    int16 asInt16;
    uint16 asUInt16;
    int32 asInt32;
    uint32 asUInt32;
    int64 asInt64;
    uint64 asUInt64;
    Vector2 asVector2;
    Vector asVector3;
    Vector4A16 asVector4;
    IVector4A16 asIVector4;
    IVector2 asIVector2;
    UIVector2 asUIVector2;
    IVector asIVector3;
    void *asPointer;
    UCVector4 asColor;
    float asFloat;
    double asDouble;
    char raw[sizeof(Vector4A16)];

    TypeData() { memset(raw, 0, sizeof(raw)); }
  };

  template <class type> type *AllocArray(size_t numItems) {
    const size_t allocSize = sizeof(type) * numItems;
    mustFree = Free_Free;
    auto value = malloc(allocSize);
    data.asPointer = value;
    return static_cast<type *>(value);
  }
  template <class type> type *AllocClass() {
    mustFree = Free_DeleteSingle;
    auto value = new type();
    data.asPointer = value;
    return value;
  }
  template <class type> type *AllocClasses(size_t numItems) {
    mustFree = Free_DeleteArray;
    auto value = new type[numItems]();
    data.asPointer = value;
    return value;
  }
  void SetString(std::string_view sw) {
    if (sw.size() < sizeof(data.raw)) {
      memcpy(data.raw, sw.data(), sw.size());
      stringInRaw = true;
    } else {
      memcpy(AllocArray<char>(sw.size() + 1), sw.data(), sw.size() + 1);
    }
  }

  const char *AsString() const {
    return stringInRaw ? data.raw : static_cast<const char *>(data.asPointer);
  }

  XFSData(XFSData &&o)
      : rtti(o.rtti), numItems(o.numItems), stringInRaw(o.stringInRaw),
        mustFree(o.mustFree), data(o.data) {
    o.mustFree = Free_None;
  }
  XFSData() = default;
  XFSData(const XFSData &) = delete;

  ~XFSData() {
    switch (mustFree) {
    case Free_Free:
      free(data.asPointer);
      break;
    case Free_DeleteSingle: {
      switch (rtti->type) {
      case MtPropertyType::custom:
        delete static_cast<XFSDataResource *>(data.asPointer);
        break;
      case MtPropertyType::matrix44:
        delete static_cast<es::Matrix44 *>(data.asPointer);
        break;

      default:
        break;
      }
      break;
    }
    case Free_DeleteArray: {
      switch (rtti->type) {
      case MtPropertyType::custom:
        delete[] static_cast<XFSDataResource *>(data.asPointer);
        break;
      case MtPropertyType::matrix44:
        delete[] static_cast<es::Matrix44 *>(data.asPointer);
        break;

      default:
        break;
      }
      break;
    }

    default:
      break;
    }
  }

  XFSClassMember *rtti = nullptr;
  uint32 numItems = 0;

private:
  bool stringInRaw = false;

  enum FreeType : uint8 {
    Free_None,
    Free_Free,
    Free_DeleteSingle,
    Free_DeleteArray,
  };
  FreeType mustFree = Free_None;

public:
  TypeData data;
};

struct XFSClassData {
  std::vector<XFSData> members;
  XFSClassDesc *rtti = nullptr;
};

class revil::XFSImpl {
public:
  std::vector<XFSClassDesc> rtti;
  std::deque<XFSClassData> dataStore;
  XFSClassData *root;

  template <class PtrType>
  void ReadData(BinReaderRef_e rd, XFSClassData **root = nullptr);
  void ToXML(const XFSClassData &item, pugi::xml_node node);
  void ToXML(pugi::xml_node node);
  void RTTIToXML(pugi::xml_node node);
  void Load(BinReaderRef_e rd, bool openEnded);
};

XFS::XFS() : pi(std::make_unique<XFSImpl>()) {}
XFS::~XFS() = default;

void XFS::Load(BinReaderRef_e rd, bool openEnded) { pi->Load(rd, openEnded); }

void XFS::ToXML(pugi::xml_node node) const { pi->ToXML(node); }

void XFS::RTTIToXML(pugi::xml_node node) const { pi->RTTIToXML(node); }

template <class PtrType>
void XFSImpl::ReadData(BinReaderRef_e rd, XFSClassData **root) {
  XFSMeta meta;
  rd.Read(meta.data);

  if (!meta->Get<XFSMeta::Active>()) {
    return;
  }

  PtrType chunkSize;
  const size_t strBegin = rd.Tell();
  rd.Read(chunkSize);

  auto &&desc = rtti.at(meta->Get<XFSMeta::TypeIndex>());
  XFSClassData classData;
  classData.rtti = &desc;

  for (auto &d : desc.members) {
    XFSData cType;
    cType.rtti = &d;
    rd.Read(cType.numItems);

    if (cType.numItems == 1) {
      switch (d.type) {
      case MtPropertyType::bool_:
      case MtPropertyType::s8_:
      case MtPropertyType::u8_:
        rd.Read(cType.data.asUInt8);
        break;
      case MtPropertyType::s16_:
      case MtPropertyType::u16_:
        rd.Read(cType.data.asUInt16);
        break;
      case MtPropertyType::f32_:
      case MtPropertyType::s32_:
      case MtPropertyType::u32_:
        rd.Read(cType.data.asUInt32);
        break;
      case MtPropertyType::s64_:
      case MtPropertyType::u64_:
        rd.Read(cType.data.asUInt64);
        break;
      case MtPropertyType::point:
      case MtPropertyType::size:
      case MtPropertyType::float2:
        rd.Read(cType.data.asVector2);
        break;
      case MtPropertyType::float3:
        rd.Read(cType.data.asVector3);
        break;
      case MtPropertyType::vector4:
      case MtPropertyType::float4:
      case MtPropertyType::vector3:
        rd.Read(cType.data.asVector4);
        break;
      case MtPropertyType::rect:
        rd.Read(cType.data.asIVector4);
        break;
      case MtPropertyType::color:
        rd.Read(cType.data.asColor);
        break;
      case MtPropertyType::string_:
      case MtPropertyType::cstring: {
        std::string temp;
        rd.ReadString(temp);
        cType.SetString(temp);
        break;
      }
      case MtPropertyType::matrix44:
        rd.Read(*cType.AllocClass<es::Matrix44>());
        break;
      case MtPropertyType::class_:
      case MtPropertyType::classref:
        ReadData<PtrType>(
            rd, reinterpret_cast<XFSClassData **>(&cType.data.asPointer));
        break;
      case MtPropertyType::custom:
        rd.Read(*cType.AllocClass<XFSDataResource>());
        break;
      default:
        throw std::runtime_error("Undefined type at: " +
                                 std::to_string(rd.Tell()));
      }
    } else {
      switch (d.type) {
      case MtPropertyType::bool_:
      case MtPropertyType::s8_:
      case MtPropertyType::u8_: {
        char *adata = cType.AllocArray<char>(cType.numItems);
        rd.ReadBuffer(adata, cType.numItems);
        break;
      }
      case MtPropertyType::s16_:
      case MtPropertyType::u16_: {
        uint16 *adata = cType.AllocArray<uint16>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::f32_:
      case MtPropertyType::s32_:
      case MtPropertyType::u32_: {
        uint32 *adata = cType.AllocArray<uint32>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::s64_:
      case MtPropertyType::u64_: {
        uint64 *adata = cType.AllocArray<uint64>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::point:
      case MtPropertyType::size: {
        Vector2 *adata = cType.AllocArray<Vector2>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::vector3: {
        Vector2 *adata = cType.AllocArray<Vector2>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::vector4:
      case MtPropertyType::float4: {
        Vector4A16 *adata = cType.AllocArray<Vector4A16>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::color: {
        const size_t alocSize = cType.numItems * sizeof(UCVector4);
        char *adata = cType.AllocArray<char>(alocSize);
        rd.ReadBuffer(adata, alocSize);
        break;
      }
      case MtPropertyType::string_: {
        throw es::RuntimeError("Array string!");
      }
      case MtPropertyType::matrix44: {
        es::Matrix44 *adata = cType.AllocClasses<es::Matrix44>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          rd.Read(*adata++);
        }
        break;
      }
      case MtPropertyType::class_:
      case MtPropertyType::classref: {
        auto adata = cType.AllocArray<XFSClassData *>(cType.numItems);
        for (size_t i = 0; i < cType.numItems; i++) {
          ReadData<PtrType>(rd, adata++);
        }
        break;
      }
      default:
        throw std::runtime_error("Undefined type at: " +
                                 std::to_string(rd.Tell()));
      }
    }

    classData.members.emplace_back(std::move(cType));
  }

  dataStore.emplace_back(std::move(classData));

  if (rd.Tell() != strBegin + chunkSize) {
    throw es::RuntimeError("Chunk size mismatch!");
  }

  if (root) {
    *root = &dataStore.back();
  }
}

void XMLSetType(const XFSClassData &item, pugi::xml_node node) {
  auto attr = node.append_attribute("type");

  if (item.rtti->className.empty()) {
    char buffer[0x10];
    snprintf(buffer, sizeof(buffer), "0x%X", item.rtti->hash);
    attr.set_value(buffer);
    return;
  }

  std::string resNme(item.rtti->className);
  attr.set_value(resNme.c_str());
}

void XFSImpl::RTTIToXML(pugi::xml_node node) {
  for (auto &c : rtti) {
    c.ToXML(node);
  }
}

void XFSImpl::ToXML(const XFSClassData &item, pugi::xml_node node) {
  for (auto &m : item.members) {
    auto name = PropType(m.rtti->type);

    if (m.numItems > 1) {
      auto cNode = node.append_child("array");
      cNode.append_attribute("name").set_value(m.rtti->name.data());
      cNode.append_attribute("type").set_value(name);
      cNode.append_attribute("count").set_value(m.numItems);

      switch (m.rtti->type) {
      case MtPropertyType::class_:
      case MtPropertyType::classref: {
        auto adata =
            reinterpret_cast<const XFSClassData *const *>(m.data.asPointer);
        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          auto found = std::find_if(
              dataStore.begin(), dataStore.end(),
              [adata, i](auto &value) { return &value == adata[i]; });

          if (!es::IsEnd(dataStore, found)) {
            XMLSetType(*found, aNode);
            ToXML(*found, aNode);
          }
        }
        break;
      }
      case MtPropertyType::bool_: {
        auto adata = reinterpret_cast<const bool *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("value").set_value(adata[i]);
        }
        break;
      }
      case MtPropertyType::u8_: {
        auto adata = reinterpret_cast<const uint8 *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("value").set_value(adata[i]);
        }
        break;
      }
      case MtPropertyType::s8_: {
        auto adata = reinterpret_cast<const int8 *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("value").set_value(adata[i]);
        }
        break;
      }
      case MtPropertyType::s32_: {
        auto adata = reinterpret_cast<const int32 *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("value").set_value(adata[i]);
        }
        break;
      }
      case MtPropertyType::u32_: {
        auto adata = reinterpret_cast<const uint32 *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("value").set_value(adata[i]);
        }
        break;
      }
      case MtPropertyType::f32_: {
        auto adata = reinterpret_cast<const float *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("value").set_value(adata[i]);
        }
        break;
      }

      case MtPropertyType::color: {
        auto adata = reinterpret_cast<const UCVector4 *>(m.data.asPointer);

        for (size_t i = 0; i < m.numItems; i++) {
          auto aNode = cNode.append_child(name);
          aNode.append_attribute("r").set_value(adata[i].X);
          aNode.append_attribute("g").set_value(adata[i].Y);
          aNode.append_attribute("b").set_value(adata[i].Z);
          aNode.append_attribute("a").set_value(adata[i].W);
        }
        break;
      }
      default:
        throw es::RuntimeError("Unhandled xml array type");
      }
    } else if (m.numItems == 1) {
      auto cNode = node.append_child(name);
      cNode.append_attribute("name").set_value(m.rtti->name.data());
      auto value = cNode.append_attribute("value");

      switch (m.rtti->type) {
      case MtPropertyType::bool_:
        value.set_value(m.data.asBool);
        break;
      case MtPropertyType::s8_:
        value.set_value(m.data.asInt8);
        break;
      case MtPropertyType::s16_:
        value.set_value(m.data.asInt16);
        break;
      case MtPropertyType::s32_:
        value.set_value(m.data.asInt32);
        break;
      case MtPropertyType::s64_:
        value.set_value(m.data.asInt64);
        break;
      case MtPropertyType::u8_:
        value.set_value(m.data.asUInt8);
        break;
      case MtPropertyType::u16_:
        value.set_value(m.data.asUInt16);
        break;
      case MtPropertyType::u32_:
        value.set_value(m.data.asUInt32);
        break;
      case MtPropertyType::u64_:
        value.set_value(m.data.asUInt64);
        break;
      case MtPropertyType::string_:
      case MtPropertyType::cstring:
        value.set_value(m.AsString());
        break;
      case MtPropertyType::color:
        value.set_name("r");
        value.set_value(m.data.asColor.X);
        cNode.append_attribute("g").set_value(m.data.asColor.Y);
        cNode.append_attribute("b").set_value(m.data.asColor.Z);
        cNode.append_attribute("a").set_value(m.data.asColor.W);
        break;
      case MtPropertyType::f32_:
        value.set_value(m.data.asFloat);
        break;
      case MtPropertyType::point:
        value.set_name("x");
        value.set_value(m.data.asIVector2.X);
        cNode.append_attribute("y").set_value(m.data.asIVector2.Y);
        break;
      case MtPropertyType::size:
        value.set_name("w");
        value.set_value(m.data.asUIVector2.X);
        cNode.append_attribute("h").set_value(m.data.asUIVector2.Y);
        break;
      case MtPropertyType::vector2:
        value.set_name("x");
        value.set_value(m.data.asVector2.X);
        cNode.append_attribute("y").set_value(m.data.asVector2.Y);
        break;
      case MtPropertyType::vector3:
        value.set_name("x");
        value.set_value(m.data.asVector3.X);
        cNode.append_attribute("y").set_value(m.data.asVector3.Y);
        cNode.append_attribute("z").set_value(m.data.asVector3.Z);
        break;
      case MtPropertyType::vector4:
      case MtPropertyType::float4:
        value.set_name("x");
        value.set_value(m.data.asVector4.X);
        cNode.append_attribute("y").set_value(m.data.asVector4.Y);
        cNode.append_attribute("z").set_value(m.data.asVector4.Z);
        cNode.append_attribute("w").set_value(m.data.asVector4.W);
        break;
      case MtPropertyType::rect:
        value.set_name("x0");
        value.set_value(m.data.asIVector4.X);
        cNode.append_attribute("y0").set_value(m.data.asIVector4.Y);
        cNode.append_attribute("x1").set_value(m.data.asIVector4.Z);
        cNode.append_attribute("y1").set_value(m.data.asIVector4.W);
        break;
      case MtPropertyType::class_:
      case MtPropertyType::classref: {
        auto found =
            std::find_if(dataStore.begin(), dataStore.end(), [&m](auto &value) {
              return &value == m.data.asPointer;
            });
        cNode.remove_attribute(value);

        if (!es::IsEnd(dataStore, found)) {
          XMLSetType(*found, cNode);
          ToXML(*found, cNode);
        }
        break;
      }
      case MtPropertyType::custom: {
        auto adata = static_cast<const XFSDataResource *>(m.data.asPointer);
        value.set_name("type");
        value.set_value(adata->type.data());
        cNode.append_attribute("value").set_value(adata->file.data());
        break;
      }

      case MtPropertyType::matrix44: {
        auto adata = static_cast<const es::Matrix44 *>(m.data.asPointer);
        value.set_name("m00");
        value.set_value(adata->r1().x);
        cNode.append_attribute("m01").set_value(adata->r1().y);
        cNode.append_attribute("m02").set_value(adata->r1().z);
        cNode.append_attribute("m03").set_value(adata->r1().w);

        cNode.append_attribute("m10").set_value(adata->r2().x);
        cNode.append_attribute("m11").set_value(adata->r2().y);
        cNode.append_attribute("m12").set_value(adata->r2().z);
        cNode.append_attribute("m13").set_value(adata->r2().w);

        cNode.append_attribute("m20").set_value(adata->r3().x);
        cNode.append_attribute("m21").set_value(adata->r3().y);
        cNode.append_attribute("m22").set_value(adata->r3().z);
        cNode.append_attribute("m23").set_value(adata->r3().w);

        cNode.append_attribute("m30").set_value(adata->r4().x);
        cNode.append_attribute("m31").set_value(adata->r4().y);
        cNode.append_attribute("m32").set_value(adata->r4().z);
        cNode.append_attribute("m33").set_value(adata->r4().w);
        break;
      }
      default:
        throw es::RuntimeError("Unhandled xml type");
      }
    }
  }
}

void XFSImpl::ToXML(pugi::xml_node node) {
  auto rNode = node.append_child("class");
  auto &&rootData = *root;
  XMLSetType(rootData, rNode);
  ToXML(rootData, rNode);
}

#ifdef XFS_DEBUG
std::map<uint32, XFSClassDesc> rttiStore;
#endif

static constexpr uint32 XFSID = CompileFourCC("XFS");
static constexpr uint32 XFSIDBE = CompileFourCC("\0SFX");

template <class PtrType> void Load(XFSImpl &main, BinReaderRef_e rd) {
  XFSHeaderV1 header;
  rd.Read(header);
  rd.SetRelativeOrigin(rd.Tell(), false);
  std::vector<uint32> layoutOffsets;
  std::vector<XFSClass<PtrType>> layouts;
  rd.ReadContainer(layoutOffsets, header.numLayouts);
  rd.ReadContainer(layouts, header.numLayouts);
  rd.Seek(header.dataStart);

  std::transform(std::make_move_iterator(layouts.begin()),
                 std::make_move_iterator(layouts.end()),
                 std::back_inserter(main.rtti), [](auto &&item) {
                   if (item.info->template Get<XFSClassInfo::Init>()) {
                     throw es::RuntimeError("Some bullshit");
                   }

                   return std::move(item);
                 });
}

template <class PtrType>
void LoadV2(XFSImpl &main, BinReaderRef_e rd, XFSHeaderV2 &header) {
  std::vector<PtrType> layoutOffsets;
  rd.ReadContainer(layoutOffsets, header.numLayouts);

  // Determine member padding
  rd.Push();
  rd.Skip(sizeof(PtrType));
  PtrType numMembers;
  rd.Read(numMembers);
  const size_t memberBegin = rd.Tell();

  PtrType nameOffset;
  rd.Read(nameOffset);
  rd.Pop();

  const size_t expectedEnd =
      layoutOffsets.size() > 1 ? layoutOffsets.at(1) : nameOffset;
  const size_t memberSize = (expectedEnd - memberBegin) / numMembers;

  constexpr size_t singleMemberSize = sizeof(PtrType) * 6;
  constexpr size_t singleMemberSizePSN = sizeof(PtrType) * 10;

  if (memberSize == singleMemberSize) {
    std::vector<XFSClassV2<PtrType, false>> layouts;
    rd.ReadContainer(layouts, header.numLayouts);
    std::transform(std::make_move_iterator(layouts.begin()),
                   std::make_move_iterator(layouts.end()),
                   std::back_inserter(main.rtti),
                   [](auto &&item) { return std::move(item); });

  } else if (memberSize == singleMemberSizePSN) {
    std::vector<XFSClassV2<PtrType, true>> layouts;
    rd.ReadContainer(layouts, header.numLayouts);
    std::transform(std::make_move_iterator(layouts.begin()),
                   std::make_move_iterator(layouts.end()),
                   std::back_inserter(main.rtti),
                   [](auto &&item) { return std::move(item); });
  } else {
    es::RuntimeError("Cannot detect member padding");
  }

  rd.Seek(header.dataStart);
}

bool LoadV2(XFSImpl &main, BinReaderRef_e rd) {
  XFSHeaderV2 header;
  rd.Read(header);
  rd.SetRelativeOrigin(rd.Tell(), false);
  uint32 offset;
  rd.Read(offset);
  rd.Seek(0);
  const size_t expectedEndX64 = header.numLayouts * 8;

  if (offset == expectedEndX64) {
    LoadV2<uint64>(main, rd, header);
    return true;
  }

  LoadV2<uint32>(main, rd, header);
  return false;
}

void XFSImpl::Load(BinReaderRef_e rd, bool openEnded) {
  using pt = Platform;
  XFSHeaderBase hdr;
  rd.Push();
  rd.Read(hdr);
  rd.Pop();

  if (hdr.id == XFSIDBE) {
    rd.SwapEndian(true);
    hdr.SwapEndian();
  } else if (hdr.id != XFSID) {
    throw es::InvalidHeaderError(hdr.id);
  }

  pt platform = rd.SwappedEndian() ? pt::PS3 : pt::Win32;
  bool isX64 = false;

  if (hdr.versionMajor == 0xf || hdr.versionMajor == 0x10) {
    isX64 = ::LoadV2(*this, rd);
  } else {
    if (platform == pt::Win32) {
      ::Load<uint32>(*this, rd);
    } else if (platform == pt::PS3) {
      ::Load<uint64>(*this, rd);
    } else {
      throw es::RuntimeError("Undefined platform!");
    }
  }

  for (auto &c : rtti) {
    c.className = GetClassName(c.hash);
#ifdef XFS_DEBUG
    if (c.className.empty() && !rttiStore.count(c.hash)) {
      rttiStore[c.hash] = c;
    }
#endif
  }

  if (isX64) {
    ReadData<uint64>(rd);
  } else {
    ReadData<uint32>(rd);
  }
  root = &dataStore.back();

  const size_t eof = rd.GetSize();

  if (!openEnded && eof != rd.Tell()) {
    throw es::RuntimeError("Unexpected eof");
  }
}

PredatorCZ / RevilLib / 185

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous