Compare commits
7 Commits
360a209a5c
...
6975f69d64
| Author | SHA1 | Date |
|---|---|---|
 ChestnutYueyue
|
6975f69d64 | |
|
ChestnutYueyue
|
52d82763e1 | |
|
ChestnutYueyue
|
c6a5557d89 | |
|
ChestnutYueyue
|
1f10ce999c | |
|
ChestnutYueyue
|
2751b27d90 | |
|
ChestnutYueyue
|
d0314447ee | |
|
ChestnutYueyue
|
8d086a97e8 |
|
|
@ -14,7 +14,7 @@
|
|||
/x64/
|
||||
/x86/
|
||||
/.build/
|
||||
|
||||
/.trae/
|
||||
# --------------------------------------------
|
||||
# xmake 构建系统
|
||||
# --------------------------------------------
|
||||
|
|
|
|||
|
|
@ -1,327 +0,0 @@
|
|||
# Extra2D 构建系统文档
|
||||
|
||||
## 概述
|
||||
|
||||
Extra2D 使用 **Xmake** 作为构建系统，支持 **MinGW (Windows)** 和 **Nintendo Switch** 两个平台。
|
||||
|
||||
## 项目结构
|
||||
|
||||
```
|
||||
Extra2D/
|
||||
├── xmake.lua # 主构建脚本
|
||||
├── xmake/
|
||||
│ ├── engine.lua # 引擎库定义
|
||||
│ └── toolchains/
|
||||
│ └── switch.lua # Switch 工具链定义
|
||||
├── Extra2D/
|
||||
│ ├── src/ # 引擎源码
|
||||
│ └── include/ # 引擎头文件
|
||||
├── squirrel/ # Squirrel 脚本引擎
|
||||
└── examples/ # 示例程序
|
||||
├── hello_world/
|
||||
├── collision_demo/
|
||||
├── push_box/
|
||||
└── spatial_index_demo/
|
||||
```
|
||||
|
||||
## 环境准备
|
||||
|
||||
### MinGW (Windows) 平台
|
||||
|
||||
1. **安装 MinGW-w64**
|
||||
- 下载地址: https://www.mingw-w64.org/downloads/
|
||||
- 或使用 MSYS2: `pacman -S mingw-w64-x86_64-toolchain`
|
||||
|
||||
2. **安装 Xmake**
|
||||
- 下载地址: https://xmake.io/#/zh-cn/guide/installation
|
||||
|
||||
3. **安装依赖包**
|
||||
```bash
|
||||
xmake require -y
|
||||
```
|
||||
|
||||
### Nintendo Switch 平台
|
||||
|
||||
1. **安装 devkitPro**
|
||||
- 下载地址: https://devkitpro.org/wiki/Getting_Started
|
||||
- Windows 安装程序会自动设置环境变量
|
||||
|
||||
2. **设置环境变量**
|
||||
```powershell
|
||||
# PowerShell
|
||||
$env:DEVKITPRO="C:/devkitPro"
|
||||
|
||||
# 或永久设置（系统属性 -> 环境变量）
|
||||
[Environment]::SetEnvironmentVariable("DEVKITPRO", "C:/devkitPro", "User")
|
||||
```
|
||||
|
||||
3. **在 MSYS2 中安装 Switch 库**
|
||||
```bash
|
||||
# 打开 MSYS2 (devkitPro 提供的)
|
||||
pacman -S switch-sdl2 switch-sdl2_mixer switch-glm
|
||||
|
||||
# 或安装所有 Switch 开发库
|
||||
pacman -S $(pacman -Slq dkp-libs | grep switch-)
|
||||
```
|
||||
|
||||
4. **验证安装**
|
||||
```bash
|
||||
ls $DEVKITPRO/portlibs/switch/include/SDL2
|
||||
ls $DEVKITPRO/portlibs/switch/include/glm
|
||||
```
|
||||
|
||||
## 主构建脚本 (xmake.lua)
|
||||
|
||||
### 项目元信息
|
||||
- **项目名称**: Extra2D
|
||||
- **版本**: 3.1.0
|
||||
- **许可证**: MIT
|
||||
- **语言标准**: C++17
|
||||
- **编码**: UTF-8
|
||||
|
||||
### 构建选项
|
||||
|
||||
| 选项 | 默认值 | 描述 |
|
||||
|------|--------|------|
|
||||
| `examples` | true | 构建示例程序 |
|
||||
| `debug_logs` | false | 启用调试日志 |
|
||||
|
||||
### 平台检测逻辑
|
||||
|
||||
1. 获取主机平台: `os.host()`
|
||||
2. 获取目标平台: `get_config("plat")` 或主机平台
|
||||
3. 平台回退: 如果不支持，Windows 回退到 `mingw`
|
||||
4. 设置平台: `set_plat(target_plat)`
|
||||
5. 设置架构:
|
||||
- Switch: `arm64`
|
||||
- MinGW: `x86_64`
|
||||
|
||||
### 依赖包 (MinGW 平台)
|
||||
|
||||
```lua
|
||||
add_requires("glm", "libsdl2", "libsdl2_mixer")
|
||||
```
|
||||
|
||||
## 引擎库定义 (xmake/engine.lua)
|
||||
|
||||
### 目标: extra2d
|
||||
- **类型**: 静态库 (`static`)
|
||||
- **源文件**:
|
||||
- `Extra2D/src/**.cpp`
|
||||
- `Extra2D/src/glad/glad.c`
|
||||
- `squirrel/squirrel/*.cpp`
|
||||
- `squirrel/sqstdlib/*.cpp`
|
||||
|
||||
### 头文件路径
|
||||
- `Extra2D/include` (public)
|
||||
- `squirrel/include` (public)
|
||||
- `Extra2D/include/extra2d/platform` (public)
|
||||
|
||||
### 平台配置
|
||||
|
||||
#### Switch 平台
|
||||
```lua
|
||||
add_includedirs(devkitPro .. "/portlibs/switch/include")
|
||||
add_linkdirs(devkitPro .. "/portlibs/switch/lib")
|
||||
add_syslinks("SDL2_mixer", "SDL2", "opusfile", "opus", ...)
|
||||
```
|
||||
|
||||
#### MinGW 平台
|
||||
```lua
|
||||
add_packages("glm", "libsdl2", "libsdl2_mixer")
|
||||
add_syslinks("opengl32", "glu32", "winmm", "imm32", "version", "setupapi")
|
||||
```
|
||||
|
||||
### 编译器标志
|
||||
- `-Wall`, `-Wextra`
|
||||
- `-Wno-unused-variable`, `-Wno-unused-function`
|
||||
- `-Wno-deprecated-copy`, `-Wno-class-memaccess`
|
||||
|
||||
### 构建模式
|
||||
- **Debug**: `-O0`, `-g`, 定义 `E2D_DEBUG`, `_DEBUG`
|
||||
- **Release**: `-O2`, 定义 `NDEBUG`
|
||||
|
||||
## Switch 工具链 (xmake/toolchains/switch.lua)
|
||||
|
||||
### 工具链: switch
|
||||
- **类型**: standalone
|
||||
- **描述**: Nintendo Switch devkitA64 工具链
|
||||
|
||||
### 工具路径
|
||||
- **CC**: `aarch64-none-elf-gcc.exe`
|
||||
- **CXX**: `aarch64-none-elf-g++.exe`
|
||||
- **LD**: `aarch64-none-elf-g++.exe`
|
||||
- **AR**: `aarch64-none-elf-gcc-ar.exe`
|
||||
|
||||
### 架构标志
|
||||
```
|
||||
-march=armv8-a+crc+crypto -mtune=cortex-a57 -mtp=soft -fPIE
|
||||
```
|
||||
|
||||
### 链接标志
|
||||
```
|
||||
-specs=switch.specs -g
|
||||
```
|
||||
|
||||
### 预定义宏
|
||||
- `__SWITCH__`
|
||||
- `__NX__`
|
||||
- `MA_SWITCH`
|
||||
- `PFD_SWITCH`
|
||||
|
||||
### 系统库
|
||||
- `nx` (libnx)
|
||||
- `m` (math)
|
||||
|
||||
## 示例程序构建脚本
|
||||
|
||||
### 通用结构
|
||||
|
||||
```lua
|
||||
-- 使用与主项目相同的平台配置
|
||||
if is_plat("switch") then
|
||||
-- Switch 平台配置
|
||||
elseif is_plat("mingw") then
|
||||
-- MinGW 平台配置
|
||||
end
|
||||
```
|
||||
|
||||
### Switch 平台配置
|
||||
- 设置平台: `set_plat("switch")`
|
||||
- 设置架构: `set_arch("arm64")`
|
||||
- 设置工具链: `set_toolchains("switch")`
|
||||
- 设置输出目录: `set_targetdir("../../build/examples/xxx")`
|
||||
- 构建后生成 NRO 文件
|
||||
|
||||
### MinGW 平台配置
|
||||
- 设置平台: `set_plat("mingw")`
|
||||
- 设置架构: `set_arch("x86_64")`
|
||||
- 设置输出目录: `set_targetdir("../../build/examples/xxx")`
|
||||
- 链接标志: `-mwindows`
|
||||
- 构建后复制资源文件
|
||||
|
||||
## 构建命令
|
||||
|
||||
### 配置项目
|
||||
|
||||
```bash
|
||||
# 默认配置 (MinGW)
|
||||
xmake f -c
|
||||
|
||||
# 指定平台 (使用 -p 参数)
|
||||
xmake f -c -p mingw
|
||||
xmake f -c -p switch
|
||||
|
||||
# 指定 MinGW 路径（如果不在默认位置）
|
||||
xmake f -c -p mingw --mingw=C:\mingw
|
||||
|
||||
# 禁用示例
|
||||
xmake f --examples=n
|
||||
|
||||
# 启用调试日志
|
||||
xmake f --debug_logs=y
|
||||
```
|
||||
|
||||
### 安装依赖 (MinGW)
|
||||
```bash
|
||||
xmake require -y
|
||||
```
|
||||
|
||||
### 构建项目
|
||||
```bash
|
||||
# 构建所有目标
|
||||
xmake
|
||||
|
||||
# 构建特定目标
|
||||
xmake -r extra2d
|
||||
xmake -r push_box
|
||||
|
||||
# 并行构建
|
||||
xmake -j4
|
||||
```
|
||||
|
||||
### 运行程序
|
||||
```bash
|
||||
# 运行示例
|
||||
xmake run push_box
|
||||
xmake run hello_world
|
||||
```
|
||||
|
||||
### 清理构建
|
||||
```bash
|
||||
xmake clean
|
||||
xmake f -c # 重新配置
|
||||
```
|
||||
|
||||
## 输出目录结构
|
||||
|
||||
```
|
||||
build/
|
||||
├── examples/
|
||||
│ ├── hello_world/
|
||||
│ │ ├── hello_world.exe # MinGW
|
||||
│ │ ├── hello_world.nro # Switch
|
||||
│ │ └── assets/ # 资源文件
|
||||
│ ├── push_box/
|
||||
│ ├── collision_demo/
|
||||
│ └── spatial_index_demo/
|
||||
└── ...
|
||||
```
|
||||
|
||||
## 关键设计决策
|
||||
|
||||
### 1. 平台检测
|
||||
- 使用 `is_plat()` 而不是手动检测，确保与主项目一致
|
||||
- 示例脚本继承主项目的平台配置
|
||||
|
||||
### 2. 资源处理
|
||||
- **Switch**: 使用 romfs 嵌入 NRO 文件
|
||||
- **MinGW**: 构建后复制到输出目录
|
||||
|
||||
### 3. 依赖管理
|
||||
- **MinGW**: 使用 Xmake 包管理器 (`add_requires`)
|
||||
- **Switch**: 使用 devkitPro 提供的库
|
||||
|
||||
### 4. 工具链隔离
|
||||
- Switch 工具链定义在单独文件中
|
||||
- 通过 `set_toolchains("switch")` 切换
|
||||
|
||||
## 常见问题
|
||||
|
||||
### 1. 依赖包找不到
|
||||
```bash
|
||||
xmake repo -u
|
||||
xmake require -y
|
||||
```
|
||||
|
||||
### 2. Switch 工具链找不到
|
||||
- 确保 DEVKITPRO 环境变量设置正确
|
||||
- 默认路径: `C:/devkitPro`
|
||||
|
||||
### 3. 平台配置不匹配
|
||||
- 使用 `xmake show` 查看当前配置
|
||||
- 使用 `xmake f -c` 重新配置
|
||||
|
||||
### 4. MinGW 路径问题
|
||||
如果 MinGW 安装在非默认位置，使用 `--mingw` 参数指定：
|
||||
```bash
|
||||
xmake f -c -p mingw --mingw=D:\Tools\mingw64
|
||||
```
|
||||
|
||||
### 5. Switch 库找不到
|
||||
确保在 MSYS2 中安装了必要的库：
|
||||
```bash
|
||||
pacman -S switch-sdl2 switch-sdl2_mixer switch-glm
|
||||
```
|
||||
|
||||
## 扩展指南
|
||||
|
||||
### 添加新示例
|
||||
1. 在 `examples/` 下创建新目录
|
||||
2. 创建 `xmake.lua` 构建脚本
|
||||
3. 在 `xmake.lua` 中添加 `includes("examples/new_example")`
|
||||
|
||||
### 添加新平台
|
||||
1. 在 `xmake/toolchains/` 下创建工具链定义
|
||||
2. 在 `xmake.lua` 中添加平台检测逻辑
|
||||
3. 在 `xmake/engine.lua` 中添加平台配置
|
||||
|
|
@ -1,228 +1,39 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <string>
|
||||
#include <vector>
|
||||
#include <cstring>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// String 类 - 跨平台字符串，内部统一使用 UTF-8 存储
|
||||
// 字符串编码转换工具函数
|
||||
// 统一使用 std::string (UTF-8) 作为项目标准字符串类型
|
||||
// ============================================================================
|
||||
class String {
|
||||
public:
|
||||
// ------------------------------------------------------------------------
|
||||
// 构造函数
|
||||
// ------------------------------------------------------------------------
|
||||
String() = default;
|
||||
|
||||
String(const char* utf8) : data_(utf8 ? utf8 : "") {}
|
||||
String(const std::string& utf8) : data_(utf8) {}
|
||||
explicit String(const wchar_t* wide);
|
||||
explicit String(const std::wstring& wide);
|
||||
explicit String(const char16_t* utf16);
|
||||
explicit String(const std::u16string& utf16);
|
||||
explicit String(const char32_t* utf32);
|
||||
explicit String(const std::u32string& utf32);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态工厂方法
|
||||
// ------------------------------------------------------------------------
|
||||
static String fromUtf8(const char* utf8);
|
||||
static String fromUtf8(const std::string& utf8);
|
||||
static String fromWide(const wchar_t* wide);
|
||||
static String fromWide(const std::wstring& wide);
|
||||
static String fromUtf16(const char16_t* utf16);
|
||||
static String fromUtf16(const std::u16string& utf16);
|
||||
static String fromUtf32(const char32_t* utf32);
|
||||
static String fromUtf32(const std::u32string& utf32);
|
||||
|
||||
/// 从 GBK/GB2312 编码构造（Windows 中文系统常用）
|
||||
static String fromGBK(const char* gbk);
|
||||
static String fromGBK(const std::string& gbk);
|
||||
// UTF-8 ↔ UTF-16 转换
|
||||
std::u16string utf8ToUtf16(const std::string& utf8);
|
||||
std::string utf16ToUtf8(const std::u16string& utf16);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 编码转换
|
||||
// ------------------------------------------------------------------------
|
||||
const std::string& toUtf8() const { return data_; }
|
||||
std::string toUtf8String() const { return data_; }
|
||||
|
||||
std::wstring toWide() const;
|
||||
std::u16string toUtf16() const;
|
||||
std::u32string toUtf32() const;
|
||||
|
||||
/// 转换为 GBK/GB2312 编码（Windows 中文系统常用）
|
||||
std::string toGBK() const;
|
||||
// UTF-8 ↔ UTF-32 转换
|
||||
std::u32string utf8ToUtf32(const std::string& utf8);
|
||||
std::string utf32ToUtf8(const std::u32string& utf32);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 基础操作
|
||||
// ------------------------------------------------------------------------
|
||||
/// 返回 Unicode 字符数（不是字节数）
|
||||
size_t length() const;
|
||||
|
||||
/// 返回 UTF-8 字节数
|
||||
size_t byteSize() const { return data_.size(); }
|
||||
|
||||
bool empty() const { return data_.empty(); }
|
||||
|
||||
const char* c_str() const { return data_.c_str(); }
|
||||
const std::string& str() const { return data_; }
|
||||
std::string& str() { return data_; }
|
||||
// UTF-8 ↔ Wide String 转换
|
||||
std::wstring utf8ToWide(const std::string& utf8);
|
||||
std::string wideToUtf8(const std::wstring& wide);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 字符串操作
|
||||
// ------------------------------------------------------------------------
|
||||
void clear() { data_.clear(); }
|
||||
|
||||
String& append(const String& other);
|
||||
String& append(const char* utf8);
|
||||
|
||||
String substring(size_t start, size_t len = npos) const;
|
||||
|
||||
/// 查找子串，返回 Unicode 字符索引，未找到返回 npos
|
||||
size_t find(const String& substr, size_t start = 0) const;
|
||||
|
||||
/// 是否以指定字符串开头
|
||||
bool startsWith(const String& prefix) const;
|
||||
|
||||
/// 是否以指定字符串结尾
|
||||
bool endsWith(const String& suffix) const;
|
||||
|
||||
/// 去除首尾空白字符
|
||||
String trim() const;
|
||||
|
||||
/// 分割字符串
|
||||
std::vector<String> split(const String& delimiter) const;
|
||||
|
||||
/// 替换所有匹配子串
|
||||
String replaceAll(const String& from, const String& to) const;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 运算符重载
|
||||
// ------------------------------------------------------------------------
|
||||
String operator+(const String& other) const;
|
||||
String& operator+=(const String& other);
|
||||
|
||||
bool operator==(const String& other) const { return data_ == other.data_; }
|
||||
bool operator!=(const String& other) const { return data_ != other.data_; }
|
||||
bool operator<(const String& other) const { return data_ < other.data_; }
|
||||
bool operator>(const String& other) const { return data_ > other.data_; }
|
||||
|
||||
char operator[](size_t index) const { return data_[index]; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 迭代器支持
|
||||
// ------------------------------------------------------------------------
|
||||
auto begin() { return data_.begin(); }
|
||||
auto end() { return data_.end(); }
|
||||
auto begin() const { return data_.begin(); }
|
||||
auto end() const { return data_.end(); }
|
||||
auto cbegin() const { return data_.cbegin(); }
|
||||
auto cend() const { return data_.cend(); }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态常量
|
||||
// ------------------------------------------------------------------------
|
||||
static constexpr size_t npos = static_cast<size_t>(-1);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 格式化字符串（类似 sprintf）
|
||||
// ------------------------------------------------------------------------
|
||||
template<typename... Args>
|
||||
static String format(const char* fmt, Args&&... args);
|
||||
|
||||
private:
|
||||
std::string data_; // 内部使用 UTF-8 存储
|
||||
|
||||
// UTF-8 辅助函数
|
||||
static size_t utf8Length(const std::string& str);
|
||||
static std::string utf8Substring(const std::string& str, size_t start, size_t len);
|
||||
static size_t utf8CharIndexToByteIndex(const std::string& str, size_t charIndex);
|
||||
};
|
||||
// UTF-8 ↔ GBK/GB2312 转换（Windows 中文系统常用）
|
||||
std::string utf8ToGbk(const std::string& utf8);
|
||||
std::string gbkToUtf8(const std::string& gbk);
|
||||
|
||||
// ============================================================================
|
||||
// 内联实现
|
||||
// ============================================================================
|
||||
|
||||
inline String::String(const wchar_t* wide) {
|
||||
if (wide) {
|
||||
std::wstring wstr(wide);
|
||||
*this = fromWide(wstr);
|
||||
}
|
||||
}
|
||||
|
||||
inline String::String(const std::wstring& wide) {
|
||||
*this = fromWide(wide);
|
||||
}
|
||||
|
||||
inline String::String(const char16_t* utf16) {
|
||||
if (utf16) {
|
||||
std::u16string u16str(utf16);
|
||||
*this = fromUtf16(u16str);
|
||||
}
|
||||
}
|
||||
|
||||
inline String::String(const std::u16string& utf16) {
|
||||
*this = fromUtf16(utf16);
|
||||
}
|
||||
|
||||
inline String::String(const char32_t* utf32) {
|
||||
if (utf32) {
|
||||
std::u32string u32str(utf32);
|
||||
*this = fromUtf32(u32str);
|
||||
}
|
||||
}
|
||||
|
||||
inline String::String(const std::u32string& utf32) {
|
||||
*this = fromUtf32(utf32);
|
||||
}
|
||||
|
||||
// 静态工厂方法
|
||||
inline String String::fromUtf8(const char* utf8) {
|
||||
return String(utf8 ? utf8 : "");
|
||||
}
|
||||
|
||||
inline String String::fromUtf8(const std::string& utf8) {
|
||||
return String(utf8);
|
||||
}
|
||||
|
||||
// 编码转换实现
|
||||
inline std::wstring String::toWide() const {
|
||||
if (data_.empty()) return std::wstring();
|
||||
|
||||
if constexpr (sizeof(wchar_t) == 4) {
|
||||
// wchar_t is 32-bit (Linux/Switch): same as UTF-32
|
||||
std::u32string u32 = toUtf32();
|
||||
return std::wstring(u32.begin(), u32.end());
|
||||
} else {
|
||||
// wchar_t is 16-bit (Windows): same as UTF-16
|
||||
std::u16string u16 = toUtf16();
|
||||
return std::wstring(u16.begin(), u16.end());
|
||||
}
|
||||
}
|
||||
|
||||
inline String String::fromWide(const std::wstring& wide) {
|
||||
if (wide.empty()) return String();
|
||||
|
||||
if constexpr (sizeof(wchar_t) == 4) {
|
||||
std::u32string u32(wide.begin(), wide.end());
|
||||
return fromUtf32(u32);
|
||||
} else {
|
||||
std::u16string u16(wide.begin(), wide.end());
|
||||
return fromUtf16(u16);
|
||||
}
|
||||
}
|
||||
|
||||
inline String String::fromWide(const wchar_t* wide) {
|
||||
return wide ? fromWide(std::wstring(wide)) : String();
|
||||
}
|
||||
|
||||
inline std::u16string String::toUtf16() const {
|
||||
if (data_.empty()) return std::u16string();
|
||||
inline std::u16string utf8ToUtf16(const std::string& utf8) {
|
||||
if (utf8.empty()) return std::u16string();
|
||||
|
||||
// UTF-8 → UTF-32 → UTF-16 (with surrogate pairs)
|
||||
std::u32string u32 = toUtf32();
|
||||
std::u32string u32 = utf8ToUtf32(utf8);
|
||||
std::u16string result;
|
||||
result.reserve(u32.size());
|
||||
|
||||
|
|
@ -240,8 +51,8 @@ inline std::u16string String::toUtf16() const {
|
|||
return result;
|
||||
}
|
||||
|
||||
inline String String::fromUtf16(const std::u16string& utf16) {
|
||||
if (utf16.empty()) return String();
|
||||
inline std::string utf16ToUtf8(const std::u16string& utf16) {
|
||||
if (utf16.empty()) return std::string();
|
||||
|
||||
// UTF-16 → UTF-32 → UTF-8
|
||||
std::u32string u32;
|
||||
|
|
@ -266,24 +77,20 @@ inline String String::fromUtf16(const std::u16string& utf16) {
|
|||
u32.push_back(ch);
|
||||
}
|
||||
|
||||
return fromUtf32(u32);
|
||||
return utf32ToUtf8(u32);
|
||||
}
|
||||
|
||||
inline String String::fromUtf16(const char16_t* utf16) {
|
||||
return utf16 ? fromUtf16(std::u16string(utf16)) : String();
|
||||
}
|
||||
|
||||
inline std::u32string String::toUtf32() const {
|
||||
inline std::u32string utf8ToUtf32(const std::string& utf8) {
|
||||
std::u32string result;
|
||||
result.reserve(length());
|
||||
|
||||
const char* ptr = data_.c_str();
|
||||
const char* end = ptr + data_.size();
|
||||
|
||||
result.reserve(utf8.size());
|
||||
|
||||
const char* ptr = utf8.c_str();
|
||||
const char* end = ptr + utf8.size();
|
||||
|
||||
while (ptr < end) {
|
||||
char32_t ch = 0;
|
||||
unsigned char byte = static_cast<unsigned char>(*ptr);
|
||||
|
||||
|
||||
if ((byte & 0x80) == 0) {
|
||||
// 1-byte sequence
|
||||
ch = byte;
|
||||
|
|
@ -311,16 +118,16 @@ inline std::u32string String::toUtf32() const {
|
|||
ptr += 1;
|
||||
continue;
|
||||
}
|
||||
|
||||
|
||||
result.push_back(ch);
|
||||
}
|
||||
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
inline String String::fromUtf32(const std::u32string& utf32) {
|
||||
inline std::string utf32ToUtf8(const std::u32string& utf32) {
|
||||
std::string result;
|
||||
|
||||
|
||||
for (char32_t ch : utf32) {
|
||||
if (ch <= 0x7F) {
|
||||
// 1-byte
|
||||
|
|
@ -342,166 +149,61 @@ inline String String::fromUtf32(const std::u32string& utf32) {
|
|||
result.push_back(static_cast<char>(0x80 | (ch & 0x3F)));
|
||||
}
|
||||
}
|
||||
|
||||
return String(result);
|
||||
}
|
||||
|
||||
inline String String::fromUtf32(const char32_t* utf32) {
|
||||
return utf32 ? fromUtf32(std::u32string(utf32)) : String();
|
||||
}
|
||||
|
||||
// UTF-8 辅助函数
|
||||
inline size_t String::utf8Length(const std::string& str) {
|
||||
size_t len = 0;
|
||||
for (unsigned char c : str) {
|
||||
if ((c & 0xC0) != 0x80) {
|
||||
++len;
|
||||
}
|
||||
}
|
||||
return len;
|
||||
}
|
||||
|
||||
inline size_t String::length() const {
|
||||
return utf8Length(data_);
|
||||
}
|
||||
|
||||
inline size_t String::utf8CharIndexToByteIndex(const std::string& str, size_t charIndex) {
|
||||
size_t charCount = 0;
|
||||
size_t byteIndex = 0;
|
||||
|
||||
while (byteIndex < str.size() && charCount < charIndex) {
|
||||
unsigned char c = static_cast<unsigned char>(str[byteIndex]);
|
||||
if ((c & 0xC0) != 0x80) {
|
||||
++charCount;
|
||||
}
|
||||
++byteIndex;
|
||||
}
|
||||
|
||||
return byteIndex;
|
||||
}
|
||||
|
||||
inline std::string String::utf8Substring(const std::string& str, size_t start, size_t len) {
|
||||
size_t startByte = utf8CharIndexToByteIndex(str, start);
|
||||
size_t endByte = (len == npos) ? str.size() : utf8CharIndexToByteIndex(str, start + len);
|
||||
|
||||
return str.substr(startByte, endByte - startByte);
|
||||
}
|
||||
|
||||
inline String String::substring(size_t start, size_t len) const {
|
||||
return String(utf8Substring(data_, start, len));
|
||||
}
|
||||
|
||||
// 字符串操作
|
||||
inline String& String::append(const String& other) {
|
||||
data_.append(other.data_);
|
||||
return *this;
|
||||
}
|
||||
|
||||
inline String& String::append(const char* utf8) {
|
||||
if (utf8) data_.append(utf8);
|
||||
return *this;
|
||||
}
|
||||
|
||||
inline size_t String::find(const String& substr, size_t start) const {
|
||||
if (substr.empty() || start >= length()) return npos;
|
||||
|
||||
size_t startByte = utf8CharIndexToByteIndex(data_, start);
|
||||
size_t pos = data_.find(substr.data_, startByte);
|
||||
|
||||
if (pos == std::string::npos) return npos;
|
||||
|
||||
// 转换字节索引到字符索引
|
||||
return utf8Length(data_.substr(0, pos));
|
||||
}
|
||||
|
||||
inline bool String::startsWith(const String& prefix) const {
|
||||
if (prefix.data_.size() > data_.size()) return false;
|
||||
return data_.compare(0, prefix.data_.size(), prefix.data_) == 0;
|
||||
}
|
||||
|
||||
inline bool String::endsWith(const String& suffix) const {
|
||||
if (suffix.data_.size() > data_.size()) return false;
|
||||
return data_.compare(data_.size() - suffix.data_.size(), suffix.data_.size(), suffix.data_) == 0;
|
||||
}
|
||||
|
||||
inline String String::trim() const {
|
||||
size_t start = 0;
|
||||
while (start < data_.size() && std::isspace(static_cast<unsigned char>(data_[start]))) {
|
||||
++start;
|
||||
}
|
||||
|
||||
size_t end = data_.size();
|
||||
while (end > start && std::isspace(static_cast<unsigned char>(data_[end - 1]))) {
|
||||
--end;
|
||||
}
|
||||
|
||||
return String(data_.substr(start, end - start));
|
||||
}
|
||||
|
||||
inline std::vector<String> String::split(const String& delimiter) const {
|
||||
std::vector<String> result;
|
||||
|
||||
if (delimiter.empty()) {
|
||||
result.push_back(*this);
|
||||
return result;
|
||||
}
|
||||
|
||||
size_t start = 0;
|
||||
size_t end = data_.find(delimiter.data_, start);
|
||||
|
||||
while (end != std::string::npos) {
|
||||
result.push_back(String(data_.substr(start, end - start)));
|
||||
start = end + delimiter.data_.size();
|
||||
end = data_.find(delimiter.data_, start);
|
||||
}
|
||||
|
||||
result.push_back(String(data_.substr(start)));
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
inline String String::replaceAll(const String& from, const String& to) const {
|
||||
if (from.empty()) return *this;
|
||||
|
||||
std::string result = data_;
|
||||
size_t pos = 0;
|
||||
|
||||
while ((pos = result.find(from.data_, pos)) != std::string::npos) {
|
||||
result.replace(pos, from.data_.size(), to.data_);
|
||||
pos += to.data_.size();
|
||||
inline std::wstring utf8ToWide(const std::string& utf8) {
|
||||
if (utf8.empty()) return std::wstring();
|
||||
|
||||
if constexpr (sizeof(wchar_t) == 4) {
|
||||
// wchar_t is 32-bit (Linux/Switch): same as UTF-32
|
||||
std::u32string u32 = utf8ToUtf32(utf8);
|
||||
return std::wstring(u32.begin(), u32.end());
|
||||
} else {
|
||||
// wchar_t is 16-bit (Windows): same as UTF-16
|
||||
std::u16string u16 = utf8ToUtf16(utf8);
|
||||
return std::wstring(u16.begin(), u16.end());
|
||||
}
|
||||
|
||||
return String(result);
|
||||
}
|
||||
|
||||
// 运算符重载
|
||||
inline String String::operator+(const String& other) const {
|
||||
String result(*this);
|
||||
result.append(other);
|
||||
return result;
|
||||
inline std::string wideToUtf8(const std::wstring& wide) {
|
||||
if (wide.empty()) return std::string();
|
||||
|
||||
if constexpr (sizeof(wchar_t) == 4) {
|
||||
std::u32string u32(wide.begin(), wide.end());
|
||||
return utf32ToUtf8(u32);
|
||||
} else {
|
||||
std::u16string u16(wide.begin(), wide.end());
|
||||
return utf16ToUtf8(u16);
|
||||
}
|
||||
}
|
||||
|
||||
inline String& String::operator+=(const String& other) {
|
||||
return append(other);
|
||||
// GBK/GB2312 转换（Windows 平台实现）
|
||||
// 注意：Windows 实现在 .cpp 文件中，避免头文件包含 windows.h 导致冲突
|
||||
#ifdef _WIN32
|
||||
// 前向声明，实现在 .cpp 文件中
|
||||
std::string utf8ToGbkImpl(const std::string& utf8);
|
||||
std::string gbkToUtf8Impl(const std::string& gbk);
|
||||
|
||||
inline std::string utf8ToGbk(const std::string& utf8) {
|
||||
return utf8ToGbkImpl(utf8);
|
||||
}
|
||||
|
||||
// 格式化字符串
|
||||
#include <cstdio>
|
||||
|
||||
template<typename... Args>
|
||||
String String::format(const char* fmt, Args&&... args) {
|
||||
int size = std::snprintf(nullptr, 0, fmt, std::forward<Args>(args)...);
|
||||
if (size <= 0) return String();
|
||||
|
||||
std::string result(size, '\0');
|
||||
std::snprintf(&result[0], size + 1, fmt, std::forward<Args>(args)...);
|
||||
|
||||
return String(result);
|
||||
inline std::string gbkToUtf8(const std::string& gbk) {
|
||||
return gbkToUtf8Impl(gbk);
|
||||
}
|
||||
#else
|
||||
// 非 Windows 平台，GBK 转换使用 iconv 或返回原字符串
|
||||
inline std::string utf8ToGbk(const std::string& utf8) {
|
||||
// TODO: 使用 iconv 实现
|
||||
return utf8;
|
||||
}
|
||||
|
||||
// 全局运算符
|
||||
inline String operator+(const char* lhs, const String& rhs) {
|
||||
return String(lhs) + rhs;
|
||||
inline std::string gbkToUtf8(const std::string& gbk) {
|
||||
// TODO: 使用 iconv 实现
|
||||
return gbk;
|
||||
}
|
||||
#endif
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
|
|||
|
|
@ -3,9 +3,15 @@
|
|||
#include <cstdint>
|
||||
#include <functional>
|
||||
#include <memory>
|
||||
#include <string>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ---------------------------------------------------------------------------
|
||||
// 字符串别名 - 统一使用 std::string (UTF-8)
|
||||
// ---------------------------------------------------------------------------
|
||||
using String = std::string;
|
||||
|
||||
// ---------------------------------------------------------------------------
|
||||
// 智能指针别名
|
||||
// ---------------------------------------------------------------------------
|
||||
|
|
|
|||
|
|
@ -27,7 +27,6 @@
|
|||
#include <extra2d/scene/node.h>
|
||||
#include <extra2d/scene/scene.h>
|
||||
#include <extra2d/scene/sprite.h>
|
||||
#include <extra2d/scene/text.h>
|
||||
#include <extra2d/scene/shape_node.h>
|
||||
#include <extra2d/scene/scene_manager.h>
|
||||
#include <extra2d/scene/transition.h>
|
||||
|
|
@ -53,6 +52,12 @@
|
|||
// UI
|
||||
#include <extra2d/ui/widget.h>
|
||||
#include <extra2d/ui/button.h>
|
||||
#include <extra2d/ui/text.h>
|
||||
#include <extra2d/ui/label.h>
|
||||
#include <extra2d/ui/progress_bar.h>
|
||||
#include <extra2d/ui/check_box.h>
|
||||
#include <extra2d/ui/radio_button.h>
|
||||
#include <extra2d/ui/slider.h>
|
||||
|
||||
// Action
|
||||
#include <extra2d/action/action.h>
|
||||
|
|
@ -92,10 +97,6 @@
|
|||
// Application
|
||||
#include <extra2d/app/application.h>
|
||||
|
||||
// Script
|
||||
#include <extra2d/script/script_engine.h>
|
||||
#include <extra2d/script/script_node.h>
|
||||
|
||||
#ifdef __SWITCH__
|
||||
#include <switch.h>
|
||||
#endif
|
||||
|
|
@ -2,7 +2,6 @@
|
|||
|
||||
#include <extra2d/core/color.h>
|
||||
#include <extra2d/core/math_types.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <extra2d/core/types.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
|
|
|||
|
|
@ -2,7 +2,6 @@
|
|||
|
||||
#include <extra2d/core/color.h>
|
||||
#include <extra2d/core/math_types.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <extra2d/core/types.h>
|
||||
#include <glm/mat4x4.hpp>
|
||||
|
||||
|
|
|
|||
|
|
@ -1,81 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/color.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/scene/node.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 文字节点
|
||||
// ============================================================================
|
||||
class Text : public Node {
|
||||
public:
|
||||
Text();
|
||||
explicit Text(const String &text);
|
||||
~Text() override = default;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字内容
|
||||
// ------------------------------------------------------------------------
|
||||
void setText(const String &text);
|
||||
const String &getText() const { return text_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 字体
|
||||
// ------------------------------------------------------------------------
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字属性
|
||||
// ------------------------------------------------------------------------
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return color_; }
|
||||
|
||||
void setFontSize(int size);
|
||||
int getFontSize() const { return fontSize_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 对齐方式
|
||||
// ------------------------------------------------------------------------
|
||||
enum class Alignment { Left, Center, Right };
|
||||
|
||||
void setAlignment(Alignment align);
|
||||
Alignment getAlignment() const { return alignment_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 尺寸计算
|
||||
// ------------------------------------------------------------------------
|
||||
Vec2 getTextSize() const;
|
||||
float getLineHeight() const;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
static Ptr<Text> create();
|
||||
static Ptr<Text> create(const String &text);
|
||||
static Ptr<Text> create(const String &text, Ptr<FontAtlas> font);
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onDraw(RenderBackend &renderer) override;
|
||||
void generateRenderCommand(std::vector<RenderCommand> &commands,
|
||||
int zOrder) override;
|
||||
|
||||
private:
|
||||
String text_;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color color_ = Colors::White;
|
||||
int fontSize_ = 16;
|
||||
Alignment alignment_ = Alignment::Left;
|
||||
|
||||
mutable Vec2 cachedSize_ = Vec2::Zero();
|
||||
mutable bool sizeDirty_ = true;
|
||||
|
||||
void updateCache() const;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,41 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <squirrel.h>
|
||||
#include <string>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
class ScriptEngine {
|
||||
public:
|
||||
static ScriptEngine &getInstance();
|
||||
|
||||
ScriptEngine(const ScriptEngine &) = delete;
|
||||
ScriptEngine &operator=(const ScriptEngine &) = delete;
|
||||
|
||||
bool initialize();
|
||||
void shutdown();
|
||||
|
||||
bool executeString(const std::string &code);
|
||||
bool executeFile(const std::string &filepath);
|
||||
|
||||
HSQUIRRELVM getVM() const { return vm_; }
|
||||
bool isInitialized() const { return vm_ != nullptr; }
|
||||
|
||||
private:
|
||||
ScriptEngine() = default;
|
||||
~ScriptEngine();
|
||||
|
||||
bool compileAndRun(const std::string &source, const std::string &sourceName);
|
||||
|
||||
static void printFunc(HSQUIRRELVM vm, const SQChar *fmt, ...);
|
||||
static void errorFunc(HSQUIRRELVM vm, const SQChar *fmt, ...);
|
||||
static SQInteger errorHandler(HSQUIRRELVM vm);
|
||||
static void compilerError(HSQUIRRELVM vm, const SQChar *desc,
|
||||
const SQChar *source, SQInteger line,
|
||||
SQInteger column);
|
||||
|
||||
HSQUIRRELVM vm_ = nullptr;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,33 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/scene/node.h>
|
||||
#include <extra2d/script/script_engine.h>
|
||||
#include <string>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
class ScriptNode : public Node {
|
||||
public:
|
||||
ScriptNode();
|
||||
~ScriptNode() override;
|
||||
|
||||
static Ptr<ScriptNode> create(const std::string &scriptPath);
|
||||
|
||||
bool loadScript(const std::string &scriptPath);
|
||||
const std::string &getScriptPath() const { return scriptPath_; }
|
||||
|
||||
void onEnter() override;
|
||||
void onExit() override;
|
||||
void onUpdate(float dt) override;
|
||||
|
||||
private:
|
||||
bool callMethod(const char *name);
|
||||
bool callMethodWithFloat(const char *name, float arg);
|
||||
void pushSelf();
|
||||
|
||||
std::string scriptPath_;
|
||||
HSQOBJECT scriptTable_;
|
||||
bool tableValid_ = false;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,263 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <squirrel.h>
|
||||
#include <string>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// ============================================================================
|
||||
// Type tag helpers — unique address per type
|
||||
// ============================================================================
|
||||
template <typename T> inline SQUserPointer typeTag() {
|
||||
static int tag;
|
||||
return &tag;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// SqClassName trait — maps C++ types to Squirrel class names
|
||||
// ============================================================================
|
||||
template <typename T> struct SqClassName {
|
||||
static const char *name();
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
// push / get primitives
|
||||
// ============================================================================
|
||||
inline void push(HSQUIRRELVM vm, int v) {
|
||||
sq_pushinteger(vm, static_cast<SQInteger>(v));
|
||||
}
|
||||
inline void push(HSQUIRRELVM vm, float v) {
|
||||
sq_pushfloat(vm, static_cast<SQFloat>(v));
|
||||
}
|
||||
inline void push(HSQUIRRELVM vm, double v) {
|
||||
sq_pushfloat(vm, static_cast<SQFloat>(v));
|
||||
}
|
||||
inline void push(HSQUIRRELVM vm, bool v) {
|
||||
sq_pushbool(vm, v ? SQTrue : SQFalse);
|
||||
}
|
||||
inline void push(HSQUIRRELVM vm, const char *v) { sq_pushstring(vm, v, -1); }
|
||||
inline void push(HSQUIRRELVM vm, const std::string &v) {
|
||||
sq_pushstring(vm, v.c_str(), static_cast<SQInteger>(v.size()));
|
||||
}
|
||||
inline void pushNull(HSQUIRRELVM vm) { sq_pushnull(vm); }
|
||||
|
||||
inline SQInteger getInt(HSQUIRRELVM vm, SQInteger idx) {
|
||||
SQInteger val = 0;
|
||||
sq_getinteger(vm, idx, &val);
|
||||
return val;
|
||||
}
|
||||
|
||||
inline SQFloat getFloat(HSQUIRRELVM vm, SQInteger idx) {
|
||||
SQFloat val = 0;
|
||||
if (SQ_FAILED(sq_getfloat(vm, idx, &val))) {
|
||||
SQInteger ival = 0;
|
||||
if (SQ_SUCCEEDED(sq_getinteger(vm, idx, &ival)))
|
||||
val = static_cast<SQFloat>(ival);
|
||||
}
|
||||
return val;
|
||||
}
|
||||
|
||||
inline bool getBool(HSQUIRRELVM vm, SQInteger idx) {
|
||||
SQBool val = SQFalse;
|
||||
sq_getbool(vm, idx, &val);
|
||||
return val != SQFalse;
|
||||
}
|
||||
|
||||
inline std::string getString(HSQUIRRELVM vm, SQInteger idx) {
|
||||
const SQChar *str = nullptr;
|
||||
sq_getstring(vm, idx, &str);
|
||||
return str ? std::string(str) : std::string();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Value type userdata helpers
|
||||
// ============================================================================
|
||||
template <typename T> T *pushValueInstance(HSQUIRRELVM vm, const T &val) {
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, SqClassName<T>::name(), -1);
|
||||
if (SQ_FAILED(sq_get(vm, -2))) {
|
||||
sq_pop(vm, 1);
|
||||
return nullptr;
|
||||
}
|
||||
if (SQ_FAILED(sq_createinstance(vm, -1))) {
|
||||
sq_pop(vm, 2);
|
||||
return nullptr;
|
||||
}
|
||||
|
||||
T *ud = nullptr;
|
||||
sq_getinstanceup(vm, -1, reinterpret_cast<SQUserPointer *>(&ud), nullptr,
|
||||
SQFalse);
|
||||
if (ud)
|
||||
*ud = val;
|
||||
|
||||
sq_remove(vm, -2); // class
|
||||
sq_remove(vm, -2); // roottable
|
||||
return ud;
|
||||
}
|
||||
|
||||
template <typename T> T *getValueInstance(HSQUIRRELVM vm, SQInteger idx) {
|
||||
T *ud = nullptr;
|
||||
sq_getinstanceup(vm, idx, reinterpret_cast<SQUserPointer *>(&ud),
|
||||
typeTag<T>(), SQFalse);
|
||||
return ud;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Shared pointer bridge for reference types
|
||||
// ============================================================================
|
||||
template <typename T> void pushPtr(HSQUIRRELVM vm, Ptr<T> ptr) {
|
||||
if (!ptr) {
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, SqClassName<T>::name(), -1);
|
||||
if (SQ_FAILED(sq_get(vm, -2))) {
|
||||
sq_pop(vm, 1);
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
if (SQ_FAILED(sq_createinstance(vm, -1))) {
|
||||
sq_pop(vm, 2);
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
|
||||
auto *storage = new Ptr<T>(std::move(ptr));
|
||||
sq_setinstanceup(vm, -1, storage);
|
||||
sq_setreleasehook(vm, -1, [](SQUserPointer p, SQInteger) -> SQInteger {
|
||||
delete static_cast<Ptr<T> *>(p);
|
||||
return 0;
|
||||
});
|
||||
|
||||
sq_remove(vm, -2); // class
|
||||
sq_remove(vm, -2); // roottable
|
||||
}
|
||||
|
||||
template <typename T> Ptr<T> getPtr(HSQUIRRELVM vm, SQInteger idx) {
|
||||
SQUserPointer up = nullptr;
|
||||
sq_getinstanceup(vm, idx, &up, typeTag<T>(), SQFalse);
|
||||
if (!up)
|
||||
return nullptr;
|
||||
return *static_cast<Ptr<T> *>(up);
|
||||
}
|
||||
|
||||
template <typename T> T *getRawPtr(HSQUIRRELVM vm, SQInteger idx) {
|
||||
auto p = getPtr<T>(vm, idx);
|
||||
return p ? p.get() : nullptr;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Singleton pointer (no release hook)
|
||||
// ============================================================================
|
||||
template <typename T>
|
||||
void pushSingleton(HSQUIRRELVM vm, T *ptr, const char *className) {
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, className, -1);
|
||||
if (SQ_FAILED(sq_get(vm, -2))) {
|
||||
sq_pop(vm, 1);
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
if (SQ_FAILED(sq_createinstance(vm, -1))) {
|
||||
sq_pop(vm, 2);
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
sq_setinstanceup(vm, -1, ptr);
|
||||
sq_remove(vm, -2); // class
|
||||
sq_remove(vm, -2); // roottable
|
||||
}
|
||||
|
||||
template <typename T> T *getSingleton(HSQUIRRELVM vm, SQInteger idx) {
|
||||
SQUserPointer up = nullptr;
|
||||
sq_getinstanceup(vm, idx, &up, nullptr, SQFalse);
|
||||
return static_cast<T *>(up);
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// ClassDef — fluent API for registering a class
|
||||
// ============================================================================
|
||||
struct ClassDef {
|
||||
HSQUIRRELVM vm;
|
||||
|
||||
ClassDef(HSQUIRRELVM v, const char *name, const char *base = nullptr)
|
||||
: vm(v) {
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, name, -1);
|
||||
|
||||
if (base) {
|
||||
sq_pushstring(vm, base, -1);
|
||||
if (SQ_FAILED(sq_get(vm, -3))) {
|
||||
sq_newclass(vm, SQFalse);
|
||||
} else {
|
||||
sq_newclass(vm, SQTrue);
|
||||
}
|
||||
} else {
|
||||
sq_newclass(vm, SQFalse);
|
||||
}
|
||||
}
|
||||
|
||||
ClassDef &setTypeTag(SQUserPointer tag) {
|
||||
sq_settypetag(vm, -1, tag);
|
||||
return *this;
|
||||
}
|
||||
|
||||
ClassDef &method(const char *name, SQFUNCTION fn, SQInteger nparams = 0,
|
||||
const char *typemask = nullptr) {
|
||||
sq_pushstring(vm, name, -1);
|
||||
sq_newclosure(vm, fn, 0);
|
||||
if (nparams > 0 && typemask)
|
||||
sq_setparamscheck(vm, nparams, typemask);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
return *this;
|
||||
}
|
||||
|
||||
ClassDef &staticMethod(const char *name, SQFUNCTION fn, SQInteger nparams = 0,
|
||||
const char *typemask = nullptr) {
|
||||
sq_pushstring(vm, name, -1);
|
||||
sq_newclosure(vm, fn, 0);
|
||||
if (nparams > 0 && typemask)
|
||||
sq_setparamscheck(vm, nparams, typemask);
|
||||
sq_newslot(vm, -3, SQTrue);
|
||||
return *this;
|
||||
}
|
||||
|
||||
template <typename T> ClassDef &setValueType(SQFUNCTION constructor) {
|
||||
sq_settypetag(vm, -1, typeTag<T>());
|
||||
sq_setclassudsize(vm, -1, sizeof(T));
|
||||
sq_pushstring(vm, "constructor", -1);
|
||||
sq_newclosure(vm, constructor, 0);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
return *this;
|
||||
}
|
||||
|
||||
void commit() {
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 1);
|
||||
}
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
// Register a table of integer constants
|
||||
// ============================================================================
|
||||
inline void registerConstTable(HSQUIRRELVM vm, const char *tableName,
|
||||
const char *const *names,
|
||||
const SQInteger *values, int count) {
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, tableName, -1);
|
||||
sq_newtable(vm);
|
||||
for (int i = 0; i < count; ++i) {
|
||||
sq_pushstring(vm, names[i], -1);
|
||||
sq_pushinteger(vm, values[i]);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
}
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 1);
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,11 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
void registerActionBindings(HSQUIRRELVM vm);
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,11 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
void registerAnimationBindings(HSQUIRRELVM vm);
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,11 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
void registerAudioBindings(HSQUIRRELVM vm);
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,13 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
void registerInput(HSQUIRRELVM vm);
|
||||
void registerKeyConstants(HSQUIRRELVM vm);
|
||||
void registerInputBindings(HSQUIRRELVM vm);
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,16 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
void registerNode(HSQUIRRELVM vm);
|
||||
void registerSprite(HSQUIRRELVM vm);
|
||||
void registerScene(HSQUIRRELVM vm);
|
||||
void registerSceneManager(HSQUIRRELVM vm);
|
||||
void registerApplication(HSQUIRRELVM vm);
|
||||
void registerNodeBindings(HSQUIRRELVM vm);
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,31 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/color.h>
|
||||
#include <extra2d/core/math_types.h>
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// SqClassName specializations for value types
|
||||
template <> struct SqClassName<Vec2> {
|
||||
static const char *name() { return "Vec2"; }
|
||||
};
|
||||
template <> struct SqClassName<Size> {
|
||||
static const char *name() { return "Size"; }
|
||||
};
|
||||
template <> struct SqClassName<Rect> {
|
||||
static const char *name() { return "Rect"; }
|
||||
};
|
||||
template <> struct SqClassName<Color> {
|
||||
static const char *name() { return "Color"; }
|
||||
};
|
||||
|
||||
void registerVec2(HSQUIRRELVM vm);
|
||||
void registerSize(HSQUIRRELVM vm);
|
||||
void registerRect(HSQUIRRELVM vm);
|
||||
void registerColor(HSQUIRRELVM vm);
|
||||
void registerValueTypes(HSQUIRRELVM vm);
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,5 +1,6 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/graphics/texture.h>
|
||||
#include <extra2d/platform/window.h>
|
||||
|
|
@ -21,52 +22,118 @@ enum class ImageScaleMode {
|
|||
class Button : public Widget {
|
||||
public:
|
||||
Button();
|
||||
explicit Button(const String &text);
|
||||
~Button() override = default;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
static Ptr<Button> create();
|
||||
static Ptr<Button> create(const String &text);
|
||||
static Ptr<Button> create(const String &text, Ptr<FontAtlas> font);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Button *withPosition(float x, float y);
|
||||
Button *withPosition(const Vec2 &pos);
|
||||
Button *withAnchor(float x, float y);
|
||||
Button *withAnchor(const Vec2 &anchor);
|
||||
Button *withText(const String &text);
|
||||
Button *withFont(Ptr<FontAtlas> font);
|
||||
Button *withTextColor(const Color &color);
|
||||
Button *withBackgroundColor(const Color &normal, const Color &hover,
|
||||
const Color &pressed);
|
||||
Button *withSize(float width, float height);
|
||||
Button *withPadding(const Vec2 &padding);
|
||||
Button *withPadding(float x, float y);
|
||||
Button *withBorder(const Color &color, float width);
|
||||
Button *withCornerRadius(float radius);
|
||||
Button *withRoundedCornersEnabled(bool enabled);
|
||||
Button *withHoverCursor(CursorShape cursor);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
Button *withCoordinateSpace(CoordinateSpace space);
|
||||
Button *withScreenPosition(float x, float y);
|
||||
Button *withScreenPosition(const Vec2 &pos);
|
||||
Button *withCameraOffset(float x, float y);
|
||||
Button *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字内容
|
||||
// ------------------------------------------------------------------------
|
||||
void setText(const String &text);
|
||||
const String &getText() const { return text_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 字体
|
||||
// ------------------------------------------------------------------------
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 内边距
|
||||
// ------------------------------------------------------------------------
|
||||
void setPadding(const Vec2 &padding);
|
||||
Vec2 getPadding() const { return padding_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字颜色
|
||||
// ------------------------------------------------------------------------
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return textColor_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 纯色背景设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setBackgroundColor(const Color &normal, const Color &hover,
|
||||
const Color &pressed);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 边框设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setBorder(const Color &color, float width);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 图片背景设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setBackgroundImage(Ptr<Texture> normal, Ptr<Texture> hover = nullptr,
|
||||
Ptr<Texture> pressed = nullptr);
|
||||
void setBackgroundImageScaleMode(ImageScaleMode mode);
|
||||
void setCustomSize(const Vec2 &size);
|
||||
void setCustomSize(float width, float height);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 圆角矩形设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setCornerRadius(float radius);
|
||||
float getCornerRadius() const { return cornerRadius_; }
|
||||
void setRoundedCornersEnabled(bool enabled);
|
||||
bool isRoundedCornersEnabled() const { return roundedCornersEnabled_; }
|
||||
|
||||
// 鼠标光标设置（悬停时显示的光标形状）
|
||||
// ------------------------------------------------------------------------
|
||||
// 鼠标光标设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setHoverCursor(CursorShape cursor);
|
||||
CursorShape getHoverCursor() const { return hoverCursor_; }
|
||||
|
||||
// Alpha遮罩点击检测（用于不规则形状按钮）
|
||||
// ------------------------------------------------------------------------
|
||||
// Alpha遮罩点击检测
|
||||
// ------------------------------------------------------------------------
|
||||
void setUseAlphaMaskForHitTest(bool enabled);
|
||||
bool isUseAlphaMaskForHitTest() const { return useAlphaMaskForHitTest_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 点击回调
|
||||
// ------------------------------------------------------------------------
|
||||
void setOnClick(Function<void()> callback);
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onDraw(RenderBackend &renderer) override;
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
void drawBackgroundImage(RenderBackend &renderer, const Rect &rect);
|
||||
void drawRoundedRect(RenderBackend &renderer, const Rect &rect,
|
||||
const Color &color, float radius);
|
||||
|
|
@ -103,15 +170,15 @@ private:
|
|||
float borderWidth_ = 1.0f;
|
||||
|
||||
// 圆角矩形
|
||||
float cornerRadius_ = 8.0f; // 圆角半径
|
||||
bool roundedCornersEnabled_ = false; // 默认关闭
|
||||
float cornerRadius_ = 8.0f;
|
||||
bool roundedCornersEnabled_ = false;
|
||||
|
||||
// 鼠标光标
|
||||
CursorShape hoverCursor_ = CursorShape::Hand; // 悬停时默认显示手型光标
|
||||
bool cursorChanged_ = false; // 标记是否已改变光标
|
||||
CursorShape hoverCursor_ = CursorShape::Hand;
|
||||
bool cursorChanged_ = false;
|
||||
|
||||
// Alpha遮罩点击检测（用于不规则形状按钮）
|
||||
bool useAlphaMaskForHitTest_ = false; // 默认关闭
|
||||
// Alpha遮罩点击检测
|
||||
bool useAlphaMaskForHitTest_ = false;
|
||||
|
||||
bool hovered_ = false;
|
||||
bool pressed_ = false;
|
||||
|
|
@ -151,7 +218,7 @@ public:
|
|||
void setOnStateChange(Function<void(bool)> callback);
|
||||
|
||||
protected:
|
||||
void onDraw(RenderBackend &renderer) override;
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
|
||||
private:
|
||||
// 状态图片
|
||||
|
|
|
|||
|
|
@ -0,0 +1,95 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 复选框组件
|
||||
// ============================================================================
|
||||
class CheckBox : public Widget {
|
||||
public:
|
||||
CheckBox();
|
||||
~CheckBox() override = default;
|
||||
|
||||
static Ptr<CheckBox> create();
|
||||
static Ptr<CheckBox> create(const String &label);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
CheckBox *withPosition(float x, float y);
|
||||
CheckBox *withPosition(const Vec2 &pos);
|
||||
CheckBox *withAnchor(float x, float y);
|
||||
CheckBox *withAnchor(const Vec2 &anchor);
|
||||
CheckBox *withText(const String &text);
|
||||
CheckBox *withFont(Ptr<FontAtlas> font);
|
||||
CheckBox *withTextColor(const Color &color);
|
||||
CheckBox *withSize(float width, float height);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
CheckBox *withCoordinateSpace(CoordinateSpace space);
|
||||
CheckBox *withScreenPosition(float x, float y);
|
||||
CheckBox *withScreenPosition(const Vec2 &pos);
|
||||
CheckBox *withCameraOffset(float x, float y);
|
||||
CheckBox *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
void setChecked(bool checked);
|
||||
bool isChecked() const { return checked_; }
|
||||
void toggle();
|
||||
|
||||
void setLabel(const String &label);
|
||||
const String &getLabel() const { return label_; }
|
||||
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return textColor_; }
|
||||
|
||||
void setBoxSize(float size);
|
||||
float getBoxSize() const { return boxSize_; }
|
||||
|
||||
void setSpacing(float spacing);
|
||||
float getSpacing() const { return spacing_; }
|
||||
|
||||
void setCheckedColor(const Color &color);
|
||||
Color getCheckedColor() const { return checkedColor_; }
|
||||
|
||||
void setUncheckedColor(const Color &color);
|
||||
Color getUncheckedColor() const { return uncheckedColor_; }
|
||||
|
||||
void setCheckMarkColor(const Color &color);
|
||||
Color getCheckMarkColor() const { return checkMarkColor_; }
|
||||
|
||||
void setOnStateChange(Function<void(bool)> callback);
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
bool onMousePress(const MouseEvent &event) override;
|
||||
bool onMouseRelease(const MouseEvent &event) override;
|
||||
|
||||
private:
|
||||
bool checked_ = false;
|
||||
String label_;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color textColor_ = Colors::White;
|
||||
|
||||
float boxSize_ = 20.0f;
|
||||
float spacing_ = 8.0f;
|
||||
|
||||
Color checkedColor_ = Color(0.2f, 0.6f, 1.0f, 1.0f);
|
||||
Color uncheckedColor_ = Color(0.3f, 0.3f, 0.3f, 1.0f);
|
||||
Color checkMarkColor_ = Colors::White;
|
||||
|
||||
bool pressed_ = false;
|
||||
Function<void(bool)> onStateChange_;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,170 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 文本标签组件 - 用于显示静态文本
|
||||
// 支持多行、对齐、阴影、描边等游戏常用效果
|
||||
// ============================================================================
|
||||
class Label : public Widget {
|
||||
public:
|
||||
Label();
|
||||
explicit Label(const String &text);
|
||||
~Label() override = default;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
static Ptr<Label> create();
|
||||
static Ptr<Label> create(const String &text);
|
||||
static Ptr<Label> create(const String &text, Ptr<FontAtlas> font);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Label *withPosition(float x, float y);
|
||||
Label *withPosition(const Vec2 &pos);
|
||||
Label *withAnchor(float x, float y);
|
||||
Label *withAnchor(const Vec2 &anchor);
|
||||
Label *withText(const String &text);
|
||||
Label *withFont(Ptr<FontAtlas> font);
|
||||
Label *withTextColor(const Color &color);
|
||||
Label *withFontSize(int size);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 坐标空间设置（链式调用）
|
||||
// ------------------------------------------------------------------------
|
||||
Label *withCoordinateSpace(CoordinateSpace space);
|
||||
Label *withScreenPosition(float x, float y);
|
||||
Label *withScreenPosition(const Vec2 &pos);
|
||||
Label *withCameraOffset(float x, float y);
|
||||
Label *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文本内容
|
||||
// ------------------------------------------------------------------------
|
||||
void setText(const String &text);
|
||||
const String &getText() const { return text_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 字体设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字颜色
|
||||
// ------------------------------------------------------------------------
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return textColor_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 字体大小
|
||||
// ------------------------------------------------------------------------
|
||||
void setFontSize(int size);
|
||||
int getFontSize() const { return fontSize_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 水平对齐方式
|
||||
// ------------------------------------------------------------------------
|
||||
enum class HorizontalAlign { Left, Center, Right };
|
||||
|
||||
void setHorizontalAlign(HorizontalAlign align);
|
||||
HorizontalAlign getHorizontalAlign() const { return hAlign_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 垂直对齐方式
|
||||
// ------------------------------------------------------------------------
|
||||
enum class VerticalAlign { Top, Middle, Bottom };
|
||||
|
||||
void setVerticalAlign(VerticalAlign align);
|
||||
VerticalAlign getVerticalAlign() const { return vAlign_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 阴影效果
|
||||
// ------------------------------------------------------------------------
|
||||
void setShadowEnabled(bool enabled);
|
||||
bool isShadowEnabled() const { return shadowEnabled_; }
|
||||
|
||||
void setShadowColor(const Color &color);
|
||||
Color getShadowColor() const { return shadowColor_; }
|
||||
|
||||
void setShadowOffset(const Vec2 &offset);
|
||||
Vec2 getShadowOffset() const { return shadowOffset_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 描边效果
|
||||
// ------------------------------------------------------------------------
|
||||
void setOutlineEnabled(bool enabled);
|
||||
bool isOutlineEnabled() const { return outlineEnabled_; }
|
||||
|
||||
void setOutlineColor(const Color &color);
|
||||
Color getOutlineColor() const { return outlineColor_; }
|
||||
|
||||
void setOutlineWidth(float width);
|
||||
float getOutlineWidth() const { return outlineWidth_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 多行文本
|
||||
// ------------------------------------------------------------------------
|
||||
void setMultiLine(bool multiLine);
|
||||
bool isMultiLine() const { return multiLine_; }
|
||||
|
||||
void setLineSpacing(float spacing);
|
||||
float getLineSpacing() const { return lineSpacing_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 最大宽度（用于自动换行）
|
||||
// ------------------------------------------------------------------------
|
||||
void setMaxWidth(float maxWidth);
|
||||
float getMaxWidth() const { return maxWidth_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 尺寸计算
|
||||
// ------------------------------------------------------------------------
|
||||
Vec2 getTextSize() const;
|
||||
float getLineHeight() const;
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
|
||||
private:
|
||||
String text_;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color textColor_ = Colors::White;
|
||||
int fontSize_ = 16;
|
||||
|
||||
HorizontalAlign hAlign_ = HorizontalAlign::Left;
|
||||
VerticalAlign vAlign_ = VerticalAlign::Top;
|
||||
|
||||
// 阴影
|
||||
bool shadowEnabled_ = false;
|
||||
Color shadowColor_ = Color(0.0f, 0.0f, 0.0f, 0.5f);
|
||||
Vec2 shadowOffset_ = Vec2(2.0f, 2.0f);
|
||||
|
||||
// 描边
|
||||
bool outlineEnabled_ = false;
|
||||
Color outlineColor_ = Colors::Black;
|
||||
float outlineWidth_ = 1.0f;
|
||||
|
||||
// 多行
|
||||
bool multiLine_ = false;
|
||||
float lineSpacing_ = 1.0f;
|
||||
float maxWidth_ = 0.0f;
|
||||
|
||||
mutable Vec2 cachedSize_ = Vec2::Zero();
|
||||
mutable bool sizeDirty_ = true;
|
||||
|
||||
void updateCache() const;
|
||||
void drawText(RenderBackend &renderer, const Vec2 &position, const Color &color);
|
||||
Vec2 calculateDrawPosition() const;
|
||||
std::vector<String> splitLines() const;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,233 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 进度条组件 - 用于显示进度/百分比
|
||||
// 适用于血条、能量条、加载进度、经验条等游戏场景
|
||||
// ============================================================================
|
||||
class ProgressBar : public Widget {
|
||||
public:
|
||||
ProgressBar();
|
||||
~ProgressBar() override = default;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
static Ptr<ProgressBar> create();
|
||||
static Ptr<ProgressBar> create(float min, float max, float value);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法 - 坐标空间支持
|
||||
// ------------------------------------------------------------------------
|
||||
ProgressBar *withPosition(float x, float y);
|
||||
ProgressBar *withPosition(const Vec2 &pos);
|
||||
ProgressBar *withAnchor(float x, float y);
|
||||
ProgressBar *withAnchor(const Vec2 &anchor);
|
||||
ProgressBar *withSize(float width, float height);
|
||||
ProgressBar *withProgress(float progress);
|
||||
ProgressBar *withCoordinateSpace(CoordinateSpace space);
|
||||
ProgressBar *withScreenPosition(float x, float y);
|
||||
ProgressBar *withScreenPosition(const Vec2 &pos);
|
||||
ProgressBar *withCameraOffset(float x, float y);
|
||||
ProgressBar *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 数值范围
|
||||
// ------------------------------------------------------------------------
|
||||
void setRange(float min, float max);
|
||||
float getMin() const { return min_; }
|
||||
float getMax() const { return max_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 当前值
|
||||
// ------------------------------------------------------------------------
|
||||
void setValue(float value);
|
||||
float getValue() const { return value_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 获取百分比 (0.0 - 1.0)
|
||||
// ------------------------------------------------------------------------
|
||||
float getPercent() const;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 进度条方向
|
||||
// ------------------------------------------------------------------------
|
||||
enum class Direction { LeftToRight, RightToLeft, BottomToTop, TopToBottom };
|
||||
|
||||
void setDirection(Direction dir);
|
||||
Direction getDirection() const { return direction_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 颜色设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setBackgroundColor(const Color &color);
|
||||
Color getBackgroundColor() const { return bgColor_; }
|
||||
|
||||
void setFillColor(const Color &color);
|
||||
Color getFillColor() const { return fillColor_; }
|
||||
|
||||
// 渐变填充色（从 fillColor_ 到 fillColorEnd_）
|
||||
void setGradientFillEnabled(bool enabled);
|
||||
bool isGradientFillEnabled() const { return gradientEnabled_; }
|
||||
|
||||
void setFillColorEnd(const Color &color);
|
||||
Color getFillColorEnd() const { return fillColorEnd_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 分段颜色（根据百分比自动切换颜色）
|
||||
// ------------------------------------------------------------------------
|
||||
void setSegmentedColorsEnabled(bool enabled);
|
||||
bool isSegmentedColorsEnabled() const { return segmentedColorsEnabled_; }
|
||||
|
||||
// 设置分段阈值和颜色，例如：>70%绿色, >30%黄色, 其他红色
|
||||
void addColorSegment(float percentThreshold, const Color &color);
|
||||
void clearColorSegments();
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 圆角设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setCornerRadius(float radius);
|
||||
float getCornerRadius() const { return cornerRadius_; }
|
||||
|
||||
void setRoundedCornersEnabled(bool enabled);
|
||||
bool isRoundedCornersEnabled() const { return roundedCornersEnabled_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 边框设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setBorderEnabled(bool enabled);
|
||||
bool isBorderEnabled() const { return borderEnabled_; }
|
||||
|
||||
void setBorderColor(const Color &color);
|
||||
Color getBorderColor() const { return borderColor_; }
|
||||
|
||||
void setBorderWidth(float width);
|
||||
float getBorderWidth() const { return borderWidth_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 内边距（填充与边框的距离）
|
||||
// ------------------------------------------------------------------------
|
||||
void setPadding(float padding);
|
||||
float getPadding() const { return padding_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文本显示
|
||||
// ------------------------------------------------------------------------
|
||||
void setTextEnabled(bool enabled);
|
||||
bool isTextEnabled() const { return textEnabled_; }
|
||||
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return textColor_; }
|
||||
|
||||
// 文本格式："{value}/{max}", "{percent}%", "{value:.1f}" 等
|
||||
void setTextFormat(const String &format);
|
||||
const String &getTextFormat() const { return textFormat_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 动画效果
|
||||
// ------------------------------------------------------------------------
|
||||
void setAnimatedChangeEnabled(bool enabled);
|
||||
bool isAnimatedChangeEnabled() const { return animatedChangeEnabled_; }
|
||||
|
||||
void setAnimationSpeed(float speed); // 每秒变化量
|
||||
float getAnimationSpeed() const { return animationSpeed_; }
|
||||
|
||||
// 延迟显示效果（如LOL血条）
|
||||
void setDelayedDisplayEnabled(bool enabled);
|
||||
bool isDelayedDisplayEnabled() const { return delayedDisplayEnabled_; }
|
||||
|
||||
void setDelayTime(float seconds);
|
||||
float getDelayTime() const { return delayTime_; }
|
||||
|
||||
void setDelayedFillColor(const Color &color);
|
||||
Color getDelayedFillColor() const { return delayedFillColor_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 条纹效果
|
||||
// ------------------------------------------------------------------------
|
||||
void setStripedEnabled(bool enabled);
|
||||
bool isStripedEnabled() const { return stripedEnabled_; }
|
||||
|
||||
void setStripeColor(const Color &color);
|
||||
Color getStripeColor() const { return stripeColor_; }
|
||||
|
||||
void setStripeSpeed(float speed); // 条纹移动速度
|
||||
float getStripeSpeed() const { return stripeSpeed_; }
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onUpdate(float deltaTime) override;
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
|
||||
private:
|
||||
// 数值
|
||||
float min_ = 0.0f;
|
||||
float max_ = 100.0f;
|
||||
float value_ = 50.0f;
|
||||
|
||||
// 方向
|
||||
Direction direction_ = Direction::LeftToRight;
|
||||
|
||||
// 颜色
|
||||
Color bgColor_ = Color(0.2f, 0.2f, 0.2f, 1.0f);
|
||||
Color fillColor_ = Color(0.0f, 0.8f, 0.2f, 1.0f);
|
||||
Color fillColorEnd_ = Color(0.0f, 0.6f, 0.1f, 1.0f);
|
||||
bool gradientEnabled_ = false;
|
||||
|
||||
// 分段颜色
|
||||
bool segmentedColorsEnabled_ = false;
|
||||
std::vector<std::pair<float, Color>> colorSegments_;
|
||||
|
||||
// 圆角
|
||||
float cornerRadius_ = 4.0f;
|
||||
bool roundedCornersEnabled_ = true;
|
||||
|
||||
// 边框
|
||||
bool borderEnabled_ = false;
|
||||
Color borderColor_ = Colors::White;
|
||||
float borderWidth_ = 1.0f;
|
||||
|
||||
// 内边距
|
||||
float padding_ = 2.0f;
|
||||
|
||||
// 文本
|
||||
bool textEnabled_ = false;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color textColor_ = Colors::White;
|
||||
String textFormat_ = "{percent:.0f}%";
|
||||
|
||||
// 动画
|
||||
bool animatedChangeEnabled_ = false;
|
||||
float animationSpeed_ = 100.0f;
|
||||
float displayValue_ = 50.0f; // 用于动画的显示值
|
||||
|
||||
// 延迟显示
|
||||
bool delayedDisplayEnabled_ = false;
|
||||
float delayTime_ = 0.3f;
|
||||
float delayTimer_ = 0.0f;
|
||||
float delayedValue_ = 50.0f;
|
||||
Color delayedFillColor_ = Color(1.0f, 0.0f, 0.0f, 0.5f);
|
||||
|
||||
// 条纹
|
||||
bool stripedEnabled_ = false;
|
||||
Color stripeColor_ = Color(1.0f, 1.0f, 1.0f, 0.2f);
|
||||
float stripeSpeed_ = 50.0f;
|
||||
float stripeOffset_ = 0.0f;
|
||||
|
||||
Color getCurrentFillColor() const;
|
||||
String formatText() const;
|
||||
void drawRoundedRect(RenderBackend &renderer, const Rect &rect, const Color &color, float radius);
|
||||
void fillRoundedRect(RenderBackend &renderer, const Rect &rect, const Color &color, float radius);
|
||||
void drawStripes(RenderBackend &renderer, const Rect &rect);
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,113 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 单选按钮组件
|
||||
// ============================================================================
|
||||
class RadioButton : public Widget {
|
||||
public:
|
||||
RadioButton();
|
||||
~RadioButton() override = default;
|
||||
|
||||
static Ptr<RadioButton> create();
|
||||
static Ptr<RadioButton> create(const String &label);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
RadioButton *withPosition(float x, float y);
|
||||
RadioButton *withPosition(const Vec2 &pos);
|
||||
RadioButton *withAnchor(float x, float y);
|
||||
RadioButton *withAnchor(const Vec2 &anchor);
|
||||
RadioButton *withText(const String &text);
|
||||
RadioButton *withFont(Ptr<FontAtlas> font);
|
||||
RadioButton *withTextColor(const Color &color);
|
||||
RadioButton *withSize(float width, float height);
|
||||
RadioButton *withCoordinateSpace(CoordinateSpace space);
|
||||
RadioButton *withScreenPosition(float x, float y);
|
||||
RadioButton *withScreenPosition(const Vec2 &pos);
|
||||
RadioButton *withCameraOffset(float x, float y);
|
||||
RadioButton *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
void setSelected(bool selected);
|
||||
bool isSelected() const { return selected_; }
|
||||
|
||||
void setLabel(const String &label);
|
||||
const String &getLabel() const { return label_; }
|
||||
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return textColor_; }
|
||||
|
||||
void setCircleSize(float size);
|
||||
float getCircleSize() const { return circleSize_; }
|
||||
|
||||
void setSpacing(float spacing);
|
||||
float getSpacing() const { return spacing_; }
|
||||
|
||||
void setSelectedColor(const Color &color);
|
||||
Color getSelectedColor() const { return selectedColor_; }
|
||||
|
||||
void setUnselectedColor(const Color &color);
|
||||
Color getUnselectedColor() const { return unselectedColor_; }
|
||||
|
||||
void setDotColor(const Color &color);
|
||||
Color getDotColor() const { return dotColor_; }
|
||||
|
||||
void setGroupId(int groupId);
|
||||
int getGroupId() const { return groupId_; }
|
||||
|
||||
void setOnStateChange(Function<void(bool)> callback);
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
bool onMousePress(const MouseEvent &event) override;
|
||||
bool onMouseRelease(const MouseEvent &event) override;
|
||||
|
||||
private:
|
||||
bool selected_ = false;
|
||||
String label_;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color textColor_ = Colors::White;
|
||||
|
||||
float circleSize_ = 20.0f;
|
||||
float spacing_ = 8.0f;
|
||||
|
||||
Color selectedColor_ = Color(0.2f, 0.6f, 1.0f, 1.0f);
|
||||
Color unselectedColor_ = Color(0.3f, 0.3f, 0.3f, 1.0f);
|
||||
Color dotColor_ = Colors::White;
|
||||
|
||||
int groupId_ = 0; // 用于分组，同组内只能选一个
|
||||
|
||||
bool pressed_ = false;
|
||||
Function<void(bool)> onStateChange_;
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
// 单选按钮组管理器
|
||||
// ============================================================================
|
||||
class RadioButtonGroup {
|
||||
public:
|
||||
void addButton(RadioButton *button);
|
||||
void removeButton(RadioButton *button);
|
||||
void selectButton(RadioButton *button);
|
||||
RadioButton *getSelectedButton() const { return selectedButton_; }
|
||||
|
||||
void setOnSelectionChange(Function<void(RadioButton*)> callback);
|
||||
|
||||
private:
|
||||
std::vector<RadioButton*> buttons_;
|
||||
RadioButton *selectedButton_ = nullptr;
|
||||
Function<void(RadioButton*)> onSelectionChange_;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,142 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 滑动条组件
|
||||
// ============================================================================
|
||||
class Slider : public Widget {
|
||||
public:
|
||||
Slider();
|
||||
~Slider() override = default;
|
||||
|
||||
static Ptr<Slider> create();
|
||||
static Ptr<Slider> create(float min, float max, float value);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Slider *withPosition(float x, float y);
|
||||
Slider *withPosition(const Vec2 &pos);
|
||||
Slider *withAnchor(float x, float y);
|
||||
Slider *withAnchor(const Vec2 &anchor);
|
||||
Slider *withSize(float width, float height);
|
||||
Slider *withMinValue(float min);
|
||||
Slider *withMaxValue(float max);
|
||||
Slider *withValue(float value);
|
||||
Slider *withCoordinateSpace(CoordinateSpace space);
|
||||
Slider *withScreenPosition(float x, float y);
|
||||
Slider *withScreenPosition(const Vec2 &pos);
|
||||
Slider *withCameraOffset(float x, float y);
|
||||
Slider *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
void setRange(float min, float max);
|
||||
float getMin() const { return min_; }
|
||||
float getMax() const { return max_; }
|
||||
|
||||
void setValue(float value);
|
||||
float getValue() const { return value_; }
|
||||
|
||||
void setStep(float step);
|
||||
float getStep() const { return step_; }
|
||||
|
||||
void setVertical(bool vertical);
|
||||
bool isVertical() const { return vertical_; }
|
||||
|
||||
void setTrackSize(float size);
|
||||
float getTrackSize() const { return trackSize_; }
|
||||
|
||||
void setThumbSize(float size);
|
||||
float getThumbSize() const { return thumbSize_; }
|
||||
|
||||
void setTrackColor(const Color &color);
|
||||
Color getTrackColor() const { return trackColor_; }
|
||||
|
||||
void setFillColor(const Color &color);
|
||||
Color getFillColor() const { return fillColor_; }
|
||||
|
||||
void setThumbColor(const Color &color);
|
||||
Color getThumbColor() const { return thumbColor_; }
|
||||
|
||||
void setThumbHoverColor(const Color &color);
|
||||
Color getThumbHoverColor() const { return thumbHoverColor_; }
|
||||
|
||||
void setThumbPressedColor(const Color &color);
|
||||
Color getThumbPressedColor() const { return thumbPressedColor_; }
|
||||
|
||||
void setShowThumb(bool show);
|
||||
bool isShowThumb() const { return showThumb_; }
|
||||
|
||||
void setShowFill(bool show);
|
||||
bool isShowFill() const { return showFill_; }
|
||||
|
||||
void setTextEnabled(bool enabled);
|
||||
bool isTextEnabled() const { return textEnabled_; }
|
||||
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return textColor_; }
|
||||
|
||||
void setTextFormat(const String &format);
|
||||
const String &getTextFormat() const { return textFormat_; }
|
||||
|
||||
void setOnValueChange(Function<void(float)> callback);
|
||||
void setOnDragStart(Function<void()> callback);
|
||||
void setOnDragEnd(Function<void()> callback);
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
protected:
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
bool onMousePress(const MouseEvent &event) override;
|
||||
bool onMouseRelease(const MouseEvent &event) override;
|
||||
bool onMouseMove(const MouseEvent &event) override;
|
||||
void onMouseEnter() override;
|
||||
void onMouseLeave() override;
|
||||
|
||||
private:
|
||||
float min_ = 0.0f;
|
||||
float max_ = 100.0f;
|
||||
float value_ = 50.0f;
|
||||
float step_ = 0.0f; // 0表示无步进
|
||||
|
||||
bool vertical_ = false;
|
||||
float trackSize_ = 6.0f;
|
||||
float thumbSize_ = 16.0f;
|
||||
|
||||
Color trackColor_ = Color(0.3f, 0.3f, 0.3f, 1.0f);
|
||||
Color fillColor_ = Color(0.2f, 0.6f, 1.0f, 1.0f);
|
||||
Color thumbColor_ = Color(0.8f, 0.8f, 0.8f, 1.0f);
|
||||
Color thumbHoverColor_ = Color(1.0f, 1.0f, 1.0f, 1.0f);
|
||||
Color thumbPressedColor_ = Color(0.6f, 0.6f, 0.6f, 1.0f);
|
||||
|
||||
bool showThumb_ = true;
|
||||
bool showFill_ = true;
|
||||
|
||||
bool textEnabled_ = false;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color textColor_ = Colors::White;
|
||||
String textFormat_ = "{value:.0f}";
|
||||
|
||||
bool dragging_ = false;
|
||||
bool hovered_ = false;
|
||||
|
||||
Function<void(float)> onValueChange_;
|
||||
Function<void()> onDragStart_;
|
||||
Function<void()> onDragEnd_;
|
||||
|
||||
float valueToPosition(float value) const;
|
||||
float positionToValue(float pos) const;
|
||||
Rect getThumbRect() const;
|
||||
Rect getTrackRect() const;
|
||||
String formatText() const;
|
||||
float snapToStep(float value) const;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,157 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/color.h>
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/graphics/font.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
#include <cstdarg>
|
||||
#include <cstdio>
|
||||
#include <string>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 文本组件 - 继承自 Widget 的 UI 组件
|
||||
// ============================================================================
|
||||
class Text : public Widget {
|
||||
public:
|
||||
// ------------------------------------------------------------------------
|
||||
// 对齐方式枚举
|
||||
// ------------------------------------------------------------------------
|
||||
enum class Alignment { Left, Center, Right };
|
||||
enum class VerticalAlignment { Top, Middle, Bottom };
|
||||
|
||||
Text();
|
||||
explicit Text(const String &text);
|
||||
~Text() override = default;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
static Ptr<Text> create();
|
||||
static Ptr<Text> create(const String &text);
|
||||
static Ptr<Text> create(const String &text, Ptr<FontAtlas> font);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 格式化创建方法（类似 printf）
|
||||
// 使用示例：
|
||||
// auto text = Text::createFormat("FPS: %d", 60);
|
||||
// auto text = Text::createFormat(font, "得分: %d", score);
|
||||
// ------------------------------------------------------------------------
|
||||
static Ptr<Text> createFormat(const char *fmt, ...);
|
||||
static Ptr<Text> createFormat(Ptr<FontAtlas> font, const char *fmt, ...);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Text *withPosition(float x, float y);
|
||||
Text *withPosition(const Vec2 &pos);
|
||||
Text *withAnchor(float x, float y);
|
||||
Text *withAnchor(const Vec2 &anchor);
|
||||
Text *withTextColor(const Color &color);
|
||||
Text *withFont(Ptr<FontAtlas> font);
|
||||
Text *withFontSize(int size);
|
||||
Text *withAlignment(Alignment align);
|
||||
Text *withVerticalAlignment(VerticalAlignment align);
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字内容
|
||||
// ------------------------------------------------------------------------
|
||||
void setText(const String &text);
|
||||
const String &getText() const { return text_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 格式化文本设置（类似 printf）
|
||||
// 使用示例：
|
||||
// text->setFormat("FPS: %d", 60);
|
||||
// text->setFormat("位置: (%.1f, %.1f)", x, y);
|
||||
// text->setFormat("生命值: %d/100", hp);
|
||||
// ------------------------------------------------------------------------
|
||||
void setFormat(const char *fmt, ...) {
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
char buffer[256];
|
||||
vsnprintf(buffer, sizeof(buffer), fmt, args);
|
||||
va_end(args);
|
||||
text_ = buffer;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
// 链式调用的格式化方法
|
||||
// 注意：由于C++可变参数的限制，链式调用需要单独设置格式和值
|
||||
Text *withFormattedText(const char *fmt, ...) {
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
char buffer[256];
|
||||
vsnprintf(buffer, sizeof(buffer), fmt, args);
|
||||
va_end(args);
|
||||
text_ = buffer;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 字体
|
||||
// ------------------------------------------------------------------------
|
||||
void setFont(Ptr<FontAtlas> font);
|
||||
Ptr<FontAtlas> getFont() const { return font_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 文字属性
|
||||
// ------------------------------------------------------------------------
|
||||
void setTextColor(const Color &color);
|
||||
Color getTextColor() const { return color_; }
|
||||
|
||||
void setFontSize(int size);
|
||||
int getFontSize() const { return fontSize_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 对齐方式
|
||||
// ------------------------------------------------------------------------
|
||||
void setAlignment(Alignment align);
|
||||
Alignment getAlignment() const { return alignment_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 垂直对齐方式
|
||||
// ------------------------------------------------------------------------
|
||||
void setVerticalAlignment(VerticalAlignment align);
|
||||
VerticalAlignment getVerticalAlignment() const { return verticalAlignment_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 尺寸计算
|
||||
// ------------------------------------------------------------------------
|
||||
Vec2 getTextSize() const;
|
||||
float getLineHeight() const;
|
||||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
Text *withCoordinateSpace(CoordinateSpace space);
|
||||
Text *withScreenPosition(float x, float y);
|
||||
Text *withScreenPosition(const Vec2 &pos);
|
||||
Text *withCameraOffset(float x, float y);
|
||||
Text *withCameraOffset(const Vec2 &offset);
|
||||
|
||||
protected:
|
||||
void onDrawWidget(RenderBackend &renderer) override;
|
||||
|
||||
private:
|
||||
String text_;
|
||||
Ptr<FontAtlas> font_;
|
||||
Color color_ = Colors::White;
|
||||
int fontSize_ = 16;
|
||||
Alignment alignment_ = Alignment::Left;
|
||||
VerticalAlignment verticalAlignment_ = VerticalAlignment::Top;
|
||||
|
||||
mutable Vec2 cachedSize_ = Vec2::Zero();
|
||||
mutable bool sizeDirty_ = true;
|
||||
|
||||
void updateCache() const;
|
||||
Vec2 calculateDrawPosition() const;
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,9 +1,34 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/core/math_types.h>
|
||||
#include <extra2d/core/types.h>
|
||||
#include <extra2d/platform/input.h>
|
||||
#include <extra2d/scene/node.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// 鼠标事件结构
|
||||
// ============================================================================
|
||||
struct MouseEvent {
|
||||
MouseButton button;
|
||||
float x;
|
||||
float y;
|
||||
int mods; // 修饰键状态
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
// 坐标空间枚举 - 定义 UI 组件的渲染坐标空间
|
||||
// ============================================================================
|
||||
enum class CoordinateSpace {
|
||||
Screen, // 屏幕空间 - 固定位置，不随相机移动
|
||||
World, // 世界空间 - 随相机移动（默认行为）
|
||||
Camera, // 相机空间 - 相对于相机位置的偏移
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
// Widget 基类 - UI 组件的基础
|
||||
// ============================================================================
|
||||
class Widget : public Node {
|
||||
public:
|
||||
Widget();
|
||||
|
|
@ -15,8 +40,72 @@ public:
|
|||
|
||||
Rect getBoundingBox() const override;
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
void setCoordinateSpace(CoordinateSpace space);
|
||||
CoordinateSpace getCoordinateSpace() const { return coordinateSpace_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 屏幕空间位置设置（仅在 Screen 空间下有效）
|
||||
// ------------------------------------------------------------------------
|
||||
void setScreenPosition(const Vec2 &pos);
|
||||
void setScreenPosition(float x, float y);
|
||||
Vec2 getScreenPosition() const { return screenPosition_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 相机空间偏移设置（仅在 Camera 空间下有效）
|
||||
// ------------------------------------------------------------------------
|
||||
void setCameraOffset(const Vec2 &offset);
|
||||
void setCameraOffset(float x, float y);
|
||||
Vec2 getCameraOffset() const { return cameraOffset_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 鼠标事件处理（子类可重写）
|
||||
// ------------------------------------------------------------------------
|
||||
virtual bool onMousePress(const MouseEvent &event) { return false; }
|
||||
virtual bool onMouseRelease(const MouseEvent &event) { return false; }
|
||||
virtual bool onMouseMove(const MouseEvent &event) { return false; }
|
||||
virtual void onMouseEnter() {}
|
||||
virtual void onMouseLeave() {}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 启用/禁用状态
|
||||
// ------------------------------------------------------------------------
|
||||
void setEnabled(bool enabled) { enabled_ = enabled; }
|
||||
bool isEnabled() const { return enabled_; }
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 焦点状态
|
||||
// ------------------------------------------------------------------------
|
||||
void setFocused(bool focused) { focused_ = focused; }
|
||||
bool isFocused() const { return focused_; }
|
||||
|
||||
protected:
|
||||
// 供子类使用的辅助方法
|
||||
bool isPointInside(float x, float y) const {
|
||||
return getBoundingBox().containsPoint(Point(x, y));
|
||||
}
|
||||
|
||||
// 获取实际渲染位置（根据坐标空间计算）
|
||||
Vec2 getRenderPosition() const;
|
||||
|
||||
// 子类重写此方法以支持自定义渲染
|
||||
virtual void onDrawWidget(RenderBackend &renderer) {}
|
||||
|
||||
// 重写 Node 的 onDraw 以处理坐标空间
|
||||
void onDraw(RenderBackend &renderer) override;
|
||||
|
||||
private:
|
||||
Size size_ = Size::Zero();
|
||||
bool enabled_ = true;
|
||||
bool focused_ = false;
|
||||
bool hovered_ = false;
|
||||
|
||||
// 坐标空间相关
|
||||
CoordinateSpace coordinateSpace_ = CoordinateSpace::World;
|
||||
Vec2 screenPosition_ = Vec2::Zero(); // 屏幕空间位置
|
||||
Vec2 cameraOffset_ = Vec2::Zero(); // 相机空间偏移
|
||||
};
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
|
|||
|
|
@ -1,218 +1,48 @@
|
|||
#include <cstdint>
|
||||
#include <cstring>
|
||||
#include <extra2d/core/string.h>
|
||||
|
||||
#ifdef _WIN32
|
||||
#include <windows.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// ============================================================================
|
||||
// GBK/GB2312 到 UTF-8 转换表
|
||||
// 使用简化的转换表，覆盖常用中文字符
|
||||
// ============================================================================
|
||||
std::string utf8ToGbkImpl(const std::string& utf8) {
|
||||
if (utf8.empty()) return std::string();
|
||||
|
||||
// GBK 编码范围：
|
||||
// - 单字节：0x00-0x7F (ASCII)
|
||||
// - 双字节：0x81-0xFE 0x40-0xFE
|
||||
// UTF-8 → Wide → GBK
|
||||
int wideLen = MultiByteToWideChar(CP_UTF8, 0, utf8.c_str(), -1, nullptr, 0);
|
||||
if (wideLen <= 0) return std::string();
|
||||
|
||||
// 将 GBK 双字节解码为 Unicode 码点
|
||||
// 这是简化的实现，使用 GBK 到 Unicode 的映射公式
|
||||
static uint32_t gbkToUnicode(uint16_t gbkCode) {
|
||||
// GBK 编码转 Unicode 的简化算法
|
||||
// 对于常见汉字，使用近似转换
|
||||
std::wstring wide(wideLen - 1, 0);
|
||||
MultiByteToWideChar(CP_UTF8, 0, utf8.c_str(), -1, &wide[0], wideLen);
|
||||
|
||||
uint8_t high = (gbkCode >> 8) & 0xFF;
|
||||
uint8_t low = gbkCode & 0xFF;
|
||||
int gbkLen = WideCharToMultiByte(CP_ACP, 0, wide.c_str(), -1, nullptr, 0, nullptr, nullptr);
|
||||
if (gbkLen <= 0) return std::string();
|
||||
|
||||
// ASCII 范围
|
||||
if (high < 0x80) {
|
||||
return high;
|
||||
}
|
||||
std::string gbk(gbkLen - 1, 0);
|
||||
WideCharToMultiByte(CP_ACP, 0, wide.c_str(), -1, &gbk[0], gbkLen, nullptr, nullptr);
|
||||
|
||||
// GBK 双字节范围
|
||||
if (high >= 0x81 && high <= 0xFE && low >= 0x40 && low <= 0xFE) {
|
||||
// GBK 到 Unicode 的偏移计算（近似）
|
||||
// GB2312 区域：0xB0A1-0xF7FE -> Unicode 0x4E00-0x9FA5
|
||||
if (high >= 0xB0 && high <= 0xF7 && low >= 0xA1 && low <= 0xFE) {
|
||||
uint32_t area = high - 0xB0;
|
||||
uint32_t pos = low - 0xA1;
|
||||
return 0x4E00 + area * 94 + pos;
|
||||
}
|
||||
|
||||
// 其他 GBK 区域使用线性映射
|
||||
uint32_t gbkOffset = (high - 0x81) * 190 + (low - 0x40);
|
||||
if (low > 0x7F) {
|
||||
gbkOffset--;
|
||||
}
|
||||
|
||||
// 映射到扩展 Unicode 区域
|
||||
return 0x4E00 + (gbkOffset % 0x51A5);
|
||||
}
|
||||
|
||||
// 无效字符返回替换字符
|
||||
return 0xFFFD;
|
||||
return gbk;
|
||||
}
|
||||
|
||||
// 将 Unicode 码点编码为 UTF-8
|
||||
static std::string unicodeToUtf8(uint32_t codepoint) {
|
||||
std::string result;
|
||||
std::string gbkToUtf8Impl(const std::string& gbk) {
|
||||
if (gbk.empty()) return std::string();
|
||||
|
||||
if (codepoint <= 0x7F) {
|
||||
// 1-byte
|
||||
result.push_back(static_cast<char>(codepoint));
|
||||
} else if (codepoint <= 0x7FF) {
|
||||
// 2-byte
|
||||
result.push_back(static_cast<char>(0xC0 | ((codepoint >> 6) & 0x1F)));
|
||||
result.push_back(static_cast<char>(0x80 | (codepoint & 0x3F)));
|
||||
} else if (codepoint <= 0xFFFF) {
|
||||
// 3-byte
|
||||
result.push_back(static_cast<char>(0xE0 | ((codepoint >> 12) & 0x0F)));
|
||||
result.push_back(static_cast<char>(0x80 | ((codepoint >> 6) & 0x3F)));
|
||||
result.push_back(static_cast<char>(0x80 | (codepoint & 0x3F)));
|
||||
} else if (codepoint <= 0x10FFFF) {
|
||||
// 4-byte
|
||||
result.push_back(static_cast<char>(0xF0 | ((codepoint >> 18) & 0x07)));
|
||||
result.push_back(static_cast<char>(0x80 | ((codepoint >> 12) & 0x3F)));
|
||||
result.push_back(static_cast<char>(0x80 | ((codepoint >> 6) & 0x3F)));
|
||||
result.push_back(static_cast<char>(0x80 | (codepoint & 0x3F)));
|
||||
}
|
||||
// GBK → Wide → UTF-8
|
||||
int wideLen = MultiByteToWideChar(CP_ACP, 0, gbk.c_str(), -1, nullptr, 0);
|
||||
if (wideLen <= 0) return std::string();
|
||||
|
||||
return result;
|
||||
}
|
||||
std::wstring wide(wideLen - 1, 0);
|
||||
MultiByteToWideChar(CP_ACP, 0, gbk.c_str(), -1, &wide[0], wideLen);
|
||||
|
||||
// 将 UTF-8 解码为 Unicode 码点
|
||||
// 返回解码后的码点和消耗的 UTF-8 字节数
|
||||
static std::pair<uint32_t, size_t> utf8ToUnicode(const char *utf8) {
|
||||
unsigned char byte = static_cast<unsigned char>(*utf8);
|
||||
int utf8Len = WideCharToMultiByte(CP_UTF8, 0, wide.c_str(), -1, nullptr, 0, nullptr, nullptr);
|
||||
if (utf8Len <= 0) return std::string();
|
||||
|
||||
if ((byte & 0x80) == 0) {
|
||||
// 1-byte
|
||||
return {byte, 1};
|
||||
} else if ((byte & 0xE0) == 0xC0) {
|
||||
// 2-byte
|
||||
uint32_t ch = (byte & 0x1F) << 6;
|
||||
ch |= (static_cast<unsigned char>(utf8[1]) & 0x3F);
|
||||
return {ch, 2};
|
||||
} else if ((byte & 0xF0) == 0xE0) {
|
||||
// 3-byte
|
||||
uint32_t ch = (byte & 0x0F) << 12;
|
||||
ch |= (static_cast<unsigned char>(utf8[1]) & 0x3F) << 6;
|
||||
ch |= (static_cast<unsigned char>(utf8[2]) & 0x3F);
|
||||
return {ch, 3};
|
||||
} else if ((byte & 0xF8) == 0xF0) {
|
||||
// 4-byte
|
||||
uint32_t ch = (byte & 0x07) << 18;
|
||||
ch |= (static_cast<unsigned char>(utf8[1]) & 0x3F) << 12;
|
||||
ch |= (static_cast<unsigned char>(utf8[2]) & 0x3F) << 6;
|
||||
ch |= (static_cast<unsigned char>(utf8[3]) & 0x3F);
|
||||
return {ch, 4};
|
||||
}
|
||||
std::string utf8(utf8Len - 1, 0);
|
||||
WideCharToMultiByte(CP_UTF8, 0, wide.c_str(), -1, &utf8[0], utf8Len, nullptr, nullptr);
|
||||
|
||||
// Invalid UTF-8
|
||||
return {0xFFFD, 1};
|
||||
}
|
||||
|
||||
// 将 Unicode 码点编码为 GBK 双字节
|
||||
static uint16_t unicodeToGbk(uint32_t unicode) {
|
||||
// ASCII 范围
|
||||
if (unicode <= 0x7F) {
|
||||
return static_cast<uint16_t>(unicode);
|
||||
}
|
||||
|
||||
// CJK Unified Ideographs (U+4E00 - U+9FA5) -> GB2312
|
||||
if (unicode >= 0x4E00 && unicode <= 0x9FA5) {
|
||||
uint32_t offset = unicode - 0x4E00;
|
||||
uint32_t area = offset / 94;
|
||||
uint32_t pos = offset % 94;
|
||||
|
||||
uint8_t high = static_cast<uint8_t>(0xB0 + area);
|
||||
uint8_t low = static_cast<uint8_t>(0xA1 + pos);
|
||||
|
||||
return (static_cast<uint16_t>(high) << 8) | low;
|
||||
}
|
||||
|
||||
// 其他字符无法转换，返回 '?'
|
||||
return 0x3F;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// String 类 GBK 转换实现
|
||||
// ============================================================================
|
||||
|
||||
String String::fromGBK(const char *gbk) {
|
||||
if (!gbk || std::strlen(gbk) == 0) {
|
||||
return String();
|
||||
}
|
||||
|
||||
return fromGBK(std::string(gbk));
|
||||
}
|
||||
|
||||
String String::fromGBK(const std::string &gbk) {
|
||||
if (gbk.empty()) {
|
||||
return String();
|
||||
}
|
||||
|
||||
std::string utf8Result;
|
||||
utf8Result.reserve(gbk.size() * 2); // 预估 UTF-8 可能比 GBK 大
|
||||
|
||||
size_t i = 0;
|
||||
while (i < gbk.size()) {
|
||||
unsigned char byte = static_cast<unsigned char>(gbk[i]);
|
||||
|
||||
if (byte < 0x80) {
|
||||
// ASCII 字符，直接复制
|
||||
utf8Result.push_back(static_cast<char>(byte));
|
||||
i++;
|
||||
} else if (i + 1 < gbk.size()) {
|
||||
// GBK 双字节字符
|
||||
uint8_t high = byte;
|
||||
uint8_t low = static_cast<unsigned char>(gbk[i + 1]);
|
||||
uint16_t gbkCode = (static_cast<uint16_t>(high) << 8) | low;
|
||||
|
||||
uint32_t unicode = gbkToUnicode(gbkCode);
|
||||
utf8Result += unicodeToUtf8(unicode);
|
||||
|
||||
i += 2;
|
||||
} else {
|
||||
// 不完整的 GBK 字符，跳过
|
||||
i++;
|
||||
}
|
||||
}
|
||||
|
||||
return String(utf8Result);
|
||||
}
|
||||
|
||||
std::string String::toGBK() const {
|
||||
if (data_.empty()) {
|
||||
return std::string();
|
||||
}
|
||||
|
||||
std::string gbkResult;
|
||||
gbkResult.reserve(data_.size()); // 预估 GBK 可能更小或与 UTF-8 相当
|
||||
|
||||
size_t i = 0;
|
||||
while (i < data_.size()) {
|
||||
auto [unicode, bytes] = utf8ToUnicode(data_.c_str() + i);
|
||||
|
||||
if (unicode <= 0x7F) {
|
||||
// ASCII 字符
|
||||
gbkResult.push_back(static_cast<char>(unicode));
|
||||
} else {
|
||||
// 转换为 GBK 双字节
|
||||
uint16_t gbkCode = unicodeToGbk(unicode);
|
||||
|
||||
if (gbkCode > 0xFF) {
|
||||
// 双字节 GBK
|
||||
gbkResult.push_back(static_cast<char>((gbkCode >> 8) & 0xFF));
|
||||
gbkResult.push_back(static_cast<char>(gbkCode & 0xFF));
|
||||
} else {
|
||||
// 单字节（ASCII）
|
||||
gbkResult.push_back(static_cast<char>(gbkCode));
|
||||
}
|
||||
}
|
||||
|
||||
i += bytes;
|
||||
}
|
||||
|
||||
return gbkResult;
|
||||
return utf8;
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
||||
#endif // _WIN32
|
||||
|
|
|
|||
|
|
@ -1,11 +1,12 @@
|
|||
#include <extra2d/graphics/opengl/gl_font_atlas.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <extra2d/utils/logger.h>
|
||||
#include <fstream>
|
||||
#define STB_TRUETYPE_IMPLEMENTATION
|
||||
#include <stb/stb_truetype.h>
|
||||
#define STB_RECT_PACK_IMPLEMENTATION
|
||||
#include <algorithm>
|
||||
#include <extra2d/utils/logger.h>
|
||||
#include <fstream>
|
||||
#include <stb/stb_rect_pack.h>
|
||||
#include <algorithm>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
|
|
@ -74,7 +75,7 @@ Vec2 GLFontAtlas::measureText(const String &text) {
|
|||
float height = getAscent() - getDescent();
|
||||
float currentWidth = 0.0f;
|
||||
|
||||
for (char32_t codepoint : text.toUtf32()) {
|
||||
for (char32_t codepoint : utf8ToUtf32(text)) {
|
||||
if (codepoint == '\n') {
|
||||
width = std::max(width, currentWidth);
|
||||
currentWidth = 0.0f;
|
||||
|
|
|
|||
|
|
@ -2,6 +2,7 @@
|
|||
#include <algorithm>
|
||||
#include <cmath>
|
||||
#include <cstring>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <extra2d/graphics/opengl/gl_font_atlas.h>
|
||||
#include <extra2d/graphics/opengl/gl_renderer.h>
|
||||
#include <extra2d/graphics/opengl/gl_texture.h>
|
||||
|
|
@ -366,7 +367,7 @@ void GLRenderer::drawText(const FontAtlas &font, const String &text, float x,
|
|||
float cursorY = y;
|
||||
float baselineY = cursorY + font.getAscent();
|
||||
|
||||
for (char32_t codepoint : text.toUtf32()) {
|
||||
for (char32_t codepoint : utf8ToUtf32(text)) {
|
||||
if (codepoint == '\n') {
|
||||
cursorX = x;
|
||||
cursorY += font.getLineHeight();
|
||||
|
|
|
|||
|
|
@ -1,145 +0,0 @@
|
|||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/graphics/render_command.h>
|
||||
#include <extra2d/scene/text.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
Text::Text() {
|
||||
// 文字默认锚点为左上角，这样setPosition(0, 0)会在左上角显示
|
||||
setAnchor(0.0f, 0.0f);
|
||||
}
|
||||
|
||||
Text::Text(const String &text) : text_(text) {
|
||||
sizeDirty_ = true;
|
||||
// 文字默认锚点为左上角，这样setPosition(0, 0)会在左上角显示
|
||||
setAnchor(0.0f, 0.0f);
|
||||
}
|
||||
|
||||
void Text::setText(const String &text) {
|
||||
text_ = text;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setTextColor(const Color &color) { color_ = color; }
|
||||
|
||||
void Text::setFontSize(int size) {
|
||||
fontSize_ = size;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setAlignment(Alignment align) {
|
||||
alignment_ = align;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
Vec2 Text::getTextSize() const {
|
||||
updateCache();
|
||||
return cachedSize_;
|
||||
}
|
||||
|
||||
float Text::getLineHeight() const {
|
||||
if (font_) {
|
||||
return font_->getLineHeight();
|
||||
}
|
||||
return static_cast<float>(fontSize_);
|
||||
}
|
||||
|
||||
void Text::updateCache() const {
|
||||
if (!sizeDirty_ || !font_) {
|
||||
return;
|
||||
}
|
||||
|
||||
cachedSize_ = font_->measureText(text_);
|
||||
sizeDirty_ = false;
|
||||
}
|
||||
|
||||
Ptr<Text> Text::create() { return makePtr<Text>(); }
|
||||
|
||||
Ptr<Text> Text::create(const String &text) { return makePtr<Text>(text); }
|
||||
|
||||
Ptr<Text> Text::create(const String &text, Ptr<FontAtlas> font) {
|
||||
auto t = makePtr<Text>(text);
|
||||
t->setFont(font);
|
||||
return t;
|
||||
}
|
||||
|
||||
Rect Text::getBoundingBox() const {
|
||||
if (!font_ || text_.empty()) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
updateCache();
|
||||
Vec2 size = cachedSize_;
|
||||
if (size.x <= 0.0f || size.y <= 0.0f) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
Vec2 pos = getPosition();
|
||||
|
||||
if (alignment_ != Alignment::Left) {
|
||||
if (alignment_ == Alignment::Center) {
|
||||
pos.x -= size.x * 0.5f;
|
||||
} else if (alignment_ == Alignment::Right) {
|
||||
pos.x -= size.x;
|
||||
}
|
||||
}
|
||||
|
||||
return Rect(pos.x, pos.y, size.x, size.y);
|
||||
}
|
||||
|
||||
void Text::onDraw(RenderBackend &renderer) {
|
||||
if (!font_ || text_.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
Vec2 pos = getPosition();
|
||||
|
||||
// Calculate horizontal offset based on alignment
|
||||
if (alignment_ != Alignment::Left) {
|
||||
Vec2 size = getTextSize();
|
||||
if (alignment_ == Alignment::Center) {
|
||||
pos.x -= size.x * 0.5f;
|
||||
} else if (alignment_ == Alignment::Right) {
|
||||
pos.x -= size.x;
|
||||
}
|
||||
}
|
||||
|
||||
renderer.drawText(*font_, text_, pos, color_);
|
||||
}
|
||||
|
||||
void Text::generateRenderCommand(std::vector<RenderCommand> &commands,
|
||||
int zOrder) {
|
||||
if (!font_ || text_.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
Vec2 pos = getPosition();
|
||||
|
||||
// 计算对齐偏移（与 onDraw 一致）
|
||||
if (alignment_ != Alignment::Left) {
|
||||
Vec2 size = getTextSize();
|
||||
if (alignment_ == Alignment::Center) {
|
||||
pos.x -= size.x * 0.5f;
|
||||
} else if (alignment_ == Alignment::Right) {
|
||||
pos.x -= size.x;
|
||||
}
|
||||
}
|
||||
|
||||
// 创建渲染命令
|
||||
RenderCommand cmd;
|
||||
cmd.type = RenderCommandType::Text;
|
||||
cmd.zOrder = zOrder;
|
||||
cmd.data = TextData{font_, text_, pos, color_};
|
||||
|
||||
commands.push_back(std::move(cmd));
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,187 +0,0 @@
|
|||
#include <cstdarg>
|
||||
#include <extra2d/script/script_engine.h>
|
||||
#include <extra2d/script/sq_binding_action.h>
|
||||
#include <extra2d/script/sq_binding_animation.h>
|
||||
#include <extra2d/script/sq_binding_audio.h>
|
||||
#include <extra2d/script/sq_binding_input.h>
|
||||
#include <extra2d/script/sq_binding_node.h>
|
||||
#include <extra2d/script/sq_binding_types.h>
|
||||
#include <extra2d/utils/logger.h>
|
||||
#include <fstream>
|
||||
#include <sqstdaux.h>
|
||||
#include <sqstdblob.h>
|
||||
#include <sqstdio.h>
|
||||
#include <sqstdmath.h>
|
||||
#include <sqstdstring.h>
|
||||
#include <sstream>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
ScriptEngine &ScriptEngine::getInstance() {
|
||||
static ScriptEngine instance;
|
||||
return instance;
|
||||
}
|
||||
|
||||
ScriptEngine::~ScriptEngine() { shutdown(); }
|
||||
|
||||
bool ScriptEngine::initialize() {
|
||||
if (vm_)
|
||||
return true;
|
||||
|
||||
vm_ = sq_open(1024);
|
||||
if (!vm_) {
|
||||
E2D_ERROR("ScriptEngine: failed to create Squirrel VM");
|
||||
return false;
|
||||
}
|
||||
|
||||
sq_setprintfunc(vm_, printFunc, errorFunc);
|
||||
sq_setcompilererrorhandler(vm_, compilerError);
|
||||
|
||||
sq_pushroottable(vm_);
|
||||
|
||||
// Register standard libraries
|
||||
sqstd_register_mathlib(vm_);
|
||||
sqstd_register_stringlib(vm_);
|
||||
sqstd_register_bloblib(vm_);
|
||||
sqstd_register_iolib(vm_);
|
||||
|
||||
// Set error handler
|
||||
sq_newclosure(vm_, errorHandler, 0);
|
||||
sq_seterrorhandler(vm_);
|
||||
|
||||
sq_pop(vm_, 1); // pop root table
|
||||
|
||||
// Register Easy2D bindings
|
||||
sq::registerValueTypes(vm_);
|
||||
sq::registerNodeBindings(vm_);
|
||||
sq::registerInputBindings(vm_);
|
||||
sq::registerActionBindings(vm_);
|
||||
sq::registerAudioBindings(vm_);
|
||||
sq::registerAnimationBindings(vm_);
|
||||
|
||||
// Register global log function
|
||||
sq_pushroottable(vm_);
|
||||
sq_pushstring(vm_, "log", -1);
|
||||
sq_newclosure(
|
||||
vm_,
|
||||
[](HSQUIRRELVM v) -> SQInteger {
|
||||
const SQChar *msg = nullptr;
|
||||
sq_getstring(v, 2, &msg);
|
||||
if (msg)
|
||||
E2D_INFO("[Script] {}", msg);
|
||||
return 0;
|
||||
},
|
||||
0);
|
||||
sq_newslot(vm_, -3, SQFalse);
|
||||
sq_pop(vm_, 1);
|
||||
|
||||
E2D_INFO("ScriptEngine: Squirrel VM initialized (v{})", SQUIRREL_VERSION);
|
||||
return true;
|
||||
}
|
||||
|
||||
void ScriptEngine::shutdown() {
|
||||
if (vm_) {
|
||||
sq_close(vm_);
|
||||
vm_ = nullptr;
|
||||
E2D_INFO("ScriptEngine: Squirrel VM shut down");
|
||||
}
|
||||
}
|
||||
|
||||
bool ScriptEngine::executeString(const std::string &code) {
|
||||
if (!vm_) {
|
||||
E2D_ERROR("ScriptEngine: VM not initialized");
|
||||
return false;
|
||||
}
|
||||
return compileAndRun(code, "<string>");
|
||||
}
|
||||
|
||||
bool ScriptEngine::executeFile(const std::string &filepath) {
|
||||
if (!vm_) {
|
||||
E2D_ERROR("ScriptEngine: VM not initialized");
|
||||
return false;
|
||||
}
|
||||
|
||||
std::ifstream file(filepath);
|
||||
if (!file.is_open()) {
|
||||
E2D_ERROR("ScriptEngine: cannot open file '{}'", filepath);
|
||||
return false;
|
||||
}
|
||||
|
||||
std::ostringstream ss;
|
||||
ss << file.rdbuf();
|
||||
return compileAndRun(ss.str(), filepath);
|
||||
}
|
||||
|
||||
bool ScriptEngine::compileAndRun(const std::string &source,
|
||||
const std::string &sourceName) {
|
||||
SQInteger top = sq_gettop(vm_);
|
||||
|
||||
sq_pushroottable(vm_);
|
||||
|
||||
if (SQ_FAILED(sq_compilebuffer(vm_, source.c_str(),
|
||||
static_cast<SQInteger>(source.size()),
|
||||
sourceName.c_str(), SQTrue))) {
|
||||
sq_settop(vm_, top);
|
||||
return false;
|
||||
}
|
||||
|
||||
sq_push(vm_, -2); // push root table as 'this'
|
||||
|
||||
if (SQ_FAILED(sq_call(vm_, 1, SQFalse, SQTrue))) {
|
||||
sq_settop(vm_, top);
|
||||
return false;
|
||||
}
|
||||
|
||||
sq_settop(vm_, top);
|
||||
return true;
|
||||
}
|
||||
|
||||
void ScriptEngine::printFunc(HSQUIRRELVM, const SQChar *fmt, ...) {
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
char buf[2048];
|
||||
vsnprintf(buf, sizeof(buf), fmt, args);
|
||||
va_end(args);
|
||||
E2D_INFO("[Squirrel] {}", buf);
|
||||
}
|
||||
|
||||
void ScriptEngine::errorFunc(HSQUIRRELVM, const SQChar *fmt, ...) {
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
char buf[2048];
|
||||
vsnprintf(buf, sizeof(buf), fmt, args);
|
||||
va_end(args);
|
||||
E2D_ERROR("[Squirrel] {}", buf);
|
||||
}
|
||||
|
||||
SQInteger ScriptEngine::errorHandler(HSQUIRRELVM vm) {
|
||||
const SQChar *errMsg = nullptr;
|
||||
if (sq_gettop(vm) >= 1) {
|
||||
if (SQ_FAILED(sq_getstring(vm, 2, &errMsg))) {
|
||||
errMsg = "unknown error";
|
||||
}
|
||||
}
|
||||
|
||||
// Print call stack
|
||||
SQStackInfos si;
|
||||
SQInteger level = 1;
|
||||
E2D_ERROR("[Squirrel] Runtime error: {}", errMsg ? errMsg : "unknown");
|
||||
|
||||
while (SQ_SUCCEEDED(sq_stackinfos(vm, level, &si))) {
|
||||
const SQChar *fn = si.funcname ? si.funcname : "unknown";
|
||||
const SQChar *src = si.source ? si.source : "unknown";
|
||||
E2D_ERROR(" [{}] {}:{} in {}", level, src, si.line, fn);
|
||||
++level;
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
void ScriptEngine::compilerError(HSQUIRRELVM, const SQChar *desc,
|
||||
const SQChar *source, SQInteger line,
|
||||
SQInteger column) {
|
||||
E2D_ERROR("[Squirrel] Compile error: {}:{}:{}: {}", source, line, column,
|
||||
desc);
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,202 +0,0 @@
|
|||
#include <extra2d/script/script_node.h>
|
||||
#include <extra2d/script/sq_binding.h>
|
||||
#include <extra2d/script/sq_binding_node.h>
|
||||
#include <extra2d/utils/logger.h>
|
||||
#include <fstream>
|
||||
#include <sstream>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
// SqClassName needed for pushPtr<Node> which ScriptNode inherits
|
||||
namespace sq {
|
||||
// Already defined in sq_binding_node.cpp, but we need it here for pushPtr
|
||||
template <> struct SqClassName<Node> {
|
||||
static const char *name() { return "Node"; }
|
||||
};
|
||||
} // namespace sq
|
||||
|
||||
ScriptNode::ScriptNode() { sq_resetobject(&scriptTable_); }
|
||||
|
||||
ScriptNode::~ScriptNode() {
|
||||
if (tableValid_) {
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
if (engine.isInitialized()) {
|
||||
sq_release(engine.getVM(), &scriptTable_);
|
||||
}
|
||||
tableValid_ = false;
|
||||
}
|
||||
}
|
||||
|
||||
Ptr<ScriptNode> ScriptNode::create(const std::string &scriptPath) {
|
||||
auto node = makePtr<ScriptNode>();
|
||||
if (!node->loadScript(scriptPath)) {
|
||||
E2D_ERROR("ScriptNode: failed to load '{}'", scriptPath);
|
||||
}
|
||||
return node;
|
||||
}
|
||||
|
||||
bool ScriptNode::loadScript(const std::string &scriptPath) {
|
||||
scriptPath_ = scriptPath;
|
||||
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
if (!engine.isInitialized()) {
|
||||
E2D_ERROR("ScriptNode: ScriptEngine not initialized");
|
||||
return false;
|
||||
}
|
||||
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
|
||||
// Read file
|
||||
std::ifstream file(scriptPath);
|
||||
if (!file.is_open()) {
|
||||
E2D_ERROR("ScriptNode: cannot open '{}'", scriptPath);
|
||||
return false;
|
||||
}
|
||||
std::ostringstream ss;
|
||||
ss << file.rdbuf();
|
||||
std::string source = ss.str();
|
||||
|
||||
SQInteger top = sq_gettop(vm);
|
||||
|
||||
// Compile
|
||||
sq_pushroottable(vm);
|
||||
if (SQ_FAILED(sq_compilebuffer(vm, source.c_str(),
|
||||
static_cast<SQInteger>(source.size()),
|
||||
scriptPath.c_str(), SQTrue))) {
|
||||
sq_settop(vm, top);
|
||||
return false;
|
||||
}
|
||||
|
||||
sq_push(vm, -2); // root table as 'this'
|
||||
|
||||
// Execute — expect a return value (the table)
|
||||
if (SQ_FAILED(sq_call(vm, 1, SQTrue, SQTrue))) {
|
||||
sq_settop(vm, top);
|
||||
return false;
|
||||
}
|
||||
|
||||
// Check if return value is a table
|
||||
if (sq_gettype(vm, -1) == OT_TABLE) {
|
||||
sq_getstackobj(vm, -1, &scriptTable_);
|
||||
sq_addref(vm, &scriptTable_);
|
||||
tableValid_ = true;
|
||||
} else {
|
||||
E2D_WARN("ScriptNode: '{}' did not return a table", scriptPath);
|
||||
}
|
||||
|
||||
sq_settop(vm, top);
|
||||
return tableValid_;
|
||||
}
|
||||
|
||||
void ScriptNode::onEnter() {
|
||||
Node::onEnter();
|
||||
if (tableValid_) {
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
SQInteger top = sq_gettop(vm);
|
||||
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
sq_pushstring(vm, "onEnter", -1);
|
||||
if (SQ_SUCCEEDED(sq_get(vm, -2))) {
|
||||
sq_pushobject(vm, scriptTable_); // 'this' = script table
|
||||
pushSelf(); // arg: node
|
||||
sq_call(vm, 2, SQFalse, SQTrue);
|
||||
sq_pop(vm, 1); // pop closure
|
||||
}
|
||||
|
||||
sq_settop(vm, top);
|
||||
}
|
||||
}
|
||||
|
||||
void ScriptNode::onExit() {
|
||||
if (tableValid_) {
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
SQInteger top = sq_gettop(vm);
|
||||
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
sq_pushstring(vm, "onExit", -1);
|
||||
if (SQ_SUCCEEDED(sq_get(vm, -2))) {
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
pushSelf();
|
||||
sq_call(vm, 2, SQFalse, SQTrue);
|
||||
sq_pop(vm, 1);
|
||||
}
|
||||
|
||||
sq_settop(vm, top);
|
||||
}
|
||||
Node::onExit();
|
||||
}
|
||||
|
||||
void ScriptNode::onUpdate(float dt) {
|
||||
Node::onUpdate(dt);
|
||||
if (tableValid_) {
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
SQInteger top = sq_gettop(vm);
|
||||
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
sq_pushstring(vm, "onUpdate", -1);
|
||||
if (SQ_SUCCEEDED(sq_get(vm, -2))) {
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
pushSelf();
|
||||
sq_pushfloat(vm, dt);
|
||||
sq_call(vm, 3, SQFalse, SQTrue);
|
||||
sq_pop(vm, 1);
|
||||
}
|
||||
|
||||
sq_settop(vm, top);
|
||||
}
|
||||
}
|
||||
|
||||
void ScriptNode::pushSelf() {
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
|
||||
// Push this node as a Node instance with shared_ptr
|
||||
auto self = std::dynamic_pointer_cast<Node>(shared_from_this());
|
||||
sq::pushPtr(vm, self);
|
||||
}
|
||||
|
||||
bool ScriptNode::callMethod(const char *name) {
|
||||
if (!tableValid_)
|
||||
return false;
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
SQInteger top = sq_gettop(vm);
|
||||
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
sq_pushstring(vm, name, -1);
|
||||
if (SQ_FAILED(sq_get(vm, -2))) {
|
||||
sq_settop(vm, top);
|
||||
return false;
|
||||
}
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
pushSelf();
|
||||
bool ok = SQ_SUCCEEDED(sq_call(vm, 2, SQFalse, SQTrue));
|
||||
sq_settop(vm, top);
|
||||
return ok;
|
||||
}
|
||||
|
||||
bool ScriptNode::callMethodWithFloat(const char *name, float arg) {
|
||||
if (!tableValid_)
|
||||
return false;
|
||||
auto &engine = ScriptEngine::getInstance();
|
||||
HSQUIRRELVM vm = engine.getVM();
|
||||
SQInteger top = sq_gettop(vm);
|
||||
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
sq_pushstring(vm, name, -1);
|
||||
if (SQ_FAILED(sq_get(vm, -2))) {
|
||||
sq_settop(vm, top);
|
||||
return false;
|
||||
}
|
||||
sq_pushobject(vm, scriptTable_);
|
||||
pushSelf();
|
||||
sq_pushfloat(vm, arg);
|
||||
bool ok = SQ_SUCCEEDED(sq_call(vm, 3, SQFalse, SQTrue));
|
||||
sq_settop(vm, top);
|
||||
return ok;
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,222 +0,0 @@
|
|||
#include <extra2d/action/action.h>
|
||||
#include <extra2d/action/actions.h>
|
||||
#include <extra2d/script/sq_binding_action.h>
|
||||
#include <extra2d/script/sq_binding_types.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// Actions are stored as Ptr<Action> in userdata (they use raw new in C++ API
|
||||
// but we wrap them in shared_ptr for the script bridge)
|
||||
|
||||
template <> struct SqClassName<Action> {
|
||||
static const char *name() { return "Action"; }
|
||||
};
|
||||
|
||||
// Helper: wrap a raw Action* into Ptr<Action> and push it
|
||||
static void pushAction(HSQUIRRELVM vm, Action *raw) {
|
||||
Ptr<Action> ptr(raw);
|
||||
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, "Action", -1);
|
||||
if (SQ_FAILED(sq_get(vm, -2))) {
|
||||
sq_pop(vm, 1);
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
if (SQ_FAILED(sq_createinstance(vm, -1))) {
|
||||
sq_pop(vm, 2);
|
||||
sq_pushnull(vm);
|
||||
return;
|
||||
}
|
||||
|
||||
auto *storage = new Ptr<Action>(std::move(ptr));
|
||||
sq_setinstanceup(vm, -1, storage);
|
||||
sq_setreleasehook(vm, -1, [](SQUserPointer p, SQInteger) -> SQInteger {
|
||||
delete static_cast<Ptr<Action> *>(p);
|
||||
return 0;
|
||||
});
|
||||
|
||||
sq_remove(vm, -2); // class
|
||||
sq_remove(vm, -2); // roottable
|
||||
}
|
||||
|
||||
static Ptr<Action> getAction(HSQUIRRELVM vm, SQInteger idx) {
|
||||
SQUserPointer up = nullptr;
|
||||
sq_getinstanceup(vm, idx, &up, nullptr, SQFalse);
|
||||
if (!up)
|
||||
return nullptr;
|
||||
return *static_cast<Ptr<Action> *>(up);
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Factory functions (registered as global functions)
|
||||
// ============================================================================
|
||||
static SQInteger sqMoveTo(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
Vec2 *pos = getValueInstance<Vec2>(vm, 3);
|
||||
if (!pos)
|
||||
return sq_throwerror(vm, "expected Vec2");
|
||||
pushAction(vm, new MoveTo(dur, *pos));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqMoveBy(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
Vec2 *delta = getValueInstance<Vec2>(vm, 3);
|
||||
if (!delta)
|
||||
return sq_throwerror(vm, "expected Vec2");
|
||||
pushAction(vm, new MoveBy(dur, *delta));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqScaleTo(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 4) {
|
||||
float sx = static_cast<float>(getFloat(vm, 3));
|
||||
float sy = static_cast<float>(getFloat(vm, 4));
|
||||
pushAction(vm, new ScaleTo(dur, sx, sy));
|
||||
} else {
|
||||
float s = static_cast<float>(getFloat(vm, 3));
|
||||
pushAction(vm, new ScaleTo(dur, s));
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqRotateTo(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
float angle = static_cast<float>(getFloat(vm, 3));
|
||||
pushAction(vm, new RotateTo(dur, angle));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqRotateBy(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
float angle = static_cast<float>(getFloat(vm, 3));
|
||||
pushAction(vm, new RotateBy(dur, angle));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqFadeIn(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
pushAction(vm, new FadeIn(dur));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqFadeOut(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
pushAction(vm, new FadeOut(dur));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqFadeTo(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
float opacity = static_cast<float>(getFloat(vm, 3));
|
||||
pushAction(vm, new FadeTo(dur, opacity));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqDelay(HSQUIRRELVM vm) {
|
||||
float dur = static_cast<float>(getFloat(vm, 2));
|
||||
pushAction(vm, new Delay(dur));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqSequence(HSQUIRRELVM vm) {
|
||||
// arg 2 is an array of actions
|
||||
SQInteger size = sq_getsize(vm, 2);
|
||||
std::vector<Action *> actions;
|
||||
actions.reserve(size);
|
||||
for (SQInteger i = 0; i < size; ++i) {
|
||||
sq_pushinteger(vm, i);
|
||||
sq_get(vm, 2);
|
||||
auto a = getAction(vm, -1);
|
||||
if (a)
|
||||
actions.push_back(a->clone());
|
||||
sq_pop(vm, 1);
|
||||
}
|
||||
if (actions.empty())
|
||||
return sq_throwerror(vm, "empty sequence");
|
||||
pushAction(vm, new Sequence(actions));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqSpawn(HSQUIRRELVM vm) {
|
||||
SQInteger size = sq_getsize(vm, 2);
|
||||
std::vector<Action *> actions;
|
||||
actions.reserve(size);
|
||||
for (SQInteger i = 0; i < size; ++i) {
|
||||
sq_pushinteger(vm, i);
|
||||
sq_get(vm, 2);
|
||||
auto a = getAction(vm, -1);
|
||||
if (a)
|
||||
actions.push_back(a->clone());
|
||||
sq_pop(vm, 1);
|
||||
}
|
||||
if (actions.empty())
|
||||
return sq_throwerror(vm, "empty spawn");
|
||||
pushAction(vm, new Spawn(actions));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqLoop(HSQUIRRELVM vm) {
|
||||
auto a = getAction(vm, 2);
|
||||
if (!a)
|
||||
return sq_throwerror(vm, "null action");
|
||||
int times = -1;
|
||||
if (sq_gettop(vm) >= 3)
|
||||
times = static_cast<int>(getInt(vm, 3));
|
||||
pushAction(vm, new Loop(a->clone(), times));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sqCallFunc(HSQUIRRELVM vm) {
|
||||
// arg 2 is a Squirrel closure
|
||||
HSQOBJECT closure;
|
||||
sq_resetobject(&closure);
|
||||
sq_getstackobj(vm, 2, &closure);
|
||||
sq_addref(vm, &closure);
|
||||
|
||||
HSQUIRRELVM capturedVM = vm;
|
||||
HSQOBJECT capturedClosure = closure;
|
||||
|
||||
pushAction(vm, new CallFunc([capturedVM, capturedClosure]() mutable {
|
||||
sq_pushobject(capturedVM, capturedClosure);
|
||||
sq_pushroottable(capturedVM);
|
||||
sq_call(capturedVM, 1, SQFalse, SQTrue);
|
||||
sq_pop(capturedVM, 1); // pop closure
|
||||
}));
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerActionBindings(HSQUIRRELVM vm) {
|
||||
// Base Action class (used as container)
|
||||
ClassDef(vm, "Action").setTypeTag(typeTag<Action>()).commit();
|
||||
|
||||
// Register global factory functions
|
||||
auto regFunc = [&](const char *name, SQFUNCTION fn) {
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, name, -1);
|
||||
sq_newclosure(vm, fn, 0);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 1);
|
||||
};
|
||||
|
||||
regFunc("MoveTo", sqMoveTo);
|
||||
regFunc("MoveBy", sqMoveBy);
|
||||
regFunc("ScaleTo", sqScaleTo);
|
||||
regFunc("RotateTo", sqRotateTo);
|
||||
regFunc("RotateBy", sqRotateBy);
|
||||
regFunc("FadeIn", sqFadeIn);
|
||||
regFunc("FadeOut", sqFadeOut);
|
||||
regFunc("FadeTo", sqFadeTo);
|
||||
regFunc("Delay", sqDelay);
|
||||
regFunc("Sequence", sqSequence);
|
||||
regFunc("Spawn", sqSpawn);
|
||||
regFunc("Loop", sqLoop);
|
||||
regFunc("CallFunc", sqCallFunc);
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,277 +0,0 @@
|
|||
#include <extra2d/animation/animated_sprite.h>
|
||||
#include <extra2d/animation/animation_cache.h>
|
||||
#include <extra2d/animation/animation_clip.h>
|
||||
#include <extra2d/app/application.h>
|
||||
#include <extra2d/graphics/texture.h>
|
||||
#include <extra2d/resource/resource_manager.h>
|
||||
#include <extra2d/script/sq_binding_animation.h>
|
||||
#include <extra2d/script/sq_binding_node.h>
|
||||
#include <extra2d/script/sq_binding_types.h>
|
||||
#include <extra2d/utils/logger.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// SqClassName specialization for AnimatedSprite
|
||||
template <> struct SqClassName<AnimatedSprite> {
|
||||
static const char *name() { return "AnimatedSprite"; }
|
||||
};
|
||||
|
||||
// AnimatedSprite inherits Sprite -> Node, all stored as Ptr<Node>
|
||||
|
||||
// 从精灵图创建 AnimatedSprite（网格布局）
|
||||
// AnimatedSprite.createFromGrid(texturePath, frameWidth, frameHeight,
|
||||
// frameDurationMs, frameCount)
|
||||
static SQInteger animSpriteCreateFromGrid(HSQUIRRELVM vm) {
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc < 4) {
|
||||
return sq_throwerror(vm, "createFromGrid requires at least 3 arguments: "
|
||||
"texturePath, frameWidth, frameHeight");
|
||||
}
|
||||
|
||||
std::string path = getString(vm, 2);
|
||||
int frameWidth = static_cast<int>(getInt(vm, 3));
|
||||
int frameHeight = static_cast<int>(getInt(vm, 4));
|
||||
|
||||
float frameDurationMs = 100.0f;
|
||||
if (argc >= 5) {
|
||||
frameDurationMs = static_cast<float>(getFloat(vm, 5));
|
||||
}
|
||||
|
||||
int frameCount = -1;
|
||||
if (argc >= 6) {
|
||||
frameCount = static_cast<int>(getInt(vm, 6));
|
||||
}
|
||||
|
||||
// 加载纹理
|
||||
auto &resources = Application::instance().resources();
|
||||
auto texture = resources.loadTexture(path);
|
||||
if (!texture) {
|
||||
E2D_ERROR("Failed to load texture: {}", path);
|
||||
pushNull(vm);
|
||||
return 1;
|
||||
}
|
||||
|
||||
// 创建动画片段
|
||||
auto clip = AnimationClip::createFromGrid(texture, frameWidth, frameHeight,
|
||||
frameDurationMs, frameCount);
|
||||
if (!clip || clip->empty()) {
|
||||
E2D_ERROR("Failed to create animation clip from grid");
|
||||
pushNull(vm);
|
||||
return 1;
|
||||
}
|
||||
clip->setLooping(true);
|
||||
|
||||
// 创建 AnimatedSprite
|
||||
auto sprite = AnimatedSprite::create(clip);
|
||||
sprite->setApplyFrameTransform(false);
|
||||
|
||||
pushPtr<AnimatedSprite>(vm, sprite);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteCreate(HSQUIRRELVM vm) {
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
Ptr<AnimatedSprite> sprite;
|
||||
if (argc >= 2 && sq_gettype(vm, 2) == OT_STRING) {
|
||||
std::string path = getString(vm, 2);
|
||||
sprite = AnimatedSprite::create(path);
|
||||
} else {
|
||||
sprite = AnimatedSprite::create();
|
||||
}
|
||||
pushPtr<AnimatedSprite>(vm, sprite);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger animSpritePlay(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 2 && sq_gettype(vm, 2) == OT_STRING) {
|
||||
std::string name = getString(vm, 2);
|
||||
bool loop = true;
|
||||
if (argc >= 3)
|
||||
loop = getBool(vm, 3);
|
||||
anim->play(name, loop);
|
||||
} else {
|
||||
anim->play();
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpritePause(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->pause();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteResume(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->resume();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteStop(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->stop();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteReset(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->reset();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteIsPlaying(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
push(vm, anim->isPlaying());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteSetLooping(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->setLooping(getBool(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteSetPlaybackSpeed(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->setPlaybackSpeed(static_cast<float>(getFloat(vm, 2)));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteAddAnimation(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
std::string name = getString(vm, 2);
|
||||
std::string path = getString(vm, 3);
|
||||
auto clip = AnimationCache::getInstance().loadClip(path);
|
||||
if (clip)
|
||||
anim->addAnimation(name, clip);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteLoadAnimation(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
std::string path = getString(vm, 2);
|
||||
anim->loadAnimation(path);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteSetAutoPlay(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->setAutoPlay(getBool(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteGetCurrentFrameIndex(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
push(vm, static_cast<int>(anim->getCurrentFrameIndex()));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteGetTotalFrames(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
push(vm, static_cast<int>(anim->getTotalFrames()));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteSetFrameRange(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
int start = static_cast<int>(getInt(vm, 2));
|
||||
int end = -1;
|
||||
if (sq_gettop(vm) >= 3) {
|
||||
end = static_cast<int>(getInt(vm, 3));
|
||||
}
|
||||
anim->setFrameRange(start, end);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteSetFrameIndex(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
int index = static_cast<int>(getInt(vm, 2));
|
||||
anim->setFrameIndex(static_cast<size_t>(index));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger animSpriteSetApplyFrameTransform(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *anim = dynamic_cast<AnimatedSprite *>(node.get());
|
||||
if (!anim)
|
||||
return sq_throwerror(vm, "not an AnimatedSprite");
|
||||
anim->setApplyFrameTransform(getBool(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
void registerAnimationBindings(HSQUIRRELVM vm) {
|
||||
// Register SqClassName for AnimatedSprite
|
||||
ClassDef(vm, "AnimatedSprite", "Sprite")
|
||||
.setTypeTag(typeTag<AnimatedSprite>())
|
||||
.staticMethod("create", animSpriteCreate)
|
||||
.staticMethod("createFromGrid", animSpriteCreateFromGrid)
|
||||
.method("play", animSpritePlay)
|
||||
.method("pause", animSpritePause)
|
||||
.method("resume", animSpriteResume)
|
||||
.method("stop", animSpriteStop)
|
||||
.method("reset", animSpriteReset)
|
||||
.method("isPlaying", animSpriteIsPlaying)
|
||||
.method("setLooping", animSpriteSetLooping)
|
||||
.method("setPlaybackSpeed", animSpriteSetPlaybackSpeed)
|
||||
.method("addAnimation", animSpriteAddAnimation)
|
||||
.method("loadAnimation", animSpriteLoadAnimation)
|
||||
.method("setAutoPlay", animSpriteSetAutoPlay)
|
||||
.method("getCurrentFrameIndex", animSpriteGetCurrentFrameIndex)
|
||||
.method("getTotalFrames", animSpriteGetTotalFrames)
|
||||
.method("setFrameRange", animSpriteSetFrameRange)
|
||||
.method("setFrameIndex", animSpriteSetFrameIndex)
|
||||
.method("setApplyFrameTransform", animSpriteSetApplyFrameTransform)
|
||||
.commit();
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,91 +0,0 @@
|
|||
#include <extra2d/audio/audio_engine.h>
|
||||
#include <extra2d/audio/sound.h>
|
||||
#include <extra2d/script/sq_binding_audio.h>
|
||||
#include <extra2d/script/sq_binding_types.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// ============================================================================
|
||||
// AudioEngine singleton
|
||||
// ============================================================================
|
||||
static SQInteger audioLoadSound(HSQUIRRELVM vm) {
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
std::shared_ptr<Sound> snd;
|
||||
if (argc >= 3) {
|
||||
std::string name = getString(vm, 2);
|
||||
std::string path = getString(vm, 3);
|
||||
snd = AudioEngine::getInstance().loadSound(name, path);
|
||||
} else {
|
||||
std::string path = getString(vm, 2);
|
||||
snd = AudioEngine::getInstance().loadSound(path);
|
||||
}
|
||||
push(vm, snd != nullptr);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger audioPlaySound(HSQUIRRELVM vm) {
|
||||
std::string name = getString(vm, 2);
|
||||
auto snd = AudioEngine::getInstance().getSound(name);
|
||||
if (snd)
|
||||
snd->play();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger audioStopSound(HSQUIRRELVM vm) {
|
||||
std::string name = getString(vm, 2);
|
||||
auto snd = AudioEngine::getInstance().getSound(name);
|
||||
if (snd)
|
||||
snd->stop();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger audioSetMasterVolume(HSQUIRRELVM vm) {
|
||||
float vol = static_cast<float>(getFloat(vm, 2));
|
||||
AudioEngine::getInstance().setMasterVolume(vol);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger audioGetMasterVolume(HSQUIRRELVM vm) {
|
||||
push(vm, AudioEngine::getInstance().getMasterVolume());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger audioStopAll(HSQUIRRELVM vm) {
|
||||
AudioEngine::getInstance().stopAll();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger audioPauseAll(HSQUIRRELVM vm) {
|
||||
AudioEngine::getInstance().pauseAll();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger audioResumeAll(HSQUIRRELVM vm) {
|
||||
AudioEngine::getInstance().resumeAll();
|
||||
return 0;
|
||||
}
|
||||
|
||||
void registerAudioBindings(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "AudioEngineClass")
|
||||
.method("loadSound", audioLoadSound)
|
||||
.method("playSound", audioPlaySound)
|
||||
.method("stopSound", audioStopSound)
|
||||
.method("setMasterVolume", audioSetMasterVolume)
|
||||
.method("getMasterVolume", audioGetMasterVolume)
|
||||
.method("stopAll", audioStopAll)
|
||||
.method("pauseAll", audioPauseAll)
|
||||
.method("resumeAll", audioResumeAll)
|
||||
.commit();
|
||||
|
||||
// Global "Audio" instance
|
||||
pushSingleton(vm, &AudioEngine::getInstance(), "AudioEngineClass");
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, "Audio", -1);
|
||||
sq_push(vm, -3);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 2);
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,288 +0,0 @@
|
|||
#include <extra2d/app/application.h>
|
||||
#include <extra2d/event/input_codes.h>
|
||||
#include <extra2d/platform/input.h>
|
||||
#include <extra2d/script/sq_binding_input.h>
|
||||
#include <extra2d/script/sq_binding_types.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// ============================================================================
|
||||
// Input singleton bindings
|
||||
// ============================================================================
|
||||
static SQInteger inputIsKeyDown(HSQUIRRELVM vm) {
|
||||
int key = static_cast<int>(getInt(vm, 2));
|
||||
push(vm, Application::instance().input().isKeyDown(key));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputIsKeyPressed(HSQUIRRELVM vm) {
|
||||
int key = static_cast<int>(getInt(vm, 2));
|
||||
push(vm, Application::instance().input().isKeyPressed(key));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputIsKeyReleased(HSQUIRRELVM vm) {
|
||||
int key = static_cast<int>(getInt(vm, 2));
|
||||
push(vm, Application::instance().input().isKeyReleased(key));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputIsMouseDown(HSQUIRRELVM vm) {
|
||||
int btn = static_cast<int>(getInt(vm, 2));
|
||||
push(vm, Application::instance().input().isMouseDown(
|
||||
static_cast<MouseButton>(btn)));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputIsMousePressed(HSQUIRRELVM vm) {
|
||||
int btn = static_cast<int>(getInt(vm, 2));
|
||||
push(vm, Application::instance().input().isMousePressed(
|
||||
static_cast<MouseButton>(btn)));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputIsMouseReleased(HSQUIRRELVM vm) {
|
||||
int btn = static_cast<int>(getInt(vm, 2));
|
||||
push(vm, Application::instance().input().isMouseReleased(
|
||||
static_cast<MouseButton>(btn)));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputGetMousePosition(HSQUIRRELVM vm) {
|
||||
pushValueInstance(vm, Application::instance().input().getMousePosition());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputGetMouseDelta(HSQUIRRELVM vm) {
|
||||
pushValueInstance(vm, Application::instance().input().getMouseDelta());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger inputGetMouseScroll(HSQUIRRELVM vm) {
|
||||
push(vm, Application::instance().input().getMouseScroll());
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerInput(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "InputClass")
|
||||
.method("isKeyDown", inputIsKeyDown)
|
||||
.method("isKeyPressed", inputIsKeyPressed)
|
||||
.method("isKeyReleased", inputIsKeyReleased)
|
||||
.method("isMouseDown", inputIsMouseDown)
|
||||
.method("isMousePressed", inputIsMousePressed)
|
||||
.method("isMouseReleased", inputIsMouseReleased)
|
||||
.method("getMousePosition", inputGetMousePosition)
|
||||
.method("getMouseDelta", inputGetMouseDelta)
|
||||
.method("getMouseScroll", inputGetMouseScroll)
|
||||
.commit();
|
||||
|
||||
// Global "Input" instance
|
||||
pushSingleton(vm, &Application::instance().input(), "InputClass");
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, "Input", -1);
|
||||
sq_push(vm, -3);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 2);
|
||||
}
|
||||
|
||||
void registerKeyConstants(HSQUIRRELVM vm) {
|
||||
// Key constants table
|
||||
static const char *const keyNames[] = {"Space",
|
||||
"Apostrophe",
|
||||
"Comma",
|
||||
"Minus",
|
||||
"Period",
|
||||
"Slash",
|
||||
"Num0",
|
||||
"Num1",
|
||||
"Num2",
|
||||
"Num3",
|
||||
"Num4",
|
||||
"Num5",
|
||||
"Num6",
|
||||
"Num7",
|
||||
"Num8",
|
||||
"Num9",
|
||||
"Semicolon",
|
||||
"Equal",
|
||||
"A",
|
||||
"B",
|
||||
"C",
|
||||
"D",
|
||||
"E",
|
||||
"F",
|
||||
"G",
|
||||
"H",
|
||||
"I",
|
||||
"J",
|
||||
"K",
|
||||
"L",
|
||||
"M",
|
||||
"N",
|
||||
"O",
|
||||
"P",
|
||||
"Q",
|
||||
"R",
|
||||
"S",
|
||||
"T",
|
||||
"U",
|
||||
"V",
|
||||
"W",
|
||||
"X",
|
||||
"Y",
|
||||
"Z",
|
||||
"LeftBracket",
|
||||
"Backslash",
|
||||
"RightBracket",
|
||||
"GraveAccent",
|
||||
"Escape",
|
||||
"Enter",
|
||||
"Tab",
|
||||
"Backspace",
|
||||
"Insert",
|
||||
"Delete",
|
||||
"Right",
|
||||
"Left",
|
||||
"Down",
|
||||
"Up",
|
||||
"PageUp",
|
||||
"PageDown",
|
||||
"Home",
|
||||
"End",
|
||||
"CapsLock",
|
||||
"ScrollLock",
|
||||
"NumLock",
|
||||
"PrintScreen",
|
||||
"Pause",
|
||||
"F1",
|
||||
"F2",
|
||||
"F3",
|
||||
"F4",
|
||||
"F5",
|
||||
"F6",
|
||||
"F7",
|
||||
"F8",
|
||||
"F9",
|
||||
"F10",
|
||||
"F11",
|
||||
"F12",
|
||||
"LeftShift",
|
||||
"LeftControl",
|
||||
"LeftAlt",
|
||||
"LeftSuper",
|
||||
"RightShift",
|
||||
"RightControl",
|
||||
"RightAlt",
|
||||
"RightSuper",
|
||||
"Menu"};
|
||||
static const SQInteger keyValues[] = {Key::Space,
|
||||
Key::Apostrophe,
|
||||
Key::Comma,
|
||||
Key::Minus,
|
||||
Key::Period,
|
||||
Key::Slash,
|
||||
Key::Num0,
|
||||
Key::Num1,
|
||||
Key::Num2,
|
||||
Key::Num3,
|
||||
Key::Num4,
|
||||
Key::Num5,
|
||||
Key::Num6,
|
||||
Key::Num7,
|
||||
Key::Num8,
|
||||
Key::Num9,
|
||||
Key::Semicolon,
|
||||
Key::Equal,
|
||||
Key::A,
|
||||
Key::B,
|
||||
Key::C,
|
||||
Key::D,
|
||||
Key::E,
|
||||
Key::F,
|
||||
Key::G,
|
||||
Key::H,
|
||||
Key::I,
|
||||
Key::J,
|
||||
Key::K,
|
||||
Key::L,
|
||||
Key::M,
|
||||
Key::N,
|
||||
Key::O,
|
||||
Key::P,
|
||||
Key::Q,
|
||||
Key::R,
|
||||
Key::S,
|
||||
Key::T,
|
||||
Key::U,
|
||||
Key::V,
|
||||
Key::W,
|
||||
Key::X,
|
||||
Key::Y,
|
||||
Key::Z,
|
||||
Key::LeftBracket,
|
||||
Key::Backslash,
|
||||
Key::RightBracket,
|
||||
Key::GraveAccent,
|
||||
Key::Escape,
|
||||
Key::Enter,
|
||||
Key::Tab,
|
||||
Key::Backspace,
|
||||
Key::Insert,
|
||||
Key::Delete,
|
||||
Key::Right,
|
||||
Key::Left,
|
||||
Key::Down,
|
||||
Key::Up,
|
||||
Key::PageUp,
|
||||
Key::PageDown,
|
||||
Key::Home,
|
||||
Key::End,
|
||||
Key::CapsLock,
|
||||
Key::ScrollLock,
|
||||
Key::NumLock,
|
||||
Key::PrintScreen,
|
||||
Key::Pause,
|
||||
Key::F1,
|
||||
Key::F2,
|
||||
Key::F3,
|
||||
Key::F4,
|
||||
Key::F5,
|
||||
Key::F6,
|
||||
Key::F7,
|
||||
Key::F8,
|
||||
Key::F9,
|
||||
Key::F10,
|
||||
Key::F11,
|
||||
Key::F12,
|
||||
Key::LeftShift,
|
||||
Key::LeftControl,
|
||||
Key::LeftAlt,
|
||||
Key::LeftSuper,
|
||||
Key::RightShift,
|
||||
Key::RightControl,
|
||||
Key::RightAlt,
|
||||
Key::RightSuper,
|
||||
Key::Menu};
|
||||
|
||||
registerConstTable(vm, "Key", keyNames, keyValues,
|
||||
static_cast<int>(sizeof(keyNames) / sizeof(keyNames[0])));
|
||||
|
||||
// Mouse button constants
|
||||
static const char *const mouseNames[] = {"Left", "Right", "Middle", "Button4",
|
||||
"Button5"};
|
||||
static const SQInteger mouseValues[] = {Mouse::ButtonLeft, Mouse::ButtonRight,
|
||||
Mouse::ButtonMiddle, Mouse::Button4,
|
||||
Mouse::Button5};
|
||||
registerConstTable(
|
||||
vm, "Mouse", mouseNames, mouseValues,
|
||||
static_cast<int>(sizeof(mouseNames) / sizeof(mouseNames[0])));
|
||||
}
|
||||
|
||||
void registerInputBindings(HSQUIRRELVM vm) {
|
||||
registerInput(vm);
|
||||
registerKeyConstants(vm);
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,561 +0,0 @@
|
|||
#include <extra2d/app/application.h>
|
||||
#include <extra2d/graphics/texture.h>
|
||||
#include <extra2d/resource/resource_manager.h>
|
||||
#include <extra2d/scene/node.h>
|
||||
#include <extra2d/scene/scene.h>
|
||||
#include <extra2d/scene/scene_manager.h>
|
||||
#include <extra2d/scene/sprite.h>
|
||||
#include <extra2d/script/sq_binding_node.h>
|
||||
#include <extra2d/script/sq_binding_types.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// SqClassName specializations
|
||||
template <> struct SqClassName<Node> {
|
||||
static const char *name() { return "Node"; }
|
||||
};
|
||||
template <> struct SqClassName<Sprite> {
|
||||
static const char *name() { return "Sprite"; }
|
||||
};
|
||||
template <> struct SqClassName<Scene> {
|
||||
static const char *name() { return "Scene"; }
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
// Node
|
||||
// ============================================================================
|
||||
static SQInteger nodeCreate(HSQUIRRELVM vm) {
|
||||
auto node = makePtr<Node>();
|
||||
pushPtr(vm, node);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetPosition(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 3) {
|
||||
float x = static_cast<float>(getFloat(vm, 2));
|
||||
float y = static_cast<float>(getFloat(vm, 3));
|
||||
node->setPosition(x, y);
|
||||
} else {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 2);
|
||||
if (v)
|
||||
node->setPosition(*v);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetPosition(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
pushValueInstance(vm, node->getPosition());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetRotation(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->setRotation(static_cast<float>(getFloat(vm, 2)));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetRotation(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
push(vm, node->getRotation());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetScale(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 3) {
|
||||
node->setScale(static_cast<float>(getFloat(vm, 2)),
|
||||
static_cast<float>(getFloat(vm, 3)));
|
||||
} else {
|
||||
// Could be float or Vec2
|
||||
SQObjectType t = sq_gettype(vm, 2);
|
||||
if (t == OT_INSTANCE) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 2);
|
||||
if (v)
|
||||
node->setScale(*v);
|
||||
} else {
|
||||
node->setScale(static_cast<float>(getFloat(vm, 2)));
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetScale(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
pushValueInstance(vm, node->getScale());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetAnchor(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 3) {
|
||||
node->setAnchor(static_cast<float>(getFloat(vm, 2)),
|
||||
static_cast<float>(getFloat(vm, 3)));
|
||||
} else {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 2);
|
||||
if (v)
|
||||
node->setAnchor(*v);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetAnchor(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
pushValueInstance(vm, node->getAnchor());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetOpacity(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->setOpacity(static_cast<float>(getFloat(vm, 2)));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetOpacity(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
push(vm, node->getOpacity());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetVisible(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->setVisible(getBool(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeIsVisible(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
push(vm, node->isVisible());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetZOrder(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->setZOrder(static_cast<int>(getInt(vm, 2)));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetZOrder(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
push(vm, node->getZOrder());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetName(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->setName(getString(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetName(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
push(vm, node->getName());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeSetTag(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->setTag(static_cast<int>(getInt(vm, 2)));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetTag(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
push(vm, node->getTag());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeAddChild(HSQUIRRELVM vm) {
|
||||
auto parent = getPtr<Node>(vm, 1);
|
||||
auto child = getPtr<Node>(vm, 2);
|
||||
if (!parent || !child)
|
||||
return sq_throwerror(vm, "null node");
|
||||
parent->addChild(child);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeRemoveFromParent(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->removeFromParent();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeRemoveAllChildren(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->removeAllChildren();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetChildByName(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
auto child = node->getChildByName(getString(vm, 2));
|
||||
if (child)
|
||||
pushPtr(vm, child);
|
||||
else
|
||||
pushNull(vm);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger nodeRunAction(HSQUIRRELVM vm) {
|
||||
// Will be implemented in action bindings
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
// Get action pointer from userdata
|
||||
SQUserPointer up = nullptr;
|
||||
sq_getinstanceup(vm, 2, &up, nullptr, SQFalse);
|
||||
if (!up)
|
||||
return sq_throwerror(vm, "null action");
|
||||
auto actionPtr = *static_cast<Ptr<Action> *>(up);
|
||||
node->runAction(actionPtr);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeStopAllActions(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
node->stopAllActions();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger nodeGetBoundingBox(HSQUIRRELVM vm) {
|
||||
auto *node = getRawPtr<Node>(vm, 1);
|
||||
if (!node)
|
||||
return sq_throwerror(vm, "null node");
|
||||
pushValueInstance(vm, node->getBoundingBox());
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerNode(HSQUIRRELVM vm) {
|
||||
// Node class — uses shared_ptr bridge
|
||||
ClassDef(vm, "Node")
|
||||
.setTypeTag(typeTag<Node>())
|
||||
.staticMethod("create", nodeCreate)
|
||||
.method("setPosition", nodeSetPosition)
|
||||
.method("getPosition", nodeGetPosition)
|
||||
.method("setRotation", nodeSetRotation)
|
||||
.method("getRotation", nodeGetRotation)
|
||||
.method("setScale", nodeSetScale)
|
||||
.method("getScale", nodeGetScale)
|
||||
.method("setAnchor", nodeSetAnchor)
|
||||
.method("getAnchor", nodeGetAnchor)
|
||||
.method("setOpacity", nodeSetOpacity)
|
||||
.method("getOpacity", nodeGetOpacity)
|
||||
.method("setVisible", nodeSetVisible)
|
||||
.method("isVisible", nodeIsVisible)
|
||||
.method("setZOrder", nodeSetZOrder)
|
||||
.method("getZOrder", nodeGetZOrder)
|
||||
.method("setName", nodeSetName)
|
||||
.method("getName", nodeGetName)
|
||||
.method("setTag", nodeSetTag)
|
||||
.method("getTag", nodeGetTag)
|
||||
.method("addChild", nodeAddChild)
|
||||
.method("removeFromParent", nodeRemoveFromParent)
|
||||
.method("removeAllChildren", nodeRemoveAllChildren)
|
||||
.method("getChildByName", nodeGetChildByName)
|
||||
.method("runAction", nodeRunAction)
|
||||
.method("stopAllActions", nodeStopAllActions)
|
||||
.method("getBoundingBox", nodeGetBoundingBox)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Sprite
|
||||
// ============================================================================
|
||||
static SQInteger spriteCreate(HSQUIRRELVM vm) {
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
Ptr<Sprite> sprite;
|
||||
|
||||
if (argc >= 2 && sq_gettype(vm, 2) == OT_STRING) {
|
||||
std::string path = getString(vm, 2);
|
||||
auto tex = Application::instance().resources().loadTexture(path);
|
||||
if (tex)
|
||||
sprite = Sprite::create(tex);
|
||||
else
|
||||
sprite = Sprite::create();
|
||||
} else {
|
||||
sprite = Sprite::create();
|
||||
}
|
||||
|
||||
pushPtr<Node>(vm, sprite);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger spriteSetColor(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *sprite = dynamic_cast<Sprite *>(node.get());
|
||||
if (!sprite)
|
||||
return sq_throwerror(vm, "not a sprite");
|
||||
Color *c = getValueInstance<Color>(vm, 2);
|
||||
if (c)
|
||||
sprite->setColor(*c);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger spriteGetColor(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *sprite = dynamic_cast<Sprite *>(node.get());
|
||||
if (!sprite)
|
||||
return sq_throwerror(vm, "not a sprite");
|
||||
pushValueInstance(vm, sprite->getColor());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger spriteSetFlipX(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *sprite = dynamic_cast<Sprite *>(node.get());
|
||||
if (!sprite)
|
||||
return sq_throwerror(vm, "not a sprite");
|
||||
sprite->setFlipX(getBool(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger spriteSetFlipY(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *sprite = dynamic_cast<Sprite *>(node.get());
|
||||
if (!sprite)
|
||||
return sq_throwerror(vm, "not a sprite");
|
||||
sprite->setFlipY(getBool(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger spriteIsFlipX(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *sprite = dynamic_cast<Sprite *>(node.get());
|
||||
if (!sprite)
|
||||
return sq_throwerror(vm, "not a sprite");
|
||||
push(vm, sprite->isFlipX());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger spriteIsFlipY(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *sprite = dynamic_cast<Sprite *>(node.get());
|
||||
if (!sprite)
|
||||
return sq_throwerror(vm, "not a sprite");
|
||||
push(vm, sprite->isFlipY());
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerSprite(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "Sprite", "Node")
|
||||
.setTypeTag(typeTag<Sprite>())
|
||||
.staticMethod("create", spriteCreate)
|
||||
.method("setColor", spriteSetColor)
|
||||
.method("getColor", spriteGetColor)
|
||||
.method("setFlipX", spriteSetFlipX)
|
||||
.method("setFlipY", spriteSetFlipY)
|
||||
.method("isFlipX", spriteIsFlipX)
|
||||
.method("isFlipY", spriteIsFlipY)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Scene
|
||||
// ============================================================================
|
||||
static SQInteger sceneCreate(HSQUIRRELVM vm) {
|
||||
auto scene = Scene::create();
|
||||
pushPtr<Node>(vm, scene);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sceneSetBackgroundColor(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *scene = dynamic_cast<Scene *>(node.get());
|
||||
if (!scene)
|
||||
return sq_throwerror(vm, "not a scene");
|
||||
Color *c = getValueInstance<Color>(vm, 2);
|
||||
if (c)
|
||||
scene->setBackgroundColor(*c);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger sceneGetBackgroundColor(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 1);
|
||||
auto *scene = dynamic_cast<Scene *>(node.get());
|
||||
if (!scene)
|
||||
return sq_throwerror(vm, "not a scene");
|
||||
pushValueInstance(vm, scene->getBackgroundColor());
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerScene(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "Scene", "Node")
|
||||
.setTypeTag(typeTag<Scene>())
|
||||
.staticMethod("create", sceneCreate)
|
||||
.method("setBackgroundColor", sceneSetBackgroundColor)
|
||||
.method("getBackgroundColor", sceneGetBackgroundColor)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// SceneManager (global "Scenes" variable)
|
||||
// ============================================================================
|
||||
static SQInteger smRunWithScene(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 2);
|
||||
auto scene = std::dynamic_pointer_cast<Scene>(node);
|
||||
if (!scene)
|
||||
return sq_throwerror(vm, "expected Scene");
|
||||
SceneManager::getInstance().runWithScene(scene);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger smReplaceScene(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 2);
|
||||
auto scene = std::dynamic_pointer_cast<Scene>(node);
|
||||
if (!scene)
|
||||
return sq_throwerror(vm, "expected Scene");
|
||||
SceneManager::getInstance().replaceScene(scene);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger smPushScene(HSQUIRRELVM vm) {
|
||||
auto node = getPtr<Node>(vm, 2);
|
||||
auto scene = std::dynamic_pointer_cast<Scene>(node);
|
||||
if (!scene)
|
||||
return sq_throwerror(vm, "expected Scene");
|
||||
SceneManager::getInstance().pushScene(scene);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger smPopScene(HSQUIRRELVM vm) {
|
||||
SceneManager::getInstance().popScene();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger smGetCurrentScene(HSQUIRRELVM vm) {
|
||||
auto scene = SceneManager::getInstance().getCurrentScene();
|
||||
if (scene)
|
||||
pushPtr<Node>(vm, scene);
|
||||
else
|
||||
pushNull(vm);
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerSceneManager(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "SceneManagerClass")
|
||||
.method("runWithScene", smRunWithScene)
|
||||
.method("replaceScene", smReplaceScene)
|
||||
.method("pushScene", smPushScene)
|
||||
.method("popScene", smPopScene)
|
||||
.method("getCurrentScene", smGetCurrentScene)
|
||||
.commit();
|
||||
|
||||
// Create global "Scenes" instance
|
||||
pushSingleton(vm, &SceneManager::getInstance(), "SceneManagerClass");
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, "Scenes", -1);
|
||||
sq_push(vm, -3); // push the instance
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 2); // pop root table and instance
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Application (global "App" variable)
|
||||
// ============================================================================
|
||||
static SQInteger appQuit(HSQUIRRELVM vm) {
|
||||
Application::instance().quit();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger appGetDeltaTime(HSQUIRRELVM vm) {
|
||||
push(vm, Application::instance().deltaTime());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger appGetTotalTime(HSQUIRRELVM vm) {
|
||||
push(vm, Application::instance().totalTime());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger appGetFps(HSQUIRRELVM vm) {
|
||||
push(vm, Application::instance().fps());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger appIsPaused(HSQUIRRELVM vm) {
|
||||
push(vm, Application::instance().isPaused());
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerApplication(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "ApplicationClass")
|
||||
.method("quit", appQuit)
|
||||
.method("getDeltaTime", appGetDeltaTime)
|
||||
.method("getTotalTime", appGetTotalTime)
|
||||
.method("getFps", appGetFps)
|
||||
.method("isPaused", appIsPaused)
|
||||
.commit();
|
||||
|
||||
// Global "App" instance
|
||||
pushSingleton(vm, &Application::instance(), "ApplicationClass");
|
||||
sq_pushroottable(vm);
|
||||
sq_pushstring(vm, "App", -1);
|
||||
sq_push(vm, -3);
|
||||
sq_newslot(vm, -3, SQFalse);
|
||||
sq_pop(vm, 2);
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Register all
|
||||
// ============================================================================
|
||||
void registerNodeBindings(HSQUIRRELVM vm) {
|
||||
registerNode(vm);
|
||||
registerSprite(vm);
|
||||
registerScene(vm);
|
||||
registerSceneManager(vm);
|
||||
registerApplication(vm);
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,398 +0,0 @@
|
|||
#include <extra2d/script/sq_binding_types.h>
|
||||
|
||||
namespace extra2d {
|
||||
namespace sq {
|
||||
|
||||
// ============================================================================
|
||||
// Vec2
|
||||
// ============================================================================
|
||||
static SQInteger vec2Constructor(HSQUIRRELVM vm) {
|
||||
Vec2 *self = nullptr;
|
||||
sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer *>(&self), nullptr,
|
||||
SQFalse);
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 3) {
|
||||
self->x = static_cast<float>(getFloat(vm, 2));
|
||||
self->y = static_cast<float>(getFloat(vm, 3));
|
||||
} else {
|
||||
self->x = 0.0f;
|
||||
self->y = 0.0f;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger vec2GetX(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
sq_pushfloat(vm, v->x);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2SetX(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
v->x = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger vec2GetY(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
sq_pushfloat(vm, v->y);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2SetY(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
v->y = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger vec2Length(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
sq_pushfloat(vm, v->length());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Normalized(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
pushValueInstance(vm, v->normalized());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Dot(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
Vec2 *b = getValueInstance<Vec2>(vm, 2);
|
||||
sq_pushfloat(vm, a->dot(*b));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Distance(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
Vec2 *b = getValueInstance<Vec2>(vm, 2);
|
||||
sq_pushfloat(vm, a->distance(*b));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Add(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
Vec2 *b = getValueInstance<Vec2>(vm, 2);
|
||||
pushValueInstance(vm, *a + *b);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Sub(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
Vec2 *b = getValueInstance<Vec2>(vm, 2);
|
||||
pushValueInstance(vm, *a - *b);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Mul(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
SQFloat s = getFloat(vm, 2);
|
||||
pushValueInstance(vm, *a * static_cast<float>(s));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Div(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
SQFloat s = getFloat(vm, 2);
|
||||
if (s == 0.0f)
|
||||
return sq_throwerror(vm, "division by zero");
|
||||
pushValueInstance(vm, *a / static_cast<float>(s));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2Neg(HSQUIRRELVM vm) {
|
||||
Vec2 *a = getValueInstance<Vec2>(vm, 1);
|
||||
pushValueInstance(vm, -*a);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger vec2ToString(HSQUIRRELVM vm) {
|
||||
Vec2 *v = getValueInstance<Vec2>(vm, 1);
|
||||
char buf[64];
|
||||
snprintf(buf, sizeof(buf), "Vec2(%.3f, %.3f)", v->x, v->y);
|
||||
sq_pushstring(vm, buf, -1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerVec2(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "Vec2")
|
||||
.setValueType<Vec2>(vec2Constructor)
|
||||
.method("getX", vec2GetX)
|
||||
.method("setX", vec2SetX)
|
||||
.method("getY", vec2GetY)
|
||||
.method("setY", vec2SetY)
|
||||
.method("length", vec2Length)
|
||||
.method("normalized", vec2Normalized)
|
||||
.method("dot", vec2Dot, 2, "xx")
|
||||
.method("distance", vec2Distance, 2, "xx")
|
||||
.method("_add", vec2Add, 2, "xx")
|
||||
.method("_sub", vec2Sub, 2, "xx")
|
||||
.method("_mul", vec2Mul)
|
||||
.method("_div", vec2Div)
|
||||
.method("_unm", vec2Neg)
|
||||
.method("_tostring", vec2ToString)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Size
|
||||
// ============================================================================
|
||||
static SQInteger sizeConstructor(HSQUIRRELVM vm) {
|
||||
Size *self = nullptr;
|
||||
sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer *>(&self), nullptr,
|
||||
SQFalse);
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 3) {
|
||||
self->width = static_cast<float>(getFloat(vm, 2));
|
||||
self->height = static_cast<float>(getFloat(vm, 3));
|
||||
} else {
|
||||
self->width = 0.0f;
|
||||
self->height = 0.0f;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger sizeGetWidth(HSQUIRRELVM vm) {
|
||||
Size *s = getValueInstance<Size>(vm, 1);
|
||||
sq_pushfloat(vm, s->width);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sizeSetWidth(HSQUIRRELVM vm) {
|
||||
Size *s = getValueInstance<Size>(vm, 1);
|
||||
s->width = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger sizeGetHeight(HSQUIRRELVM vm) {
|
||||
Size *s = getValueInstance<Size>(vm, 1);
|
||||
sq_pushfloat(vm, s->height);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sizeSetHeight(HSQUIRRELVM vm) {
|
||||
Size *s = getValueInstance<Size>(vm, 1);
|
||||
s->height = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger sizeArea(HSQUIRRELVM vm) {
|
||||
Size *s = getValueInstance<Size>(vm, 1);
|
||||
sq_pushfloat(vm, s->area());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger sizeToString(HSQUIRRELVM vm) {
|
||||
Size *s = getValueInstance<Size>(vm, 1);
|
||||
char buf[64];
|
||||
snprintf(buf, sizeof(buf), "Size(%.3f, %.3f)", s->width, s->height);
|
||||
sq_pushstring(vm, buf, -1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerSize(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "Size")
|
||||
.setValueType<Size>(sizeConstructor)
|
||||
.method("getWidth", sizeGetWidth)
|
||||
.method("setWidth", sizeSetWidth)
|
||||
.method("getHeight", sizeGetHeight)
|
||||
.method("setHeight", sizeSetHeight)
|
||||
.method("area", sizeArea)
|
||||
.method("_tostring", sizeToString)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Rect
|
||||
// ============================================================================
|
||||
static SQInteger rectConstructor(HSQUIRRELVM vm) {
|
||||
Rect *self = nullptr;
|
||||
sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer *>(&self), nullptr,
|
||||
SQFalse);
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 5) {
|
||||
self->origin.x = static_cast<float>(getFloat(vm, 2));
|
||||
self->origin.y = static_cast<float>(getFloat(vm, 3));
|
||||
self->size.width = static_cast<float>(getFloat(vm, 4));
|
||||
self->size.height = static_cast<float>(getFloat(vm, 5));
|
||||
} else {
|
||||
*self = Rect();
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger rectGetX(HSQUIRRELVM vm) {
|
||||
Rect *r = getValueInstance<Rect>(vm, 1);
|
||||
sq_pushfloat(vm, r->origin.x);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger rectGetY(HSQUIRRELVM vm) {
|
||||
Rect *r = getValueInstance<Rect>(vm, 1);
|
||||
sq_pushfloat(vm, r->origin.y);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger rectGetWidth(HSQUIRRELVM vm) {
|
||||
Rect *r = getValueInstance<Rect>(vm, 1);
|
||||
sq_pushfloat(vm, r->size.width);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger rectGetHeight(HSQUIRRELVM vm) {
|
||||
Rect *r = getValueInstance<Rect>(vm, 1);
|
||||
sq_pushfloat(vm, r->size.height);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger rectContainsPoint(HSQUIRRELVM vm) {
|
||||
Rect *r = getValueInstance<Rect>(vm, 1);
|
||||
Vec2 *p = getValueInstance<Vec2>(vm, 2);
|
||||
sq_pushbool(vm, r->containsPoint(*p) ? SQTrue : SQFalse);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger rectIntersects(HSQUIRRELVM vm) {
|
||||
Rect *a = getValueInstance<Rect>(vm, 1);
|
||||
Rect *b = getValueInstance<Rect>(vm, 2);
|
||||
sq_pushbool(vm, a->intersects(*b) ? SQTrue : SQFalse);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger rectToString(HSQUIRRELVM vm) {
|
||||
Rect *r = getValueInstance<Rect>(vm, 1);
|
||||
char buf[96];
|
||||
snprintf(buf, sizeof(buf), "Rect(%.1f, %.1f, %.1f, %.1f)", r->origin.x,
|
||||
r->origin.y, r->size.width, r->size.height);
|
||||
sq_pushstring(vm, buf, -1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerRect(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "Rect")
|
||||
.setValueType<Rect>(rectConstructor)
|
||||
.method("getX", rectGetX)
|
||||
.method("getY", rectGetY)
|
||||
.method("getWidth", rectGetWidth)
|
||||
.method("getHeight", rectGetHeight)
|
||||
.method("containsPoint", rectContainsPoint, 2, "xx")
|
||||
.method("intersects", rectIntersects, 2, "xx")
|
||||
.method("_tostring", rectToString)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Color
|
||||
// ============================================================================
|
||||
static SQInteger colorConstructor(HSQUIRRELVM vm) {
|
||||
Color *self = nullptr;
|
||||
sq_getinstanceup(vm, 1, reinterpret_cast<SQUserPointer *>(&self), nullptr,
|
||||
SQFalse);
|
||||
SQInteger argc = sq_gettop(vm);
|
||||
if (argc >= 5) {
|
||||
self->r = static_cast<float>(getFloat(vm, 2));
|
||||
self->g = static_cast<float>(getFloat(vm, 3));
|
||||
self->b = static_cast<float>(getFloat(vm, 4));
|
||||
self->a = static_cast<float>(getFloat(vm, 5));
|
||||
} else if (argc >= 4) {
|
||||
self->r = static_cast<float>(getFloat(vm, 2));
|
||||
self->g = static_cast<float>(getFloat(vm, 3));
|
||||
self->b = static_cast<float>(getFloat(vm, 4));
|
||||
self->a = 1.0f;
|
||||
} else {
|
||||
*self = Color(1.0f, 1.0f, 1.0f, 1.0f);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger colorGetR(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
sq_pushfloat(vm, c->r);
|
||||
return 1;
|
||||
}
|
||||
static SQInteger colorGetG(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
sq_pushfloat(vm, c->g);
|
||||
return 1;
|
||||
}
|
||||
static SQInteger colorGetB(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
sq_pushfloat(vm, c->b);
|
||||
return 1;
|
||||
}
|
||||
static SQInteger colorGetA(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
sq_pushfloat(vm, c->a);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger colorSetR(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
c->r = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
static SQInteger colorSetG(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
c->g = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
static SQInteger colorSetB(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
c->b = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
static SQInteger colorSetA(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
c->a = static_cast<float>(getFloat(vm, 2));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger colorFromRGBA(HSQUIRRELVM vm) {
|
||||
auto r = static_cast<uint8_t>(getInt(vm, 2));
|
||||
auto g = static_cast<uint8_t>(getInt(vm, 3));
|
||||
auto b = static_cast<uint8_t>(getInt(vm, 4));
|
||||
uint8_t a = 255;
|
||||
if (sq_gettop(vm) >= 5)
|
||||
a = static_cast<uint8_t>(getInt(vm, 5));
|
||||
pushValueInstance(vm, Color::fromRGBA(r, g, b, a));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger colorToString(HSQUIRRELVM vm) {
|
||||
Color *c = getValueInstance<Color>(vm, 1);
|
||||
char buf[80];
|
||||
snprintf(buf, sizeof(buf), "Color(%.3f, %.3f, %.3f, %.3f)", c->r, c->g, c->b,
|
||||
c->a);
|
||||
sq_pushstring(vm, buf, -1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
void registerColor(HSQUIRRELVM vm) {
|
||||
ClassDef(vm, "Color")
|
||||
.setValueType<Color>(colorConstructor)
|
||||
.method("getR", colorGetR)
|
||||
.method("setR", colorSetR)
|
||||
.method("getG", colorGetG)
|
||||
.method("setG", colorSetG)
|
||||
.method("getB", colorGetB)
|
||||
.method("setB", colorSetB)
|
||||
.method("getA", colorGetA)
|
||||
.method("setA", colorSetA)
|
||||
.staticMethod("fromRGBA", colorFromRGBA)
|
||||
.method("_tostring", colorToString)
|
||||
.commit();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// Register all value types
|
||||
// ============================================================================
|
||||
void registerValueTypes(HSQUIRRELVM vm) {
|
||||
registerVec2(vm);
|
||||
registerSize(vm);
|
||||
registerRect(vm);
|
||||
registerColor(vm);
|
||||
}
|
||||
|
||||
} // namespace sq
|
||||
} // namespace extra2d
|
||||
|
|
@ -3,18 +3,22 @@
|
|||
#include <extra2d/app/application.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/ui/button.h>
|
||||
#include <extra2d/core/string.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
/**
|
||||
* @brief 构造函数，初始化按钮状态并设置事件监听器
|
||||
*/
|
||||
// ============================================================================
|
||||
// Button 实现
|
||||
// ============================================================================
|
||||
|
||||
Button::Button() {
|
||||
// 按钮默认锚点为左上角，这样setPosition(0, 0)会在左上角显示
|
||||
setAnchor(0.0f, 0.0f);
|
||||
setSpatialIndexed(false);
|
||||
|
||||
auto &dispatcher = getEventDispatcher();
|
||||
dispatcher.addListener(EventType::UIHoverEnter, [this](Event &) {
|
||||
hovered_ = true;
|
||||
// 鼠标进入按钮区域，改变光标为手型
|
||||
auto &app = Application::instance();
|
||||
app.window().setCursor(hoverCursor_);
|
||||
cursorChanged_ = true;
|
||||
|
|
@ -22,7 +26,6 @@ Button::Button() {
|
|||
dispatcher.addListener(EventType::UIHoverExit, [this](Event &) {
|
||||
hovered_ = false;
|
||||
pressed_ = false;
|
||||
// 鼠标离开按钮区域，恢复默认光标
|
||||
if (cursorChanged_) {
|
||||
auto &app = Application::instance();
|
||||
app.window().resetCursor();
|
||||
|
|
@ -39,16 +42,137 @@ Button::Button() {
|
|||
});
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 创建按钮实例的工厂方法
|
||||
* @return 按钮智能指针
|
||||
*/
|
||||
Ptr<Button> Button::create() { return makePtr<Button>(); }
|
||||
Button::Button(const String &text) : Button() {
|
||||
text_ = text;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置按钮文字，并根据文字大小自动调整按钮尺寸
|
||||
* @param text 要显示的文字
|
||||
*/
|
||||
// ------------------------------------------------------------------------
|
||||
// 静态创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
Ptr<Button> Button::create() {
|
||||
return makePtr<Button>();
|
||||
}
|
||||
|
||||
Ptr<Button> Button::create(const String &text) {
|
||||
return makePtr<Button>(text);
|
||||
}
|
||||
|
||||
Ptr<Button> Button::create(const String &text, Ptr<FontAtlas> font) {
|
||||
auto btn = makePtr<Button>(text);
|
||||
btn->setFont(font);
|
||||
return btn;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Button *Button::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withText(const String &text) {
|
||||
setText(text);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withFont(Ptr<FontAtlas> font) {
|
||||
setFont(font);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withTextColor(const Color &color) {
|
||||
setTextColor(color);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withBackgroundColor(const Color &normal, const Color &hover,
|
||||
const Color &pressed) {
|
||||
setBackgroundColor(normal, hover, pressed);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withSize(float width, float height) {
|
||||
setSize(width, height);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withPadding(const Vec2 &padding) {
|
||||
setPadding(padding);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withPadding(float x, float y) {
|
||||
setPadding(Vec2(x, y));
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withBorder(const Color &color, float width) {
|
||||
setBorder(color, width);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withCornerRadius(float radius) {
|
||||
setCornerRadius(radius);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withRoundedCornersEnabled(bool enabled) {
|
||||
setRoundedCornersEnabled(enabled);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withHoverCursor(CursorShape cursor) {
|
||||
setHoverCursor(cursor);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
Button *Button::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Button *Button::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 普通设置方法
|
||||
// ------------------------------------------------------------------------
|
||||
void Button::setText(const String &text) {
|
||||
text_ = text;
|
||||
if (font_ && getSize().empty()) {
|
||||
|
|
@ -57,10 +181,6 @@ void Button::setText(const String &text) {
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置字体，并根据当前文字自动调整按钮尺寸
|
||||
* @param font 字体图集
|
||||
*/
|
||||
void Button::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
if (font_ && getSize().empty() && !text_.empty()) {
|
||||
|
|
@ -69,10 +189,6 @@ void Button::setFont(Ptr<FontAtlas> font) {
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置内边距，并根据当前文字自动调整按钮尺寸
|
||||
* @param padding 内边距向量
|
||||
*/
|
||||
void Button::setPadding(const Vec2 &padding) {
|
||||
padding_ = padding;
|
||||
if (font_ && getSize().empty() && !text_.empty()) {
|
||||
|
|
@ -81,18 +197,10 @@ void Button::setPadding(const Vec2 &padding) {
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置文字颜色
|
||||
* @param color 颜色值
|
||||
*/
|
||||
void Button::setTextColor(const Color &color) { textColor_ = color; }
|
||||
void Button::setTextColor(const Color &color) {
|
||||
textColor_ = color;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置纯色背景的颜色状态
|
||||
* @param normal 正常状态颜色
|
||||
* @param hover 悬停状态颜色
|
||||
* @param pressed 按下状态颜色
|
||||
*/
|
||||
void Button::setBackgroundColor(const Color &normal, const Color &hover,
|
||||
const Color &pressed) {
|
||||
bgNormal_ = normal;
|
||||
|
|
@ -100,60 +208,31 @@ void Button::setBackgroundColor(const Color &normal, const Color &hover,
|
|||
bgPressed_ = pressed;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置边框样式
|
||||
* @param color 边框颜色
|
||||
* @param width 边框宽度
|
||||
*/
|
||||
void Button::setBorder(const Color &color, float width) {
|
||||
borderColor_ = color;
|
||||
borderWidth_ = width;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置圆角半径
|
||||
* @param radius 圆角半径（像素）
|
||||
*/
|
||||
void Button::setCornerRadius(float radius) {
|
||||
cornerRadius_ = std::max(0.0f, radius);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置是否启用圆角矩形
|
||||
* @param enabled 是否启用
|
||||
*/
|
||||
void Button::setRoundedCornersEnabled(bool enabled) {
|
||||
roundedCornersEnabled_ = enabled;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置是否使用Alpha遮罩进行点击检测（用于不规则形状按钮）
|
||||
* @param enabled 是否启用
|
||||
*/
|
||||
void Button::setUseAlphaMaskForHitTest(bool enabled) {
|
||||
useAlphaMaskForHitTest_ = enabled;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置点击回调函数
|
||||
* @param callback 回调函数
|
||||
*/
|
||||
void Button::setOnClick(Function<void()> callback) {
|
||||
onClick_ = std::move(callback);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置悬停时的鼠标光标形状
|
||||
* @param cursor 光标形状枚举
|
||||
*/
|
||||
void Button::setHoverCursor(CursorShape cursor) { hoverCursor_ = cursor; }
|
||||
void Button::setHoverCursor(CursorShape cursor) {
|
||||
hoverCursor_ = cursor;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置背景图片，支持三种状态
|
||||
* @param normal 正常状态图片
|
||||
* @param hover 悬停状态图片（可选）
|
||||
* @param pressed 按下状态图片（可选）
|
||||
*/
|
||||
void Button::setBackgroundImage(Ptr<Texture> normal, Ptr<Texture> hover,
|
||||
Ptr<Texture> pressed) {
|
||||
imgNormal_ = normal;
|
||||
|
|
@ -161,20 +240,14 @@ void Button::setBackgroundImage(Ptr<Texture> normal, Ptr<Texture> hover,
|
|||
imgPressed_ = pressed ? pressed : (hover ? hover : normal);
|
||||
useImageBackground_ = (normal != nullptr);
|
||||
|
||||
// 如果使用原图大小模式，设置按钮大小为图片大小
|
||||
if (useImageBackground_ && scaleMode_ == ImageScaleMode::Original && normal) {
|
||||
setSize(static_cast<float>(normal->getWidth()),
|
||||
static_cast<float>(normal->getHeight()));
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置图片缩放模式
|
||||
* @param mode 缩放模式枚举值
|
||||
*/
|
||||
void Button::setBackgroundImageScaleMode(ImageScaleMode mode) {
|
||||
scaleMode_ = mode;
|
||||
// 如果切换到原图大小模式，更新按钮大小
|
||||
if (useImageBackground_ && scaleMode_ == ImageScaleMode::Original &&
|
||||
imgNormal_) {
|
||||
setSize(static_cast<float>(imgNormal_->getWidth()),
|
||||
|
|
@ -182,27 +255,32 @@ void Button::setBackgroundImageScaleMode(ImageScaleMode mode) {
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置自定义尺寸
|
||||
* @param size 尺寸向量
|
||||
*/
|
||||
void Button::setCustomSize(const Vec2 &size) { setSize(size.x, size.y); }
|
||||
void Button::setCustomSize(const Vec2 &size) {
|
||||
setSize(size.x, size.y);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置自定义尺寸
|
||||
* @param width 宽度
|
||||
* @param height 高度
|
||||
*/
|
||||
void Button::setCustomSize(float width, float height) {
|
||||
setSize(width, height);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 根据缩放模式计算图片绘制尺寸
|
||||
* @param buttonSize 按钮尺寸
|
||||
* @param imageSize 图片原始尺寸
|
||||
* @return 计算后的绘制尺寸
|
||||
*/
|
||||
Rect Button::getBoundingBox() const {
|
||||
auto pos = getRenderPosition();
|
||||
auto anchor = getAnchor();
|
||||
auto scale = getScale();
|
||||
auto size = getSize();
|
||||
|
||||
if (size.empty()) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
float w = size.width * scale.x;
|
||||
float h = size.height * scale.y;
|
||||
float x0 = pos.x - size.width * anchor.x * scale.x;
|
||||
float y0 = pos.y - size.height * anchor.y * scale.y;
|
||||
|
||||
return Rect(x0, y0, w, h);
|
||||
}
|
||||
|
||||
Vec2 Button::calculateImageSize(const Vec2 &buttonSize, const Vec2 &imageSize) {
|
||||
switch (scaleMode_) {
|
||||
case ImageScaleMode::Original:
|
||||
|
|
@ -228,11 +306,6 @@ Vec2 Button::calculateImageSize(const Vec2 &buttonSize, const Vec2 &imageSize) {
|
|||
return imageSize;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 绘制背景图片，根据当前状态选择对应的图片
|
||||
* @param renderer 渲染后端
|
||||
* @param rect 按钮矩形区域
|
||||
*/
|
||||
void Button::drawBackgroundImage(RenderBackend &renderer, const Rect &rect) {
|
||||
Texture *texture = nullptr;
|
||||
if (pressed_ && imgPressed_) {
|
||||
|
|
@ -251,57 +324,37 @@ void Button::drawBackgroundImage(RenderBackend &renderer, const Rect &rect) {
|
|||
Vec2 buttonSize(rect.size.width, rect.size.height);
|
||||
Vec2 drawSize = calculateImageSize(buttonSize, imageSize);
|
||||
|
||||
// 计算绘制位置（居中）
|
||||
Vec2 drawPos(rect.origin.x + (rect.size.width - drawSize.x) * 0.5f,
|
||||
rect.origin.y + (rect.size.height - drawSize.y) * 0.5f);
|
||||
|
||||
Rect destRect(drawPos.x, drawPos.y, drawSize.x, drawSize.y);
|
||||
|
||||
// 绘制图片（使用Alpha混合）
|
||||
renderer.drawSprite(*texture, destRect, Rect(0, 0, imageSize.x, imageSize.y),
|
||||
Colors::White, 0.0f, Vec2::Zero());
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 绘制圆角矩形边框
|
||||
* @param renderer 渲染后端
|
||||
* @param rect 矩形区域
|
||||
* @param color 颜色
|
||||
* @param radius 圆角半径
|
||||
*/
|
||||
void Button::drawRoundedRect(RenderBackend &renderer, const Rect &rect,
|
||||
const Color &color, float radius) {
|
||||
// 限制圆角半径不超过矩形尺寸的一半
|
||||
float maxRadius = std::min(rect.size.width, rect.size.height) * 0.5f;
|
||||
radius = std::min(radius, maxRadius);
|
||||
|
||||
if (radius <= 0.0f) {
|
||||
// 圆角为0，使用普通矩形
|
||||
renderer.drawRect(rect, color, borderWidth_);
|
||||
return;
|
||||
}
|
||||
|
||||
const int segments = 8; // 每个圆角的线段数
|
||||
const int segments = 8;
|
||||
float x = rect.origin.x;
|
||||
float y = rect.origin.y;
|
||||
float w = rect.size.width;
|
||||
float h = rect.size.height;
|
||||
float r = radius;
|
||||
|
||||
// 绘制四条直线边
|
||||
// 上边
|
||||
renderer.drawLine(Vec2(x + r, y), Vec2(x + w - r, y), color, borderWidth_);
|
||||
// 下边
|
||||
renderer.drawLine(Vec2(x + r, y + h), Vec2(x + w - r, y + h), color,
|
||||
borderWidth_);
|
||||
// 左边
|
||||
renderer.drawLine(Vec2(x + r, y + h), Vec2(x + w - r, y + h), color, borderWidth_);
|
||||
renderer.drawLine(Vec2(x, y + r), Vec2(x, y + h - r), color, borderWidth_);
|
||||
// 右边
|
||||
renderer.drawLine(Vec2(x + w, y + r), Vec2(x + w, y + h - r), color,
|
||||
borderWidth_);
|
||||
renderer.drawLine(Vec2(x + w, y + r), Vec2(x + w, y + h - r), color, borderWidth_);
|
||||
|
||||
// 绘制四个圆角（使用线段近似）
|
||||
// 左上角
|
||||
for (int i = 0; i < segments; i++) {
|
||||
float angle1 = 3.14159f * 0.5f * (float)i / segments + 3.14159f;
|
||||
float angle2 = 3.14159f * 0.5f * (float)(i + 1) / segments + 3.14159f;
|
||||
|
|
@ -309,16 +362,13 @@ void Button::drawRoundedRect(RenderBackend &renderer, const Rect &rect,
|
|||
Vec2 p2(x + r + r * cosf(angle2), y + r + r * sinf(angle2));
|
||||
renderer.drawLine(p1, p2, color, borderWidth_);
|
||||
}
|
||||
// 右上角
|
||||
for (int i = 0; i < segments; i++) {
|
||||
float angle1 = 3.14159f * 0.5f * (float)i / segments + 3.14159f * 1.5f;
|
||||
float angle2 =
|
||||
3.14159f * 0.5f * (float)(i + 1) / segments + 3.14159f * 1.5f;
|
||||
float angle2 = 3.14159f * 0.5f * (float)(i + 1) / segments + 3.14159f * 1.5f;
|
||||
Vec2 p1(x + w - r + r * cosf(angle1), y + r + r * sinf(angle1));
|
||||
Vec2 p2(x + w - r + r * cosf(angle2), y + r + r * sinf(angle2));
|
||||
renderer.drawLine(p1, p2, color, borderWidth_);
|
||||
}
|
||||
// 右下角
|
||||
for (int i = 0; i < segments; i++) {
|
||||
float angle1 = 3.14159f * 0.5f * (float)i / segments;
|
||||
float angle2 = 3.14159f * 0.5f * (float)(i + 1) / segments;
|
||||
|
|
@ -326,66 +376,46 @@ void Button::drawRoundedRect(RenderBackend &renderer, const Rect &rect,
|
|||
Vec2 p2(x + w - r + r * cosf(angle2), y + h - r + r * sinf(angle2));
|
||||
renderer.drawLine(p1, p2, color, borderWidth_);
|
||||
}
|
||||
// 左下角
|
||||
for (int i = 0; i < segments; i++) {
|
||||
float angle1 = 3.14159f * 0.5f * (float)i / segments + 3.14159f * 0.5f;
|
||||
float angle2 =
|
||||
3.14159f * 0.5f * (float)(i + 1) / segments + 3.14159f * 0.5f;
|
||||
float angle2 = 3.14159f * 0.5f * (float)(i + 1) / segments + 3.14159f * 0.5f;
|
||||
Vec2 p1(x + r + r * cosf(angle1), y + h - r + r * sinf(angle1));
|
||||
Vec2 p2(x + r + r * cosf(angle2), y + h - r + r * sinf(angle2));
|
||||
renderer.drawLine(p1, p2, color, borderWidth_);
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 填充圆角矩形
|
||||
* @param renderer 渲染后端
|
||||
* @param rect 矩形区域
|
||||
* @param color 颜色
|
||||
* @param radius 圆角半径
|
||||
*/
|
||||
void Button::fillRoundedRect(RenderBackend &renderer, const Rect &rect,
|
||||
const Color &color, float radius) {
|
||||
// 限制圆角半径不超过矩形尺寸的一半
|
||||
float maxRadius = std::min(rect.size.width, rect.size.height) * 0.5f;
|
||||
radius = std::min(radius, maxRadius);
|
||||
|
||||
if (radius <= 0.0f) {
|
||||
// 圆角为0，使用普通矩形填充
|
||||
renderer.fillRect(rect, color);
|
||||
return;
|
||||
}
|
||||
|
||||
const int segments = 8; // 每个圆角的线段数
|
||||
const int segments = 8;
|
||||
float x = rect.origin.x;
|
||||
float y = rect.origin.y;
|
||||
float w = rect.size.width;
|
||||
float h = rect.size.height;
|
||||
float r = radius;
|
||||
|
||||
// 构建圆角矩形的顶点（使用三角形扇形填充）
|
||||
std::vector<Vec2> vertices;
|
||||
|
||||
// 中心矩形区域
|
||||
vertices.push_back(Vec2(x + r, y + r)); // 左上内角
|
||||
vertices.push_back(Vec2(x + w - r, y + r)); // 右上内角
|
||||
vertices.push_back(Vec2(x + w - r, y + h - r)); // 右下内角
|
||||
vertices.push_back(Vec2(x + r, y + h - r)); // 左下内角
|
||||
vertices.push_back(Vec2(x + r, y + r));
|
||||
vertices.push_back(Vec2(x + w - r, y + r));
|
||||
vertices.push_back(Vec2(x + w - r, y + h - r));
|
||||
vertices.push_back(Vec2(x + r, y + h - r));
|
||||
|
||||
renderer.fillPolygon(vertices, color);
|
||||
|
||||
// 填充四个侧边矩形
|
||||
// 上边
|
||||
renderer.fillRect(Rect(x + r, y, w - 2 * r, r), color);
|
||||
// 下边
|
||||
renderer.fillRect(Rect(x + r, y + h - r, w - 2 * r, r), color);
|
||||
// 左边
|
||||
renderer.fillRect(Rect(x, y + r, r, h - 2 * r), color);
|
||||
// 右边
|
||||
renderer.fillRect(Rect(x + w - r, y + r, r, h - 2 * r), color);
|
||||
|
||||
// 填充四个圆角（使用扇形）
|
||||
// 左上角
|
||||
vertices.clear();
|
||||
vertices.push_back(Vec2(x + r, y + r));
|
||||
for (int i = 0; i <= segments; i++) {
|
||||
|
|
@ -394,7 +424,6 @@ void Button::fillRoundedRect(RenderBackend &renderer, const Rect &rect,
|
|||
}
|
||||
renderer.fillPolygon(vertices, color);
|
||||
|
||||
// 右上角
|
||||
vertices.clear();
|
||||
vertices.push_back(Vec2(x + w - r, y + r));
|
||||
for (int i = 0; i <= segments; i++) {
|
||||
|
|
@ -404,7 +433,6 @@ void Button::fillRoundedRect(RenderBackend &renderer, const Rect &rect,
|
|||
}
|
||||
renderer.fillPolygon(vertices, color);
|
||||
|
||||
// 右下角
|
||||
vertices.clear();
|
||||
vertices.push_back(Vec2(x + w - r, y + h - r));
|
||||
for (int i = 0; i <= segments; i++) {
|
||||
|
|
@ -414,7 +442,6 @@ void Button::fillRoundedRect(RenderBackend &renderer, const Rect &rect,
|
|||
}
|
||||
renderer.fillPolygon(vertices, color);
|
||||
|
||||
// 左下角
|
||||
vertices.clear();
|
||||
vertices.push_back(Vec2(x + r, y + h - r));
|
||||
for (int i = 0; i <= segments; i++) {
|
||||
|
|
@ -425,30 +452,15 @@ void Button::fillRoundedRect(RenderBackend &renderer, const Rect &rect,
|
|||
renderer.fillPolygon(vertices, color);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 按钮绘制主函数，按正确顺序渲染所有视觉元素
|
||||
*
|
||||
* 渲染顺序：
|
||||
* 1. 背景（图片或纯色）- 最底层
|
||||
* 2. 边框 - 中间层
|
||||
* 3. 文字 - 最顶层
|
||||
*
|
||||
* 注意：此方法在场景渲染的精灵批次中被调用。
|
||||
* 由于 fillRect 和 drawRect 使用形状渲染管线（与精灵批次不同），
|
||||
* 需要在调用它们之前结束精灵批次，然后在 drawText 之前重新开始。
|
||||
*/
|
||||
void Button::onDraw(RenderBackend &renderer) {
|
||||
void Button::onDrawWidget(RenderBackend &renderer) {
|
||||
Rect rect = getBoundingBox();
|
||||
if (rect.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
// ========== 第1层：绘制背景（图片或纯色）==========
|
||||
if (useImageBackground_) {
|
||||
// 图片背景使用精灵批次绘制
|
||||
drawBackgroundImage(renderer, rect);
|
||||
} else {
|
||||
// 纯色背景使用 fillRect 或 fillRoundedRect 绘制
|
||||
renderer.endSpriteBatch();
|
||||
|
||||
Color bg = bgNormal_;
|
||||
|
|
@ -467,7 +479,6 @@ void Button::onDraw(RenderBackend &renderer) {
|
|||
renderer.beginSpriteBatch();
|
||||
}
|
||||
|
||||
// ========== 第2层：绘制边框 ==========
|
||||
renderer.endSpriteBatch();
|
||||
|
||||
if (borderWidth_ > 0.0f) {
|
||||
|
|
@ -480,7 +491,6 @@ void Button::onDraw(RenderBackend &renderer) {
|
|||
|
||||
renderer.beginSpriteBatch();
|
||||
|
||||
// ========== 第3层：绘制文字 ==========
|
||||
if (font_ && !text_.empty()) {
|
||||
Vec2 textSize = font_->measureText(text_);
|
||||
|
||||
|
|
@ -506,30 +516,14 @@ void Button::onDraw(RenderBackend &renderer) {
|
|||
// ToggleImageButton 实现
|
||||
// ============================================================================
|
||||
|
||||
/**
|
||||
* @brief 切换按钮构造函数
|
||||
*/
|
||||
ToggleImageButton::ToggleImageButton() {
|
||||
setOnClick([this]() { toggle(); });
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 创建切换按钮实例的工厂方法
|
||||
* @return 切换按钮智能指针
|
||||
*/
|
||||
Ptr<ToggleImageButton> ToggleImageButton::create() {
|
||||
return makePtr<ToggleImageButton>();
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置两种状态的图片
|
||||
* @param stateOffNormal 关闭状态-正常
|
||||
* @param stateOnNormal 开启状态-正常
|
||||
* @param stateOffHover 关闭状态-悬停（可选）
|
||||
* @param stateOnHover 开启状态-悬停（可选）
|
||||
* @param stateOffPressed 关闭状态-按下（可选）
|
||||
* @param stateOnPressed 开启状态-按下（可选）
|
||||
*/
|
||||
void ToggleImageButton::setStateImages(Ptr<Texture> stateOffNormal,
|
||||
Ptr<Texture> stateOnNormal,
|
||||
Ptr<Texture> stateOffHover,
|
||||
|
|
@ -549,10 +543,6 @@ void ToggleImageButton::setStateImages(Ptr<Texture> stateOffNormal,
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置开关状态
|
||||
* @param on 是否开启
|
||||
*/
|
||||
void ToggleImageButton::setOn(bool on) {
|
||||
if (isOn_ != on) {
|
||||
isOn_ = on;
|
||||
|
|
@ -562,24 +552,14 @@ void ToggleImageButton::setOn(bool on) {
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 切换当前状态
|
||||
*/
|
||||
void ToggleImageButton::toggle() { setOn(!isOn_); }
|
||||
void ToggleImageButton::toggle() {
|
||||
setOn(!isOn_);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置状态改变回调
|
||||
* @param callback 回调函数
|
||||
*/
|
||||
void ToggleImageButton::setOnStateChange(Function<void(bool)> callback) {
|
||||
onStateChange_ = std::move(callback);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置两种状态的文字
|
||||
* @param textOff 关闭状态文字
|
||||
* @param textOn 开启状态文字
|
||||
*/
|
||||
void ToggleImageButton::setStateText(const String &textOff,
|
||||
const String &textOn) {
|
||||
textOff_ = textOff;
|
||||
|
|
@ -587,11 +567,6 @@ void ToggleImageButton::setStateText(const String &textOff,
|
|||
useStateText_ = true;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置两种状态的文字颜色
|
||||
* @param colorOff 关闭状态颜色
|
||||
* @param colorOn 开启状态颜色
|
||||
*/
|
||||
void ToggleImageButton::setStateTextColor(const Color &colorOff,
|
||||
const Color &colorOn) {
|
||||
textColorOff_ = colorOff;
|
||||
|
|
@ -599,21 +574,12 @@ void ToggleImageButton::setStateTextColor(const Color &colorOff,
|
|||
useStateTextColor_ = true;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 切换按钮绘制主函数
|
||||
*
|
||||
* 渲染顺序：
|
||||
* 1. 状态图片背景 - 最底层
|
||||
* 2. 边框 - 中间层
|
||||
* 3. 状态文字 - 最顶层
|
||||
*/
|
||||
void ToggleImageButton::onDraw(RenderBackend &renderer) {
|
||||
void ToggleImageButton::onDrawWidget(RenderBackend &renderer) {
|
||||
Rect rect = getBoundingBox();
|
||||
if (rect.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
// ========== 第1层：根据当前状态和交互状态选择并绘制图片 ==========
|
||||
Ptr<Texture> texture = nullptr;
|
||||
|
||||
if (isOn_) {
|
||||
|
|
@ -649,7 +615,6 @@ void ToggleImageButton::onDraw(RenderBackend &renderer) {
|
|||
0.0f, Vec2::Zero());
|
||||
}
|
||||
|
||||
// ========== 第2层：绘制边框 ==========
|
||||
renderer.endSpriteBatch();
|
||||
|
||||
float borderWidth = 1.0f;
|
||||
|
|
@ -665,7 +630,6 @@ void ToggleImageButton::onDraw(RenderBackend &renderer) {
|
|||
|
||||
renderer.beginSpriteBatch();
|
||||
|
||||
// ========== 第3层：绘制状态文字 ==========
|
||||
auto font = getFont();
|
||||
if (font) {
|
||||
String textToDraw;
|
||||
|
|
|
|||
|
|
@ -0,0 +1,206 @@
|
|||
#include <extra2d/ui/check_box.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/core/string.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
CheckBox::CheckBox() {
|
||||
setAnchor(0.0f, 0.0f);
|
||||
setSize(boxSize_, boxSize_);
|
||||
}
|
||||
|
||||
Ptr<CheckBox> CheckBox::create() {
|
||||
return makePtr<CheckBox>();
|
||||
}
|
||||
|
||||
Ptr<CheckBox> CheckBox::create(const String &label) {
|
||||
auto cb = makePtr<CheckBox>();
|
||||
cb->setLabel(label);
|
||||
return cb;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
CheckBox *CheckBox::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withText(const String &text) {
|
||||
setLabel(text);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withFont(Ptr<FontAtlas> font) {
|
||||
setFont(font);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withTextColor(const Color &color) {
|
||||
setTextColor(color);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withSize(float width, float height) {
|
||||
setSize(width, height);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
CheckBox *CheckBox::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
CheckBox *CheckBox::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
void CheckBox::setChecked(bool checked) {
|
||||
if (checked_ != checked) {
|
||||
checked_ = checked;
|
||||
if (onStateChange_) {
|
||||
onStateChange_(checked_);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void CheckBox::toggle() {
|
||||
setChecked(!checked_);
|
||||
}
|
||||
|
||||
void CheckBox::setLabel(const String &label) {
|
||||
label_ = label;
|
||||
}
|
||||
|
||||
void CheckBox::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
}
|
||||
|
||||
void CheckBox::setTextColor(const Color &color) {
|
||||
textColor_ = color;
|
||||
}
|
||||
|
||||
void CheckBox::setBoxSize(float size) {
|
||||
boxSize_ = size;
|
||||
}
|
||||
|
||||
void CheckBox::setSpacing(float spacing) {
|
||||
spacing_ = spacing;
|
||||
}
|
||||
|
||||
void CheckBox::setCheckedColor(const Color &color) {
|
||||
checkedColor_ = color;
|
||||
}
|
||||
|
||||
void CheckBox::setUncheckedColor(const Color &color) {
|
||||
uncheckedColor_ = color;
|
||||
}
|
||||
|
||||
void CheckBox::setCheckMarkColor(const Color &color) {
|
||||
checkMarkColor_ = color;
|
||||
}
|
||||
|
||||
void CheckBox::setOnStateChange(Function<void(bool)> callback) {
|
||||
onStateChange_ = callback;
|
||||
}
|
||||
|
||||
Rect CheckBox::getBoundingBox() const {
|
||||
Vec2 pos = getPosition();
|
||||
float width = boxSize_;
|
||||
|
||||
if (!label_.empty() && font_) {
|
||||
Vec2 textSize = font_->measureText(label_);
|
||||
width += spacing_ + textSize.x;
|
||||
}
|
||||
|
||||
return Rect(pos.x, pos.y, width, boxSize_);
|
||||
}
|
||||
|
||||
void CheckBox::onDrawWidget(RenderBackend &renderer) {
|
||||
Vec2 pos = getPosition();
|
||||
|
||||
// 绘制复选框
|
||||
Rect boxRect(pos.x, pos.y + (getSize().height - boxSize_) * 0.5f, boxSize_, boxSize_);
|
||||
Color boxColor = checked_ ? checkedColor_ : uncheckedColor_;
|
||||
renderer.fillRect(boxRect, boxColor);
|
||||
renderer.drawRect(boxRect, Colors::White, 1.0f);
|
||||
|
||||
// 绘制勾选标记
|
||||
if (checked_) {
|
||||
float padding = boxSize_ * 0.2f;
|
||||
float x1 = boxRect.origin.x + padding;
|
||||
float y1 = boxRect.origin.y + boxSize_ * 0.5f;
|
||||
float x2 = boxRect.origin.x + boxSize_ * 0.4f;
|
||||
float y2 = boxRect.origin.y + boxSize_ - padding;
|
||||
float x3 = boxRect.origin.x + boxSize_ - padding;
|
||||
float y3 = boxRect.origin.y + padding;
|
||||
|
||||
// 简化的勾选标记绘制
|
||||
renderer.drawLine(Vec2(x1, y1), Vec2(x2, y2), checkMarkColor_, 2.0f);
|
||||
renderer.drawLine(Vec2(x2, y2), Vec2(x3, y3), checkMarkColor_, 2.0f);
|
||||
}
|
||||
|
||||
// 绘制标签
|
||||
if (!label_.empty() && font_) {
|
||||
Vec2 textPos(pos.x + boxSize_ + spacing_, pos.y);
|
||||
renderer.drawText(*font_, label_, textPos, textColor_);
|
||||
}
|
||||
}
|
||||
|
||||
bool CheckBox::onMousePress(const MouseEvent &event) {
|
||||
if (event.button == MouseButton::Left) {
|
||||
pressed_ = true;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool CheckBox::onMouseRelease(const MouseEvent &event) {
|
||||
if (event.button == MouseButton::Left && pressed_) {
|
||||
pressed_ = false;
|
||||
Vec2 pos = getPosition();
|
||||
Rect boxRect(pos.x, pos.y, boxSize_, boxSize_);
|
||||
if (boxRect.containsPoint(Point(event.x, event.y))) {
|
||||
toggle();
|
||||
}
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,384 @@
|
|||
#include <extra2d/ui/label.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/core/string.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
Label::Label() {
|
||||
// 标签默认锚点为左上角
|
||||
setAnchor(0.0f, 0.0f);
|
||||
}
|
||||
|
||||
Label::Label(const String &text) : text_(text) {
|
||||
setAnchor(0.0f, 0.0f);
|
||||
sizeDirty_ = true;
|
||||
}
|
||||
|
||||
Ptr<Label> Label::create() {
|
||||
return makePtr<Label>();
|
||||
}
|
||||
|
||||
Ptr<Label> Label::create(const String &text) {
|
||||
return makePtr<Label>(text);
|
||||
}
|
||||
|
||||
Ptr<Label> Label::create(const String &text, Ptr<FontAtlas> font) {
|
||||
auto label = makePtr<Label>(text);
|
||||
label->setFont(font);
|
||||
return label;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Label *Label::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withText(const String &text) {
|
||||
setText(text);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withFont(Ptr<FontAtlas> font) {
|
||||
setFont(font);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withTextColor(const Color &color) {
|
||||
setTextColor(color);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withFontSize(int size) {
|
||||
setFontSize(size);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 坐标空间设置（链式调用）
|
||||
// ------------------------------------------------------------------------
|
||||
Label *Label::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Label *Label::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
void Label::setText(const String &text) {
|
||||
text_ = text;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Label::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Label::setTextColor(const Color &color) {
|
||||
textColor_ = color;
|
||||
}
|
||||
|
||||
void Label::setFontSize(int size) {
|
||||
fontSize_ = size;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Label::setHorizontalAlign(HorizontalAlign align) {
|
||||
hAlign_ = align;
|
||||
}
|
||||
|
||||
void Label::setVerticalAlign(VerticalAlign align) {
|
||||
vAlign_ = align;
|
||||
}
|
||||
|
||||
void Label::setShadowEnabled(bool enabled) {
|
||||
shadowEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void Label::setShadowColor(const Color &color) {
|
||||
shadowColor_ = color;
|
||||
}
|
||||
|
||||
void Label::setShadowOffset(const Vec2 &offset) {
|
||||
shadowOffset_ = offset;
|
||||
}
|
||||
|
||||
void Label::setOutlineEnabled(bool enabled) {
|
||||
outlineEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void Label::setOutlineColor(const Color &color) {
|
||||
outlineColor_ = color;
|
||||
}
|
||||
|
||||
void Label::setOutlineWidth(float width) {
|
||||
outlineWidth_ = width;
|
||||
}
|
||||
|
||||
void Label::setMultiLine(bool multiLine) {
|
||||
multiLine_ = multiLine;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Label::setLineSpacing(float spacing) {
|
||||
lineSpacing_ = spacing;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Label::setMaxWidth(float maxWidth) {
|
||||
maxWidth_ = maxWidth;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
Vec2 Label::getTextSize() const {
|
||||
updateCache();
|
||||
return cachedSize_;
|
||||
}
|
||||
|
||||
float Label::getLineHeight() const {
|
||||
if (font_) {
|
||||
return font_->getLineHeight() * lineSpacing_;
|
||||
}
|
||||
return static_cast<float>(fontSize_) * lineSpacing_;
|
||||
}
|
||||
|
||||
void Label::updateCache() const {
|
||||
if (!sizeDirty_ || !font_) {
|
||||
return;
|
||||
}
|
||||
|
||||
if (multiLine_) {
|
||||
auto lines = splitLines();
|
||||
float maxWidth = 0.0f;
|
||||
float totalHeight = 0.0f;
|
||||
float lineHeight = getLineHeight();
|
||||
|
||||
for (size_t i = 0; i < lines.size(); ++i) {
|
||||
Vec2 lineSize = font_->measureText(lines[i]);
|
||||
maxWidth = std::max(maxWidth, lineSize.x);
|
||||
totalHeight += lineHeight;
|
||||
}
|
||||
|
||||
cachedSize_ = Vec2(maxWidth, totalHeight);
|
||||
} else {
|
||||
cachedSize_ = font_->measureText(text_);
|
||||
}
|
||||
|
||||
sizeDirty_ = false;
|
||||
}
|
||||
|
||||
std::vector<String> Label::splitLines() const {
|
||||
std::vector<String> lines;
|
||||
if (text_.empty()) {
|
||||
return lines;
|
||||
}
|
||||
|
||||
if (maxWidth_ <= 0.0f || !font_) {
|
||||
lines.push_back(text_);
|
||||
return lines;
|
||||
}
|
||||
|
||||
// 按换行符分割
|
||||
size_t start = 0;
|
||||
size_t end = text_.find('\n');
|
||||
|
||||
while (end != String::npos) {
|
||||
String line = text_.substr(start, end - start);
|
||||
|
||||
// 如果单行超过最大宽度，需要自动换行
|
||||
Vec2 lineSize = font_->measureText(line);
|
||||
if (lineSize.x > maxWidth_) {
|
||||
// 简单实现：按字符逐个尝试
|
||||
String currentLine;
|
||||
for (size_t i = 0; i < line.length(); ++i) {
|
||||
String testLine = currentLine + line[i];
|
||||
Vec2 testSize = font_->measureText(testLine);
|
||||
if (testSize.x > maxWidth_ && !currentLine.empty()) {
|
||||
lines.push_back(currentLine);
|
||||
currentLine = line[i];
|
||||
} else {
|
||||
currentLine = testLine;
|
||||
}
|
||||
}
|
||||
if (!currentLine.empty()) {
|
||||
lines.push_back(currentLine);
|
||||
}
|
||||
} else {
|
||||
lines.push_back(line);
|
||||
}
|
||||
|
||||
start = end + 1;
|
||||
end = text_.find('\n', start);
|
||||
}
|
||||
|
||||
// 处理最后一行
|
||||
if (start < text_.length()) {
|
||||
String line = text_.substr(start);
|
||||
Vec2 lineSize = font_->measureText(line);
|
||||
if (lineSize.x > maxWidth_) {
|
||||
String currentLine;
|
||||
for (size_t i = 0; i < line.length(); ++i) {
|
||||
String testLine = currentLine + line[i];
|
||||
Vec2 testSize = font_->measureText(testLine);
|
||||
if (testSize.x > maxWidth_ && !currentLine.empty()) {
|
||||
lines.push_back(currentLine);
|
||||
currentLine = line[i];
|
||||
} else {
|
||||
currentLine = testLine;
|
||||
}
|
||||
}
|
||||
if (!currentLine.empty()) {
|
||||
lines.push_back(currentLine);
|
||||
}
|
||||
} else {
|
||||
lines.push_back(line);
|
||||
}
|
||||
}
|
||||
|
||||
return lines;
|
||||
}
|
||||
|
||||
Vec2 Label::calculateDrawPosition() const {
|
||||
Vec2 pos = getPosition();
|
||||
Vec2 size = getTextSize();
|
||||
Size widgetSize = getSize();
|
||||
|
||||
// 如果设置了控件大小，使用控件大小作为对齐参考
|
||||
float refWidth = widgetSize.empty() ? size.x : widgetSize.width;
|
||||
float refHeight = widgetSize.empty() ? size.y : widgetSize.height;
|
||||
|
||||
// 水平对齐
|
||||
switch (hAlign_) {
|
||||
case HorizontalAlign::Center:
|
||||
pos.x += (refWidth - size.x) * 0.5f;
|
||||
break;
|
||||
case HorizontalAlign::Right:
|
||||
pos.x += refWidth - size.x;
|
||||
break;
|
||||
case HorizontalAlign::Left:
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
// 垂直对齐
|
||||
switch (vAlign_) {
|
||||
case VerticalAlign::Middle:
|
||||
pos.y += (refHeight - size.y) * 0.5f;
|
||||
break;
|
||||
case VerticalAlign::Bottom:
|
||||
pos.y += refHeight - size.y;
|
||||
break;
|
||||
case VerticalAlign::Top:
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
return pos;
|
||||
}
|
||||
|
||||
void Label::drawText(RenderBackend &renderer, const Vec2 &position, const Color &color) {
|
||||
if (!font_ || text_.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
if (multiLine_) {
|
||||
auto lines = splitLines();
|
||||
float lineHeight = getLineHeight();
|
||||
Vec2 pos = position;
|
||||
|
||||
for (const auto &line : lines) {
|
||||
renderer.drawText(*font_, line, pos, color);
|
||||
pos.y += lineHeight;
|
||||
}
|
||||
} else {
|
||||
renderer.drawText(*font_, text_, position, color);
|
||||
}
|
||||
}
|
||||
|
||||
Rect Label::getBoundingBox() const {
|
||||
if (!font_ || text_.empty()) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
updateCache();
|
||||
Vec2 size = cachedSize_;
|
||||
if (size.x <= 0.0f || size.y <= 0.0f) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
Vec2 pos = calculateDrawPosition();
|
||||
return Rect(pos.x, pos.y, size.x, size.y);
|
||||
}
|
||||
|
||||
void Label::onDrawWidget(RenderBackend &renderer) {
|
||||
if (!font_ || text_.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
Vec2 pos = calculateDrawPosition();
|
||||
|
||||
// 绘制阴影
|
||||
if (shadowEnabled_) {
|
||||
Vec2 shadowPos = pos + shadowOffset_;
|
||||
drawText(renderer, shadowPos, shadowColor_);
|
||||
}
|
||||
|
||||
// 绘制描边（简化实现：向8个方向偏移绘制）
|
||||
if (outlineEnabled_) {
|
||||
float w = outlineWidth_;
|
||||
drawText(renderer, pos + Vec2(-w, -w), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(0, -w), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(w, -w), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(-w, 0), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(w, 0), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(-w, w), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(0, w), outlineColor_);
|
||||
drawText(renderer, pos + Vec2(w, w), outlineColor_);
|
||||
}
|
||||
|
||||
// 绘制主文本
|
||||
drawText(renderer, pos, textColor_);
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,432 @@
|
|||
#include <extra2d/ui/progress_bar.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <cmath>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
ProgressBar::ProgressBar() {
|
||||
setAnchor(0.0f, 0.0f);
|
||||
setSize(200.0f, 20.0f);
|
||||
}
|
||||
|
||||
Ptr<ProgressBar> ProgressBar::create() {
|
||||
return makePtr<ProgressBar>();
|
||||
}
|
||||
|
||||
Ptr<ProgressBar> ProgressBar::create(float min, float max, float value) {
|
||||
auto bar = makePtr<ProgressBar>();
|
||||
bar->setRange(min, max);
|
||||
bar->setValue(value);
|
||||
return bar;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 链式调用构建器方法实现
|
||||
// ============================================================================
|
||||
|
||||
ProgressBar *ProgressBar::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withSize(float width, float height) {
|
||||
setSize(width, height);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withProgress(float progress) {
|
||||
setValue(min_ + progress * (max_ - min_));
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
ProgressBar *ProgressBar::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
void ProgressBar::setRange(float min, float max) {
|
||||
min_ = min;
|
||||
max_ = max;
|
||||
setValue(value_);
|
||||
}
|
||||
|
||||
void ProgressBar::setValue(float value) {
|
||||
value_ = std::clamp(value, min_, max_);
|
||||
|
||||
if (!animatedChangeEnabled_) {
|
||||
displayValue_ = value_;
|
||||
}
|
||||
|
||||
if (delayedDisplayEnabled_) {
|
||||
delayTimer_ = delayTime_;
|
||||
}
|
||||
}
|
||||
|
||||
float ProgressBar::getPercent() const {
|
||||
if (max_ <= min_) return 0.0f;
|
||||
return (displayValue_ - min_) / (max_ - min_);
|
||||
}
|
||||
|
||||
void ProgressBar::setDirection(Direction dir) {
|
||||
direction_ = dir;
|
||||
}
|
||||
|
||||
void ProgressBar::setBackgroundColor(const Color &color) {
|
||||
bgColor_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setFillColor(const Color &color) {
|
||||
fillColor_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setGradientFillEnabled(bool enabled) {
|
||||
gradientEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::setFillColorEnd(const Color &color) {
|
||||
fillColorEnd_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setSegmentedColorsEnabled(bool enabled) {
|
||||
segmentedColorsEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::addColorSegment(float percentThreshold, const Color &color) {
|
||||
colorSegments_.push_back({percentThreshold, color});
|
||||
std::sort(colorSegments_.begin(), colorSegments_.end(),
|
||||
[](const auto &a, const auto &b) { return a.first > b.first; });
|
||||
}
|
||||
|
||||
void ProgressBar::clearColorSegments() {
|
||||
colorSegments_.clear();
|
||||
}
|
||||
|
||||
void ProgressBar::setCornerRadius(float radius) {
|
||||
cornerRadius_ = radius;
|
||||
}
|
||||
|
||||
void ProgressBar::setRoundedCornersEnabled(bool enabled) {
|
||||
roundedCornersEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::setBorderEnabled(bool enabled) {
|
||||
borderEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::setBorderColor(const Color &color) {
|
||||
borderColor_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setBorderWidth(float width) {
|
||||
borderWidth_ = width;
|
||||
}
|
||||
|
||||
void ProgressBar::setPadding(float padding) {
|
||||
padding_ = padding;
|
||||
}
|
||||
|
||||
void ProgressBar::setTextEnabled(bool enabled) {
|
||||
textEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
}
|
||||
|
||||
void ProgressBar::setTextColor(const Color &color) {
|
||||
textColor_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setTextFormat(const String &format) {
|
||||
textFormat_ = format;
|
||||
}
|
||||
|
||||
void ProgressBar::setAnimatedChangeEnabled(bool enabled) {
|
||||
animatedChangeEnabled_ = enabled;
|
||||
if (!enabled) {
|
||||
displayValue_ = value_;
|
||||
}
|
||||
}
|
||||
|
||||
void ProgressBar::setAnimationSpeed(float speed) {
|
||||
animationSpeed_ = speed;
|
||||
}
|
||||
|
||||
void ProgressBar::setDelayedDisplayEnabled(bool enabled) {
|
||||
delayedDisplayEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::setDelayTime(float seconds) {
|
||||
delayTime_ = seconds;
|
||||
}
|
||||
|
||||
void ProgressBar::setDelayedFillColor(const Color &color) {
|
||||
delayedFillColor_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setStripedEnabled(bool enabled) {
|
||||
stripedEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void ProgressBar::setStripeColor(const Color &color) {
|
||||
stripeColor_ = color;
|
||||
}
|
||||
|
||||
void ProgressBar::setStripeSpeed(float speed) {
|
||||
stripeSpeed_ = speed;
|
||||
}
|
||||
|
||||
Color ProgressBar::getCurrentFillColor() const {
|
||||
if (segmentedColorsEnabled_ && !colorSegments_.empty()) {
|
||||
float percent = getPercent();
|
||||
for (const auto &segment : colorSegments_) {
|
||||
if (percent >= segment.first) {
|
||||
return segment.second;
|
||||
}
|
||||
}
|
||||
}
|
||||
return fillColor_;
|
||||
}
|
||||
|
||||
String ProgressBar::formatText() const {
|
||||
String result = textFormat_;
|
||||
|
||||
size_t pos = result.find("{value}");
|
||||
if (pos != String::npos) {
|
||||
result.replace(pos, 7, std::to_string(static_cast<int>(displayValue_)));
|
||||
}
|
||||
|
||||
pos = result.find("{max}");
|
||||
if (pos != String::npos) {
|
||||
result.replace(pos, 5, std::to_string(static_cast<int>(max_)));
|
||||
}
|
||||
|
||||
pos = result.find("{percent}");
|
||||
if (pos != String::npos) {
|
||||
int percent = static_cast<int>(getPercent() * 100);
|
||||
result.replace(pos, 9, std::to_string(percent));
|
||||
}
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
Rect ProgressBar::getBoundingBox() const {
|
||||
return Rect(getPosition().x, getPosition().y, getSize().width, getSize().height);
|
||||
}
|
||||
|
||||
void ProgressBar::onUpdate(float deltaTime) {
|
||||
if (animatedChangeEnabled_ && displayValue_ != value_) {
|
||||
float diff = value_ - displayValue_;
|
||||
float change = animationSpeed_ * deltaTime;
|
||||
|
||||
if (std::abs(diff) <= change) {
|
||||
displayValue_ = value_;
|
||||
} else {
|
||||
displayValue_ += (diff > 0 ? change : -change);
|
||||
}
|
||||
}
|
||||
|
||||
if (delayedDisplayEnabled_) {
|
||||
if (delayTimer_ > 0.0f) {
|
||||
delayTimer_ -= deltaTime;
|
||||
} else {
|
||||
float diff = displayValue_ - delayedValue_;
|
||||
float change = animationSpeed_ * deltaTime;
|
||||
|
||||
if (std::abs(diff) <= change) {
|
||||
delayedValue_ = displayValue_;
|
||||
} else {
|
||||
delayedValue_ += (diff > 0 ? change : -change);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (stripedEnabled_) {
|
||||
stripeOffset_ += stripeSpeed_ * deltaTime;
|
||||
if (stripeOffset_ > 20.0f) {
|
||||
stripeOffset_ -= 20.0f;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void ProgressBar::onDrawWidget(RenderBackend &renderer) {
|
||||
Vec2 pos = getPosition();
|
||||
Size size = getSize();
|
||||
|
||||
// 计算实际绘制区域
|
||||
float bgX = pos.x + padding_;
|
||||
float bgY = pos.y + padding_;
|
||||
float bgW = size.width - padding_ * 2;
|
||||
float bgH = size.height - padding_ * 2;
|
||||
Rect bgRect(bgX, bgY, bgW, bgH);
|
||||
|
||||
// 绘制背景
|
||||
if (roundedCornersEnabled_) {
|
||||
fillRoundedRect(renderer, bgRect, bgColor_, cornerRadius_);
|
||||
} else {
|
||||
renderer.fillRect(bgRect, bgColor_);
|
||||
}
|
||||
|
||||
// 计算填充区域
|
||||
float percent = getPercent();
|
||||
float fillX = bgX, fillY = bgY, fillW = bgW, fillH = bgH;
|
||||
|
||||
switch (direction_) {
|
||||
case Direction::LeftToRight:
|
||||
fillW = bgW * percent;
|
||||
break;
|
||||
case Direction::RightToLeft:
|
||||
fillW = bgW * percent;
|
||||
fillX = bgX + bgW - fillW;
|
||||
break;
|
||||
case Direction::BottomToTop:
|
||||
fillH = bgH * percent;
|
||||
fillY = bgY + bgH - fillH;
|
||||
break;
|
||||
case Direction::TopToBottom:
|
||||
fillH = bgH * percent;
|
||||
break;
|
||||
}
|
||||
Rect fillRect(fillX, fillY, fillW, fillH);
|
||||
|
||||
// 绘制延迟显示效果
|
||||
if (delayedDisplayEnabled_ && delayedValue_ > displayValue_) {
|
||||
float delayedPercent = (delayedValue_ - min_) / (max_ - min_);
|
||||
float delayedX = bgX, delayedY = bgY, delayedW = bgW, delayedH = bgH;
|
||||
|
||||
switch (direction_) {
|
||||
case Direction::LeftToRight:
|
||||
delayedW = bgW * delayedPercent;
|
||||
break;
|
||||
case Direction::RightToLeft:
|
||||
delayedW = bgW * delayedPercent;
|
||||
delayedX = bgX + bgW - delayedW;
|
||||
break;
|
||||
case Direction::BottomToTop:
|
||||
delayedH = bgH * delayedPercent;
|
||||
delayedY = bgY + bgH - delayedH;
|
||||
break;
|
||||
case Direction::TopToBottom:
|
||||
delayedH = bgH * delayedPercent;
|
||||
break;
|
||||
}
|
||||
Rect delayedRect(delayedX, delayedY, delayedW, delayedH);
|
||||
|
||||
if (roundedCornersEnabled_) {
|
||||
fillRoundedRect(renderer, delayedRect, delayedFillColor_, cornerRadius_);
|
||||
} else {
|
||||
renderer.fillRect(delayedRect, delayedFillColor_);
|
||||
}
|
||||
}
|
||||
|
||||
// 绘制填充
|
||||
if (fillW > 0 && fillH > 0) {
|
||||
Color fillColor = getCurrentFillColor();
|
||||
|
||||
if (roundedCornersEnabled_) {
|
||||
fillRoundedRect(renderer, fillRect, fillColor, cornerRadius_);
|
||||
} else {
|
||||
renderer.fillRect(fillRect, fillColor);
|
||||
}
|
||||
|
||||
if (stripedEnabled_) {
|
||||
drawStripes(renderer, fillRect);
|
||||
}
|
||||
}
|
||||
|
||||
// 绘制边框
|
||||
if (borderEnabled_) {
|
||||
if (roundedCornersEnabled_) {
|
||||
drawRoundedRect(renderer, bgRect, borderColor_, cornerRadius_);
|
||||
} else {
|
||||
renderer.drawRect(bgRect, borderColor_, borderWidth_);
|
||||
}
|
||||
}
|
||||
|
||||
// 绘制文本
|
||||
if (textEnabled_ && font_) {
|
||||
String text = formatText();
|
||||
Vec2 textSize = font_->measureText(text);
|
||||
|
||||
Vec2 textPos(
|
||||
pos.x + (size.width - textSize.x) * 0.5f,
|
||||
pos.y + (size.height - textSize.y) * 0.5f
|
||||
);
|
||||
|
||||
renderer.drawText(*font_, text, textPos, textColor_);
|
||||
}
|
||||
}
|
||||
|
||||
void ProgressBar::drawRoundedRect(RenderBackend &renderer, const Rect &rect, const Color &color, float radius) {
|
||||
renderer.drawRect(rect, color, borderWidth_);
|
||||
}
|
||||
|
||||
void ProgressBar::fillRoundedRect(RenderBackend &renderer, const Rect &rect, const Color &color, float radius) {
|
||||
renderer.fillRect(rect, color);
|
||||
}
|
||||
|
||||
void ProgressBar::drawStripes(RenderBackend &renderer, const Rect &rect) {
|
||||
const float stripeWidth = 10.0f;
|
||||
const float spacing = 20.0f;
|
||||
float rectRight = rect.origin.x + rect.size.width;
|
||||
float rectBottom = rect.origin.y + rect.size.height;
|
||||
|
||||
for (float x = rect.origin.x - spacing + stripeOffset_; x < rectRight; x += spacing) {
|
||||
float x1 = x;
|
||||
float y1 = rect.origin.y;
|
||||
float x2 = x + stripeWidth;
|
||||
float y2 = rectBottom;
|
||||
|
||||
if (x1 < rect.origin.x) x1 = rect.origin.x;
|
||||
if (x2 > rectRight) x2 = rectRight;
|
||||
|
||||
if (x2 > x1) {
|
||||
for (int i = 0; i < static_cast<int>(rect.size.height); i += 4) {
|
||||
float sy = rect.origin.y + i;
|
||||
float sx = x1 + i * 0.5f;
|
||||
if (sx < x2) {
|
||||
Rect stripeRect(sx, sy, std::min(2.0f, x2 - sx), 2.0f);
|
||||
renderer.fillRect(stripeRect, stripeColor_);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,259 @@
|
|||
#include <extra2d/ui/radio_button.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/core/string.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
RadioButton::RadioButton() {
|
||||
setAnchor(0.0f, 0.0f);
|
||||
setSize(circleSize_, circleSize_);
|
||||
}
|
||||
|
||||
Ptr<RadioButton> RadioButton::create() {
|
||||
return makePtr<RadioButton>();
|
||||
}
|
||||
|
||||
Ptr<RadioButton> RadioButton::create(const String &label) {
|
||||
auto rb = makePtr<RadioButton>();
|
||||
rb->setLabel(label);
|
||||
return rb;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
RadioButton *RadioButton::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withText(const String &text) {
|
||||
setLabel(text);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withFont(Ptr<FontAtlas> font) {
|
||||
setFont(font);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withTextColor(const Color &color) {
|
||||
setTextColor(color);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withSize(float width, float height) {
|
||||
setSize(width, height);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
RadioButton *RadioButton::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
RadioButton *RadioButton::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 普通设置方法
|
||||
// ------------------------------------------------------------------------
|
||||
void RadioButton::setSelected(bool selected) {
|
||||
if (selected_ != selected) {
|
||||
selected_ = selected;
|
||||
if (onStateChange_) {
|
||||
onStateChange_(selected_);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void RadioButton::setLabel(const String &label) {
|
||||
label_ = label;
|
||||
}
|
||||
|
||||
void RadioButton::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
}
|
||||
|
||||
void RadioButton::setTextColor(const Color &color) {
|
||||
textColor_ = color;
|
||||
}
|
||||
|
||||
void RadioButton::setCircleSize(float size) {
|
||||
circleSize_ = size;
|
||||
}
|
||||
|
||||
void RadioButton::setSpacing(float spacing) {
|
||||
spacing_ = spacing;
|
||||
}
|
||||
|
||||
void RadioButton::setSelectedColor(const Color &color) {
|
||||
selectedColor_ = color;
|
||||
}
|
||||
|
||||
void RadioButton::setUnselectedColor(const Color &color) {
|
||||
unselectedColor_ = color;
|
||||
}
|
||||
|
||||
void RadioButton::setDotColor(const Color &color) {
|
||||
dotColor_ = color;
|
||||
}
|
||||
|
||||
void RadioButton::setGroupId(int groupId) {
|
||||
groupId_ = groupId;
|
||||
}
|
||||
|
||||
void RadioButton::setOnStateChange(Function<void(bool)> callback) {
|
||||
onStateChange_ = callback;
|
||||
}
|
||||
|
||||
Rect RadioButton::getBoundingBox() const {
|
||||
Vec2 pos = getPosition();
|
||||
float width = circleSize_;
|
||||
|
||||
if (!label_.empty() && font_) {
|
||||
Vec2 textSize = font_->measureText(label_);
|
||||
width += spacing_ + textSize.x;
|
||||
}
|
||||
|
||||
return Rect(pos.x, pos.y, width, circleSize_);
|
||||
}
|
||||
|
||||
void RadioButton::onDrawWidget(RenderBackend &renderer) {
|
||||
Vec2 pos = getPosition();
|
||||
float centerX = pos.x + circleSize_ * 0.5f;
|
||||
float centerY = pos.y + getSize().height * 0.5f;
|
||||
float radius = circleSize_ * 0.5f;
|
||||
|
||||
// 绘制外圆
|
||||
Color circleColor = selected_ ? selectedColor_ : unselectedColor_;
|
||||
renderer.drawCircle(Vec2(centerX, centerY), radius, circleColor, true);
|
||||
renderer.drawCircle(Vec2(centerX, centerY), radius, Colors::White, false, 1.0f);
|
||||
|
||||
// 绘制内圆点
|
||||
if (selected_) {
|
||||
float dotRadius = radius * 0.4f;
|
||||
renderer.drawCircle(Vec2(centerX, centerY), dotRadius, dotColor_, true);
|
||||
}
|
||||
|
||||
// 绘制标签
|
||||
if (!label_.empty() && font_) {
|
||||
Vec2 textPos(pos.x + circleSize_ + spacing_, pos.y);
|
||||
renderer.drawText(*font_, label_, textPos, textColor_);
|
||||
}
|
||||
}
|
||||
|
||||
bool RadioButton::onMousePress(const MouseEvent &event) {
|
||||
if (event.button == MouseButton::Left) {
|
||||
pressed_ = true;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool RadioButton::onMouseRelease(const MouseEvent &event) {
|
||||
if (event.button == MouseButton::Left && pressed_) {
|
||||
pressed_ = false;
|
||||
Vec2 pos = getPosition();
|
||||
float centerX = pos.x + circleSize_ * 0.5f;
|
||||
float centerY = pos.y + getSize().height * 0.5f;
|
||||
float radius = circleSize_ * 0.5f;
|
||||
|
||||
float dx = event.x - centerX;
|
||||
float dy = event.y - centerY;
|
||||
if (dx * dx + dy * dy <= radius * radius) {
|
||||
setSelected(true);
|
||||
}
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// RadioButtonGroup 实现
|
||||
// ============================================================================
|
||||
|
||||
void RadioButtonGroup::addButton(RadioButton *button) {
|
||||
if (button && std::find(buttons_.begin(), buttons_.end(), button) == buttons_.end()) {
|
||||
buttons_.push_back(button);
|
||||
button->setOnStateChange([this, button](bool selected) {
|
||||
if (selected) {
|
||||
selectButton(button);
|
||||
}
|
||||
});
|
||||
|
||||
if (button->isSelected() && !selectedButton_) {
|
||||
selectedButton_ = button;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void RadioButtonGroup::removeButton(RadioButton *button) {
|
||||
auto it = std::find(buttons_.begin(), buttons_.end(), button);
|
||||
if (it != buttons_.end()) {
|
||||
buttons_.erase(it);
|
||||
if (selectedButton_ == button) {
|
||||
selectedButton_ = nullptr;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void RadioButtonGroup::selectButton(RadioButton *button) {
|
||||
if (selectedButton_ == button) return;
|
||||
|
||||
// 取消之前的选择
|
||||
if (selectedButton_) {
|
||||
selectedButton_->setSelected(false);
|
||||
}
|
||||
|
||||
// 选择新的按钮
|
||||
selectedButton_ = button;
|
||||
if (button) {
|
||||
button->setSelected(true);
|
||||
}
|
||||
|
||||
if (onSelectionChange_) {
|
||||
onSelectionChange_(button);
|
||||
}
|
||||
}
|
||||
|
||||
void RadioButtonGroup::setOnSelectionChange(Function<void(RadioButton*)> callback) {
|
||||
onSelectionChange_ = callback;
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,478 @@
|
|||
#include <extra2d/ui/slider.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <cmath>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
Slider::Slider() {
|
||||
setAnchor(0.0f, 0.0f);
|
||||
setSize(200.0f, 20.0f);
|
||||
}
|
||||
|
||||
Ptr<Slider> Slider::create() {
|
||||
return makePtr<Slider>();
|
||||
}
|
||||
|
||||
Ptr<Slider> Slider::create(float min, float max, float value) {
|
||||
auto slider = makePtr<Slider>();
|
||||
slider->setRange(min, max);
|
||||
slider->setValue(value);
|
||||
return slider;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 链式调用构建器方法实现
|
||||
// ============================================================================
|
||||
|
||||
/**
|
||||
* @brief 设置位置（浮点坐标）
|
||||
* @param x X坐标
|
||||
* @param y Y坐标
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置位置（Vec2坐标）
|
||||
* @param pos 位置向量
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置锚点（浮点坐标）
|
||||
* @param x X锚点（0-1）
|
||||
* @param y Y锚点（0-1）
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置锚点（Vec2坐标）
|
||||
* @param anchor 锚点向量
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置尺寸
|
||||
* @param width 宽度
|
||||
* @param height 高度
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withSize(float width, float height) {
|
||||
setSize(width, height);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置最小值
|
||||
* @param min 最小值
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withMinValue(float min) {
|
||||
min_ = min;
|
||||
setValue(value_);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置最大值
|
||||
* @param max 最大值
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withMaxValue(float max) {
|
||||
max_ = max;
|
||||
setValue(value_);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置当前值
|
||||
* @param value 当前值
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withValue(float value) {
|
||||
setValue(value);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置坐标空间
|
||||
* @param space 坐标空间类型
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置屏幕位置（浮点坐标）
|
||||
* @param x X屏幕坐标
|
||||
* @param y Y屏幕坐标
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置屏幕位置（Vec2坐标）
|
||||
* @param pos 屏幕位置向量
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置相机偏移（浮点坐标）
|
||||
* @param x X偏移量
|
||||
* @param y Y偏移量
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 设置相机偏移（Vec2坐标）
|
||||
* @param offset 偏移向量
|
||||
* @return 返回this指针，支持链式调用
|
||||
*/
|
||||
Slider *Slider::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
void Slider::setRange(float min, float max) {
|
||||
min_ = min;
|
||||
max_ = max;
|
||||
setValue(value_);
|
||||
}
|
||||
|
||||
void Slider::setValue(float value) {
|
||||
float newValue = std::clamp(value, min_, max_);
|
||||
if (step_ > 0.0f) {
|
||||
newValue = snapToStep(newValue);
|
||||
}
|
||||
|
||||
if (value_ != newValue) {
|
||||
value_ = newValue;
|
||||
if (onValueChange_) {
|
||||
onValueChange_(value_);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void Slider::setStep(float step) {
|
||||
step_ = step;
|
||||
if (step_ > 0.0f) {
|
||||
setValue(value_);
|
||||
}
|
||||
}
|
||||
|
||||
void Slider::setVertical(bool vertical) {
|
||||
vertical_ = vertical;
|
||||
}
|
||||
|
||||
void Slider::setTrackSize(float size) {
|
||||
trackSize_ = size;
|
||||
}
|
||||
|
||||
void Slider::setThumbSize(float size) {
|
||||
thumbSize_ = size;
|
||||
}
|
||||
|
||||
void Slider::setTrackColor(const Color &color) {
|
||||
trackColor_ = color;
|
||||
}
|
||||
|
||||
void Slider::setFillColor(const Color &color) {
|
||||
fillColor_ = color;
|
||||
}
|
||||
|
||||
void Slider::setThumbColor(const Color &color) {
|
||||
thumbColor_ = color;
|
||||
}
|
||||
|
||||
void Slider::setThumbHoverColor(const Color &color) {
|
||||
thumbHoverColor_ = color;
|
||||
}
|
||||
|
||||
void Slider::setThumbPressedColor(const Color &color) {
|
||||
thumbPressedColor_ = color;
|
||||
}
|
||||
|
||||
void Slider::setShowThumb(bool show) {
|
||||
showThumb_ = show;
|
||||
}
|
||||
|
||||
void Slider::setShowFill(bool show) {
|
||||
showFill_ = show;
|
||||
}
|
||||
|
||||
void Slider::setTextEnabled(bool enabled) {
|
||||
textEnabled_ = enabled;
|
||||
}
|
||||
|
||||
void Slider::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
}
|
||||
|
||||
void Slider::setTextColor(const Color &color) {
|
||||
textColor_ = color;
|
||||
}
|
||||
|
||||
void Slider::setTextFormat(const String &format) {
|
||||
textFormat_ = format;
|
||||
}
|
||||
|
||||
void Slider::setOnValueChange(Function<void(float)> callback) {
|
||||
onValueChange_ = callback;
|
||||
}
|
||||
|
||||
void Slider::setOnDragStart(Function<void()> callback) {
|
||||
onDragStart_ = callback;
|
||||
}
|
||||
|
||||
void Slider::setOnDragEnd(Function<void()> callback) {
|
||||
onDragEnd_ = callback;
|
||||
}
|
||||
|
||||
Rect Slider::getBoundingBox() const {
|
||||
return Rect(getPosition().x, getPosition().y, getSize().width, getSize().height);
|
||||
}
|
||||
|
||||
float Slider::valueToPosition(float value) const {
|
||||
Vec2 pos = getPosition();
|
||||
Size size = getSize();
|
||||
|
||||
float percent = (value - min_) / (max_ - min_);
|
||||
|
||||
if (vertical_) {
|
||||
return pos.y + size.height - percent * size.height;
|
||||
} else {
|
||||
return pos.x + percent * size.width;
|
||||
}
|
||||
}
|
||||
|
||||
float Slider::positionToValue(float pos) const {
|
||||
Vec2 widgetPos = getPosition();
|
||||
Size size = getSize();
|
||||
|
||||
float percent;
|
||||
if (vertical_) {
|
||||
percent = (widgetPos.y + size.height - pos) / size.height;
|
||||
} else {
|
||||
percent = (pos - widgetPos.x) / size.width;
|
||||
}
|
||||
|
||||
percent = std::clamp(percent, 0.0f, 1.0f);
|
||||
return min_ + percent * (max_ - min_);
|
||||
}
|
||||
|
||||
Rect Slider::getThumbRect() const {
|
||||
Vec2 pos = getPosition();
|
||||
Size size = getSize();
|
||||
|
||||
float thumbPos = valueToPosition(value_);
|
||||
|
||||
if (vertical_) {
|
||||
return Rect(
|
||||
pos.x + (size.width - thumbSize_) * 0.5f,
|
||||
thumbPos - thumbSize_ * 0.5f,
|
||||
thumbSize_,
|
||||
thumbSize_
|
||||
);
|
||||
} else {
|
||||
return Rect(
|
||||
thumbPos - thumbSize_ * 0.5f,
|
||||
pos.y + (size.height - thumbSize_) * 0.5f,
|
||||
thumbSize_,
|
||||
thumbSize_
|
||||
);
|
||||
}
|
||||
}
|
||||
|
||||
Rect Slider::getTrackRect() const {
|
||||
Vec2 pos = getPosition();
|
||||
Size size = getSize();
|
||||
|
||||
if (vertical_) {
|
||||
return Rect(
|
||||
pos.x + (size.width - trackSize_) * 0.5f,
|
||||
pos.y,
|
||||
trackSize_,
|
||||
size.height
|
||||
);
|
||||
} else {
|
||||
return Rect(
|
||||
pos.x,
|
||||
pos.y + (size.height - trackSize_) * 0.5f,
|
||||
size.width,
|
||||
trackSize_
|
||||
);
|
||||
}
|
||||
}
|
||||
|
||||
String Slider::formatText() const {
|
||||
String result = textFormat_;
|
||||
|
||||
size_t pos = result.find("{value}");
|
||||
if (pos != String::npos) {
|
||||
result.replace(pos, 7, std::to_string(static_cast<int>(value_)));
|
||||
}
|
||||
|
||||
pos = result.find("{value:");
|
||||
if (pos != String::npos) {
|
||||
size_t endPos = result.find("}", pos);
|
||||
if (endPos != String::npos) {
|
||||
String format = result.substr(pos + 7, endPos - pos - 8);
|
||||
result.replace(pos, endPos - pos + 1, std::to_string(static_cast<int>(value_)));
|
||||
}
|
||||
}
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
float Slider::snapToStep(float value) const {
|
||||
float steps = std::round((value - min_) / step_);
|
||||
return min_ + steps * step_;
|
||||
}
|
||||
|
||||
void Slider::onDrawWidget(RenderBackend &renderer) {
|
||||
Rect trackRect = getTrackRect();
|
||||
|
||||
// 绘制轨道背景
|
||||
renderer.fillRect(trackRect, trackColor_);
|
||||
|
||||
// 绘制填充部分
|
||||
if (showFill_) {
|
||||
float percent = (value_ - min_) / (max_ - min_);
|
||||
float fillX = trackRect.origin.x;
|
||||
float fillY = trackRect.origin.y;
|
||||
float fillW = trackRect.size.width;
|
||||
float fillH = trackRect.size.height;
|
||||
|
||||
if (vertical_) {
|
||||
fillH = trackRect.size.height * percent;
|
||||
fillY = trackRect.origin.y + trackRect.size.height - fillH;
|
||||
} else {
|
||||
fillW = trackRect.size.width * percent;
|
||||
}
|
||||
|
||||
Rect fillRect(fillX, fillY, fillW, fillH);
|
||||
renderer.fillRect(fillRect, fillColor_);
|
||||
}
|
||||
|
||||
// 绘制滑块
|
||||
if (showThumb_) {
|
||||
Rect thumbRect = getThumbRect();
|
||||
Color thumbColor = thumbColor_;
|
||||
|
||||
if (dragging_) {
|
||||
thumbColor = thumbPressedColor_;
|
||||
} else if (hovered_) {
|
||||
thumbColor = thumbHoverColor_;
|
||||
}
|
||||
|
||||
renderer.fillRect(thumbRect, thumbColor);
|
||||
renderer.drawRect(thumbRect, Colors::White, 1.0f);
|
||||
}
|
||||
|
||||
// 绘制文本
|
||||
if (textEnabled_ && font_) {
|
||||
String text = formatText();
|
||||
Vec2 textSize = font_->measureText(text);
|
||||
Vec2 pos = getPosition();
|
||||
Size size = getSize();
|
||||
|
||||
Vec2 textPos(
|
||||
pos.x + size.width + 10.0f,
|
||||
pos.y + (size.height - textSize.y) * 0.5f
|
||||
);
|
||||
|
||||
renderer.drawText(*font_, text, textPos, textColor_);
|
||||
}
|
||||
}
|
||||
|
||||
bool Slider::onMousePress(const MouseEvent &event) {
|
||||
if (event.button == MouseButton::Left) {
|
||||
Rect thumbRect = getThumbRect();
|
||||
|
||||
if (thumbRect.containsPoint(Point(event.x, event.y))) {
|
||||
dragging_ = true;
|
||||
if (onDragStart_) {
|
||||
onDragStart_();
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
// 点击轨道直接跳转
|
||||
Rect trackRect = getTrackRect();
|
||||
if (trackRect.containsPoint(Point(event.x, event.y))) {
|
||||
float newValue = positionToValue(vertical_ ? event.y : event.x);
|
||||
setValue(newValue);
|
||||
dragging_ = true;
|
||||
if (onDragStart_) {
|
||||
onDragStart_();
|
||||
}
|
||||
return true;
|
||||
}
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool Slider::onMouseRelease(const MouseEvent &event) {
|
||||
if (event.button == MouseButton::Left && dragging_) {
|
||||
dragging_ = false;
|
||||
if (onDragEnd_) {
|
||||
onDragEnd_();
|
||||
}
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool Slider::onMouseMove(const MouseEvent &event) {
|
||||
if (dragging_) {
|
||||
float newValue = positionToValue(vertical_ ? event.y : event.x);
|
||||
setValue(newValue);
|
||||
return true;
|
||||
}
|
||||
|
||||
// 检查悬停
|
||||
Rect thumbRect = getThumbRect();
|
||||
bool wasHovered = hovered_;
|
||||
hovered_ = thumbRect.containsPoint(Point(event.x, event.y));
|
||||
|
||||
return hovered_ != wasHovered;
|
||||
}
|
||||
|
||||
void Slider::onMouseEnter() {
|
||||
hovered_ = true;
|
||||
}
|
||||
|
||||
void Slider::onMouseLeave() {
|
||||
hovered_ = false;
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -0,0 +1,255 @@
|
|||
#include <extra2d/ui/text.h>
|
||||
#include <extra2d/graphics/render_backend.h>
|
||||
#include <extra2d/core/string.h>
|
||||
#include <cstdarg>
|
||||
#include <cstdio>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
Text::Text() {
|
||||
// 文字默认锚点为左上角，这样setPosition(0, 0)会在左上角显示
|
||||
setAnchor(0.0f, 0.0f);
|
||||
}
|
||||
|
||||
Text::Text(const String &text) : text_(text) {
|
||||
sizeDirty_ = true;
|
||||
// 文字默认锚点为左上角，这样setPosition(0, 0)会在左上角显示
|
||||
setAnchor(0.0f, 0.0f);
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用构建器方法
|
||||
// ------------------------------------------------------------------------
|
||||
Text *Text::withPosition(float x, float y) {
|
||||
setPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withPosition(const Vec2 &pos) {
|
||||
setPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withAnchor(float x, float y) {
|
||||
setAnchor(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withAnchor(const Vec2 &anchor) {
|
||||
setAnchor(anchor);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withTextColor(const Color &color) {
|
||||
setTextColor(color);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withFont(Ptr<FontAtlas> font) {
|
||||
setFont(font);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withFontSize(int size) {
|
||||
setFontSize(size);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withAlignment(Alignment align) {
|
||||
setAlignment(align);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withVerticalAlignment(VerticalAlignment align) {
|
||||
setVerticalAlignment(align);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 链式调用 - 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
Text *Text::withCoordinateSpace(CoordinateSpace space) {
|
||||
setCoordinateSpace(space);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withScreenPosition(float x, float y) {
|
||||
setScreenPosition(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withScreenPosition(const Vec2 &pos) {
|
||||
setScreenPosition(pos);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withCameraOffset(float x, float y) {
|
||||
setCameraOffset(x, y);
|
||||
return this;
|
||||
}
|
||||
|
||||
Text *Text::withCameraOffset(const Vec2 &offset) {
|
||||
setCameraOffset(offset);
|
||||
return this;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 普通设置方法
|
||||
// ------------------------------------------------------------------------
|
||||
void Text::setText(const String &text) {
|
||||
text_ = text;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setFont(Ptr<FontAtlas> font) {
|
||||
font_ = font;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setTextColor(const Color &color) { color_ = color; }
|
||||
|
||||
void Text::setFontSize(int size) {
|
||||
fontSize_ = size;
|
||||
sizeDirty_ = true;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setAlignment(Alignment align) {
|
||||
alignment_ = align;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
void Text::setVerticalAlignment(VerticalAlignment align) {
|
||||
verticalAlignment_ = align;
|
||||
updateSpatialIndex();
|
||||
}
|
||||
|
||||
Vec2 Text::getTextSize() const {
|
||||
updateCache();
|
||||
return cachedSize_;
|
||||
}
|
||||
|
||||
float Text::getLineHeight() const {
|
||||
if (font_) {
|
||||
return font_->getLineHeight();
|
||||
}
|
||||
return static_cast<float>(fontSize_);
|
||||
}
|
||||
|
||||
void Text::updateCache() const {
|
||||
if (!sizeDirty_ || !font_) {
|
||||
return;
|
||||
}
|
||||
|
||||
cachedSize_ = font_->measureText(text_);
|
||||
sizeDirty_ = false;
|
||||
}
|
||||
|
||||
Vec2 Text::calculateDrawPosition() const {
|
||||
Vec2 pos = getPosition();
|
||||
Vec2 textSize = getTextSize();
|
||||
Size widgetSize = getSize();
|
||||
Vec2 anchor = getAnchor();
|
||||
|
||||
// 如果设置了控件大小，使用控件大小作为对齐参考
|
||||
float refWidth = widgetSize.empty() ? textSize.x : widgetSize.width;
|
||||
float refHeight = widgetSize.empty() ? textSize.y : widgetSize.height;
|
||||
|
||||
// 锚点调整：锚点(0.5, 0.5)表示文本中心在pos位置
|
||||
// 需要将文本向左上方偏移锚点比例 * 文本大小
|
||||
pos.x -= textSize.x * anchor.x;
|
||||
pos.y -= textSize.y * anchor.y;
|
||||
|
||||
// 水平对齐（仅在设置了控件大小时生效）
|
||||
if (!widgetSize.empty()) {
|
||||
switch (alignment_) {
|
||||
case Alignment::Center:
|
||||
pos.x += (refWidth - textSize.x) * 0.5f;
|
||||
break;
|
||||
case Alignment::Right:
|
||||
pos.x += refWidth - textSize.x;
|
||||
break;
|
||||
case Alignment::Left:
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
// 垂直对齐（仅在设置了控件大小时生效）
|
||||
if (!widgetSize.empty()) {
|
||||
switch (verticalAlignment_) {
|
||||
case VerticalAlignment::Middle:
|
||||
pos.y += (refHeight - textSize.y) * 0.5f;
|
||||
break;
|
||||
case VerticalAlignment::Bottom:
|
||||
pos.y += refHeight - textSize.y;
|
||||
break;
|
||||
case VerticalAlignment::Top:
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
return pos;
|
||||
}
|
||||
|
||||
Ptr<Text> Text::create() { return makePtr<Text>(); }
|
||||
|
||||
Ptr<Text> Text::create(const String &text) { return makePtr<Text>(text); }
|
||||
|
||||
Ptr<Text> Text::create(const String &text, Ptr<FontAtlas> font) {
|
||||
auto t = makePtr<Text>(text);
|
||||
t->setFont(font);
|
||||
return t;
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 格式化创建方法
|
||||
// ------------------------------------------------------------------------
|
||||
Ptr<Text> Text::createFormat(const char *fmt, ...) {
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
char buffer[256];
|
||||
vsnprintf(buffer, sizeof(buffer), fmt, args);
|
||||
va_end(args);
|
||||
return makePtr<Text>(buffer);
|
||||
}
|
||||
|
||||
Ptr<Text> Text::createFormat(Ptr<FontAtlas> font, const char *fmt, ...) {
|
||||
va_list args;
|
||||
va_start(args, fmt);
|
||||
char buffer[256];
|
||||
vsnprintf(buffer, sizeof(buffer), fmt, args);
|
||||
va_end(args);
|
||||
auto t = makePtr<Text>(buffer);
|
||||
t->setFont(font);
|
||||
return t;
|
||||
}
|
||||
|
||||
Rect Text::getBoundingBox() const {
|
||||
if (!font_ || text_.empty()) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
updateCache();
|
||||
Vec2 size = cachedSize_;
|
||||
if (size.x <= 0.0f || size.y <= 0.0f) {
|
||||
return Rect();
|
||||
}
|
||||
|
||||
Vec2 pos = calculateDrawPosition();
|
||||
return Rect(pos.x, pos.y, size.x, size.y);
|
||||
}
|
||||
|
||||
void Text::onDrawWidget(RenderBackend &renderer) {
|
||||
if (!font_ || text_.empty()) {
|
||||
return;
|
||||
}
|
||||
|
||||
Vec2 pos = calculateDrawPosition();
|
||||
renderer.drawText(*font_, text_, pos, color_);
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
@ -1,9 +1,13 @@
|
|||
#include <cmath>
|
||||
#include <extra2d/graphics/camera.h>
|
||||
#include <extra2d/scene/scene.h>
|
||||
#include <extra2d/ui/widget.h>
|
||||
|
||||
namespace extra2d {
|
||||
|
||||
Widget::Widget() { setSpatialIndexed(false); }
|
||||
Widget::Widget() {
|
||||
setSpatialIndexed(false);
|
||||
}
|
||||
|
||||
void Widget::setSize(const Size &size) {
|
||||
size_ = size;
|
||||
|
|
@ -19,7 +23,7 @@ Rect Widget::getBoundingBox() const {
|
|||
return Rect();
|
||||
}
|
||||
|
||||
auto pos = getPosition();
|
||||
auto pos = getRenderPosition();
|
||||
auto anchor = getAnchor();
|
||||
auto scale = getScale();
|
||||
|
||||
|
|
@ -35,4 +39,103 @@ Rect Widget::getBoundingBox() const {
|
|||
return Rect(l, t, std::abs(w), std::abs(h));
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 坐标空间设置
|
||||
// ------------------------------------------------------------------------
|
||||
void Widget::setCoordinateSpace(CoordinateSpace space) {
|
||||
coordinateSpace_ = space;
|
||||
}
|
||||
|
||||
void Widget::setScreenPosition(const Vec2 &pos) {
|
||||
screenPosition_ = pos;
|
||||
if (coordinateSpace_ == CoordinateSpace::Screen) {
|
||||
updateSpatialIndex();
|
||||
}
|
||||
}
|
||||
|
||||
void Widget::setScreenPosition(float x, float y) {
|
||||
setScreenPosition(Vec2(x, y));
|
||||
}
|
||||
|
||||
void Widget::setCameraOffset(const Vec2 &offset) {
|
||||
cameraOffset_ = offset;
|
||||
if (coordinateSpace_ == CoordinateSpace::Camera) {
|
||||
updateSpatialIndex();
|
||||
}
|
||||
}
|
||||
|
||||
void Widget::setCameraOffset(float x, float y) {
|
||||
setCameraOffset(Vec2(x, y));
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 获取实际渲染位置（根据坐标空间计算）
|
||||
// ------------------------------------------------------------------------
|
||||
Vec2 Widget::getRenderPosition() const {
|
||||
switch (coordinateSpace_) {
|
||||
case CoordinateSpace::Screen:
|
||||
// 屏幕空间：直接使用屏幕位置
|
||||
return screenPosition_;
|
||||
|
||||
case CoordinateSpace::Camera: {
|
||||
// 相机空间：相机位置 + 偏移
|
||||
Scene *scene = getScene();
|
||||
if (scene) {
|
||||
Camera *camera = scene->getActiveCamera();
|
||||
if (camera) {
|
||||
return camera->getPosition() + cameraOffset_;
|
||||
}
|
||||
}
|
||||
// 如果没有场景或相机，使用偏移作为绝对位置
|
||||
return cameraOffset_;
|
||||
}
|
||||
|
||||
case CoordinateSpace::World:
|
||||
default:
|
||||
// 世界空间：使用节点的世界位置
|
||||
return getPosition();
|
||||
}
|
||||
}
|
||||
|
||||
// ------------------------------------------------------------------------
|
||||
// 重写 onDraw 以处理坐标空间
|
||||
// ------------------------------------------------------------------------
|
||||
void Widget::onDraw(RenderBackend &renderer) {
|
||||
// 根据坐标空间调整渲染
|
||||
if (coordinateSpace_ == CoordinateSpace::Screen) {
|
||||
// 屏幕空间：临时修改位置为屏幕位置，保持锚点不变
|
||||
Vec2 worldPos = getPosition();
|
||||
const_cast<Widget*>(this)->setPosition(screenPosition_);
|
||||
|
||||
// 调用子类的绘制
|
||||
onDrawWidget(renderer);
|
||||
|
||||
// 恢复原始位置
|
||||
const_cast<Widget*>(this)->setPosition(worldPos);
|
||||
} else if (coordinateSpace_ == CoordinateSpace::Camera) {
|
||||
// 相机空间：计算相对于相机的位置
|
||||
Scene *scene = getScene();
|
||||
if (scene) {
|
||||
Camera *camera = scene->getActiveCamera();
|
||||
if (camera) {
|
||||
Vec2 worldPos = getPosition();
|
||||
Vec2 cameraRelativePos = camera->getPosition() + cameraOffset_;
|
||||
const_cast<Widget*>(this)->setPosition(cameraRelativePos);
|
||||
|
||||
// 调用子类的绘制
|
||||
onDrawWidget(renderer);
|
||||
|
||||
// 恢复原始位置
|
||||
const_cast<Widget*>(this)->setPosition(worldPos);
|
||||
return;
|
||||
}
|
||||
}
|
||||
// 如果没有场景或相机，按世界空间处理
|
||||
onDrawWidget(renderer);
|
||||
} else {
|
||||
// 世界空间：正常渲染
|
||||
onDrawWidget(renderer);
|
||||
}
|
||||
}
|
||||
|
||||
} // namespace extra2d
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
#include <cmath>
|
||||
#include <extra2d/extra2d.h>
|
||||
#include <sstream>
|
||||
|
||||
|
||||
using namespace extra2d;
|
||||
|
||||
|
|
@ -73,7 +71,7 @@ public:
|
|||
centerBox_->setPosition(Vec2(centerX, centerY));
|
||||
addChild(centerBox_);
|
||||
|
||||
// 加载字体
|
||||
// 加载字体并创建UI
|
||||
loadFonts();
|
||||
|
||||
E2D_LOG_INFO("创建了 {} 个碰撞框", boxes_.size() + 1);
|
||||
|
|
@ -102,6 +100,9 @@ public:
|
|||
// 执行碰撞检测
|
||||
performCollisionDetection();
|
||||
|
||||
// 更新UI文本
|
||||
updateUI();
|
||||
|
||||
// 检查退出按键
|
||||
auto &input = Application::instance().input();
|
||||
if (input.isButtonPressed(GamepadButton::Start)) {
|
||||
|
|
@ -110,28 +111,60 @@ public:
|
|||
}
|
||||
}
|
||||
|
||||
void onRender(RenderBackend &renderer) override {
|
||||
Scene::onRender(renderer);
|
||||
|
||||
// 绘制说明文字
|
||||
drawUI(renderer);
|
||||
}
|
||||
|
||||
private:
|
||||
/**
|
||||
* @brief 加载字体资源
|
||||
* @brief 加载字体资源并创建UI文本
|
||||
*/
|
||||
void loadFonts() {
|
||||
auto &resources = Application::instance().resources();
|
||||
titleFont_ = resources.loadFont("assets/font.ttf", 60, true);
|
||||
infoFont_ = resources.loadFont("assets/font.ttf", 28, true);
|
||||
|
||||
if (!titleFont_) {
|
||||
E2D_LOG_WARN("无法加载标题字体");
|
||||
}
|
||||
if (!infoFont_) {
|
||||
E2D_LOG_WARN("无法加载信息字体");
|
||||
}
|
||||
// 创建标题文本
|
||||
titleText_ = Text::create("碰撞检测演示", titleFont_);
|
||||
titleText_->setPosition(50.0f, 30.0f);
|
||||
titleText_->setTextColor(Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
addChild(titleText_);
|
||||
|
||||
// 创建说明文本
|
||||
descText_ = Text::create("蓝色方块旋转并检测碰撞", infoFont_);
|
||||
descText_->setPosition(50.0f, 80.0f);
|
||||
descText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(descText_);
|
||||
|
||||
collideHintText_ = Text::create("红色 = 检测到碰撞", infoFont_);
|
||||
collideHintText_->setPosition(50.0f, 105.0f);
|
||||
collideHintText_->setTextColor(Color(1.0f, 0.5f, 0.5f, 1.0f));
|
||||
addChild(collideHintText_);
|
||||
|
||||
// 创建动态统计文本
|
||||
collisionText_ = Text::create("", infoFont_);
|
||||
collisionText_->setPosition(50.0f, 150.0f);
|
||||
collisionText_->setTextColor(Color(1.0f, 1.0f, 0.5f, 1.0f));
|
||||
addChild(collisionText_);
|
||||
|
||||
fpsText_ = Text::create("", infoFont_);
|
||||
fpsText_->setPosition(50.0f, 175.0f);
|
||||
fpsText_->setTextColor(Color(0.8f, 1.0f, 0.8f, 1.0f));
|
||||
addChild(fpsText_);
|
||||
|
||||
// 创建退出提示文本
|
||||
float screenHeight = static_cast<float>(Application::instance().getConfig().height);
|
||||
exitHintText_ = Text::create("按 + 键退出", infoFont_);
|
||||
exitHintText_->setPosition(50.0f, screenHeight - 50.0f);
|
||||
exitHintText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(exitHintText_);
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 更新UI文本
|
||||
*/
|
||||
void updateUI() {
|
||||
auto &app = Application::instance();
|
||||
|
||||
// 使用 setFormat 更新动态文本
|
||||
collisionText_->setFormat("碰撞数: %zu", collisionCount_);
|
||||
fpsText_->setFormat("FPS: %u", app.fps());
|
||||
}
|
||||
|
||||
/**
|
||||
|
|
@ -182,44 +215,6 @@ private:
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 绘制UI界面
|
||||
*/
|
||||
void drawUI(RenderBackend &renderer) {
|
||||
if (!titleFont_ || !infoFont_)
|
||||
return;
|
||||
|
||||
auto &app = Application::instance();
|
||||
|
||||
// 绘制标题
|
||||
renderer.drawText(*titleFont_, "碰撞检测演示", Vec2(50.0f, 30.0f),
|
||||
Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
|
||||
// 绘制说明文字
|
||||
renderer.drawText(*infoFont_, "蓝色方块旋转并检测碰撞", Vec2(50.0f, 80.0f),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
renderer.drawText(*infoFont_, "红色 = 检测到碰撞", Vec2(50.0f, 105.0f),
|
||||
Color(1.0f, 0.5f, 0.5f, 1.0f));
|
||||
|
||||
// 绘制碰撞统计
|
||||
std::stringstream ss;
|
||||
ss << "碰撞数: " << collisionCount_;
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(50.0f, 150.0f),
|
||||
Color(1.0f, 1.0f, 0.5f, 1.0f));
|
||||
|
||||
// 绘制 FPS
|
||||
ss.str("");
|
||||
ss << "FPS: " << app.fps();
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(50.0f, 175.0f),
|
||||
Color(0.8f, 1.0f, 0.8f, 1.0f));
|
||||
|
||||
// 绘制操作提示
|
||||
float screenHeight = static_cast<float>(app.getConfig().height);
|
||||
renderer.drawText(*infoFont_, "按 + 键退出",
|
||||
Vec2(50.0f, screenHeight - 50.0f),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
}
|
||||
|
||||
Ptr<CollisionBox> centerBox_;
|
||||
std::vector<Ptr<CollisionBox>> boxes_;
|
||||
float rotationAngle_ = 0.0f;
|
||||
|
|
@ -229,6 +224,14 @@ private:
|
|||
// 字体资源
|
||||
Ptr<FontAtlas> titleFont_;
|
||||
Ptr<FontAtlas> infoFont_;
|
||||
|
||||
// UI 文本组件
|
||||
Ptr<Text> titleText_;
|
||||
Ptr<Text> descText_;
|
||||
Ptr<Text> collideHintText_;
|
||||
Ptr<Text> collisionText_;
|
||||
Ptr<Text> fpsText_;
|
||||
Ptr<Text> exitHintText_;
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
|
|
|
|||
|
|
@ -28,7 +28,40 @@ public:
|
|||
|
||||
if (!font_) {
|
||||
E2D_LOG_ERROR("字体加载失败，文字渲染将不可用！");
|
||||
return;
|
||||
}
|
||||
|
||||
// 创建 "你好世界" 文本组件 - 使用屏幕空间（固定位置，不随相机移动）
|
||||
auto text1 = Text::create("你好世界", font_);
|
||||
text1->withCoordinateSpace(CoordinateSpace::Screen)
|
||||
->withScreenPosition(640.0f, 360.0f) // 屏幕中心
|
||||
->withAnchor(0.5f, 0.5f) // 中心锚点，让文字中心对准位置
|
||||
->withTextColor(Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
addChild(text1);
|
||||
|
||||
// 创建提示文本组件 - 使用屏幕空间，固定在屏幕底部
|
||||
auto text2 = Text::create("退出按键（START 按钮）", font_);
|
||||
text2->withCoordinateSpace(CoordinateSpace::Screen)
|
||||
->withScreenPosition(640.0f, 650.0f) // 屏幕底部
|
||||
->withAnchor(0.5f, 0.5f)
|
||||
->withTextColor(Color(1.0f, 1.0f, 0.0f, 1.0f));
|
||||
addChild(text2);
|
||||
|
||||
// 创建相机空间文本 - 跟随相机但保持相对偏移
|
||||
auto text3 = Text::create("相机空间文本", font_);
|
||||
text3->withCoordinateSpace(CoordinateSpace::Camera)
|
||||
->withCameraOffset(50.0f, 50.0f) // 相机左上角偏移（屏幕坐标系Y向下）
|
||||
->withAnchor(0.0f, 0.0f) // 左上角锚点，文字从指定位置开始显示
|
||||
->withTextColor(Color(0.0f, 1.0f, 1.0f, 1.0f));
|
||||
addChild(text3);
|
||||
|
||||
// 创建世界空间文本 - 随相机移动（默认行为）
|
||||
auto text4 = Text::create("世界空间文本", font_);
|
||||
text4->withCoordinateSpace(CoordinateSpace::World)
|
||||
->withPosition(100.0f, 100.0f) // 世界坐标
|
||||
->withAnchor(0.0f, 0.0f) // 左上角锚点，文字从指定位置开始显示
|
||||
->withTextColor(Color(1.0f, 0.5f, 0.5f, 1.0f));
|
||||
addChild(text4);
|
||||
}
|
||||
|
||||
/**
|
||||
|
|
@ -48,27 +81,6 @@ public:
|
|||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* @brief 渲染时调用
|
||||
* @param renderer 渲染后端
|
||||
*/
|
||||
void onRender(RenderBackend &renderer) override {
|
||||
Scene::onRender(renderer);
|
||||
|
||||
if (!font_)
|
||||
return;
|
||||
|
||||
// 屏幕中心位置
|
||||
float centerX = 640.0f; // 1280 / 2
|
||||
float centerY = 360.0f; // 720 / 2
|
||||
|
||||
// 绘制 "你好世界" 文字（白色，居中）
|
||||
renderer.drawText(*font_, "你好世界", Vec2(centerX - 100.0f, centerY),Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
|
||||
// 绘制提示文字（黄色）
|
||||
renderer.drawText(*font_, "退出按键（START 按钮）",Vec2(centerX - 80.0f, centerY + 50.0f), Color(1.0f, 1.0f, 0.0f, 1.0f));
|
||||
}
|
||||
|
||||
private:
|
||||
Ptr<FontAtlas> font_; // 字体图集
|
||||
};
|
||||
|
|
|
|||
|
|
@ -1,7 +1,6 @@
|
|||
#include "PlayScene.h"
|
||||
|
||||
#include "audio_context.h"
|
||||
#include "audio_controller.h"
|
||||
#include "audio_manager.h"
|
||||
#include "storage.h"
|
||||
#include "StartScene.h"
|
||||
#include "SuccessScene.h"
|
||||
|
|
@ -93,11 +92,6 @@ PlayScene::PlayScene(int level) {
|
|||
mapLayer_->setPosition(0.0f, 0.0f);
|
||||
addChild(mapLayer_);
|
||||
|
||||
auto audioNode = AudioController::create();
|
||||
audioNode->setName("AudioController");
|
||||
addChild(audioNode);
|
||||
setAudioController(audioNode);
|
||||
|
||||
setLevel(level);
|
||||
}
|
||||
|
||||
|
|
@ -124,45 +118,43 @@ void PlayScene::onUpdate(float dt) {
|
|||
auto& input = app.input();
|
||||
|
||||
// B 键返回主菜单
|
||||
if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_B)) {
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::B)) {
|
||||
app.scenes().replaceScene(
|
||||
extra2d::makePtr<StartScene>(), extra2d::TransitionType::Fade, 0.2f);
|
||||
return;
|
||||
}
|
||||
|
||||
// Y 键重开
|
||||
if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_Y)) {
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::Y)) {
|
||||
setLevel(g_CurrentLevel);
|
||||
return;
|
||||
}
|
||||
|
||||
// X 键直接切换音效
|
||||
if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_X)) {
|
||||
// X键直接切换音效
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::X)) {
|
||||
g_SoundOpen = !g_SoundOpen;
|
||||
if (auto audio = getAudioController()) {
|
||||
audio->setEnabled(g_SoundOpen);
|
||||
}
|
||||
AudioManager::instance().setEnabled(g_SoundOpen);
|
||||
updateSoundIcon();
|
||||
return;
|
||||
}
|
||||
|
||||
// A 键执行选中的菜单项
|
||||
if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_A)) {
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::A)) {
|
||||
executeMenuItem();
|
||||
return;
|
||||
}
|
||||
|
||||
// 方向键移动
|
||||
if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_DPAD_UP)) {
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::DPadUp)) {
|
||||
move(0, -1, 1);
|
||||
flush();
|
||||
} else if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_DPAD_DOWN)) {
|
||||
} else if (input.isButtonPressed(extra2d::GamepadButton::DPadDown)) {
|
||||
move(0, 1, 2);
|
||||
flush();
|
||||
} else if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_DPAD_LEFT)) {
|
||||
} else if (input.isButtonPressed(extra2d::GamepadButton::DPadLeft)) {
|
||||
move(-1, 0, 3);
|
||||
flush();
|
||||
} else if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_DPAD_RIGHT)) {
|
||||
} else if (input.isButtonPressed(extra2d::GamepadButton::DPadRight)) {
|
||||
move(1, 0, 4);
|
||||
flush();
|
||||
} else {
|
||||
|
|
@ -189,9 +181,7 @@ void PlayScene::executeMenuItem() {
|
|||
break;
|
||||
case 1: // 切换音效
|
||||
g_SoundOpen = !g_SoundOpen;
|
||||
if (auto audio = getAudioController()) {
|
||||
audio->setEnabled(g_SoundOpen);
|
||||
}
|
||||
AudioManager::instance().setEnabled(g_SoundOpen);
|
||||
updateSoundIcon();
|
||||
break;
|
||||
}
|
||||
|
|
@ -329,9 +319,7 @@ void PlayScene::move(int dx, int dy, int direct) {
|
|||
g_Pushing = false;
|
||||
map_.value[map_.roleY][map_.roleX].type = TYPE::Ground;
|
||||
map_.value[targetY][targetX].type = TYPE::Man;
|
||||
if (auto audio = getAudioController()) {
|
||||
audio->playManMove();
|
||||
}
|
||||
AudioManager::instance().playManMove();
|
||||
} else if (map_.value[targetY][targetX].type == TYPE::Box) {
|
||||
g_Pushing = true;
|
||||
|
||||
|
|
@ -370,9 +358,7 @@ void PlayScene::move(int dx, int dy, int direct) {
|
|||
map_.value[targetY][targetX].type = TYPE::Man;
|
||||
map_.value[map_.roleY][map_.roleX].type = TYPE::Ground;
|
||||
|
||||
if (auto audio = getAudioController()) {
|
||||
audio->playBoxMove();
|
||||
}
|
||||
AudioManager::instance().playBoxMove();
|
||||
} else {
|
||||
return;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -1,7 +1,6 @@
|
|||
#include "StartScene.h"
|
||||
|
||||
#include "audio_context.h"
|
||||
#include "audio_controller.h"
|
||||
#include "audio_manager.h"
|
||||
#include "data.h"
|
||||
#include "PlayScene.h"
|
||||
#include <extra2d/extra2d.h>
|
||||
|
|
@ -28,10 +27,6 @@ void StartScene::onEnter() {
|
|||
setBackgroundColor(extra2d::Colors::Black);
|
||||
|
||||
if (getChildren().empty()) {
|
||||
auto audioNode = AudioController::create();
|
||||
audioNode->setName("audio_controller");
|
||||
addChild(audioNode);
|
||||
setAudioController(audioNode);
|
||||
|
||||
float screenW = static_cast<float>(app.getConfig().width);
|
||||
float screenH = static_cast<float>(app.getConfig().height);
|
||||
|
|
@ -138,9 +133,7 @@ void StartScene::onUpdate(float dt) {
|
|||
// X键切换音效
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::X)) {
|
||||
g_SoundOpen = !g_SoundOpen;
|
||||
if (auto audio = getAudioController()) {
|
||||
audio->setEnabled(g_SoundOpen);
|
||||
}
|
||||
AudioManager::instance().setEnabled(g_SoundOpen);
|
||||
updateSoundIcon();
|
||||
}
|
||||
}
|
||||
|
|
|
|||
|
|
@ -67,7 +67,7 @@ void SuccessScene::onUpdate(float dt) {
|
|||
auto& input = app.input();
|
||||
|
||||
// A键确认返回主菜单
|
||||
if (input.isButtonPressed(SDL_CONTROLLER_BUTTON_A)) {
|
||||
if (input.isButtonPressed(extra2d::GamepadButton::A)) {
|
||||
auto& scenes = extra2d::Application::instance().scenes();
|
||||
scenes.popScene(extra2d::TransitionType::Fade, 0.2f);
|
||||
scenes.popScene(extra2d::TransitionType::Fade, 0.2f);
|
||||
|
|
|
|||
|
|
@ -1,17 +0,0 @@
|
|||
#include "audio_context.h"
|
||||
|
||||
#include "audio_controller.h"
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
static extra2d::WeakPtr<AudioController> g_audioController;
|
||||
|
||||
void setAudioController(const extra2d::Ptr<AudioController>& controller) {
|
||||
g_audioController = controller;
|
||||
}
|
||||
|
||||
extra2d::Ptr<AudioController> getAudioController() {
|
||||
return g_audioController.lock();
|
||||
}
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -1,12 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/extra2d.h>
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
class AudioController;
|
||||
|
||||
void setAudioController(const extra2d::Ptr<AudioController>& controller);
|
||||
extra2d::Ptr<AudioController> getAudioController();
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -1,62 +0,0 @@
|
|||
#include "audio_controller.h"
|
||||
|
||||
#include "storage.h"
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
extra2d::Ptr<AudioController> AudioController::create() {
|
||||
return extra2d::makePtr<AudioController>();
|
||||
}
|
||||
|
||||
void AudioController::onEnter() {
|
||||
Node::onEnter();
|
||||
|
||||
if (!loaded_) {
|
||||
auto& resources = extra2d::Application::instance().resources();
|
||||
|
||||
background_ = resources.loadSound("pushbox_bg", "assets/audio/background.wav");
|
||||
manMove_ = resources.loadSound("pushbox_manmove", "assets/audio/manmove.wav");
|
||||
boxMove_ = resources.loadSound("pushbox_boxmove", "assets/audio/boxmove.wav");
|
||||
|
||||
if (background_) {
|
||||
background_->setLooping(true);
|
||||
background_->play();
|
||||
}
|
||||
|
||||
loaded_ = true;
|
||||
}
|
||||
|
||||
setEnabled(g_SoundOpen);
|
||||
}
|
||||
|
||||
void AudioController::setEnabled(bool enabled) {
|
||||
enabled_ = enabled;
|
||||
g_SoundOpen = enabled;
|
||||
saveSoundOpen(enabled);
|
||||
|
||||
if (!background_) {
|
||||
return;
|
||||
}
|
||||
|
||||
if (enabled_) {
|
||||
background_->resume();
|
||||
} else {
|
||||
background_->pause();
|
||||
}
|
||||
}
|
||||
|
||||
void AudioController::playManMove() {
|
||||
if (!enabled_ || !manMove_) {
|
||||
return;
|
||||
}
|
||||
manMove_->play();
|
||||
}
|
||||
|
||||
void AudioController::playBoxMove() {
|
||||
if (!enabled_ || !boxMove_) {
|
||||
return;
|
||||
}
|
||||
boxMove_->play();
|
||||
}
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -1,29 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include "data.h"
|
||||
#include <extra2d/extra2d.h>
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
class AudioController : public extra2d::Node {
|
||||
public:
|
||||
static extra2d::Ptr<AudioController> create();
|
||||
|
||||
void onEnter() override;
|
||||
|
||||
void setEnabled(bool enabled);
|
||||
bool isEnabled() const { return enabled_; }
|
||||
|
||||
void playManMove();
|
||||
void playBoxMove();
|
||||
|
||||
private:
|
||||
bool loaded_ = false;
|
||||
bool enabled_ = true;
|
||||
|
||||
extra2d::Ptr<extra2d::Sound> background_;
|
||||
extra2d::Ptr<extra2d::Sound> manMove_;
|
||||
extra2d::Ptr<extra2d::Sound> boxMove_;
|
||||
};
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -0,0 +1,112 @@
|
|||
#include "audio_manager.h"
|
||||
|
||||
#include "storage.h"
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
// ============================================================================
|
||||
// 单例实现
|
||||
// ============================================================================
|
||||
AudioManager& AudioManager::instance() {
|
||||
static AudioManager instance;
|
||||
return instance;
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 初始化音频资源
|
||||
// ============================================================================
|
||||
void AudioManager::init() {
|
||||
if (initialized_) {
|
||||
return;
|
||||
}
|
||||
|
||||
auto& resources = extra2d::Application::instance().resources();
|
||||
|
||||
// 加载音效资源
|
||||
background_ = resources.loadSound("pushbox_bg", "assets/audio/background.wav");
|
||||
manMove_ = resources.loadSound("pushbox_manmove", "assets/audio/manmove.wav");
|
||||
boxMove_ = resources.loadSound("pushbox_boxmove", "assets/audio/boxmove.wav");
|
||||
|
||||
// 设置背景音乐循环播放
|
||||
if (background_) {
|
||||
background_->setLooping(true);
|
||||
}
|
||||
|
||||
// 从存储中读取音效设置
|
||||
enabled_ = g_SoundOpen;
|
||||
|
||||
initialized_ = true;
|
||||
|
||||
// 如果音效开启，播放背景音乐
|
||||
if (enabled_ && background_) {
|
||||
background_->play();
|
||||
}
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 启用/禁用音效
|
||||
// ============================================================================
|
||||
void AudioManager::setEnabled(bool enabled) {
|
||||
enabled_ = enabled;
|
||||
g_SoundOpen = enabled;
|
||||
saveSoundOpen(enabled);
|
||||
|
||||
if (!background_) {
|
||||
return;
|
||||
}
|
||||
|
||||
if (enabled_) {
|
||||
background_->resume();
|
||||
} else {
|
||||
background_->pause();
|
||||
}
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 播放角色移动音效
|
||||
// ============================================================================
|
||||
void AudioManager::playManMove() {
|
||||
if (!enabled_ || !manMove_) {
|
||||
return;
|
||||
}
|
||||
manMove_->play();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 播放箱子移动音效
|
||||
// ============================================================================
|
||||
void AudioManager::playBoxMove() {
|
||||
if (!enabled_ || !boxMove_) {
|
||||
return;
|
||||
}
|
||||
boxMove_->play();
|
||||
}
|
||||
|
||||
// ============================================================================
|
||||
// 背景音乐控制
|
||||
// ============================================================================
|
||||
void AudioManager::playBackground() {
|
||||
if (background_) {
|
||||
background_->play();
|
||||
}
|
||||
}
|
||||
|
||||
void AudioManager::pauseBackground() {
|
||||
if (background_) {
|
||||
background_->pause();
|
||||
}
|
||||
}
|
||||
|
||||
void AudioManager::resumeBackground() {
|
||||
if (background_) {
|
||||
background_->resume();
|
||||
}
|
||||
}
|
||||
|
||||
void AudioManager::stopBackground() {
|
||||
if (background_) {
|
||||
background_->stop();
|
||||
}
|
||||
}
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -0,0 +1,47 @@
|
|||
#pragma once
|
||||
|
||||
#include "data.h"
|
||||
#include <extra2d/extra2d.h>
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
// ============================================================================
|
||||
// 全局音频管理器 - 单例模式，不依赖场景生命周期
|
||||
// ============================================================================
|
||||
class AudioManager {
|
||||
public:
|
||||
// 获取单例实例
|
||||
static AudioManager& instance();
|
||||
|
||||
// 初始化音频资源
|
||||
void init();
|
||||
|
||||
// 启用/禁用音效
|
||||
void setEnabled(bool enabled);
|
||||
bool isEnabled() const { return enabled_; }
|
||||
|
||||
// 播放音效
|
||||
void playManMove();
|
||||
void playBoxMove();
|
||||
|
||||
// 背景音乐控制
|
||||
void playBackground();
|
||||
void pauseBackground();
|
||||
void resumeBackground();
|
||||
void stopBackground();
|
||||
|
||||
private:
|
||||
AudioManager() = default;
|
||||
~AudioManager() = default;
|
||||
AudioManager(const AudioManager&) = delete;
|
||||
AudioManager& operator=(const AudioManager&) = delete;
|
||||
|
||||
bool initialized_ = false;
|
||||
bool enabled_ = true;
|
||||
|
||||
extra2d::Ptr<extra2d::Sound> background_;
|
||||
extra2d::Ptr<extra2d::Sound> manMove_;
|
||||
extra2d::Ptr<extra2d::Sound> boxMove_;
|
||||
};
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -2,6 +2,7 @@
|
|||
#include "StartScene.h"
|
||||
#include "data.h"
|
||||
#include "storage.h"
|
||||
#include "audio_manager.h"
|
||||
|
||||
using namespace extra2d;
|
||||
|
||||
|
|
@ -40,6 +41,9 @@ int main(int argc, char **argv)
|
|||
}
|
||||
pushbox::g_SoundOpen = pushbox::loadSoundOpen(true);
|
||||
|
||||
// 初始化全局音频管理器
|
||||
pushbox::AudioManager::instance().init();
|
||||
|
||||
// 进入开始场景（主界面）
|
||||
app.enterScene(makePtr<pushbox::StartScene>());
|
||||
|
||||
|
|
|
|||
|
|
@ -1,40 +0,0 @@
|
|||
#include "menu_button.h"
|
||||
|
||||
#include <extra2d/extra2d.h>
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
extra2d::Ptr<MenuButton> MenuButton::create(extra2d::Ptr<extra2d::FontAtlas> font,
|
||||
const extra2d::String& text,
|
||||
extra2d::Function<void()> onClick) {
|
||||
auto btn = extra2d::makePtr<MenuButton>();
|
||||
btn->setFont(font);
|
||||
btn->setText(text);
|
||||
btn->setPadding(extra2d::Vec2(0.0f, 0.0f));
|
||||
btn->setBackgroundColor(extra2d::Colors::Transparent, extra2d::Colors::Transparent,
|
||||
extra2d::Colors::Transparent);
|
||||
btn->setBorder(extra2d::Colors::Transparent, 0.0f);
|
||||
btn->setTextColor(extra2d::Colors::Black);
|
||||
|
||||
btn->onClick_ = std::move(onClick);
|
||||
btn->setOnClick([wbtn = extra2d::WeakPtr<MenuButton>(btn)]() {
|
||||
if (auto self = wbtn.lock()) {
|
||||
if (self->enabled_ && self->onClick_) {
|
||||
self->onClick_();
|
||||
}
|
||||
}
|
||||
});
|
||||
|
||||
// 使用事件监听来处理悬停效果
|
||||
// Note: Extra2D 的 Button 类可能有不同的悬停检测机制
|
||||
// 这里简化处理，仅保留基本功能
|
||||
|
||||
return btn;
|
||||
}
|
||||
|
||||
void MenuButton::setEnabled(bool enabled) {
|
||||
enabled_ = enabled;
|
||||
setTextColor(enabled ? extra2d::Colors::Black : extra2d::Colors::LightGray);
|
||||
}
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -1,21 +0,0 @@
|
|||
#pragma once
|
||||
|
||||
#include <extra2d/extra2d.h>
|
||||
|
||||
namespace pushbox {
|
||||
|
||||
class MenuButton : public extra2d::Button {
|
||||
public:
|
||||
static extra2d::Ptr<MenuButton> create(extra2d::Ptr<extra2d::FontAtlas> font,
|
||||
const extra2d::String& text,
|
||||
extra2d::Function<void()> onClick);
|
||||
|
||||
void setEnabled(bool enabled);
|
||||
bool isEnabled() const { return enabled_; }
|
||||
|
||||
private:
|
||||
bool enabled_ = true;
|
||||
extra2d::Function<void()> onClick_;
|
||||
};
|
||||
|
||||
} // namespace pushbox
|
||||
|
|
@ -178,30 +178,135 @@ public:
|
|||
}
|
||||
|
||||
void onRender(RenderBackend &renderer) override {
|
||||
Scene::onRender(renderer);
|
||||
|
||||
auto renderStart = std::chrono::high_resolution_clock::now();
|
||||
|
||||
// 节点渲染由Scene自动处理
|
||||
Scene::onRender(renderer);
|
||||
|
||||
auto renderEnd = std::chrono::high_resolution_clock::now();
|
||||
stats_.renderTime =
|
||||
std::chrono::duration<double, std::milli>(renderEnd - renderStart)
|
||||
.count();
|
||||
|
||||
// 绘制UI
|
||||
drawUI(renderer);
|
||||
// 更新UI文本内容
|
||||
updateUI();
|
||||
|
||||
// 绘制图例方块（Text组件会自动渲染）
|
||||
drawLegend(renderer);
|
||||
}
|
||||
|
||||
private:
|
||||
/**
|
||||
* @brief 加载字体资源
|
||||
* @brief 加载字体资源并创建UI文本组件
|
||||
*/
|
||||
void loadFonts() {
|
||||
auto &resources = Application::instance().resources();
|
||||
|
||||
titleFont_ = resources.loadFont("assets/font.ttf", 28, true);
|
||||
infoFont_ = resources.loadFont("assets/font.ttf", 16, true);
|
||||
|
||||
// 创建标题文本
|
||||
titleText_ = Text::create("引擎空间索引演示", titleFont_);
|
||||
titleText_->setPosition(30.0f, 20.0f);
|
||||
titleText_->setTextColor(Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
addChild(titleText_);
|
||||
|
||||
float x = 30.0f;
|
||||
float y = 60.0f;
|
||||
float lineHeight = 22.0f;
|
||||
|
||||
// 创建统计信息文本
|
||||
nodeCountText_ = Text::create("", infoFont_);
|
||||
nodeCountText_->setPosition(x, y);
|
||||
nodeCountText_->setTextColor(Color(0.9f, 0.9f, 0.9f, 1.0f));
|
||||
addChild(nodeCountText_);
|
||||
y += lineHeight;
|
||||
|
||||
strategyText_ = Text::create("", infoFont_);
|
||||
strategyText_->setPosition(x, y);
|
||||
strategyText_->setTextColor(Color(0.5f, 1.0f, 0.5f, 1.0f));
|
||||
addChild(strategyText_);
|
||||
y += lineHeight;
|
||||
|
||||
collisionText_ = Text::create("", infoFont_);
|
||||
collisionText_->setPosition(x, y);
|
||||
collisionText_->setTextColor(Color(1.0f, 0.5f, 0.5f, 1.0f));
|
||||
addChild(collisionText_);
|
||||
y += lineHeight;
|
||||
|
||||
updateTimeText_ = Text::create("", infoFont_);
|
||||
updateTimeText_->setPosition(x, y);
|
||||
updateTimeText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(updateTimeText_);
|
||||
y += lineHeight;
|
||||
|
||||
collisionTimeText_ = Text::create("", infoFont_);
|
||||
collisionTimeText_->setPosition(x, y);
|
||||
collisionTimeText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(collisionTimeText_);
|
||||
y += lineHeight;
|
||||
|
||||
renderTimeText_ = Text::create("", infoFont_);
|
||||
renderTimeText_->setPosition(x, y);
|
||||
renderTimeText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(renderTimeText_);
|
||||
y += lineHeight;
|
||||
|
||||
fpsText_ = Text::create("", infoFont_);
|
||||
fpsText_->setPosition(x, y);
|
||||
fpsText_->setTextColor(Color(0.5f, 1.0f, 0.5f, 1.0f));
|
||||
addChild(fpsText_);
|
||||
y += lineHeight * 1.5f;
|
||||
|
||||
// 创建操作说明文本
|
||||
helpTitleText_ = Text::create("操作说明:", infoFont_);
|
||||
helpTitleText_->setPosition(x, y);
|
||||
helpTitleText_->setTextColor(Color(1.0f, 1.0f, 0.5f, 1.0f));
|
||||
addChild(helpTitleText_);
|
||||
y += lineHeight;
|
||||
|
||||
helpAddText_ = Text::create("A键 - 添加100个节点", infoFont_);
|
||||
helpAddText_->setPosition(x + 10, y);
|
||||
helpAddText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(helpAddText_);
|
||||
y += lineHeight;
|
||||
|
||||
helpRemoveText_ = Text::create("B键 - 移除100个节点", infoFont_);
|
||||
helpRemoveText_->setPosition(x + 10, y);
|
||||
helpRemoveText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(helpRemoveText_);
|
||||
y += lineHeight;
|
||||
|
||||
helpToggleText_ = Text::create("X键 - 切换索引策略", infoFont_);
|
||||
helpToggleText_->setPosition(x + 10, y);
|
||||
helpToggleText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(helpToggleText_);
|
||||
y += lineHeight;
|
||||
|
||||
helpExitText_ = Text::create("+键 - 退出程序", infoFont_);
|
||||
helpExitText_->setPosition(x + 10, y);
|
||||
helpExitText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(helpExitText_);
|
||||
|
||||
// 创建图例文本
|
||||
float legendX = screenWidth_ - 200.0f;
|
||||
float legendY = 20.0f;
|
||||
|
||||
legendTitleText_ = Text::create("图例:", infoFont_);
|
||||
legendTitleText_->setPosition(legendX, legendY);
|
||||
legendTitleText_->setTextColor(Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
addChild(legendTitleText_);
|
||||
legendY += 25.0f;
|
||||
|
||||
legendNormalText_ = Text::create("- 正常", infoFont_);
|
||||
legendNormalText_->setPosition(legendX + 20.0f, legendY);
|
||||
legendNormalText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(legendNormalText_);
|
||||
legendY += 25.0f;
|
||||
|
||||
legendCollidingText_ = Text::create("- 碰撞中", infoFont_);
|
||||
legendCollidingText_->setPosition(legendX + 20.0f, legendY);
|
||||
legendCollidingText_->setTextColor(Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
addChild(legendCollidingText_);
|
||||
}
|
||||
|
||||
/**
|
||||
|
|
@ -302,99 +407,39 @@ private:
|
|||
}
|
||||
|
||||
/**
|
||||
* @brief 绘制UI界面
|
||||
* @brief 更新UI文本内容
|
||||
*/
|
||||
void drawUI(RenderBackend &renderer) {
|
||||
if (!titleFont_ || !infoFont_)
|
||||
void updateUI() {
|
||||
if (!nodeCountText_)
|
||||
return;
|
||||
|
||||
auto &app = Application::instance();
|
||||
|
||||
// 绘制标题
|
||||
renderer.drawText(*titleFont_, "引擎空间索引演示", Vec2(30.0f, 20.0f),
|
||||
Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
// 使用 setFormat 格式化文本
|
||||
nodeCountText_->setFormat("节点数量: %zu", stats_.nodeCount);
|
||||
strategyText_->setFormat("索引策略: %s", stats_.strategyName);
|
||||
collisionText_->setFormat("碰撞对数: %zu", stats_.collisionCount);
|
||||
updateTimeText_->setFormat("更新时间: %.2f ms", stats_.updateTime);
|
||||
collisionTimeText_->setFormat("碰撞检测: %.2f ms", stats_.collisionTime);
|
||||
renderTimeText_->setFormat("渲染时间: %.2f ms", stats_.renderTime);
|
||||
fpsText_->setFormat("FPS: %u", app.fps());
|
||||
}
|
||||
|
||||
// 绘制性能统计
|
||||
std::stringstream ss;
|
||||
float x = 30.0f;
|
||||
float y = 60.0f;
|
||||
float lineHeight = 22.0f;
|
||||
|
||||
ss << "节点数量: " << stats_.nodeCount;
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(0.9f, 0.9f, 0.9f, 1.0f));
|
||||
y += lineHeight;
|
||||
|
||||
ss.str("");
|
||||
ss << "索引策略: " << stats_.strategyName;
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(0.5f, 1.0f, 0.5f, 1.0f));
|
||||
y += lineHeight;
|
||||
|
||||
ss.str("");
|
||||
ss << "碰撞对数: " << stats_.collisionCount;
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(1.0f, 0.5f, 0.5f, 1.0f));
|
||||
y += lineHeight;
|
||||
|
||||
ss.str("");
|
||||
ss << std::fixed << std::setprecision(2);
|
||||
ss << "更新时间: " << stats_.updateTime << " ms";
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
y += lineHeight;
|
||||
|
||||
ss.str("");
|
||||
ss << "碰撞检测: " << stats_.collisionTime << " ms";
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
y += lineHeight;
|
||||
|
||||
ss.str("");
|
||||
ss << "渲染时间: " << stats_.renderTime << " ms";
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
y += lineHeight;
|
||||
|
||||
ss.str("");
|
||||
ss << "FPS: " << app.fps();
|
||||
renderer.drawText(*infoFont_, ss.str(), Vec2(x, y),
|
||||
Color(0.5f, 1.0f, 0.5f, 1.0f));
|
||||
y += lineHeight * 1.5f;
|
||||
|
||||
// 绘制操作说明
|
||||
renderer.drawText(*infoFont_, "操作说明:", Vec2(x, y),
|
||||
Color(1.0f, 1.0f, 0.5f, 1.0f));
|
||||
y += lineHeight;
|
||||
renderer.drawText(*infoFont_, "A键 - 添加100个节点", Vec2(x + 10, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
y += lineHeight;
|
||||
renderer.drawText(*infoFont_, "B键 - 移除100个节点", Vec2(x + 10, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
y += lineHeight;
|
||||
renderer.drawText(*infoFont_, "X键 - 切换索引策略", Vec2(x + 10, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
y += lineHeight;
|
||||
renderer.drawText(*infoFont_, "+键 - 退出程序", Vec2(x + 10, y),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
|
||||
// 绘制图例
|
||||
/**
|
||||
* @brief 绘制图例方块
|
||||
*/
|
||||
void drawLegend(RenderBackend &renderer) {
|
||||
float legendX = screenWidth_ - 200.0f;
|
||||
float legendY = 20.0f;
|
||||
renderer.drawText(*infoFont_, "图例:", Vec2(legendX, legendY),
|
||||
Color(1.0f, 1.0f, 1.0f, 1.0f));
|
||||
legendY += 25.0f;
|
||||
float legendY = 20.0f + 25.0f; // 在标题下方
|
||||
|
||||
// 绘制正常状态方块
|
||||
renderer.fillRect(Rect(legendX, legendY, 15.0f, 15.0f),
|
||||
Color(0.5f, 0.5f, 0.9f, 0.7f));
|
||||
renderer.drawText(*infoFont_, "- 正常", Vec2(legendX + 20.0f, legendY),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
legendY += 25.0f;
|
||||
|
||||
// 绘制碰撞状态方块
|
||||
renderer.fillRect(Rect(legendX, legendY, 15.0f, 15.0f),
|
||||
Color(1.0f, 0.2f, 0.2f, 0.9f));
|
||||
renderer.drawText(*infoFont_, "- 碰撞中", Vec2(legendX + 20.0f, legendY),
|
||||
Color(0.8f, 0.8f, 0.8f, 1.0f));
|
||||
}
|
||||
|
||||
std::vector<Ptr<PhysicsNode>> nodes_;
|
||||
|
|
@ -404,6 +449,24 @@ private:
|
|||
|
||||
Ptr<FontAtlas> titleFont_;
|
||||
Ptr<FontAtlas> infoFont_;
|
||||
|
||||
// UI 文本组件
|
||||
Ptr<Text> titleText_;
|
||||
Ptr<Text> nodeCountText_;
|
||||
Ptr<Text> strategyText_;
|
||||
Ptr<Text> collisionText_;
|
||||
Ptr<Text> updateTimeText_;
|
||||
Ptr<Text> collisionTimeText_;
|
||||
Ptr<Text> renderTimeText_;
|
||||
Ptr<Text> fpsText_;
|
||||
Ptr<Text> helpTitleText_;
|
||||
Ptr<Text> helpAddText_;
|
||||
Ptr<Text> helpRemoveText_;
|
||||
Ptr<Text> helpToggleText_;
|
||||
Ptr<Text> helpExitText_;
|
||||
Ptr<Text> legendTitleText_;
|
||||
Ptr<Text> legendNormalText_;
|
||||
Ptr<Text> legendCollidingText_;
|
||||
};
|
||||
|
||||
// ============================================================================
|
||||
|
|
|
|||
|
|
@ -1,146 +0,0 @@
|
|||
|
||||
#ifdef _SQ64
|
||||
|
||||
#ifdef _MSC_VER
|
||||
typedef __int64 SQInteger;
|
||||
typedef unsigned __int64 SQUnsignedInteger;
|
||||
typedef unsigned __int64 SQHash; /*should be the same size of a pointer*/
|
||||
#else
|
||||
typedef long long SQInteger;
|
||||
typedef unsigned long long SQUnsignedInteger;
|
||||
typedef unsigned long long SQHash; /*should be the same size of a pointer*/
|
||||
#endif
|
||||
typedef int SQInt32;
|
||||
typedef unsigned int SQUnsignedInteger32;
|
||||
#else
|
||||
typedef int SQInteger;
|
||||
typedef int SQInt32; /*must be 32 bits(also on 64bits processors)*/
|
||||
typedef unsigned int SQUnsignedInteger32; /*must be 32 bits(also on 64bits processors)*/
|
||||
typedef unsigned int SQUnsignedInteger;
|
||||
typedef unsigned int SQHash; /*should be the same size of a pointer*/
|
||||
#endif
|
||||
|
||||
|
||||
#ifdef SQUSEDOUBLE
|
||||
typedef double SQFloat;
|
||||
#else
|
||||
typedef float SQFloat;
|
||||
#endif
|
||||
|
||||
#if defined(SQUSEDOUBLE) && !defined(_SQ64) || !defined(SQUSEDOUBLE) && defined(_SQ64)
|
||||
#ifdef _MSC_VER
|
||||
typedef __int64 SQRawObjectVal; //must be 64bits
|
||||
#else
|
||||
typedef long long SQRawObjectVal; //must be 64bits
|
||||
#endif
|
||||
#define SQ_OBJECT_RAWINIT() { _unVal.raw = 0; }
|
||||
#else
|
||||
typedef SQUnsignedInteger SQRawObjectVal; //is 32 bits on 32 bits builds and 64 bits otherwise
|
||||
#define SQ_OBJECT_RAWINIT()
|
||||
#endif
|
||||
|
||||
#ifndef SQ_ALIGNMENT // SQ_ALIGNMENT shall be less than or equal to SQ_MALLOC alignments, and its value shall be power of 2.
|
||||
#if defined(SQUSEDOUBLE) || defined(_SQ64)
|
||||
#define SQ_ALIGNMENT 8
|
||||
#else
|
||||
#define SQ_ALIGNMENT 4
|
||||
#endif
|
||||
#endif
|
||||
|
||||
typedef void* SQUserPointer;
|
||||
typedef SQUnsignedInteger SQBool;
|
||||
typedef SQInteger SQRESULT;
|
||||
|
||||
#ifdef SQUNICODE
|
||||
#include <wchar.h>
|
||||
#include <wctype.h>
|
||||
|
||||
|
||||
typedef wchar_t SQChar;
|
||||
|
||||
|
||||
#define scstrcmp wcscmp
|
||||
#ifdef _WIN32
|
||||
#define scsprintf _snwprintf
|
||||
#else
|
||||
#define scsprintf swprintf
|
||||
#endif
|
||||
#define scstrlen wcslen
|
||||
#define scstrtod wcstod
|
||||
#ifdef _SQ64
|
||||
#define scstrtol wcstoll
|
||||
#else
|
||||
#define scstrtol wcstol
|
||||
#endif
|
||||
#define scstrtoul wcstoul
|
||||
#define scvsprintf vswprintf
|
||||
#define scstrstr wcsstr
|
||||
#define scprintf wprintf
|
||||
|
||||
#ifdef _WIN32
|
||||
#define WCHAR_SIZE 2
|
||||
#define WCHAR_SHIFT_MUL 1
|
||||
#define MAX_CHAR 0xFFFF
|
||||
#else
|
||||
#define WCHAR_SIZE 4
|
||||
#define WCHAR_SHIFT_MUL 2
|
||||
#define MAX_CHAR 0xFFFFFFFF
|
||||
#endif
|
||||
|
||||
#define _SC(a) L##a
|
||||
|
||||
|
||||
#define scisspace iswspace
|
||||
#define scisdigit iswdigit
|
||||
#define scisprint iswprint
|
||||
#define scisxdigit iswxdigit
|
||||
#define scisalpha iswalpha
|
||||
#define sciscntrl iswcntrl
|
||||
#define scisalnum iswalnum
|
||||
|
||||
|
||||
#define sq_rsl(l) ((l)<<WCHAR_SHIFT_MUL)
|
||||
|
||||
#else
|
||||
typedef char SQChar;
|
||||
#define _SC(a) a
|
||||
#define scstrcmp strcmp
|
||||
#ifdef _MSC_VER
|
||||
#define scsprintf _snprintf
|
||||
#else
|
||||
#define scsprintf snprintf
|
||||
#endif
|
||||
#define scstrlen strlen
|
||||
#define scstrtod strtod
|
||||
#ifdef _SQ64
|
||||
#ifdef _MSC_VER
|
||||
#define scstrtol _strtoi64
|
||||
#else
|
||||
#define scstrtol strtoll
|
||||
#endif
|
||||
#else
|
||||
#define scstrtol strtol
|
||||
#endif
|
||||
#define scstrtoul strtoul
|
||||
#define scvsprintf vsnprintf
|
||||
#define scstrstr strstr
|
||||
#define scisspace isspace
|
||||
#define scisdigit isdigit
|
||||
#define scisprint isprint
|
||||
#define scisxdigit isxdigit
|
||||
#define sciscntrl iscntrl
|
||||
#define scisalpha isalpha
|
||||
#define scisalnum isalnum
|
||||
#define scprintf printf
|
||||
#define MAX_CHAR 0xFF
|
||||
|
||||
#define sq_rsl(l) (l)
|
||||
|
||||
#endif
|
||||
|
||||
#ifdef _SQ64
|
||||
#define _PRINT_INT_PREC _SC("ll")
|
||||
#define _PRINT_INT_FMT _SC("%lld")
|
||||
#else
|
||||
#define _PRINT_INT_FMT _SC("%d")
|
||||
#endif
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTD_AUXLIB_H_
|
||||
#define _SQSTD_AUXLIB_H_
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
SQUIRREL_API void sqstd_seterrorhandlers(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sqstd_printcallstack(HSQUIRRELVM v);
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_throwerrorf(HSQUIRRELVM v,const SQChar *err,...);
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /* _SQSTD_AUXLIB_H_ */
|
||||
|
|
@ -1,20 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTDBLOB_H_
|
||||
#define _SQSTDBLOB_H_
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
SQUIRREL_API SQUserPointer sqstd_createblob(HSQUIRRELVM v, SQInteger size);
|
||||
SQUIRREL_API SQRESULT sqstd_getblob(HSQUIRRELVM v,SQInteger idx,SQUserPointer *ptr);
|
||||
SQUIRREL_API SQInteger sqstd_getblobsize(HSQUIRRELVM v,SQInteger idx);
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_register_bloblib(HSQUIRRELVM v);
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /*_SQSTDBLOB_H_*/
|
||||
|
||||
|
|
@ -1,54 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTDIO_H_
|
||||
#define _SQSTDIO_H_
|
||||
|
||||
#ifdef __cplusplus
|
||||
|
||||
#define SQSTD_STREAM_TYPE_TAG 0x80000000
|
||||
|
||||
struct SQStream {
|
||||
virtual ~SQStream() {}
|
||||
virtual SQInteger Read(void *buffer, SQInteger size) = 0;
|
||||
virtual SQInteger Write(void *buffer, SQInteger size) = 0;
|
||||
virtual SQInteger Flush() = 0;
|
||||
virtual SQInteger Tell() = 0;
|
||||
virtual SQInteger Len() = 0;
|
||||
virtual SQInteger Seek(SQInteger offset, SQInteger origin) = 0;
|
||||
virtual bool IsValid() = 0;
|
||||
virtual bool EOS() = 0;
|
||||
};
|
||||
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
#define SQ_SEEK_CUR 0
|
||||
#define SQ_SEEK_END 1
|
||||
#define SQ_SEEK_SET 2
|
||||
|
||||
typedef void* SQFILE;
|
||||
|
||||
SQUIRREL_API SQFILE sqstd_fopen(const SQChar *,const SQChar *);
|
||||
SQUIRREL_API SQInteger sqstd_fread(SQUserPointer, SQInteger, SQInteger, SQFILE);
|
||||
SQUIRREL_API SQInteger sqstd_fwrite(const SQUserPointer, SQInteger, SQInteger, SQFILE);
|
||||
SQUIRREL_API SQInteger sqstd_fseek(SQFILE , SQInteger , SQInteger);
|
||||
SQUIRREL_API SQInteger sqstd_ftell(SQFILE);
|
||||
SQUIRREL_API SQInteger sqstd_fflush(SQFILE);
|
||||
SQUIRREL_API SQInteger sqstd_fclose(SQFILE);
|
||||
SQUIRREL_API SQInteger sqstd_feof(SQFILE);
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_createfile(HSQUIRRELVM v, SQFILE file,SQBool own);
|
||||
SQUIRREL_API SQRESULT sqstd_getfile(HSQUIRRELVM v, SQInteger idx, SQFILE *file);
|
||||
|
||||
//compiler helpers
|
||||
SQUIRREL_API SQRESULT sqstd_loadfile(HSQUIRRELVM v,const SQChar *filename,SQBool printerror);
|
||||
SQUIRREL_API SQRESULT sqstd_dofile(HSQUIRRELVM v,const SQChar *filename,SQBool retval,SQBool printerror);
|
||||
SQUIRREL_API SQRESULT sqstd_writeclosuretofile(HSQUIRRELVM v,const SQChar *filename);
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_register_iolib(HSQUIRRELVM v);
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /*_SQSTDIO_H_*/
|
||||
|
||||
|
|
@ -1,15 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTD_MATH_H_
|
||||
#define _SQSTD_MATH_H_
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_register_mathlib(HSQUIRRELVM v);
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /*_SQSTD_MATH_H_*/
|
||||
|
|
@ -1,35 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTD_STRING_H_
|
||||
#define _SQSTD_STRING_H_
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
typedef unsigned int SQRexBool;
|
||||
typedef struct SQRex SQRex;
|
||||
|
||||
typedef struct {
|
||||
const SQChar *begin;
|
||||
SQInteger len;
|
||||
} SQRexMatch;
|
||||
|
||||
SQUIRREL_API SQRex *sqstd_rex_compile(const SQChar *pattern,const SQChar **error);
|
||||
SQUIRREL_API void sqstd_rex_free(SQRex *exp);
|
||||
SQUIRREL_API SQBool sqstd_rex_match(SQRex* exp,const SQChar* text);
|
||||
SQUIRREL_API SQBool sqstd_rex_search(SQRex* exp,const SQChar* text, const SQChar** out_begin, const SQChar** out_end);
|
||||
SQUIRREL_API SQBool sqstd_rex_searchrange(SQRex* exp,const SQChar* text_begin,const SQChar* text_end,const SQChar** out_begin, const SQChar** out_end);
|
||||
SQUIRREL_API SQInteger sqstd_rex_getsubexpcount(SQRex* exp);
|
||||
SQUIRREL_API SQBool sqstd_rex_getsubexp(SQRex* exp, SQInteger n, SQRexMatch *subexp);
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_format(HSQUIRRELVM v,SQInteger nformatstringidx,SQInteger *outlen,SQChar **output);
|
||||
|
||||
SQUIRREL_API void sqstd_pushstringf(HSQUIRRELVM v,const SQChar *s,...);
|
||||
|
||||
SQUIRREL_API SQRESULT sqstd_register_stringlib(HSQUIRRELVM v);
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /*_SQSTD_STRING_H_*/
|
||||
|
|
@ -1,15 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTD_SYSTEMLIB_H_
|
||||
#define _SQSTD_SYSTEMLIB_H_
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
SQUIRREL_API SQInteger sqstd_register_systemlib(HSQUIRRELVM v);
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /* _SQSTD_SYSTEMLIB_H_ */
|
||||
|
|
@ -1,411 +0,0 @@
|
|||
/*
|
||||
Copyright (c) 2003-2022 Alberto Demichelis
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
of this software and associated documentation files (the "Software"), to deal
|
||||
in the Software without restriction, including without limitation the rights
|
||||
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||
copies of the Software, and to permit persons to whom the Software is
|
||||
furnished to do so, subject to the following conditions:
|
||||
|
||||
The above copyright notice and this permission notice shall be included in
|
||||
all copies or substantial portions of the Software.
|
||||
|
||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||||
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
||||
THE SOFTWARE.
|
||||
*/
|
||||
#ifndef _SQUIRREL_H_
|
||||
#define _SQUIRREL_H_
|
||||
|
||||
#ifdef _SQ_CONFIG_INCLUDE
|
||||
#include _SQ_CONFIG_INCLUDE
|
||||
#endif
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
#ifndef SQUIRREL_API
|
||||
#define SQUIRREL_API extern
|
||||
#endif
|
||||
|
||||
#if (defined(_WIN64) || defined(_LP64))
|
||||
#ifndef _SQ64
|
||||
#define _SQ64
|
||||
#endif
|
||||
#endif
|
||||
|
||||
|
||||
#define SQTrue (1)
|
||||
#define SQFalse (0)
|
||||
|
||||
struct SQVM;
|
||||
struct SQTable;
|
||||
struct SQArray;
|
||||
struct SQString;
|
||||
struct SQClosure;
|
||||
struct SQGenerator;
|
||||
struct SQNativeClosure;
|
||||
struct SQUserData;
|
||||
struct SQFunctionProto;
|
||||
struct SQRefCounted;
|
||||
struct SQClass;
|
||||
struct SQInstance;
|
||||
struct SQDelegable;
|
||||
struct SQOuter;
|
||||
|
||||
#ifdef _UNICODE
|
||||
#define SQUNICODE
|
||||
#endif
|
||||
|
||||
#include "sqconfig.h"
|
||||
|
||||
#define SQUIRREL_VERSION _SC("Squirrel 3.2 stable")
|
||||
#define SQUIRREL_COPYRIGHT _SC("Copyright (C) 2003-2022 Alberto Demichelis")
|
||||
#define SQUIRREL_AUTHOR _SC("Alberto Demichelis")
|
||||
#define SQUIRREL_VERSION_NUMBER 320
|
||||
|
||||
#define SQ_VMSTATE_IDLE 0
|
||||
#define SQ_VMSTATE_RUNNING 1
|
||||
#define SQ_VMSTATE_SUSPENDED 2
|
||||
|
||||
#define SQUIRREL_EOB 0
|
||||
#define SQ_BYTECODE_STREAM_TAG 0xFAFA
|
||||
|
||||
#define SQOBJECT_REF_COUNTED 0x08000000
|
||||
#define SQOBJECT_NUMERIC 0x04000000
|
||||
#define SQOBJECT_DELEGABLE 0x02000000
|
||||
#define SQOBJECT_CANBEFALSE 0x01000000
|
||||
|
||||
#define SQ_MATCHTYPEMASKSTRING (-99999)
|
||||
|
||||
#define _RT_MASK 0x00FFFFFF
|
||||
#define _RAW_TYPE(type) (type&_RT_MASK)
|
||||
|
||||
#define _RT_NULL 0x00000001
|
||||
#define _RT_INTEGER 0x00000002
|
||||
#define _RT_FLOAT 0x00000004
|
||||
#define _RT_BOOL 0x00000008
|
||||
#define _RT_STRING 0x00000010
|
||||
#define _RT_TABLE 0x00000020
|
||||
#define _RT_ARRAY 0x00000040
|
||||
#define _RT_USERDATA 0x00000080
|
||||
#define _RT_CLOSURE 0x00000100
|
||||
#define _RT_NATIVECLOSURE 0x00000200
|
||||
#define _RT_GENERATOR 0x00000400
|
||||
#define _RT_USERPOINTER 0x00000800
|
||||
#define _RT_THREAD 0x00001000
|
||||
#define _RT_FUNCPROTO 0x00002000
|
||||
#define _RT_CLASS 0x00004000
|
||||
#define _RT_INSTANCE 0x00008000
|
||||
#define _RT_WEAKREF 0x00010000
|
||||
#define _RT_OUTER 0x00020000
|
||||
|
||||
typedef enum tagSQObjectType{
|
||||
OT_NULL = (_RT_NULL|SQOBJECT_CANBEFALSE),
|
||||
OT_INTEGER = (_RT_INTEGER|SQOBJECT_NUMERIC|SQOBJECT_CANBEFALSE),
|
||||
OT_FLOAT = (_RT_FLOAT|SQOBJECT_NUMERIC|SQOBJECT_CANBEFALSE),
|
||||
OT_BOOL = (_RT_BOOL|SQOBJECT_CANBEFALSE),
|
||||
OT_STRING = (_RT_STRING|SQOBJECT_REF_COUNTED),
|
||||
OT_TABLE = (_RT_TABLE|SQOBJECT_REF_COUNTED|SQOBJECT_DELEGABLE),
|
||||
OT_ARRAY = (_RT_ARRAY|SQOBJECT_REF_COUNTED),
|
||||
OT_USERDATA = (_RT_USERDATA|SQOBJECT_REF_COUNTED|SQOBJECT_DELEGABLE),
|
||||
OT_CLOSURE = (_RT_CLOSURE|SQOBJECT_REF_COUNTED),
|
||||
OT_NATIVECLOSURE = (_RT_NATIVECLOSURE|SQOBJECT_REF_COUNTED),
|
||||
OT_GENERATOR = (_RT_GENERATOR|SQOBJECT_REF_COUNTED),
|
||||
OT_USERPOINTER = _RT_USERPOINTER,
|
||||
OT_THREAD = (_RT_THREAD|SQOBJECT_REF_COUNTED) ,
|
||||
OT_FUNCPROTO = (_RT_FUNCPROTO|SQOBJECT_REF_COUNTED), //internal usage only
|
||||
OT_CLASS = (_RT_CLASS|SQOBJECT_REF_COUNTED),
|
||||
OT_INSTANCE = (_RT_INSTANCE|SQOBJECT_REF_COUNTED|SQOBJECT_DELEGABLE),
|
||||
OT_WEAKREF = (_RT_WEAKREF|SQOBJECT_REF_COUNTED),
|
||||
OT_OUTER = (_RT_OUTER|SQOBJECT_REF_COUNTED) //internal usage only
|
||||
}SQObjectType;
|
||||
|
||||
#define ISREFCOUNTED(t) (t&SQOBJECT_REF_COUNTED)
|
||||
|
||||
|
||||
typedef union tagSQObjectValue
|
||||
{
|
||||
struct SQTable *pTable;
|
||||
struct SQArray *pArray;
|
||||
struct SQClosure *pClosure;
|
||||
struct SQOuter *pOuter;
|
||||
struct SQGenerator *pGenerator;
|
||||
struct SQNativeClosure *pNativeClosure;
|
||||
struct SQString *pString;
|
||||
struct SQUserData *pUserData;
|
||||
SQInteger nInteger;
|
||||
SQFloat fFloat;
|
||||
SQUserPointer pUserPointer;
|
||||
struct SQFunctionProto *pFunctionProto;
|
||||
struct SQRefCounted *pRefCounted;
|
||||
struct SQDelegable *pDelegable;
|
||||
struct SQVM *pThread;
|
||||
struct SQClass *pClass;
|
||||
struct SQInstance *pInstance;
|
||||
struct SQWeakRef *pWeakRef;
|
||||
SQRawObjectVal raw;
|
||||
}SQObjectValue;
|
||||
|
||||
|
||||
typedef struct tagSQObject
|
||||
{
|
||||
SQObjectType _type;
|
||||
SQObjectValue _unVal;
|
||||
}SQObject;
|
||||
|
||||
typedef struct tagSQMemberHandle{
|
||||
SQBool _static;
|
||||
SQInteger _index;
|
||||
}SQMemberHandle;
|
||||
|
||||
typedef struct tagSQStackInfos{
|
||||
const SQChar* funcname;
|
||||
const SQChar* source;
|
||||
SQInteger line;
|
||||
}SQStackInfos;
|
||||
|
||||
typedef struct SQVM* HSQUIRRELVM;
|
||||
typedef SQObject HSQOBJECT;
|
||||
typedef SQMemberHandle HSQMEMBERHANDLE;
|
||||
typedef SQInteger (*SQFUNCTION)(HSQUIRRELVM);
|
||||
typedef SQInteger (*SQRELEASEHOOK)(SQUserPointer,SQInteger size);
|
||||
typedef void (*SQCOMPILERERROR)(HSQUIRRELVM,const SQChar * /*desc*/,const SQChar * /*source*/,SQInteger /*line*/,SQInteger /*column*/);
|
||||
typedef void (*SQPRINTFUNCTION)(HSQUIRRELVM,const SQChar * ,...);
|
||||
typedef void (*SQDEBUGHOOK)(HSQUIRRELVM /*v*/, SQInteger /*type*/, const SQChar * /*sourcename*/, SQInteger /*line*/, const SQChar * /*funcname*/);
|
||||
typedef SQInteger (*SQWRITEFUNC)(SQUserPointer,SQUserPointer,SQInteger);
|
||||
typedef SQInteger (*SQREADFUNC)(SQUserPointer,SQUserPointer,SQInteger);
|
||||
|
||||
typedef SQInteger (*SQLEXREADFUNC)(SQUserPointer);
|
||||
|
||||
typedef struct tagSQRegFunction{
|
||||
const SQChar *name;
|
||||
SQFUNCTION f;
|
||||
SQInteger nparamscheck;
|
||||
const SQChar *typemask;
|
||||
}SQRegFunction;
|
||||
|
||||
typedef struct tagSQFunctionInfo {
|
||||
SQUserPointer funcid;
|
||||
const SQChar *name;
|
||||
const SQChar *source;
|
||||
SQInteger line;
|
||||
}SQFunctionInfo;
|
||||
|
||||
/*vm*/
|
||||
SQUIRREL_API HSQUIRRELVM sq_open(SQInteger initialstacksize);
|
||||
SQUIRREL_API HSQUIRRELVM sq_newthread(HSQUIRRELVM friendvm, SQInteger initialstacksize);
|
||||
SQUIRREL_API void sq_seterrorhandler(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_close(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_setforeignptr(HSQUIRRELVM v,SQUserPointer p);
|
||||
SQUIRREL_API SQUserPointer sq_getforeignptr(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_setsharedforeignptr(HSQUIRRELVM v,SQUserPointer p);
|
||||
SQUIRREL_API SQUserPointer sq_getsharedforeignptr(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_setvmreleasehook(HSQUIRRELVM v,SQRELEASEHOOK hook);
|
||||
SQUIRREL_API SQRELEASEHOOK sq_getvmreleasehook(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_setsharedreleasehook(HSQUIRRELVM v,SQRELEASEHOOK hook);
|
||||
SQUIRREL_API SQRELEASEHOOK sq_getsharedreleasehook(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_setprintfunc(HSQUIRRELVM v, SQPRINTFUNCTION printfunc,SQPRINTFUNCTION errfunc);
|
||||
SQUIRREL_API SQPRINTFUNCTION sq_getprintfunc(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQPRINTFUNCTION sq_geterrorfunc(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_suspendvm(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_wakeupvm(HSQUIRRELVM v,SQBool resumedret,SQBool retval,SQBool raiseerror,SQBool throwerror);
|
||||
SQUIRREL_API SQInteger sq_getvmstate(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQInteger sq_getversion();
|
||||
|
||||
/*compiler*/
|
||||
SQUIRREL_API SQRESULT sq_compile(HSQUIRRELVM v,SQLEXREADFUNC read,SQUserPointer p,const SQChar *sourcename,SQBool raiseerror);
|
||||
SQUIRREL_API SQRESULT sq_compilebuffer(HSQUIRRELVM v,const SQChar *s,SQInteger size,const SQChar *sourcename,SQBool raiseerror);
|
||||
SQUIRREL_API void sq_enabledebuginfo(HSQUIRRELVM v, SQBool enable);
|
||||
SQUIRREL_API void sq_notifyallexceptions(HSQUIRRELVM v, SQBool enable);
|
||||
SQUIRREL_API void sq_setcompilererrorhandler(HSQUIRRELVM v,SQCOMPILERERROR f);
|
||||
|
||||
/*stack operations*/
|
||||
SQUIRREL_API void sq_push(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API void sq_pop(HSQUIRRELVM v,SQInteger nelemstopop);
|
||||
SQUIRREL_API void sq_poptop(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_remove(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQInteger sq_gettop(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_settop(HSQUIRRELVM v,SQInteger newtop);
|
||||
SQUIRREL_API SQRESULT sq_reservestack(HSQUIRRELVM v,SQInteger nsize);
|
||||
SQUIRREL_API SQInteger sq_cmp(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_move(HSQUIRRELVM dest,HSQUIRRELVM src,SQInteger idx);
|
||||
|
||||
/*object creation handling*/
|
||||
SQUIRREL_API SQUserPointer sq_newuserdata(HSQUIRRELVM v,SQUnsignedInteger size);
|
||||
SQUIRREL_API void sq_newtable(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_newtableex(HSQUIRRELVM v,SQInteger initialcapacity);
|
||||
SQUIRREL_API void sq_newarray(HSQUIRRELVM v,SQInteger size);
|
||||
SQUIRREL_API void sq_newclosure(HSQUIRRELVM v,SQFUNCTION func,SQUnsignedInteger nfreevars);
|
||||
SQUIRREL_API SQRESULT sq_setparamscheck(HSQUIRRELVM v,SQInteger nparamscheck,const SQChar *typemask);
|
||||
SQUIRREL_API SQRESULT sq_bindenv(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_setclosureroot(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getclosureroot(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API void sq_pushstring(HSQUIRRELVM v,const SQChar *s,SQInteger len);
|
||||
SQUIRREL_API void sq_pushfloat(HSQUIRRELVM v,SQFloat f);
|
||||
SQUIRREL_API void sq_pushinteger(HSQUIRRELVM v,SQInteger n);
|
||||
SQUIRREL_API void sq_pushbool(HSQUIRRELVM v,SQBool b);
|
||||
SQUIRREL_API void sq_pushuserpointer(HSQUIRRELVM v,SQUserPointer p);
|
||||
SQUIRREL_API void sq_pushnull(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_pushthread(HSQUIRRELVM v, HSQUIRRELVM thread);
|
||||
SQUIRREL_API SQObjectType sq_gettype(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_typeof(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQInteger sq_getsize(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQHash sq_gethash(HSQUIRRELVM v, SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getbase(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQBool sq_instanceof(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_tostring(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API void sq_tobool(HSQUIRRELVM v, SQInteger idx, SQBool *b);
|
||||
SQUIRREL_API SQRESULT sq_getstringandsize(HSQUIRRELVM v,SQInteger idx,const SQChar **c,SQInteger *size);
|
||||
SQUIRREL_API SQRESULT sq_getstring(HSQUIRRELVM v,SQInteger idx,const SQChar **c);
|
||||
SQUIRREL_API SQRESULT sq_getinteger(HSQUIRRELVM v,SQInteger idx,SQInteger *i);
|
||||
SQUIRREL_API SQRESULT sq_getfloat(HSQUIRRELVM v,SQInteger idx,SQFloat *f);
|
||||
SQUIRREL_API SQRESULT sq_getbool(HSQUIRRELVM v,SQInteger idx,SQBool *b);
|
||||
SQUIRREL_API SQRESULT sq_getthread(HSQUIRRELVM v,SQInteger idx,HSQUIRRELVM *thread);
|
||||
SQUIRREL_API SQRESULT sq_getuserpointer(HSQUIRRELVM v,SQInteger idx,SQUserPointer *p);
|
||||
SQUIRREL_API SQRESULT sq_getuserdata(HSQUIRRELVM v,SQInteger idx,SQUserPointer *p,SQUserPointer *typetag);
|
||||
SQUIRREL_API SQRESULT sq_settypetag(HSQUIRRELVM v,SQInteger idx,SQUserPointer typetag);
|
||||
SQUIRREL_API SQRESULT sq_gettypetag(HSQUIRRELVM v,SQInteger idx,SQUserPointer *typetag);
|
||||
SQUIRREL_API void sq_setreleasehook(HSQUIRRELVM v,SQInteger idx,SQRELEASEHOOK hook);
|
||||
SQUIRREL_API SQRELEASEHOOK sq_getreleasehook(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQChar *sq_getscratchpad(HSQUIRRELVM v,SQInteger minsize);
|
||||
SQUIRREL_API SQRESULT sq_getfunctioninfo(HSQUIRRELVM v,SQInteger level,SQFunctionInfo *fi);
|
||||
SQUIRREL_API SQRESULT sq_getclosureinfo(HSQUIRRELVM v,SQInteger idx,SQInteger *nparams,SQInteger *nfreevars);
|
||||
SQUIRREL_API SQRESULT sq_getclosurename(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_setnativeclosurename(HSQUIRRELVM v,SQInteger idx,const SQChar *name);
|
||||
SQUIRREL_API SQRESULT sq_setinstanceup(HSQUIRRELVM v, SQInteger idx, SQUserPointer p);
|
||||
SQUIRREL_API SQRESULT sq_getinstanceup(HSQUIRRELVM v, SQInteger idx, SQUserPointer *p,SQUserPointer typetag,SQBool throwerror);
|
||||
SQUIRREL_API SQRESULT sq_setclassudsize(HSQUIRRELVM v, SQInteger idx, SQInteger udsize);
|
||||
SQUIRREL_API SQRESULT sq_newclass(HSQUIRRELVM v,SQBool hasbase);
|
||||
SQUIRREL_API SQRESULT sq_createinstance(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_setattributes(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getattributes(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getclass(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API void sq_weakref(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getdefaultdelegate(HSQUIRRELVM v,SQObjectType t);
|
||||
SQUIRREL_API SQRESULT sq_getmemberhandle(HSQUIRRELVM v,SQInteger idx,HSQMEMBERHANDLE *handle);
|
||||
SQUIRREL_API SQRESULT sq_getbyhandle(HSQUIRRELVM v,SQInteger idx,const HSQMEMBERHANDLE *handle);
|
||||
SQUIRREL_API SQRESULT sq_setbyhandle(HSQUIRRELVM v,SQInteger idx,const HSQMEMBERHANDLE *handle);
|
||||
|
||||
/*object manipulation*/
|
||||
SQUIRREL_API void sq_pushroottable(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_pushregistrytable(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_pushconsttable(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_setroottable(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_setconsttable(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_newslot(HSQUIRRELVM v, SQInteger idx, SQBool bstatic);
|
||||
SQUIRREL_API SQRESULT sq_deleteslot(HSQUIRRELVM v,SQInteger idx,SQBool pushval);
|
||||
SQUIRREL_API SQRESULT sq_set(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_get(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_rawget(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_rawset(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_rawdeleteslot(HSQUIRRELVM v,SQInteger idx,SQBool pushval);
|
||||
SQUIRREL_API SQRESULT sq_newmember(HSQUIRRELVM v,SQInteger idx,SQBool bstatic);
|
||||
SQUIRREL_API SQRESULT sq_rawnewmember(HSQUIRRELVM v,SQInteger idx,SQBool bstatic);
|
||||
SQUIRREL_API SQRESULT sq_arrayappend(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_arraypop(HSQUIRRELVM v,SQInteger idx,SQBool pushval);
|
||||
SQUIRREL_API SQRESULT sq_arrayresize(HSQUIRRELVM v,SQInteger idx,SQInteger newsize);
|
||||
SQUIRREL_API SQRESULT sq_arrayreverse(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_arrayremove(HSQUIRRELVM v,SQInteger idx,SQInteger itemidx);
|
||||
SQUIRREL_API SQRESULT sq_arrayinsert(HSQUIRRELVM v,SQInteger idx,SQInteger destpos);
|
||||
SQUIRREL_API SQRESULT sq_setdelegate(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getdelegate(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_clone(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_setfreevariable(HSQUIRRELVM v,SQInteger idx,SQUnsignedInteger nval);
|
||||
SQUIRREL_API SQRESULT sq_next(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getweakrefval(HSQUIRRELVM v,SQInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_clear(HSQUIRRELVM v,SQInteger idx);
|
||||
|
||||
/*calls*/
|
||||
SQUIRREL_API SQRESULT sq_call(HSQUIRRELVM v,SQInteger params,SQBool retval,SQBool raiseerror);
|
||||
SQUIRREL_API SQRESULT sq_resume(HSQUIRRELVM v,SQBool retval,SQBool raiseerror);
|
||||
SQUIRREL_API const SQChar *sq_getlocal(HSQUIRRELVM v,SQUnsignedInteger level,SQUnsignedInteger idx);
|
||||
SQUIRREL_API SQRESULT sq_getcallee(HSQUIRRELVM v);
|
||||
SQUIRREL_API const SQChar *sq_getfreevariable(HSQUIRRELVM v,SQInteger idx,SQUnsignedInteger nval);
|
||||
SQUIRREL_API SQRESULT sq_throwerror(HSQUIRRELVM v,const SQChar *err);
|
||||
SQUIRREL_API SQRESULT sq_throwobject(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_reseterror(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_getlasterror(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_tailcall(HSQUIRRELVM v, SQInteger nparams);
|
||||
|
||||
/*raw object handling*/
|
||||
SQUIRREL_API SQRESULT sq_getstackobj(HSQUIRRELVM v,SQInteger idx,HSQOBJECT *po);
|
||||
SQUIRREL_API void sq_pushobject(HSQUIRRELVM v,HSQOBJECT obj);
|
||||
SQUIRREL_API void sq_addref(HSQUIRRELVM v,HSQOBJECT *po);
|
||||
SQUIRREL_API SQBool sq_release(HSQUIRRELVM v,HSQOBJECT *po);
|
||||
SQUIRREL_API SQUnsignedInteger sq_getrefcount(HSQUIRRELVM v,HSQOBJECT *po);
|
||||
SQUIRREL_API void sq_resetobject(HSQOBJECT *po);
|
||||
SQUIRREL_API const SQChar *sq_objtostring(const HSQOBJECT *o);
|
||||
SQUIRREL_API SQBool sq_objtobool(const HSQOBJECT *o);
|
||||
SQUIRREL_API SQInteger sq_objtointeger(const HSQOBJECT *o);
|
||||
SQUIRREL_API SQFloat sq_objtofloat(const HSQOBJECT *o);
|
||||
SQUIRREL_API SQUserPointer sq_objtouserpointer(const HSQOBJECT *o);
|
||||
SQUIRREL_API SQRESULT sq_getobjtypetag(const HSQOBJECT *o,SQUserPointer * typetag);
|
||||
SQUIRREL_API SQUnsignedInteger sq_getvmrefcount(HSQUIRRELVM v, const HSQOBJECT *po);
|
||||
|
||||
|
||||
/*GC*/
|
||||
SQUIRREL_API SQInteger sq_collectgarbage(HSQUIRRELVM v);
|
||||
SQUIRREL_API SQRESULT sq_resurrectunreachable(HSQUIRRELVM v);
|
||||
|
||||
/*serialization*/
|
||||
SQUIRREL_API SQRESULT sq_writeclosure(HSQUIRRELVM vm,SQWRITEFUNC writef,SQUserPointer up);
|
||||
SQUIRREL_API SQRESULT sq_readclosure(HSQUIRRELVM vm,SQREADFUNC readf,SQUserPointer up);
|
||||
|
||||
/*mem allocation*/
|
||||
SQUIRREL_API void *sq_malloc(SQUnsignedInteger size);
|
||||
SQUIRREL_API void *sq_realloc(void* p,SQUnsignedInteger oldsize,SQUnsignedInteger newsize);
|
||||
SQUIRREL_API void sq_free(void *p,SQUnsignedInteger size);
|
||||
|
||||
/*debug*/
|
||||
SQUIRREL_API SQRESULT sq_stackinfos(HSQUIRRELVM v,SQInteger level,SQStackInfos *si);
|
||||
SQUIRREL_API void sq_setdebughook(HSQUIRRELVM v);
|
||||
SQUIRREL_API void sq_setnativedebughook(HSQUIRRELVM v,SQDEBUGHOOK hook);
|
||||
|
||||
/*UTILITY MACRO*/
|
||||
#define sq_isnumeric(o) ((o)._type&SQOBJECT_NUMERIC)
|
||||
#define sq_istable(o) ((o)._type==OT_TABLE)
|
||||
#define sq_isarray(o) ((o)._type==OT_ARRAY)
|
||||
#define sq_isfunction(o) ((o)._type==OT_FUNCPROTO)
|
||||
#define sq_isclosure(o) ((o)._type==OT_CLOSURE)
|
||||
#define sq_isgenerator(o) ((o)._type==OT_GENERATOR)
|
||||
#define sq_isnativeclosure(o) ((o)._type==OT_NATIVECLOSURE)
|
||||
#define sq_isstring(o) ((o)._type==OT_STRING)
|
||||
#define sq_isinteger(o) ((o)._type==OT_INTEGER)
|
||||
#define sq_isfloat(o) ((o)._type==OT_FLOAT)
|
||||
#define sq_isuserpointer(o) ((o)._type==OT_USERPOINTER)
|
||||
#define sq_isuserdata(o) ((o)._type==OT_USERDATA)
|
||||
#define sq_isthread(o) ((o)._type==OT_THREAD)
|
||||
#define sq_isnull(o) ((o)._type==OT_NULL)
|
||||
#define sq_isclass(o) ((o)._type==OT_CLASS)
|
||||
#define sq_isinstance(o) ((o)._type==OT_INSTANCE)
|
||||
#define sq_isbool(o) ((o)._type==OT_BOOL)
|
||||
#define sq_isweakref(o) ((o)._type==OT_WEAKREF)
|
||||
#define sq_type(o) ((o)._type)
|
||||
|
||||
/* deprecated */
|
||||
#define sq_createslot(v,n) sq_newslot(v,n,SQFalse)
|
||||
|
||||
#define SQ_OK (0)
|
||||
#define SQ_ERROR (-1)
|
||||
|
||||
#define SQ_FAILED(res) (res<0)
|
||||
#define SQ_SUCCEEDED(res) (res>=0)
|
||||
|
||||
#ifdef __GNUC__
|
||||
# define SQ_UNUSED_ARG(x) x __attribute__((__unused__))
|
||||
#else
|
||||
# define SQ_UNUSED_ARG(x) x
|
||||
#endif
|
||||
|
||||
#ifdef __cplusplus
|
||||
} /*extern "C"*/
|
||||
#endif
|
||||
|
||||
#endif /*_SQUIRREL_H_*/
|
||||
|
|
@ -1,151 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <squirrel.h>
|
||||
#include <sqstdaux.h>
|
||||
#include <stdio.h>
|
||||
#include <assert.h>
|
||||
#include <stdarg.h>
|
||||
|
||||
void sqstd_printcallstack(HSQUIRRELVM v)
|
||||
{
|
||||
SQPRINTFUNCTION pf = sq_geterrorfunc(v);
|
||||
if(pf) {
|
||||
SQStackInfos si;
|
||||
SQInteger i;
|
||||
SQFloat f;
|
||||
const SQChar *s;
|
||||
SQInteger level=1; //1 is to skip this function that is level 0
|
||||
const SQChar *name=0;
|
||||
SQInteger seq=0;
|
||||
pf(v,_SC("\nCALLSTACK\n"));
|
||||
while(SQ_SUCCEEDED(sq_stackinfos(v,level,&si)))
|
||||
{
|
||||
const SQChar *fn=_SC("unknown");
|
||||
const SQChar *src=_SC("unknown");
|
||||
if(si.funcname)fn=si.funcname;
|
||||
if(si.source)src=si.source;
|
||||
pf(v,_SC("*FUNCTION [%s()] %s line [%d]\n"),fn,src,si.line);
|
||||
level++;
|
||||
}
|
||||
level=0;
|
||||
pf(v,_SC("\nLOCALS\n"));
|
||||
|
||||
for(level=0;level<10;level++){
|
||||
seq=0;
|
||||
while((name = sq_getlocal(v,level,seq)))
|
||||
{
|
||||
seq++;
|
||||
switch(sq_gettype(v,-1))
|
||||
{
|
||||
case OT_NULL:
|
||||
pf(v,_SC("[%s] NULL\n"),name);
|
||||
break;
|
||||
case OT_INTEGER:
|
||||
sq_getinteger(v,-1,&i);
|
||||
pf(v,_SC("[%s] %d\n"),name,i);
|
||||
break;
|
||||
case OT_FLOAT:
|
||||
sq_getfloat(v,-1,&f);
|
||||
pf(v,_SC("[%s] %.14g\n"),name,f);
|
||||
break;
|
||||
case OT_USERPOINTER:
|
||||
pf(v,_SC("[%s] USERPOINTER\n"),name);
|
||||
break;
|
||||
case OT_STRING:
|
||||
sq_getstring(v,-1,&s);
|
||||
pf(v,_SC("[%s] \"%s\"\n"),name,s);
|
||||
break;
|
||||
case OT_TABLE:
|
||||
pf(v,_SC("[%s] TABLE\n"),name);
|
||||
break;
|
||||
case OT_ARRAY:
|
||||
pf(v,_SC("[%s] ARRAY\n"),name);
|
||||
break;
|
||||
case OT_CLOSURE:
|
||||
pf(v,_SC("[%s] CLOSURE\n"),name);
|
||||
break;
|
||||
case OT_NATIVECLOSURE:
|
||||
pf(v,_SC("[%s] NATIVECLOSURE\n"),name);
|
||||
break;
|
||||
case OT_GENERATOR:
|
||||
pf(v,_SC("[%s] GENERATOR\n"),name);
|
||||
break;
|
||||
case OT_USERDATA:
|
||||
pf(v,_SC("[%s] USERDATA\n"),name);
|
||||
break;
|
||||
case OT_THREAD:
|
||||
pf(v,_SC("[%s] THREAD\n"),name);
|
||||
break;
|
||||
case OT_CLASS:
|
||||
pf(v,_SC("[%s] CLASS\n"),name);
|
||||
break;
|
||||
case OT_INSTANCE:
|
||||
pf(v,_SC("[%s] INSTANCE\n"),name);
|
||||
break;
|
||||
case OT_WEAKREF:
|
||||
pf(v,_SC("[%s] WEAKREF\n"),name);
|
||||
break;
|
||||
case OT_BOOL:{
|
||||
SQBool bval;
|
||||
sq_getbool(v,-1,&bval);
|
||||
pf(v,_SC("[%s] %s\n"),name,bval == SQTrue ? _SC("true"):_SC("false"));
|
||||
}
|
||||
break;
|
||||
default: assert(0); break;
|
||||
}
|
||||
sq_pop(v,1);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
static SQInteger _sqstd_aux_printerror(HSQUIRRELVM v)
|
||||
{
|
||||
SQPRINTFUNCTION pf = sq_geterrorfunc(v);
|
||||
if(pf) {
|
||||
const SQChar *sErr = 0;
|
||||
if(sq_gettop(v)>=1) {
|
||||
if(SQ_SUCCEEDED(sq_getstring(v,2,&sErr))) {
|
||||
pf(v,_SC("\nAN ERROR HAS OCCURRED [%s]\n"),sErr);
|
||||
}
|
||||
else{
|
||||
pf(v,_SC("\nAN ERROR HAS OCCURRED [unknown]\n"));
|
||||
}
|
||||
sqstd_printcallstack(v);
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
void _sqstd_compiler_error(HSQUIRRELVM v,const SQChar *sErr,const SQChar *sSource,SQInteger line,SQInteger column)
|
||||
{
|
||||
SQPRINTFUNCTION pf = sq_geterrorfunc(v);
|
||||
if(pf) {
|
||||
pf(v,_SC("%s line = (%d) column = (%d) : error %s\n"),sSource,line,column,sErr);
|
||||
}
|
||||
}
|
||||
|
||||
void sqstd_seterrorhandlers(HSQUIRRELVM v)
|
||||
{
|
||||
sq_setcompilererrorhandler(v,_sqstd_compiler_error);
|
||||
sq_newclosure(v,_sqstd_aux_printerror,0);
|
||||
sq_seterrorhandler(v);
|
||||
}
|
||||
|
||||
SQRESULT sqstd_throwerrorf(HSQUIRRELVM v,const SQChar *err,...)
|
||||
{
|
||||
SQInteger n=256;
|
||||
va_list args;
|
||||
begin:
|
||||
va_start(args,err);
|
||||
SQChar *b=sq_getscratchpad(v,n);
|
||||
SQInteger r=scvsprintf(b,n,err,args);
|
||||
va_end(args);
|
||||
if (r>=n) {
|
||||
n=r+1;//required+null
|
||||
goto begin;
|
||||
} else if (r<0) {
|
||||
return sq_throwerror(v,_SC("@failed to generate formatted error message"));
|
||||
} else {
|
||||
return sq_throwerror(v,b);
|
||||
}
|
||||
}
|
||||
|
|
@ -1,283 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <new>
|
||||
#include <squirrel.h>
|
||||
#include <sqstdio.h>
|
||||
#include <string.h>
|
||||
#include <sqstdblob.h>
|
||||
#include "sqstdstream.h"
|
||||
#include "sqstdblobimpl.h"
|
||||
|
||||
#define SQSTD_BLOB_TYPE_TAG ((SQUnsignedInteger)(SQSTD_STREAM_TYPE_TAG | 0x00000002))
|
||||
|
||||
//Blob
|
||||
|
||||
|
||||
#define SETUP_BLOB(v) \
|
||||
SQBlob *self = NULL; \
|
||||
{ if(SQ_FAILED(sq_getinstanceup(v,1,(SQUserPointer*)&self,(SQUserPointer)SQSTD_BLOB_TYPE_TAG,SQFalse))) \
|
||||
return sq_throwerror(v,_SC("invalid type tag")); } \
|
||||
if(!self || !self->IsValid()) \
|
||||
return sq_throwerror(v,_SC("the blob is invalid"));
|
||||
|
||||
|
||||
static SQInteger _blob_resize(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_BLOB(v);
|
||||
SQInteger size;
|
||||
sq_getinteger(v,2,&size);
|
||||
if(!self->Resize(size))
|
||||
return sq_throwerror(v,_SC("resize failed"));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static void __swap_dword(unsigned int *n)
|
||||
{
|
||||
*n=(unsigned int)(((*n&0xFF000000)>>24) |
|
||||
((*n&0x00FF0000)>>8) |
|
||||
((*n&0x0000FF00)<<8) |
|
||||
((*n&0x000000FF)<<24));
|
||||
}
|
||||
|
||||
static void __swap_word(unsigned short *n)
|
||||
{
|
||||
*n=(unsigned short)((*n>>8)&0x00FF)| ((*n<<8)&0xFF00);
|
||||
}
|
||||
|
||||
static SQInteger _blob_swap4(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_BLOB(v);
|
||||
SQInteger num=(self->Len()-(self->Len()%4))>>2;
|
||||
unsigned int *t=(unsigned int *)self->GetBuf();
|
||||
for(SQInteger i = 0; i < num; i++) {
|
||||
__swap_dword(&t[i]);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _blob_swap2(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_BLOB(v);
|
||||
SQInteger num=(self->Len()-(self->Len()%2))>>1;
|
||||
unsigned short *t = (unsigned short *)self->GetBuf();
|
||||
for(SQInteger i = 0; i < num; i++) {
|
||||
__swap_word(&t[i]);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _blob__set(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_BLOB(v);
|
||||
SQInteger idx,val;
|
||||
sq_getinteger(v,2,&idx);
|
||||
sq_getinteger(v,3,&val);
|
||||
if(idx < 0 || idx >= self->Len())
|
||||
return sq_throwerror(v,_SC("index out of range"));
|
||||
((unsigned char *)self->GetBuf())[idx] = (unsigned char) val;
|
||||
sq_push(v,3);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _blob__get(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_BLOB(v);
|
||||
SQInteger idx;
|
||||
|
||||
if ((sq_gettype(v, 2) & SQOBJECT_NUMERIC) == 0)
|
||||
{
|
||||
sq_pushnull(v);
|
||||
return sq_throwobject(v);
|
||||
}
|
||||
sq_getinteger(v,2,&idx);
|
||||
if(idx < 0 || idx >= self->Len())
|
||||
return sq_throwerror(v,_SC("index out of range"));
|
||||
sq_pushinteger(v,((unsigned char *)self->GetBuf())[idx]);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _blob__nexti(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_BLOB(v);
|
||||
if(sq_gettype(v,2) == OT_NULL) {
|
||||
sq_pushinteger(v, 0);
|
||||
return 1;
|
||||
}
|
||||
SQInteger idx;
|
||||
if(SQ_SUCCEEDED(sq_getinteger(v, 2, &idx))) {
|
||||
if(idx+1 < self->Len()) {
|
||||
sq_pushinteger(v, idx+1);
|
||||
return 1;
|
||||
}
|
||||
sq_pushnull(v);
|
||||
return 1;
|
||||
}
|
||||
return sq_throwerror(v,_SC("internal error (_nexti) wrong argument type"));
|
||||
}
|
||||
|
||||
static SQInteger _blob__typeof(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushstring(v,_SC("blob"),-1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _blob_releasehook(SQUserPointer p, SQInteger SQ_UNUSED_ARG(size))
|
||||
{
|
||||
SQBlob *self = (SQBlob*)p;
|
||||
self->~SQBlob();
|
||||
sq_free(self,sizeof(SQBlob));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _blob_constructor(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger nparam = sq_gettop(v);
|
||||
SQInteger size = 0;
|
||||
if(nparam == 2) {
|
||||
sq_getinteger(v, 2, &size);
|
||||
}
|
||||
if(size < 0) return sq_throwerror(v, _SC("cannot create blob with negative size"));
|
||||
//SQBlob *b = new SQBlob(size);
|
||||
|
||||
SQBlob *b = new (sq_malloc(sizeof(SQBlob)))SQBlob(size);
|
||||
if(SQ_FAILED(sq_setinstanceup(v,1,b))) {
|
||||
b->~SQBlob();
|
||||
sq_free(b,sizeof(SQBlob));
|
||||
return sq_throwerror(v, _SC("cannot create blob"));
|
||||
}
|
||||
sq_setreleasehook(v,1,_blob_releasehook);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _blob__cloned(HSQUIRRELVM v)
|
||||
{
|
||||
SQBlob *other = NULL;
|
||||
{
|
||||
if(SQ_FAILED(sq_getinstanceup(v,2,(SQUserPointer*)&other,(SQUserPointer)SQSTD_BLOB_TYPE_TAG,SQFalse)))
|
||||
return SQ_ERROR;
|
||||
}
|
||||
//SQBlob *thisone = new SQBlob(other->Len());
|
||||
SQBlob *thisone = new (sq_malloc(sizeof(SQBlob)))SQBlob(other->Len());
|
||||
memcpy(thisone->GetBuf(),other->GetBuf(),thisone->Len());
|
||||
if(SQ_FAILED(sq_setinstanceup(v,1,thisone))) {
|
||||
thisone->~SQBlob();
|
||||
sq_free(thisone,sizeof(SQBlob));
|
||||
return sq_throwerror(v, _SC("cannot clone blob"));
|
||||
}
|
||||
sq_setreleasehook(v,1,_blob_releasehook);
|
||||
return 0;
|
||||
}
|
||||
|
||||
#define _DECL_BLOB_FUNC(name,nparams,typecheck) {_SC(#name),_blob_##name,nparams,typecheck}
|
||||
static const SQRegFunction _blob_methods[] = {
|
||||
_DECL_BLOB_FUNC(constructor,-1,_SC("xn")),
|
||||
_DECL_BLOB_FUNC(resize,2,_SC("xn")),
|
||||
_DECL_BLOB_FUNC(swap2,1,_SC("x")),
|
||||
_DECL_BLOB_FUNC(swap4,1,_SC("x")),
|
||||
_DECL_BLOB_FUNC(_set,3,_SC("xnn")),
|
||||
_DECL_BLOB_FUNC(_get,2,_SC("x.")),
|
||||
_DECL_BLOB_FUNC(_typeof,1,_SC("x")),
|
||||
_DECL_BLOB_FUNC(_nexti,2,_SC("x")),
|
||||
_DECL_BLOB_FUNC(_cloned,2,_SC("xx")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
|
||||
|
||||
|
||||
//GLOBAL FUNCTIONS
|
||||
|
||||
static SQInteger _g_blob_casti2f(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger i;
|
||||
sq_getinteger(v,2,&i);
|
||||
sq_pushfloat(v,*((const SQFloat *)&i));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _g_blob_castf2i(HSQUIRRELVM v)
|
||||
{
|
||||
SQFloat f;
|
||||
sq_getfloat(v,2,&f);
|
||||
sq_pushinteger(v,*((const SQInteger *)&f));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _g_blob_swap2(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger i;
|
||||
sq_getinteger(v,2,&i);
|
||||
unsigned short s = (unsigned short)i;
|
||||
sq_pushinteger(v, ((s << 8) | ((s >> 8) & 0x00FFu)) & 0xFFFFu);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _g_blob_swap4(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger i;
|
||||
sq_getinteger(v,2,&i);
|
||||
unsigned int t4 = (unsigned int)i;
|
||||
__swap_dword(&t4);
|
||||
sq_pushinteger(v,(SQInteger)t4);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _g_blob_swapfloat(HSQUIRRELVM v)
|
||||
{
|
||||
SQFloat f;
|
||||
sq_getfloat(v,2,&f);
|
||||
__swap_dword((unsigned int *)&f);
|
||||
sq_pushfloat(v,f);
|
||||
return 1;
|
||||
}
|
||||
|
||||
#define _DECL_GLOBALBLOB_FUNC(name,nparams,typecheck) {_SC(#name),_g_blob_##name,nparams,typecheck}
|
||||
static const SQRegFunction bloblib_funcs[]={
|
||||
_DECL_GLOBALBLOB_FUNC(casti2f,2,_SC(".n")),
|
||||
_DECL_GLOBALBLOB_FUNC(castf2i,2,_SC(".n")),
|
||||
_DECL_GLOBALBLOB_FUNC(swap2,2,_SC(".n")),
|
||||
_DECL_GLOBALBLOB_FUNC(swap4,2,_SC(".n")),
|
||||
_DECL_GLOBALBLOB_FUNC(swapfloat,2,_SC(".n")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
|
||||
SQRESULT sqstd_getblob(HSQUIRRELVM v,SQInteger idx,SQUserPointer *ptr)
|
||||
{
|
||||
SQBlob *blob;
|
||||
if(SQ_FAILED(sq_getinstanceup(v,idx,(SQUserPointer *)&blob,(SQUserPointer)SQSTD_BLOB_TYPE_TAG,SQTrue)))
|
||||
return -1;
|
||||
*ptr = blob->GetBuf();
|
||||
return SQ_OK;
|
||||
}
|
||||
|
||||
SQInteger sqstd_getblobsize(HSQUIRRELVM v,SQInteger idx)
|
||||
{
|
||||
SQBlob *blob;
|
||||
if(SQ_FAILED(sq_getinstanceup(v,idx,(SQUserPointer *)&blob,(SQUserPointer)SQSTD_BLOB_TYPE_TAG,SQTrue)))
|
||||
return -1;
|
||||
return blob->Len();
|
||||
}
|
||||
|
||||
SQUserPointer sqstd_createblob(HSQUIRRELVM v, SQInteger size)
|
||||
{
|
||||
SQInteger top = sq_gettop(v);
|
||||
sq_pushregistrytable(v);
|
||||
sq_pushstring(v,_SC("std_blob"),-1);
|
||||
if(SQ_SUCCEEDED(sq_get(v,-2))) {
|
||||
sq_remove(v,-2); //removes the registry
|
||||
sq_push(v,1); // push the this
|
||||
sq_pushinteger(v,size); //size
|
||||
SQBlob *blob = NULL;
|
||||
if(SQ_SUCCEEDED(sq_call(v,2,SQTrue,SQFalse))
|
||||
&& SQ_SUCCEEDED(sq_getinstanceup(v,-1,(SQUserPointer *)&blob,(SQUserPointer)SQSTD_BLOB_TYPE_TAG,SQTrue))) {
|
||||
sq_remove(v,-2);
|
||||
return blob->GetBuf();
|
||||
}
|
||||
}
|
||||
sq_settop(v,top);
|
||||
return NULL;
|
||||
}
|
||||
|
||||
SQRESULT sqstd_register_bloblib(HSQUIRRELVM v)
|
||||
{
|
||||
return declare_stream(v,_SC("blob"),(SQUserPointer)SQSTD_BLOB_TYPE_TAG,_SC("std_blob"),_blob_methods,bloblib_funcs);
|
||||
}
|
||||
|
||||
|
|
@ -1,108 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTD_BLOBIMPL_H_
|
||||
#define _SQSTD_BLOBIMPL_H_
|
||||
|
||||
struct SQBlob : public SQStream
|
||||
{
|
||||
SQBlob(SQInteger size) {
|
||||
_size = size;
|
||||
_allocated = size;
|
||||
_buf = (unsigned char *)sq_malloc(size);
|
||||
memset(_buf, 0, _size);
|
||||
_ptr = 0;
|
||||
_owns = true;
|
||||
}
|
||||
virtual ~SQBlob() {
|
||||
sq_free(_buf, _allocated);
|
||||
}
|
||||
SQInteger Write(void *buffer, SQInteger size) {
|
||||
if(!CanAdvance(size)) {
|
||||
GrowBufOf(_ptr + size - _size);
|
||||
}
|
||||
memcpy(&_buf[_ptr], buffer, size);
|
||||
_ptr += size;
|
||||
return size;
|
||||
}
|
||||
SQInteger Read(void *buffer,SQInteger size) {
|
||||
SQInteger n = size;
|
||||
if(!CanAdvance(size)) {
|
||||
if((_size - _ptr) > 0)
|
||||
n = _size - _ptr;
|
||||
else return 0;
|
||||
}
|
||||
memcpy(buffer, &_buf[_ptr], n);
|
||||
_ptr += n;
|
||||
return n;
|
||||
}
|
||||
bool Resize(SQInteger n) {
|
||||
if(!_owns) return false;
|
||||
if(n != _allocated) {
|
||||
unsigned char *newbuf = (unsigned char *)sq_malloc(n);
|
||||
memset(newbuf,0,n);
|
||||
if(_size > n)
|
||||
memcpy(newbuf,_buf,n);
|
||||
else
|
||||
memcpy(newbuf,_buf,_size);
|
||||
sq_free(_buf,_allocated);
|
||||
_buf=newbuf;
|
||||
_allocated = n;
|
||||
if(_size > _allocated)
|
||||
_size = _allocated;
|
||||
if(_ptr > _allocated)
|
||||
_ptr = _allocated;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
bool GrowBufOf(SQInteger n)
|
||||
{
|
||||
bool ret = true;
|
||||
if(_size + n > _allocated) {
|
||||
if(_size + n > _size * 2)
|
||||
ret = Resize(_size + n);
|
||||
else
|
||||
ret = Resize(_size * 2);
|
||||
}
|
||||
_size = _size + n;
|
||||
return ret;
|
||||
}
|
||||
bool CanAdvance(SQInteger n) {
|
||||
if(_ptr+n>_size)return false;
|
||||
return true;
|
||||
}
|
||||
SQInteger Seek(SQInteger offset, SQInteger origin) {
|
||||
switch(origin) {
|
||||
case SQ_SEEK_SET:
|
||||
if(offset > _size || offset < 0) return -1;
|
||||
_ptr = offset;
|
||||
break;
|
||||
case SQ_SEEK_CUR:
|
||||
if(_ptr + offset > _size || _ptr + offset < 0) return -1;
|
||||
_ptr += offset;
|
||||
break;
|
||||
case SQ_SEEK_END:
|
||||
if(_size + offset > _size || _size + offset < 0) return -1;
|
||||
_ptr = _size + offset;
|
||||
break;
|
||||
default: return -1;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
bool IsValid() {
|
||||
return _size == 0 || _buf?true:false;
|
||||
}
|
||||
bool EOS() {
|
||||
return _ptr == _size;
|
||||
}
|
||||
SQInteger Flush() { return 0; }
|
||||
SQInteger Tell() { return _ptr; }
|
||||
SQInteger Len() { return _size; }
|
||||
SQUserPointer GetBuf(){ return _buf; }
|
||||
private:
|
||||
SQInteger _size;
|
||||
SQInteger _allocated;
|
||||
SQInteger _ptr;
|
||||
unsigned char *_buf;
|
||||
bool _owns;
|
||||
};
|
||||
|
||||
#endif //_SQSTD_BLOBIMPL_H_
|
||||
|
|
@ -1,489 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <new>
|
||||
#include <stdio.h>
|
||||
#include <squirrel.h>
|
||||
#include <sqstdio.h>
|
||||
#include "sqstdstream.h"
|
||||
|
||||
#define SQSTD_FILE_TYPE_TAG ((SQUnsignedInteger)(SQSTD_STREAM_TYPE_TAG | 0x00000001))
|
||||
//basic API
|
||||
SQFILE sqstd_fopen(const SQChar *filename ,const SQChar *mode)
|
||||
{
|
||||
#ifndef SQUNICODE
|
||||
return (SQFILE)fopen(filename,mode);
|
||||
#else
|
||||
return (SQFILE)_wfopen(filename,mode);
|
||||
#endif
|
||||
}
|
||||
|
||||
SQInteger sqstd_fread(void* buffer, SQInteger size, SQInteger count, SQFILE file)
|
||||
{
|
||||
SQInteger ret = (SQInteger)fread(buffer,size,count,(FILE *)file);
|
||||
return ret;
|
||||
}
|
||||
|
||||
SQInteger sqstd_fwrite(const SQUserPointer buffer, SQInteger size, SQInteger count, SQFILE file)
|
||||
{
|
||||
return (SQInteger)fwrite(buffer,size,count,(FILE *)file);
|
||||
}
|
||||
|
||||
SQInteger sqstd_fseek(SQFILE file, SQInteger offset, SQInteger origin)
|
||||
{
|
||||
SQInteger realorigin;
|
||||
switch(origin) {
|
||||
case SQ_SEEK_CUR: realorigin = SEEK_CUR; break;
|
||||
case SQ_SEEK_END: realorigin = SEEK_END; break;
|
||||
case SQ_SEEK_SET: realorigin = SEEK_SET; break;
|
||||
default: return -1; //failed
|
||||
}
|
||||
return fseek((FILE *)file,(long)offset,(int)realorigin);
|
||||
}
|
||||
|
||||
SQInteger sqstd_ftell(SQFILE file)
|
||||
{
|
||||
return ftell((FILE *)file);
|
||||
}
|
||||
|
||||
SQInteger sqstd_fflush(SQFILE file)
|
||||
{
|
||||
return fflush((FILE *)file);
|
||||
}
|
||||
|
||||
SQInteger sqstd_fclose(SQFILE file)
|
||||
{
|
||||
return fclose((FILE *)file);
|
||||
}
|
||||
|
||||
SQInteger sqstd_feof(SQFILE file)
|
||||
{
|
||||
return feof((FILE *)file);
|
||||
}
|
||||
|
||||
//File
|
||||
struct SQFile : public SQStream {
|
||||
SQFile() { _handle = NULL; _owns = false;}
|
||||
SQFile(SQFILE file, bool owns) { _handle = file; _owns = owns;}
|
||||
virtual ~SQFile() { Close(); }
|
||||
bool Open(const SQChar *filename ,const SQChar *mode) {
|
||||
Close();
|
||||
if( (_handle = sqstd_fopen(filename,mode)) ) {
|
||||
_owns = true;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
void Close() {
|
||||
if(_handle && _owns) {
|
||||
sqstd_fclose(_handle);
|
||||
_handle = NULL;
|
||||
_owns = false;
|
||||
}
|
||||
}
|
||||
SQInteger Read(void *buffer,SQInteger size) {
|
||||
return sqstd_fread(buffer,1,size,_handle);
|
||||
}
|
||||
SQInteger Write(void *buffer,SQInteger size) {
|
||||
return sqstd_fwrite(buffer,1,size,_handle);
|
||||
}
|
||||
SQInteger Flush() {
|
||||
return sqstd_fflush(_handle);
|
||||
}
|
||||
SQInteger Tell() {
|
||||
return sqstd_ftell(_handle);
|
||||
}
|
||||
SQInteger Len() {
|
||||
SQInteger prevpos=Tell();
|
||||
Seek(0,SQ_SEEK_END);
|
||||
SQInteger size=Tell();
|
||||
Seek(prevpos,SQ_SEEK_SET);
|
||||
return size;
|
||||
}
|
||||
SQInteger Seek(SQInteger offset, SQInteger origin) {
|
||||
return sqstd_fseek(_handle,offset,origin);
|
||||
}
|
||||
bool IsValid() { return _handle?true:false; }
|
||||
bool EOS() { return Tell()==Len()?true:false;}
|
||||
SQFILE GetHandle() {return _handle;}
|
||||
private:
|
||||
SQFILE _handle;
|
||||
bool _owns;
|
||||
};
|
||||
|
||||
static SQInteger _file__typeof(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushstring(v,_SC("file"),-1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _file_releasehook(SQUserPointer p, SQInteger SQ_UNUSED_ARG(size))
|
||||
{
|
||||
SQFile *self = (SQFile*)p;
|
||||
self->~SQFile();
|
||||
sq_free(self,sizeof(SQFile));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _file_constructor(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *filename,*mode;
|
||||
bool owns = true;
|
||||
SQFile *f;
|
||||
SQFILE newf;
|
||||
if(sq_gettype(v,2) == OT_STRING && sq_gettype(v,3) == OT_STRING) {
|
||||
sq_getstring(v, 2, &filename);
|
||||
sq_getstring(v, 3, &mode);
|
||||
newf = sqstd_fopen(filename, mode);
|
||||
if(!newf) return sq_throwerror(v, _SC("cannot open file"));
|
||||
} else if(sq_gettype(v,2) == OT_USERPOINTER) {
|
||||
owns = !(sq_gettype(v,3) == OT_NULL);
|
||||
sq_getuserpointer(v,2,&newf);
|
||||
} else {
|
||||
return sq_throwerror(v,_SC("wrong parameter"));
|
||||
}
|
||||
|
||||
f = new (sq_malloc(sizeof(SQFile)))SQFile(newf,owns);
|
||||
if(SQ_FAILED(sq_setinstanceup(v,1,f))) {
|
||||
f->~SQFile();
|
||||
sq_free(f,sizeof(SQFile));
|
||||
return sq_throwerror(v, _SC("cannot create blob with negative size"));
|
||||
}
|
||||
sq_setreleasehook(v,1,_file_releasehook);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _file_close(HSQUIRRELVM v)
|
||||
{
|
||||
SQFile *self = NULL;
|
||||
if(SQ_SUCCEEDED(sq_getinstanceup(v,1,(SQUserPointer*)&self,(SQUserPointer)SQSTD_FILE_TYPE_TAG, SQTrue))
|
||||
&& self != NULL)
|
||||
{
|
||||
self->Close();
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
//bindings
|
||||
#define _DECL_FILE_FUNC(name,nparams,typecheck) {_SC(#name),_file_##name,nparams,typecheck}
|
||||
static const SQRegFunction _file_methods[] = {
|
||||
_DECL_FILE_FUNC(constructor,3,_SC("x")),
|
||||
_DECL_FILE_FUNC(_typeof,1,_SC("x")),
|
||||
_DECL_FILE_FUNC(close,1,_SC("x")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
|
||||
|
||||
|
||||
SQRESULT sqstd_createfile(HSQUIRRELVM v, SQFILE file,SQBool own)
|
||||
{
|
||||
SQInteger top = sq_gettop(v);
|
||||
sq_pushregistrytable(v);
|
||||
sq_pushstring(v,_SC("std_file"),-1);
|
||||
if(SQ_SUCCEEDED(sq_get(v,-2))) {
|
||||
sq_remove(v,-2); //removes the registry
|
||||
sq_pushroottable(v); // push the this
|
||||
sq_pushuserpointer(v,file); //file
|
||||
if(own){
|
||||
sq_pushinteger(v,1); //true
|
||||
}
|
||||
else{
|
||||
sq_pushnull(v); //false
|
||||
}
|
||||
if(SQ_SUCCEEDED( sq_call(v,3,SQTrue,SQFalse) )) {
|
||||
sq_remove(v,-2);
|
||||
return SQ_OK;
|
||||
}
|
||||
}
|
||||
sq_settop(v,top);
|
||||
return SQ_ERROR;
|
||||
}
|
||||
|
||||
SQRESULT sqstd_getfile(HSQUIRRELVM v, SQInteger idx, SQFILE *file)
|
||||
{
|
||||
SQFile *fileobj = NULL;
|
||||
if(SQ_SUCCEEDED(sq_getinstanceup(v,idx,(SQUserPointer*)&fileobj,(SQUserPointer)SQSTD_FILE_TYPE_TAG,SQFalse))) {
|
||||
*file = fileobj->GetHandle();
|
||||
return SQ_OK;
|
||||
}
|
||||
return sq_throwerror(v,_SC("not a file"));
|
||||
}
|
||||
|
||||
|
||||
|
||||
#define IO_BUFFER_SIZE 2048
|
||||
struct IOBuffer {
|
||||
unsigned char buffer[IO_BUFFER_SIZE];
|
||||
SQInteger size;
|
||||
SQInteger ptr;
|
||||
SQFILE file;
|
||||
};
|
||||
|
||||
SQInteger _read_byte(IOBuffer *iobuffer)
|
||||
{
|
||||
if(iobuffer->ptr < iobuffer->size) {
|
||||
|
||||
SQInteger ret = iobuffer->buffer[iobuffer->ptr];
|
||||
iobuffer->ptr++;
|
||||
return ret;
|
||||
}
|
||||
else {
|
||||
if( (iobuffer->size = sqstd_fread(iobuffer->buffer,1,IO_BUFFER_SIZE,iobuffer->file )) > 0 )
|
||||
{
|
||||
SQInteger ret = iobuffer->buffer[0];
|
||||
iobuffer->ptr = 1;
|
||||
return ret;
|
||||
}
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
SQInteger _read_two_bytes(IOBuffer *iobuffer)
|
||||
{
|
||||
if(iobuffer->ptr < iobuffer->size) {
|
||||
if(iobuffer->size < 2) return 0;
|
||||
SQInteger ret = *((const wchar_t*)&iobuffer->buffer[iobuffer->ptr]);
|
||||
iobuffer->ptr += 2;
|
||||
return ret;
|
||||
}
|
||||
else {
|
||||
if( (iobuffer->size = sqstd_fread(iobuffer->buffer,1,IO_BUFFER_SIZE,iobuffer->file )) > 0 )
|
||||
{
|
||||
if(iobuffer->size < 2) return 0;
|
||||
SQInteger ret = *((const wchar_t*)&iobuffer->buffer[0]);
|
||||
iobuffer->ptr = 2;
|
||||
return ret;
|
||||
}
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _io_file_lexfeed_PLAIN(SQUserPointer iobuf)
|
||||
{
|
||||
IOBuffer *iobuffer = (IOBuffer *)iobuf;
|
||||
return _read_byte(iobuffer);
|
||||
|
||||
}
|
||||
|
||||
#ifdef SQUNICODE
|
||||
static SQInteger _io_file_lexfeed_UTF8(SQUserPointer iobuf)
|
||||
{
|
||||
IOBuffer *iobuffer = (IOBuffer *)iobuf;
|
||||
#define READ(iobuf) \
|
||||
if((inchar = (unsigned char)_read_byte(iobuf)) == 0) \
|
||||
return 0;
|
||||
|
||||
static const SQInteger utf8_lengths[16] =
|
||||
{
|
||||
1,1,1,1,1,1,1,1, /* 0000 to 0111 : 1 byte (plain ASCII) */
|
||||
0,0,0,0, /* 1000 to 1011 : not valid */
|
||||
2,2, /* 1100, 1101 : 2 bytes */
|
||||
3, /* 1110 : 3 bytes */
|
||||
4 /* 1111 :4 bytes */
|
||||
};
|
||||
static const unsigned char byte_masks[5] = {0,0,0x1f,0x0f,0x07};
|
||||
unsigned char inchar;
|
||||
SQInteger c = 0;
|
||||
READ(iobuffer);
|
||||
c = inchar;
|
||||
//
|
||||
if(c >= 0x80) {
|
||||
SQInteger tmp;
|
||||
SQInteger codelen = utf8_lengths[c>>4];
|
||||
if(codelen == 0)
|
||||
return 0;
|
||||
//"invalid UTF-8 stream";
|
||||
tmp = c&byte_masks[codelen];
|
||||
for(SQInteger n = 0; n < codelen-1; n++) {
|
||||
tmp<<=6;
|
||||
READ(iobuffer);
|
||||
tmp |= inchar & 0x3F;
|
||||
}
|
||||
c = tmp;
|
||||
}
|
||||
return c;
|
||||
}
|
||||
#endif
|
||||
|
||||
static SQInteger _io_file_lexfeed_UCS2_LE(SQUserPointer iobuf)
|
||||
{
|
||||
SQInteger ret;
|
||||
IOBuffer *iobuffer = (IOBuffer *)iobuf;
|
||||
if( (ret = _read_two_bytes(iobuffer)) > 0 )
|
||||
return ret;
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _io_file_lexfeed_UCS2_BE(SQUserPointer iobuf)
|
||||
{
|
||||
SQInteger c;
|
||||
IOBuffer *iobuffer = (IOBuffer *)iobuf;
|
||||
if( (c = _read_two_bytes(iobuffer)) > 0 ) {
|
||||
c = ((c>>8)&0x00FF)| ((c<<8)&0xFF00);
|
||||
return c;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
SQInteger file_read(SQUserPointer file,SQUserPointer buf,SQInteger size)
|
||||
{
|
||||
SQInteger ret;
|
||||
if( ( ret = sqstd_fread(buf,1,size,(SQFILE)file ))!=0 )return ret;
|
||||
return -1;
|
||||
}
|
||||
|
||||
SQInteger file_write(SQUserPointer file,SQUserPointer p,SQInteger size)
|
||||
{
|
||||
return sqstd_fwrite(p,1,size,(SQFILE)file);
|
||||
}
|
||||
|
||||
SQRESULT sqstd_loadfile(HSQUIRRELVM v,const SQChar *filename,SQBool printerror)
|
||||
{
|
||||
SQFILE file = sqstd_fopen(filename,_SC("rb"));
|
||||
|
||||
SQInteger ret;
|
||||
unsigned short us;
|
||||
unsigned char uc;
|
||||
SQLEXREADFUNC func = _io_file_lexfeed_PLAIN;
|
||||
if(file){
|
||||
ret = sqstd_fread(&us,1,2,file);
|
||||
if(ret != 2) {
|
||||
//probably an empty file
|
||||
us = 0;
|
||||
}
|
||||
if(us == SQ_BYTECODE_STREAM_TAG) { //BYTECODE
|
||||
sqstd_fseek(file,0,SQ_SEEK_SET);
|
||||
if(SQ_SUCCEEDED(sq_readclosure(v,file_read,file))) {
|
||||
sqstd_fclose(file);
|
||||
return SQ_OK;
|
||||
}
|
||||
}
|
||||
else { //SCRIPT
|
||||
|
||||
switch(us)
|
||||
{
|
||||
//gotta swap the next 2 lines on BIG endian machines
|
||||
case 0xFFFE: func = _io_file_lexfeed_UCS2_BE; break;//UTF-16 little endian;
|
||||
case 0xFEFF: func = _io_file_lexfeed_UCS2_LE; break;//UTF-16 big endian;
|
||||
case 0xBBEF:
|
||||
if(sqstd_fread(&uc,1,sizeof(uc),file) == 0) {
|
||||
sqstd_fclose(file);
|
||||
return sq_throwerror(v,_SC("io error"));
|
||||
}
|
||||
if(uc != 0xBF) {
|
||||
sqstd_fclose(file);
|
||||
return sq_throwerror(v,_SC("Unrecognized encoding"));
|
||||
}
|
||||
#ifdef SQUNICODE
|
||||
func = _io_file_lexfeed_UTF8;
|
||||
#else
|
||||
func = _io_file_lexfeed_PLAIN;
|
||||
#endif
|
||||
break;//UTF-8 ;
|
||||
default: sqstd_fseek(file,0,SQ_SEEK_SET); break; // ascii
|
||||
}
|
||||
IOBuffer buffer;
|
||||
buffer.ptr = 0;
|
||||
buffer.size = 0;
|
||||
buffer.file = file;
|
||||
if(SQ_SUCCEEDED(sq_compile(v,func,&buffer,filename,printerror))){
|
||||
sqstd_fclose(file);
|
||||
return SQ_OK;
|
||||
}
|
||||
}
|
||||
sqstd_fclose(file);
|
||||
return SQ_ERROR;
|
||||
}
|
||||
return sq_throwerror(v,_SC("cannot open the file"));
|
||||
}
|
||||
|
||||
SQRESULT sqstd_dofile(HSQUIRRELVM v,const SQChar *filename,SQBool retval,SQBool printerror)
|
||||
{
|
||||
//at least one entry must exist in order for us to push it as the environment
|
||||
if(sq_gettop(v) == 0)
|
||||
return sq_throwerror(v,_SC("environment table expected"));
|
||||
|
||||
if(SQ_SUCCEEDED(sqstd_loadfile(v,filename,printerror))) {
|
||||
sq_push(v,-2);
|
||||
if(SQ_SUCCEEDED(sq_call(v,1,retval,SQTrue))) {
|
||||
sq_remove(v,retval?-2:-1); //removes the closure
|
||||
return 1;
|
||||
}
|
||||
sq_pop(v,1); //removes the closure
|
||||
}
|
||||
return SQ_ERROR;
|
||||
}
|
||||
|
||||
SQRESULT sqstd_writeclosuretofile(HSQUIRRELVM v,const SQChar *filename)
|
||||
{
|
||||
SQFILE file = sqstd_fopen(filename,_SC("wb+"));
|
||||
if(!file) return sq_throwerror(v,_SC("cannot open the file"));
|
||||
if(SQ_SUCCEEDED(sq_writeclosure(v,file_write,file))) {
|
||||
sqstd_fclose(file);
|
||||
return SQ_OK;
|
||||
}
|
||||
sqstd_fclose(file);
|
||||
return SQ_ERROR; //forward the error
|
||||
}
|
||||
|
||||
SQInteger _g_io_loadfile(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *filename;
|
||||
SQBool printerror = SQFalse;
|
||||
sq_getstring(v,2,&filename);
|
||||
if(sq_gettop(v) >= 3) {
|
||||
sq_getbool(v,3,&printerror);
|
||||
}
|
||||
if(SQ_SUCCEEDED(sqstd_loadfile(v,filename,printerror)))
|
||||
return 1;
|
||||
return SQ_ERROR; //propagates the error
|
||||
}
|
||||
|
||||
SQInteger _g_io_writeclosuretofile(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *filename;
|
||||
sq_getstring(v,2,&filename);
|
||||
if(SQ_SUCCEEDED(sqstd_writeclosuretofile(v,filename)))
|
||||
return 1;
|
||||
return SQ_ERROR; //propagates the error
|
||||
}
|
||||
|
||||
SQInteger _g_io_dofile(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *filename;
|
||||
SQBool printerror = SQFalse;
|
||||
sq_getstring(v,2,&filename);
|
||||
if(sq_gettop(v) >= 3) {
|
||||
sq_getbool(v,3,&printerror);
|
||||
}
|
||||
sq_push(v,1); //repush the this
|
||||
if(SQ_SUCCEEDED(sqstd_dofile(v,filename,SQTrue,printerror)))
|
||||
return 1;
|
||||
return SQ_ERROR; //propagates the error
|
||||
}
|
||||
|
||||
#define _DECL_GLOBALIO_FUNC(name,nparams,typecheck) {_SC(#name),_g_io_##name,nparams,typecheck}
|
||||
static const SQRegFunction iolib_funcs[]={
|
||||
_DECL_GLOBALIO_FUNC(loadfile,-2,_SC(".sb")),
|
||||
_DECL_GLOBALIO_FUNC(dofile,-2,_SC(".sb")),
|
||||
_DECL_GLOBALIO_FUNC(writeclosuretofile,3,_SC(".sc")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
|
||||
SQRESULT sqstd_register_iolib(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger top = sq_gettop(v);
|
||||
//create delegate
|
||||
declare_stream(v,_SC("file"),(SQUserPointer)SQSTD_FILE_TYPE_TAG,_SC("std_file"),_file_methods,iolib_funcs);
|
||||
sq_pushstring(v,_SC("stdout"),-1);
|
||||
sqstd_createfile(v,stdout,SQFalse);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_pushstring(v,_SC("stdin"),-1);
|
||||
sqstd_createfile(v,stdin,SQFalse);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_pushstring(v,_SC("stderr"),-1);
|
||||
sqstd_createfile(v,stderr,SQFalse);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_settop(v,top);
|
||||
return SQ_OK;
|
||||
}
|
||||
|
|
@ -1,107 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <squirrel.h>
|
||||
#include <math.h>
|
||||
#include <stdlib.h>
|
||||
#include <sqstdmath.h>
|
||||
|
||||
#define SINGLE_ARG_FUNC(_funcname) static SQInteger math_##_funcname(HSQUIRRELVM v){ \
|
||||
SQFloat f; \
|
||||
sq_getfloat(v,2,&f); \
|
||||
sq_pushfloat(v,(SQFloat)_funcname(f)); \
|
||||
return 1; \
|
||||
}
|
||||
|
||||
#define TWO_ARGS_FUNC(_funcname) static SQInteger math_##_funcname(HSQUIRRELVM v){ \
|
||||
SQFloat p1,p2; \
|
||||
sq_getfloat(v,2,&p1); \
|
||||
sq_getfloat(v,3,&p2); \
|
||||
sq_pushfloat(v,(SQFloat)_funcname(p1,p2)); \
|
||||
return 1; \
|
||||
}
|
||||
|
||||
static SQInteger math_srand(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger i;
|
||||
if(SQ_FAILED(sq_getinteger(v,2,&i)))
|
||||
return sq_throwerror(v,_SC("invalid param"));
|
||||
srand((unsigned int)i);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger math_rand(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushinteger(v,rand());
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger math_abs(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger n;
|
||||
sq_getinteger(v,2,&n);
|
||||
sq_pushinteger(v,(SQInteger)abs((int)n));
|
||||
return 1;
|
||||
}
|
||||
|
||||
SINGLE_ARG_FUNC(sqrt)
|
||||
SINGLE_ARG_FUNC(fabs)
|
||||
SINGLE_ARG_FUNC(sin)
|
||||
SINGLE_ARG_FUNC(cos)
|
||||
SINGLE_ARG_FUNC(asin)
|
||||
SINGLE_ARG_FUNC(acos)
|
||||
SINGLE_ARG_FUNC(log)
|
||||
SINGLE_ARG_FUNC(log10)
|
||||
SINGLE_ARG_FUNC(tan)
|
||||
SINGLE_ARG_FUNC(atan)
|
||||
TWO_ARGS_FUNC(atan2)
|
||||
TWO_ARGS_FUNC(pow)
|
||||
SINGLE_ARG_FUNC(floor)
|
||||
SINGLE_ARG_FUNC(ceil)
|
||||
SINGLE_ARG_FUNC(exp)
|
||||
|
||||
#define _DECL_FUNC(name,nparams,tycheck) {_SC(#name),math_##name,nparams,tycheck}
|
||||
static const SQRegFunction mathlib_funcs[] = {
|
||||
_DECL_FUNC(sqrt,2,_SC(".n")),
|
||||
_DECL_FUNC(sin,2,_SC(".n")),
|
||||
_DECL_FUNC(cos,2,_SC(".n")),
|
||||
_DECL_FUNC(asin,2,_SC(".n")),
|
||||
_DECL_FUNC(acos,2,_SC(".n")),
|
||||
_DECL_FUNC(log,2,_SC(".n")),
|
||||
_DECL_FUNC(log10,2,_SC(".n")),
|
||||
_DECL_FUNC(tan,2,_SC(".n")),
|
||||
_DECL_FUNC(atan,2,_SC(".n")),
|
||||
_DECL_FUNC(atan2,3,_SC(".nn")),
|
||||
_DECL_FUNC(pow,3,_SC(".nn")),
|
||||
_DECL_FUNC(floor,2,_SC(".n")),
|
||||
_DECL_FUNC(ceil,2,_SC(".n")),
|
||||
_DECL_FUNC(exp,2,_SC(".n")),
|
||||
_DECL_FUNC(srand,2,_SC(".n")),
|
||||
_DECL_FUNC(rand,1,NULL),
|
||||
_DECL_FUNC(fabs,2,_SC(".n")),
|
||||
_DECL_FUNC(abs,2,_SC(".n")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
#undef _DECL_FUNC
|
||||
|
||||
#ifndef M_PI
|
||||
#define M_PI (3.14159265358979323846)
|
||||
#endif
|
||||
|
||||
SQRESULT sqstd_register_mathlib(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger i=0;
|
||||
while(mathlib_funcs[i].name!=0) {
|
||||
sq_pushstring(v,mathlib_funcs[i].name,-1);
|
||||
sq_newclosure(v,mathlib_funcs[i].f,0);
|
||||
sq_setparamscheck(v,mathlib_funcs[i].nparamscheck,mathlib_funcs[i].typemask);
|
||||
sq_setnativeclosurename(v,-1,mathlib_funcs[i].name);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
sq_pushstring(v,_SC("RAND_MAX"),-1);
|
||||
sq_pushinteger(v,RAND_MAX);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_pushstring(v,_SC("PI"),-1);
|
||||
sq_pushfloat(v,(SQFloat)M_PI);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
return SQ_OK;
|
||||
}
|
||||
|
|
@ -1,666 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <squirrel.h>
|
||||
#include <string.h>
|
||||
#include <ctype.h>
|
||||
#include <setjmp.h>
|
||||
#include <sqstdstring.h>
|
||||
|
||||
#ifdef _DEBUG
|
||||
#include <stdio.h>
|
||||
|
||||
static const SQChar *g_nnames[] =
|
||||
{
|
||||
_SC("NONE"),_SC("OP_GREEDY"), _SC("OP_OR"),
|
||||
_SC("OP_EXPR"),_SC("OP_NOCAPEXPR"),_SC("OP_DOT"), _SC("OP_CLASS"),
|
||||
_SC("OP_CCLASS"),_SC("OP_NCLASS"),_SC("OP_RANGE"),_SC("OP_CHAR"),
|
||||
_SC("OP_EOL"),_SC("OP_BOL"),_SC("OP_WB"),_SC("OP_MB")
|
||||
};
|
||||
|
||||
#endif
|
||||
|
||||
#define OP_GREEDY (MAX_CHAR+1) // * + ? {n}
|
||||
#define OP_OR (MAX_CHAR+2)
|
||||
#define OP_EXPR (MAX_CHAR+3) //parentesis ()
|
||||
#define OP_NOCAPEXPR (MAX_CHAR+4) //parentesis (?:)
|
||||
#define OP_DOT (MAX_CHAR+5)
|
||||
#define OP_CLASS (MAX_CHAR+6)
|
||||
#define OP_CCLASS (MAX_CHAR+7)
|
||||
#define OP_NCLASS (MAX_CHAR+8) //negates class the [^
|
||||
#define OP_RANGE (MAX_CHAR+9)
|
||||
#define OP_CHAR (MAX_CHAR+10)
|
||||
#define OP_EOL (MAX_CHAR+11)
|
||||
#define OP_BOL (MAX_CHAR+12)
|
||||
#define OP_WB (MAX_CHAR+13)
|
||||
#define OP_MB (MAX_CHAR+14) //match balanced
|
||||
|
||||
#define SQREX_SYMBOL_ANY_CHAR ('.')
|
||||
#define SQREX_SYMBOL_GREEDY_ONE_OR_MORE ('+')
|
||||
#define SQREX_SYMBOL_GREEDY_ZERO_OR_MORE ('*')
|
||||
#define SQREX_SYMBOL_GREEDY_ZERO_OR_ONE ('?')
|
||||
#define SQREX_SYMBOL_BRANCH ('|')
|
||||
#define SQREX_SYMBOL_END_OF_STRING ('$')
|
||||
#define SQREX_SYMBOL_BEGINNING_OF_STRING ('^')
|
||||
#define SQREX_SYMBOL_ESCAPE_CHAR ('\\')
|
||||
|
||||
|
||||
typedef int SQRexNodeType;
|
||||
|
||||
typedef struct tagSQRexNode{
|
||||
SQRexNodeType type;
|
||||
SQInteger left;
|
||||
SQInteger right;
|
||||
SQInteger next;
|
||||
}SQRexNode;
|
||||
|
||||
struct SQRex{
|
||||
const SQChar *_eol;
|
||||
const SQChar *_bol;
|
||||
const SQChar *_p;
|
||||
SQInteger _first;
|
||||
SQInteger _op;
|
||||
SQRexNode *_nodes;
|
||||
SQInteger _nallocated;
|
||||
SQInteger _nsize;
|
||||
SQInteger _nsubexpr;
|
||||
SQRexMatch *_matches;
|
||||
SQInteger _currsubexp;
|
||||
void *_jmpbuf;
|
||||
const SQChar **_error;
|
||||
};
|
||||
|
||||
static SQInteger sqstd_rex_list(SQRex *exp);
|
||||
|
||||
static SQInteger sqstd_rex_newnode(SQRex *exp, SQRexNodeType type)
|
||||
{
|
||||
SQRexNode n;
|
||||
n.type = type;
|
||||
n.next = n.right = n.left = -1;
|
||||
if(type == OP_EXPR)
|
||||
n.right = exp->_nsubexpr++;
|
||||
if(exp->_nallocated < (exp->_nsize + 1)) {
|
||||
SQInteger oldsize = exp->_nallocated;
|
||||
exp->_nallocated *= 2;
|
||||
exp->_nodes = (SQRexNode *)sq_realloc(exp->_nodes, oldsize * sizeof(SQRexNode) ,exp->_nallocated * sizeof(SQRexNode));
|
||||
}
|
||||
exp->_nodes[exp->_nsize++] = n;
|
||||
SQInteger newid = exp->_nsize - 1;
|
||||
return (SQInteger)newid;
|
||||
}
|
||||
|
||||
static void sqstd_rex_error(SQRex *exp,const SQChar *error)
|
||||
{
|
||||
if(exp->_error) *exp->_error = error;
|
||||
longjmp(*((jmp_buf*)exp->_jmpbuf),-1);
|
||||
}
|
||||
|
||||
static void sqstd_rex_expect(SQRex *exp, SQInteger n){
|
||||
if((*exp->_p) != n)
|
||||
sqstd_rex_error(exp, _SC("expected paren"));
|
||||
exp->_p++;
|
||||
}
|
||||
|
||||
static SQChar sqstd_rex_escapechar(SQRex *exp)
|
||||
{
|
||||
if(*exp->_p == SQREX_SYMBOL_ESCAPE_CHAR){
|
||||
exp->_p++;
|
||||
switch(*exp->_p) {
|
||||
case 'v': exp->_p++; return '\v';
|
||||
case 'n': exp->_p++; return '\n';
|
||||
case 't': exp->_p++; return '\t';
|
||||
case 'r': exp->_p++; return '\r';
|
||||
case 'f': exp->_p++; return '\f';
|
||||
default: return (*exp->_p++);
|
||||
}
|
||||
} else if(!scisprint(*exp->_p)) sqstd_rex_error(exp,_SC("letter expected"));
|
||||
return (*exp->_p++);
|
||||
}
|
||||
|
||||
static SQInteger sqstd_rex_charclass(SQRex *exp,SQInteger classid)
|
||||
{
|
||||
SQInteger n = sqstd_rex_newnode(exp,OP_CCLASS);
|
||||
exp->_nodes[n].left = classid;
|
||||
return n;
|
||||
}
|
||||
|
||||
static SQInteger sqstd_rex_charnode(SQRex *exp,SQBool isclass)
|
||||
{
|
||||
SQChar t;
|
||||
if(*exp->_p == SQREX_SYMBOL_ESCAPE_CHAR) {
|
||||
exp->_p++;
|
||||
switch(*exp->_p) {
|
||||
case 'n': exp->_p++; return sqstd_rex_newnode(exp,'\n');
|
||||
case 't': exp->_p++; return sqstd_rex_newnode(exp,'\t');
|
||||
case 'r': exp->_p++; return sqstd_rex_newnode(exp,'\r');
|
||||
case 'f': exp->_p++; return sqstd_rex_newnode(exp,'\f');
|
||||
case 'v': exp->_p++; return sqstd_rex_newnode(exp,'\v');
|
||||
case 'a': case 'A': case 'w': case 'W': case 's': case 'S':
|
||||
case 'd': case 'D': case 'x': case 'X': case 'c': case 'C':
|
||||
case 'p': case 'P': case 'l': case 'u':
|
||||
{
|
||||
t = *exp->_p; exp->_p++;
|
||||
return sqstd_rex_charclass(exp,t);
|
||||
}
|
||||
case 'm':
|
||||
{
|
||||
SQChar cb, ce; //cb = character begin match ce = character end match
|
||||
cb = *++exp->_p; //skip 'm'
|
||||
ce = *++exp->_p;
|
||||
exp->_p++; //points to the next char to be parsed
|
||||
if ((!cb) || (!ce)) sqstd_rex_error(exp,_SC("balanced chars expected"));
|
||||
if ( cb == ce ) sqstd_rex_error(exp,_SC("open/close char can't be the same"));
|
||||
SQInteger node = sqstd_rex_newnode(exp,OP_MB);
|
||||
exp->_nodes[node].left = cb;
|
||||
exp->_nodes[node].right = ce;
|
||||
return node;
|
||||
}
|
||||
case 0:
|
||||
sqstd_rex_error(exp,_SC("letter expected for argument of escape sequence"));
|
||||
break;
|
||||
case 'b':
|
||||
case 'B':
|
||||
if(!isclass) {
|
||||
SQInteger node = sqstd_rex_newnode(exp,OP_WB);
|
||||
exp->_nodes[node].left = *exp->_p;
|
||||
exp->_p++;
|
||||
return node;
|
||||
} //else default
|
||||
default:
|
||||
t = *exp->_p; exp->_p++;
|
||||
return sqstd_rex_newnode(exp,t);
|
||||
}
|
||||
}
|
||||
else if(!scisprint(*exp->_p)) {
|
||||
|
||||
sqstd_rex_error(exp,_SC("letter expected"));
|
||||
}
|
||||
t = *exp->_p; exp->_p++;
|
||||
return sqstd_rex_newnode(exp,t);
|
||||
}
|
||||
static SQInteger sqstd_rex_class(SQRex *exp)
|
||||
{
|
||||
SQInteger ret = -1;
|
||||
SQInteger first = -1,chain;
|
||||
if(*exp->_p == SQREX_SYMBOL_BEGINNING_OF_STRING){
|
||||
ret = sqstd_rex_newnode(exp,OP_NCLASS);
|
||||
exp->_p++;
|
||||
}else ret = sqstd_rex_newnode(exp,OP_CLASS);
|
||||
|
||||
if(*exp->_p == ']') sqstd_rex_error(exp,_SC("empty class"));
|
||||
chain = ret;
|
||||
while(*exp->_p != ']' && exp->_p != exp->_eol) {
|
||||
if(*exp->_p == '-' && first != -1){
|
||||
SQInteger r;
|
||||
if(*exp->_p++ == ']') sqstd_rex_error(exp,_SC("unfinished range"));
|
||||
r = sqstd_rex_newnode(exp,OP_RANGE);
|
||||
if(exp->_nodes[first].type>*exp->_p) sqstd_rex_error(exp,_SC("invalid range"));
|
||||
if(exp->_nodes[first].type == OP_CCLASS) sqstd_rex_error(exp,_SC("cannot use character classes in ranges"));
|
||||
exp->_nodes[r].left = exp->_nodes[first].type;
|
||||
SQInteger t = sqstd_rex_escapechar(exp);
|
||||
exp->_nodes[r].right = t;
|
||||
exp->_nodes[chain].next = r;
|
||||
chain = r;
|
||||
first = -1;
|
||||
}
|
||||
else{
|
||||
if(first!=-1){
|
||||
SQInteger c = first;
|
||||
exp->_nodes[chain].next = c;
|
||||
chain = c;
|
||||
first = sqstd_rex_charnode(exp,SQTrue);
|
||||
}
|
||||
else{
|
||||
first = sqstd_rex_charnode(exp,SQTrue);
|
||||
}
|
||||
}
|
||||
}
|
||||
if(first!=-1){
|
||||
SQInteger c = first;
|
||||
exp->_nodes[chain].next = c;
|
||||
}
|
||||
/* hack? */
|
||||
exp->_nodes[ret].left = exp->_nodes[ret].next;
|
||||
exp->_nodes[ret].next = -1;
|
||||
return ret;
|
||||
}
|
||||
|
||||
static SQInteger sqstd_rex_parsenumber(SQRex *exp)
|
||||
{
|
||||
SQInteger ret = *exp->_p-'0';
|
||||
SQInteger positions = 10;
|
||||
exp->_p++;
|
||||
while(isdigit(*exp->_p)) {
|
||||
ret = ret*10+(*exp->_p++-'0');
|
||||
if(positions==1000000000) sqstd_rex_error(exp,_SC("overflow in numeric constant"));
|
||||
positions *= 10;
|
||||
};
|
||||
return ret;
|
||||
}
|
||||
|
||||
static SQInteger sqstd_rex_element(SQRex *exp)
|
||||
{
|
||||
SQInteger ret = -1;
|
||||
switch(*exp->_p)
|
||||
{
|
||||
case '(': {
|
||||
SQInteger expr;
|
||||
exp->_p++;
|
||||
|
||||
|
||||
if(*exp->_p =='?') {
|
||||
exp->_p++;
|
||||
sqstd_rex_expect(exp,':');
|
||||
expr = sqstd_rex_newnode(exp,OP_NOCAPEXPR);
|
||||
}
|
||||
else
|
||||
expr = sqstd_rex_newnode(exp,OP_EXPR);
|
||||
SQInteger newn = sqstd_rex_list(exp);
|
||||
exp->_nodes[expr].left = newn;
|
||||
ret = expr;
|
||||
sqstd_rex_expect(exp,')');
|
||||
}
|
||||
break;
|
||||
case '[':
|
||||
exp->_p++;
|
||||
ret = sqstd_rex_class(exp);
|
||||
sqstd_rex_expect(exp,']');
|
||||
break;
|
||||
case SQREX_SYMBOL_END_OF_STRING: exp->_p++; ret = sqstd_rex_newnode(exp,OP_EOL);break;
|
||||
case SQREX_SYMBOL_ANY_CHAR: exp->_p++; ret = sqstd_rex_newnode(exp,OP_DOT);break;
|
||||
default:
|
||||
ret = sqstd_rex_charnode(exp,SQFalse);
|
||||
break;
|
||||
}
|
||||
|
||||
|
||||
SQBool isgreedy = SQFalse;
|
||||
unsigned short p0 = 0, p1 = 0;
|
||||
switch(*exp->_p){
|
||||
case SQREX_SYMBOL_GREEDY_ZERO_OR_MORE: p0 = 0; p1 = 0xFFFF; exp->_p++; isgreedy = SQTrue; break;
|
||||
case SQREX_SYMBOL_GREEDY_ONE_OR_MORE: p0 = 1; p1 = 0xFFFF; exp->_p++; isgreedy = SQTrue; break;
|
||||
case SQREX_SYMBOL_GREEDY_ZERO_OR_ONE: p0 = 0; p1 = 1; exp->_p++; isgreedy = SQTrue; break;
|
||||
case '{':
|
||||
exp->_p++;
|
||||
if(!isdigit(*exp->_p)) sqstd_rex_error(exp,_SC("number expected"));
|
||||
p0 = (unsigned short)sqstd_rex_parsenumber(exp);
|
||||
/*******************************/
|
||||
switch(*exp->_p) {
|
||||
case '}':
|
||||
p1 = p0; exp->_p++;
|
||||
break;
|
||||
case ',':
|
||||
exp->_p++;
|
||||
p1 = 0xFFFF;
|
||||
if(isdigit(*exp->_p)){
|
||||
p1 = (unsigned short)sqstd_rex_parsenumber(exp);
|
||||
}
|
||||
sqstd_rex_expect(exp,'}');
|
||||
break;
|
||||
default:
|
||||
sqstd_rex_error(exp,_SC(", or } expected"));
|
||||
}
|
||||
/*******************************/
|
||||
isgreedy = SQTrue;
|
||||
break;
|
||||
|
||||
}
|
||||
if(isgreedy) {
|
||||
SQInteger nnode = sqstd_rex_newnode(exp,OP_GREEDY);
|
||||
exp->_nodes[nnode].left = ret;
|
||||
exp->_nodes[nnode].right = ((p0)<<16)|p1;
|
||||
ret = nnode;
|
||||
}
|
||||
|
||||
if((*exp->_p != SQREX_SYMBOL_BRANCH) && (*exp->_p != ')') && (*exp->_p != SQREX_SYMBOL_GREEDY_ZERO_OR_MORE) && (*exp->_p != SQREX_SYMBOL_GREEDY_ONE_OR_MORE) && (*exp->_p != '\0')) {
|
||||
SQInteger nnode = sqstd_rex_element(exp);
|
||||
exp->_nodes[ret].next = nnode;
|
||||
}
|
||||
|
||||
return ret;
|
||||
}
|
||||
|
||||
static SQInteger sqstd_rex_list(SQRex *exp)
|
||||
{
|
||||
SQInteger ret=-1,e;
|
||||
if(*exp->_p == SQREX_SYMBOL_BEGINNING_OF_STRING) {
|
||||
exp->_p++;
|
||||
ret = sqstd_rex_newnode(exp,OP_BOL);
|
||||
}
|
||||
e = sqstd_rex_element(exp);
|
||||
if(ret != -1) {
|
||||
exp->_nodes[ret].next = e;
|
||||
}
|
||||
else ret = e;
|
||||
|
||||
if(*exp->_p == SQREX_SYMBOL_BRANCH) {
|
||||
SQInteger temp,tright;
|
||||
exp->_p++;
|
||||
temp = sqstd_rex_newnode(exp,OP_OR);
|
||||
exp->_nodes[temp].left = ret;
|
||||
tright = sqstd_rex_list(exp);
|
||||
exp->_nodes[temp].right = tright;
|
||||
ret = temp;
|
||||
}
|
||||
return ret;
|
||||
}
|
||||
|
||||
static SQBool sqstd_rex_matchcclass(SQInteger cclass,SQChar c)
|
||||
{
|
||||
switch(cclass) {
|
||||
case 'a': return isalpha(c)?SQTrue:SQFalse;
|
||||
case 'A': return !isalpha(c)?SQTrue:SQFalse;
|
||||
case 'w': return (isalnum(c) || c == '_')?SQTrue:SQFalse;
|
||||
case 'W': return (!isalnum(c) && c != '_')?SQTrue:SQFalse;
|
||||
case 's': return isspace(c)?SQTrue:SQFalse;
|
||||
case 'S': return !isspace(c)?SQTrue:SQFalse;
|
||||
case 'd': return isdigit(c)?SQTrue:SQFalse;
|
||||
case 'D': return !isdigit(c)?SQTrue:SQFalse;
|
||||
case 'x': return isxdigit(c)?SQTrue:SQFalse;
|
||||
case 'X': return !isxdigit(c)?SQTrue:SQFalse;
|
||||
case 'c': return iscntrl(c)?SQTrue:SQFalse;
|
||||
case 'C': return !iscntrl(c)?SQTrue:SQFalse;
|
||||
case 'p': return ispunct(c)?SQTrue:SQFalse;
|
||||
case 'P': return !ispunct(c)?SQTrue:SQFalse;
|
||||
case 'l': return islower(c)?SQTrue:SQFalse;
|
||||
case 'u': return isupper(c)?SQTrue:SQFalse;
|
||||
}
|
||||
return SQFalse; /*cannot happen*/
|
||||
}
|
||||
|
||||
static SQBool sqstd_rex_matchclass(SQRex* exp,SQRexNode *node,SQChar c)
|
||||
{
|
||||
do {
|
||||
switch(node->type) {
|
||||
case OP_RANGE:
|
||||
if(c >= node->left && c <= node->right) return SQTrue;
|
||||
break;
|
||||
case OP_CCLASS:
|
||||
if(sqstd_rex_matchcclass(node->left,c)) return SQTrue;
|
||||
break;
|
||||
default:
|
||||
if(c == node->type)return SQTrue;
|
||||
}
|
||||
} while((node->next != -1) && (node = &exp->_nodes[node->next]));
|
||||
return SQFalse;
|
||||
}
|
||||
|
||||
static const SQChar *sqstd_rex_matchnode(SQRex* exp,SQRexNode *node,const SQChar *str,SQRexNode *next)
|
||||
{
|
||||
|
||||
SQRexNodeType type = node->type;
|
||||
switch(type) {
|
||||
case OP_GREEDY: {
|
||||
//SQRexNode *greedystop = (node->next != -1) ? &exp->_nodes[node->next] : NULL;
|
||||
SQRexNode *greedystop = NULL;
|
||||
SQInteger p0 = (node->right >> 16)&0x0000FFFF, p1 = node->right&0x0000FFFF, nmaches = 0;
|
||||
const SQChar *s=str, *good = str;
|
||||
|
||||
if(node->next != -1) {
|
||||
greedystop = &exp->_nodes[node->next];
|
||||
}
|
||||
else {
|
||||
greedystop = next;
|
||||
}
|
||||
|
||||
while((nmaches == 0xFFFF || nmaches < p1)) {
|
||||
|
||||
const SQChar *stop;
|
||||
if(!(s = sqstd_rex_matchnode(exp,&exp->_nodes[node->left],s,greedystop)))
|
||||
break;
|
||||
nmaches++;
|
||||
good=s;
|
||||
if(greedystop) {
|
||||
//checks that 0 matches satisfy the expression(if so skips)
|
||||
//if not would always stop(for instance if is a '?')
|
||||
if(greedystop->type != OP_GREEDY ||
|
||||
(greedystop->type == OP_GREEDY && ((greedystop->right >> 16)&0x0000FFFF) != 0))
|
||||
{
|
||||
SQRexNode *gnext = NULL;
|
||||
if(greedystop->next != -1) {
|
||||
gnext = &exp->_nodes[greedystop->next];
|
||||
}else if(next && next->next != -1){
|
||||
gnext = &exp->_nodes[next->next];
|
||||
}
|
||||
stop = sqstd_rex_matchnode(exp,greedystop,s,gnext);
|
||||
if(stop) {
|
||||
//if satisfied stop it
|
||||
if(p0 == p1 && p0 == nmaches) break;
|
||||
else if(nmaches >= p0 && p1 == 0xFFFF) break;
|
||||
else if(nmaches >= p0 && nmaches <= p1) break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if(s >= exp->_eol)
|
||||
break;
|
||||
}
|
||||
if(p0 == p1 && p0 == nmaches) return good;
|
||||
else if(nmaches >= p0 && p1 == 0xFFFF) return good;
|
||||
else if(nmaches >= p0 && nmaches <= p1) return good;
|
||||
return NULL;
|
||||
}
|
||||
case OP_OR: {
|
||||
const SQChar *asd = str;
|
||||
SQRexNode *temp=&exp->_nodes[node->left];
|
||||
while( (asd = sqstd_rex_matchnode(exp,temp,asd,NULL)) ) {
|
||||
if(temp->next != -1)
|
||||
temp = &exp->_nodes[temp->next];
|
||||
else
|
||||
return asd;
|
||||
}
|
||||
asd = str;
|
||||
temp = &exp->_nodes[node->right];
|
||||
while( (asd = sqstd_rex_matchnode(exp,temp,asd,NULL)) ) {
|
||||
if(temp->next != -1)
|
||||
temp = &exp->_nodes[temp->next];
|
||||
else
|
||||
return asd;
|
||||
}
|
||||
return NULL;
|
||||
break;
|
||||
}
|
||||
case OP_EXPR:
|
||||
case OP_NOCAPEXPR:{
|
||||
SQRexNode *n = &exp->_nodes[node->left];
|
||||
const SQChar *cur = str;
|
||||
SQInteger capture = -1;
|
||||
if(node->type != OP_NOCAPEXPR && node->right == exp->_currsubexp) {
|
||||
capture = exp->_currsubexp;
|
||||
exp->_matches[capture].begin = cur;
|
||||
exp->_currsubexp++;
|
||||
}
|
||||
SQInteger tempcap = exp->_currsubexp;
|
||||
do {
|
||||
SQRexNode *subnext = NULL;
|
||||
if(n->next != -1) {
|
||||
subnext = &exp->_nodes[n->next];
|
||||
}else {
|
||||
subnext = next;
|
||||
}
|
||||
if(!(cur = sqstd_rex_matchnode(exp,n,cur,subnext))) {
|
||||
if(capture != -1){
|
||||
exp->_matches[capture].begin = 0;
|
||||
exp->_matches[capture].len = 0;
|
||||
}
|
||||
return NULL;
|
||||
}
|
||||
} while((n->next != -1) && (n = &exp->_nodes[n->next]));
|
||||
|
||||
exp->_currsubexp = tempcap;
|
||||
if(capture != -1)
|
||||
exp->_matches[capture].len = cur - exp->_matches[capture].begin;
|
||||
return cur;
|
||||
}
|
||||
case OP_WB:
|
||||
if((str == exp->_bol && !isspace(*str))
|
||||
|| (str == exp->_eol && !isspace(*(str-1)))
|
||||
|| (!isspace(*str) && isspace(*(str+1)))
|
||||
|| (isspace(*str) && !isspace(*(str+1))) ) {
|
||||
return (node->left == 'b')?str:NULL;
|
||||
}
|
||||
return (node->left == 'b')?NULL:str;
|
||||
case OP_BOL:
|
||||
if(str == exp->_bol) return str;
|
||||
return NULL;
|
||||
case OP_EOL:
|
||||
if(str == exp->_eol) return str;
|
||||
return NULL;
|
||||
case OP_DOT:{
|
||||
if (str == exp->_eol) return NULL;
|
||||
str++;
|
||||
}
|
||||
return str;
|
||||
case OP_NCLASS:
|
||||
case OP_CLASS:
|
||||
if (str == exp->_eol) return NULL;
|
||||
if(sqstd_rex_matchclass(exp,&exp->_nodes[node->left],*str)?(type == OP_CLASS?SQTrue:SQFalse):(type == OP_NCLASS?SQTrue:SQFalse)) {
|
||||
str++;
|
||||
return str;
|
||||
}
|
||||
return NULL;
|
||||
case OP_CCLASS:
|
||||
if (str == exp->_eol) return NULL;
|
||||
if(sqstd_rex_matchcclass(node->left,*str)) {
|
||||
str++;
|
||||
return str;
|
||||
}
|
||||
return NULL;
|
||||
case OP_MB:
|
||||
{
|
||||
SQInteger cb = node->left; //char that opens a balanced expression
|
||||
if(*str != cb) return NULL; // string doesnt start with open char
|
||||
SQInteger ce = node->right; //char that closes a balanced expression
|
||||
SQInteger cont = 1;
|
||||
const SQChar *streol = exp->_eol;
|
||||
while (++str < streol) {
|
||||
if (*str == ce) {
|
||||
if (--cont == 0) {
|
||||
return ++str;
|
||||
}
|
||||
}
|
||||
else if (*str == cb) cont++;
|
||||
}
|
||||
}
|
||||
return NULL; // string ends out of balance
|
||||
default: /* char */
|
||||
if (str == exp->_eol) return NULL;
|
||||
if(*str != node->type) return NULL;
|
||||
str++;
|
||||
return str;
|
||||
}
|
||||
return NULL;
|
||||
}
|
||||
|
||||
/* public api */
|
||||
SQRex *sqstd_rex_compile(const SQChar *pattern,const SQChar **error)
|
||||
{
|
||||
SQRex * volatile exp = (SQRex *)sq_malloc(sizeof(SQRex)); // "volatile" is needed for setjmp()
|
||||
exp->_eol = exp->_bol = NULL;
|
||||
exp->_p = pattern;
|
||||
exp->_nallocated = (SQInteger)scstrlen(pattern) * sizeof(SQChar);
|
||||
exp->_nodes = (SQRexNode *)sq_malloc(exp->_nallocated * sizeof(SQRexNode));
|
||||
exp->_nsize = 0;
|
||||
exp->_matches = 0;
|
||||
exp->_nsubexpr = 0;
|
||||
exp->_first = sqstd_rex_newnode(exp,OP_EXPR);
|
||||
exp->_error = error;
|
||||
exp->_jmpbuf = sq_malloc(sizeof(jmp_buf));
|
||||
if(setjmp(*((jmp_buf*)exp->_jmpbuf)) == 0) {
|
||||
SQInteger res = sqstd_rex_list(exp);
|
||||
exp->_nodes[exp->_first].left = res;
|
||||
if(*exp->_p!='\0')
|
||||
sqstd_rex_error(exp,_SC("unexpected character"));
|
||||
#ifdef _DEBUG
|
||||
{
|
||||
SQInteger nsize,i;
|
||||
SQRexNode *t;
|
||||
nsize = exp->_nsize;
|
||||
t = &exp->_nodes[0];
|
||||
scprintf(_SC("\n"));
|
||||
for(i = 0;i < nsize; i++) {
|
||||
if(exp->_nodes[i].type>MAX_CHAR)
|
||||
scprintf(_SC("[%02d] %10s "), (SQInt32)i,g_nnames[exp->_nodes[i].type-MAX_CHAR]);
|
||||
else
|
||||
scprintf(_SC("[%02d] %10c "), (SQInt32)i,exp->_nodes[i].type);
|
||||
scprintf(_SC("left %02d right %02d next %02d\n"), (SQInt32)exp->_nodes[i].left, (SQInt32)exp->_nodes[i].right, (SQInt32)exp->_nodes[i].next);
|
||||
}
|
||||
scprintf(_SC("\n"));
|
||||
}
|
||||
#endif
|
||||
exp->_matches = (SQRexMatch *) sq_malloc(exp->_nsubexpr * sizeof(SQRexMatch));
|
||||
memset(exp->_matches,0,exp->_nsubexpr * sizeof(SQRexMatch));
|
||||
}
|
||||
else{
|
||||
sqstd_rex_free(exp);
|
||||
return NULL;
|
||||
}
|
||||
return exp;
|
||||
}
|
||||
|
||||
void sqstd_rex_free(SQRex *exp)
|
||||
{
|
||||
if(exp) {
|
||||
if(exp->_nodes) sq_free(exp->_nodes,exp->_nallocated * sizeof(SQRexNode));
|
||||
if(exp->_jmpbuf) sq_free(exp->_jmpbuf,sizeof(jmp_buf));
|
||||
if(exp->_matches) sq_free(exp->_matches,exp->_nsubexpr * sizeof(SQRexMatch));
|
||||
sq_free(exp,sizeof(SQRex));
|
||||
}
|
||||
}
|
||||
|
||||
SQBool sqstd_rex_match(SQRex* exp,const SQChar* text)
|
||||
{
|
||||
const SQChar* res = NULL;
|
||||
exp->_bol = text;
|
||||
exp->_eol = text + scstrlen(text);
|
||||
exp->_currsubexp = 0;
|
||||
res = sqstd_rex_matchnode(exp,exp->_nodes,text,NULL);
|
||||
if(res == NULL || res != exp->_eol)
|
||||
return SQFalse;
|
||||
return SQTrue;
|
||||
}
|
||||
|
||||
SQBool sqstd_rex_searchrange(SQRex* exp,const SQChar* text_begin,const SQChar* text_end,const SQChar** out_begin, const SQChar** out_end)
|
||||
{
|
||||
const SQChar *cur = NULL;
|
||||
SQInteger node = exp->_first;
|
||||
if(text_begin >= text_end) return SQFalse;
|
||||
exp->_bol = text_begin;
|
||||
exp->_eol = text_end;
|
||||
do {
|
||||
cur = text_begin;
|
||||
while(node != -1) {
|
||||
exp->_currsubexp = 0;
|
||||
cur = sqstd_rex_matchnode(exp,&exp->_nodes[node],cur,NULL);
|
||||
if(!cur)
|
||||
break;
|
||||
node = exp->_nodes[node].next;
|
||||
}
|
||||
text_begin++;
|
||||
} while(cur == NULL && text_begin != text_end);
|
||||
|
||||
if(cur == NULL)
|
||||
return SQFalse;
|
||||
|
||||
--text_begin;
|
||||
|
||||
if(out_begin) *out_begin = text_begin;
|
||||
if(out_end) *out_end = cur;
|
||||
return SQTrue;
|
||||
}
|
||||
|
||||
SQBool sqstd_rex_search(SQRex* exp,const SQChar* text, const SQChar** out_begin, const SQChar** out_end)
|
||||
{
|
||||
return sqstd_rex_searchrange(exp,text,text + scstrlen(text),out_begin,out_end);
|
||||
}
|
||||
|
||||
SQInteger sqstd_rex_getsubexpcount(SQRex* exp)
|
||||
{
|
||||
return exp->_nsubexpr;
|
||||
}
|
||||
|
||||
SQBool sqstd_rex_getsubexp(SQRex* exp, SQInteger n, SQRexMatch *subexp)
|
||||
{
|
||||
if( n<0 || n >= exp->_nsubexpr) return SQFalse;
|
||||
*subexp = exp->_matches[n];
|
||||
return SQTrue;
|
||||
}
|
||||
|
||||
|
|
@ -1,336 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <new>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <squirrel.h>
|
||||
#include <sqstdio.h>
|
||||
#include <sqstdblob.h>
|
||||
#include "sqstdstream.h"
|
||||
#include "sqstdblobimpl.h"
|
||||
|
||||
#define SETUP_STREAM(v) \
|
||||
SQStream *self = NULL; \
|
||||
if(SQ_FAILED(sq_getinstanceup(v,1,(SQUserPointer*)&self,(SQUserPointer)((SQUnsignedInteger)SQSTD_STREAM_TYPE_TAG),SQFalse))) \
|
||||
return sq_throwerror(v,_SC("invalid type tag")); \
|
||||
if(!self || !self->IsValid()) \
|
||||
return sq_throwerror(v,_SC("the stream is invalid"));
|
||||
|
||||
SQInteger _stream_readblob(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
SQUserPointer data,blobp;
|
||||
SQInteger size,res;
|
||||
sq_getinteger(v,2,&size);
|
||||
if(size > self->Len()) {
|
||||
size = self->Len();
|
||||
}
|
||||
data = sq_getscratchpad(v,size);
|
||||
res = self->Read(data,size);
|
||||
if(res <= 0)
|
||||
return sq_throwerror(v,_SC("no data left to read"));
|
||||
blobp = sqstd_createblob(v,res);
|
||||
memcpy(blobp,data,res);
|
||||
return 1;
|
||||
}
|
||||
|
||||
#define SAFE_READN(ptr,len) { \
|
||||
if(self->Read(ptr,len) != len) return sq_throwerror(v,_SC("io error")); \
|
||||
}
|
||||
SQInteger _stream_readn(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
SQInteger format;
|
||||
sq_getinteger(v, 2, &format);
|
||||
switch(format) {
|
||||
case 'l': {
|
||||
SQInteger i;
|
||||
SAFE_READN(&i, sizeof(i));
|
||||
sq_pushinteger(v, i);
|
||||
}
|
||||
break;
|
||||
case 'i': {
|
||||
SQInt32 i;
|
||||
SAFE_READN(&i, sizeof(i));
|
||||
sq_pushinteger(v, i);
|
||||
}
|
||||
break;
|
||||
case 's': {
|
||||
short s;
|
||||
SAFE_READN(&s, sizeof(short));
|
||||
sq_pushinteger(v, s);
|
||||
}
|
||||
break;
|
||||
case 'w': {
|
||||
unsigned short w;
|
||||
SAFE_READN(&w, sizeof(unsigned short));
|
||||
sq_pushinteger(v, w);
|
||||
}
|
||||
break;
|
||||
case 'c': {
|
||||
char c;
|
||||
SAFE_READN(&c, sizeof(char));
|
||||
sq_pushinteger(v, c);
|
||||
}
|
||||
break;
|
||||
case 'b': {
|
||||
unsigned char c;
|
||||
SAFE_READN(&c, sizeof(unsigned char));
|
||||
sq_pushinteger(v, c);
|
||||
}
|
||||
break;
|
||||
case 'f': {
|
||||
float f;
|
||||
SAFE_READN(&f, sizeof(float));
|
||||
sq_pushfloat(v, f);
|
||||
}
|
||||
break;
|
||||
case 'd': {
|
||||
double d;
|
||||
SAFE_READN(&d, sizeof(double));
|
||||
sq_pushfloat(v, (SQFloat)d);
|
||||
}
|
||||
break;
|
||||
default:
|
||||
return sq_throwerror(v, _SC("invalid format"));
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream_writeblob(HSQUIRRELVM v)
|
||||
{
|
||||
SQUserPointer data;
|
||||
SQInteger size;
|
||||
SETUP_STREAM(v);
|
||||
if(SQ_FAILED(sqstd_getblob(v,2,&data)))
|
||||
return sq_throwerror(v,_SC("invalid parameter"));
|
||||
size = sqstd_getblobsize(v,2);
|
||||
if(self->Write(data,size) != size)
|
||||
return sq_throwerror(v,_SC("io error"));
|
||||
sq_pushinteger(v,size);
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream_writen(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
SQInteger format, ti;
|
||||
SQFloat tf;
|
||||
sq_getinteger(v, 3, &format);
|
||||
switch(format) {
|
||||
case 'l': {
|
||||
SQInteger i;
|
||||
sq_getinteger(v, 2, &ti);
|
||||
i = ti;
|
||||
self->Write(&i, sizeof(SQInteger));
|
||||
}
|
||||
break;
|
||||
case 'i': {
|
||||
SQInt32 i;
|
||||
sq_getinteger(v, 2, &ti);
|
||||
i = (SQInt32)ti;
|
||||
self->Write(&i, sizeof(SQInt32));
|
||||
}
|
||||
break;
|
||||
case 's': {
|
||||
short s;
|
||||
sq_getinteger(v, 2, &ti);
|
||||
s = (short)ti;
|
||||
self->Write(&s, sizeof(short));
|
||||
}
|
||||
break;
|
||||
case 'w': {
|
||||
unsigned short w;
|
||||
sq_getinteger(v, 2, &ti);
|
||||
w = (unsigned short)ti;
|
||||
self->Write(&w, sizeof(unsigned short));
|
||||
}
|
||||
break;
|
||||
case 'c': {
|
||||
char c;
|
||||
sq_getinteger(v, 2, &ti);
|
||||
c = (char)ti;
|
||||
self->Write(&c, sizeof(char));
|
||||
}
|
||||
break;
|
||||
case 'b': {
|
||||
unsigned char b;
|
||||
sq_getinteger(v, 2, &ti);
|
||||
b = (unsigned char)ti;
|
||||
self->Write(&b, sizeof(unsigned char));
|
||||
}
|
||||
break;
|
||||
case 'f': {
|
||||
float f;
|
||||
sq_getfloat(v, 2, &tf);
|
||||
f = (float)tf;
|
||||
self->Write(&f, sizeof(float));
|
||||
}
|
||||
break;
|
||||
case 'd': {
|
||||
double d;
|
||||
sq_getfloat(v, 2, &tf);
|
||||
d = tf;
|
||||
self->Write(&d, sizeof(double));
|
||||
}
|
||||
break;
|
||||
default:
|
||||
return sq_throwerror(v, _SC("invalid format"));
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
SQInteger _stream_seek(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
SQInteger offset, origin = SQ_SEEK_SET;
|
||||
sq_getinteger(v, 2, &offset);
|
||||
if(sq_gettop(v) > 2) {
|
||||
SQInteger t;
|
||||
sq_getinteger(v, 3, &t);
|
||||
switch(t) {
|
||||
case 'b': origin = SQ_SEEK_SET; break;
|
||||
case 'c': origin = SQ_SEEK_CUR; break;
|
||||
case 'e': origin = SQ_SEEK_END; break;
|
||||
default: return sq_throwerror(v,_SC("invalid origin"));
|
||||
}
|
||||
}
|
||||
sq_pushinteger(v, self->Seek(offset, origin));
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream_tell(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
sq_pushinteger(v, self->Tell());
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream_len(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
sq_pushinteger(v, self->Len());
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream_flush(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
if(!self->Flush())
|
||||
sq_pushinteger(v, 1);
|
||||
else
|
||||
sq_pushnull(v);
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream_eos(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_STREAM(v);
|
||||
if(self->EOS())
|
||||
sq_pushinteger(v, 1);
|
||||
else
|
||||
sq_pushnull(v);
|
||||
return 1;
|
||||
}
|
||||
|
||||
SQInteger _stream__cloned(HSQUIRRELVM v)
|
||||
{
|
||||
return sq_throwerror(v,_SC("this object cannot be cloned"));
|
||||
}
|
||||
|
||||
static const SQRegFunction _stream_methods[] = {
|
||||
_DECL_STREAM_FUNC(readblob,2,_SC("xn")),
|
||||
_DECL_STREAM_FUNC(readn,2,_SC("xn")),
|
||||
_DECL_STREAM_FUNC(writeblob,-2,_SC("xx")),
|
||||
_DECL_STREAM_FUNC(writen,3,_SC("xnn")),
|
||||
_DECL_STREAM_FUNC(seek,-2,_SC("xnn")),
|
||||
_DECL_STREAM_FUNC(tell,1,_SC("x")),
|
||||
_DECL_STREAM_FUNC(len,1,_SC("x")),
|
||||
_DECL_STREAM_FUNC(eos,1,_SC("x")),
|
||||
_DECL_STREAM_FUNC(flush,1,_SC("x")),
|
||||
_DECL_STREAM_FUNC(_cloned,0,NULL),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
|
||||
void init_streamclass(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushregistrytable(v);
|
||||
sq_pushstring(v,_SC("std_stream"),-1);
|
||||
if(SQ_FAILED(sq_get(v,-2))) {
|
||||
sq_pushstring(v,_SC("std_stream"),-1);
|
||||
sq_newclass(v,SQFalse);
|
||||
sq_settypetag(v,-1,(SQUserPointer)((SQUnsignedInteger)SQSTD_STREAM_TYPE_TAG));
|
||||
SQInteger i = 0;
|
||||
while(_stream_methods[i].name != 0) {
|
||||
const SQRegFunction &f = _stream_methods[i];
|
||||
sq_pushstring(v,f.name,-1);
|
||||
sq_newclosure(v,f.f,0);
|
||||
sq_setparamscheck(v,f.nparamscheck,f.typemask);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_pushroottable(v);
|
||||
sq_pushstring(v,_SC("stream"),-1);
|
||||
sq_pushstring(v,_SC("std_stream"),-1);
|
||||
sq_get(v,-4);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_pop(v,1);
|
||||
}
|
||||
else {
|
||||
sq_pop(v,1); //result
|
||||
}
|
||||
sq_pop(v,1);
|
||||
}
|
||||
|
||||
SQRESULT declare_stream(HSQUIRRELVM v,const SQChar* name,SQUserPointer typetag,const SQChar* reg_name,const SQRegFunction *methods,const SQRegFunction *globals)
|
||||
{
|
||||
if(sq_gettype(v,-1) != OT_TABLE)
|
||||
return sq_throwerror(v,_SC("table expected"));
|
||||
SQInteger top = sq_gettop(v);
|
||||
//create delegate
|
||||
init_streamclass(v);
|
||||
sq_pushregistrytable(v);
|
||||
sq_pushstring(v,reg_name,-1);
|
||||
sq_pushstring(v,_SC("std_stream"),-1);
|
||||
if(SQ_SUCCEEDED(sq_get(v,-3))) {
|
||||
sq_newclass(v,SQTrue);
|
||||
sq_settypetag(v,-1,typetag);
|
||||
SQInteger i = 0;
|
||||
while(methods[i].name != 0) {
|
||||
const SQRegFunction &f = methods[i];
|
||||
sq_pushstring(v,f.name,-1);
|
||||
sq_newclosure(v,f.f,0);
|
||||
sq_setparamscheck(v,f.nparamscheck,f.typemask);
|
||||
sq_setnativeclosurename(v,-1,f.name);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
sq_pop(v,1);
|
||||
|
||||
i = 0;
|
||||
while(globals[i].name!=0)
|
||||
{
|
||||
const SQRegFunction &f = globals[i];
|
||||
sq_pushstring(v,f.name,-1);
|
||||
sq_newclosure(v,f.f,0);
|
||||
sq_setparamscheck(v,f.nparamscheck,f.typemask);
|
||||
sq_setnativeclosurename(v,-1,f.name);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
//register the class in the target table
|
||||
sq_pushstring(v,name,-1);
|
||||
sq_pushregistrytable(v);
|
||||
sq_pushstring(v,reg_name,-1);
|
||||
sq_get(v,-2);
|
||||
sq_remove(v,-2);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
|
||||
sq_settop(v,top);
|
||||
return SQ_OK;
|
||||
}
|
||||
sq_settop(v,top);
|
||||
return SQ_ERROR;
|
||||
}
|
||||
|
|
@ -1,18 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTD_STREAM_H_
|
||||
#define _SQSTD_STREAM_H_
|
||||
|
||||
SQInteger _stream_readblob(HSQUIRRELVM v);
|
||||
SQInteger _stream_readline(HSQUIRRELVM v);
|
||||
SQInteger _stream_readn(HSQUIRRELVM v);
|
||||
SQInteger _stream_writeblob(HSQUIRRELVM v);
|
||||
SQInteger _stream_writen(HSQUIRRELVM v);
|
||||
SQInteger _stream_seek(HSQUIRRELVM v);
|
||||
SQInteger _stream_tell(HSQUIRRELVM v);
|
||||
SQInteger _stream_len(HSQUIRRELVM v);
|
||||
SQInteger _stream_eos(HSQUIRRELVM v);
|
||||
SQInteger _stream_flush(HSQUIRRELVM v);
|
||||
|
||||
#define _DECL_STREAM_FUNC(name,nparams,typecheck) {_SC(#name),_stream_##name,nparams,typecheck}
|
||||
SQRESULT declare_stream(HSQUIRRELVM v,const SQChar* name,SQUserPointer typetag,const SQChar* reg_name,const SQRegFunction *methods,const SQRegFunction *globals);
|
||||
#endif /*_SQSTD_STREAM_H_*/
|
||||
|
|
@ -1,552 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <squirrel.h>
|
||||
#include <sqstdstring.h>
|
||||
#include <string.h>
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <ctype.h>
|
||||
#include <assert.h>
|
||||
#include <stdarg.h>
|
||||
|
||||
#define MAX_FORMAT_LEN 20
|
||||
#define MAX_WFORMAT_LEN 3
|
||||
#define ADDITIONAL_FORMAT_SPACE (100*sizeof(SQChar))
|
||||
|
||||
static SQUserPointer rex_typetag = NULL;
|
||||
|
||||
static SQBool isfmtchr(SQChar ch)
|
||||
{
|
||||
switch(ch) {
|
||||
case '-': case '+': case ' ': case '#': case '0': return SQTrue;
|
||||
}
|
||||
return SQFalse;
|
||||
}
|
||||
|
||||
static SQInteger validate_format(HSQUIRRELVM v, SQChar *fmt, const SQChar *src, SQInteger n,SQInteger &width)
|
||||
{
|
||||
SQChar *dummy;
|
||||
SQChar swidth[MAX_WFORMAT_LEN];
|
||||
SQInteger wc = 0;
|
||||
SQInteger start = n;
|
||||
fmt[0] = '%';
|
||||
while (isfmtchr(src[n])) n++;
|
||||
while (scisdigit(src[n])) {
|
||||
swidth[wc] = src[n];
|
||||
n++;
|
||||
wc++;
|
||||
if(wc>=MAX_WFORMAT_LEN)
|
||||
return sq_throwerror(v,_SC("width format too long"));
|
||||
}
|
||||
swidth[wc] = '\0';
|
||||
if(wc > 0) {
|
||||
width = scstrtol(swidth,&dummy,10);
|
||||
}
|
||||
else
|
||||
width = 0;
|
||||
if (src[n] == '.') {
|
||||
n++;
|
||||
|
||||
wc = 0;
|
||||
while (scisdigit(src[n])) {
|
||||
swidth[wc] = src[n];
|
||||
n++;
|
||||
wc++;
|
||||
if(wc>=MAX_WFORMAT_LEN)
|
||||
return sq_throwerror(v,_SC("precision format too long"));
|
||||
}
|
||||
swidth[wc] = '\0';
|
||||
if(wc > 0) {
|
||||
width += scstrtol(swidth,&dummy,10);
|
||||
|
||||
}
|
||||
}
|
||||
if (n-start > MAX_FORMAT_LEN )
|
||||
return sq_throwerror(v,_SC("format too long"));
|
||||
memcpy(&fmt[1],&src[start],((n-start)+1)*sizeof(SQChar));
|
||||
fmt[(n-start)+2] = '\0';
|
||||
return n;
|
||||
}
|
||||
|
||||
SQRESULT sqstd_format(HSQUIRRELVM v,SQInteger nformatstringidx,SQInteger *outlen,SQChar **output)
|
||||
{
|
||||
const SQChar *format;
|
||||
SQChar *dest;
|
||||
SQChar fmt[MAX_FORMAT_LEN];
|
||||
const SQRESULT res = sq_getstring(v,nformatstringidx,&format);
|
||||
if (SQ_FAILED(res)) {
|
||||
return res; // propagate the error
|
||||
}
|
||||
SQInteger format_size = sq_getsize(v,nformatstringidx);
|
||||
SQInteger allocated = (format_size+2)*sizeof(SQChar);
|
||||
dest = sq_getscratchpad(v,allocated);
|
||||
SQInteger n = 0,i = 0, nparam = nformatstringidx+1, w = 0;
|
||||
//while(format[n] != '\0')
|
||||
while(n < format_size)
|
||||
{
|
||||
if(format[n] != '%') {
|
||||
assert(i < allocated);
|
||||
dest[i++] = format[n];
|
||||
n++;
|
||||
}
|
||||
else if(format[n+1] == '%') { //handles %%
|
||||
dest[i++] = '%';
|
||||
n += 2;
|
||||
}
|
||||
else {
|
||||
n++;
|
||||
if( nparam > sq_gettop(v) )
|
||||
return sq_throwerror(v,_SC("not enough parameters for the given format string"));
|
||||
n = validate_format(v,fmt,format,n,w);
|
||||
if(n < 0) return -1;
|
||||
SQInteger addlen = 0;
|
||||
SQInteger valtype = 0;
|
||||
const SQChar *ts = NULL;
|
||||
SQInteger ti = 0;
|
||||
SQFloat tf = 0;
|
||||
switch(format[n]) {
|
||||
case 's':
|
||||
if(SQ_FAILED(sq_getstring(v,nparam,&ts)))
|
||||
return sq_throwerror(v,_SC("string expected for the specified format"));
|
||||
addlen = (sq_getsize(v,nparam)*sizeof(SQChar))+((w+1)*sizeof(SQChar));
|
||||
valtype = 's';
|
||||
break;
|
||||
case 'i': case 'd': case 'o': case 'u': case 'x': case 'X':
|
||||
#ifdef _SQ64
|
||||
{
|
||||
size_t flen = scstrlen(fmt);
|
||||
SQInteger fpos = flen - 1;
|
||||
SQChar f = fmt[fpos];
|
||||
const SQChar *prec = (const SQChar *)_PRINT_INT_PREC;
|
||||
while(*prec != _SC('\0')) {
|
||||
fmt[fpos++] = *prec++;
|
||||
}
|
||||
fmt[fpos++] = f;
|
||||
fmt[fpos++] = _SC('\0');
|
||||
}
|
||||
#endif
|
||||
case 'c':
|
||||
if(SQ_FAILED(sq_getinteger(v,nparam,&ti)))
|
||||
return sq_throwerror(v,_SC("integer expected for the specified format"));
|
||||
addlen = (ADDITIONAL_FORMAT_SPACE)+((w+1)*sizeof(SQChar));
|
||||
valtype = 'i';
|
||||
break;
|
||||
case 'f': case 'g': case 'G': case 'e': case 'E':
|
||||
if(SQ_FAILED(sq_getfloat(v,nparam,&tf)))
|
||||
return sq_throwerror(v,_SC("float expected for the specified format"));
|
||||
addlen = (ADDITIONAL_FORMAT_SPACE)+((w+1)*sizeof(SQChar));
|
||||
valtype = 'f';
|
||||
break;
|
||||
default:
|
||||
return sq_throwerror(v,_SC("invalid format"));
|
||||
}
|
||||
n++;
|
||||
allocated += addlen + sizeof(SQChar);
|
||||
dest = sq_getscratchpad(v,allocated);
|
||||
switch(valtype) {
|
||||
case 's': i += scsprintf(&dest[i],allocated,fmt,ts); break;
|
||||
case 'i': i += scsprintf(&dest[i],allocated,fmt,ti); break;
|
||||
case 'f': i += scsprintf(&dest[i],allocated,fmt,tf); break;
|
||||
};
|
||||
nparam ++;
|
||||
}
|
||||
}
|
||||
*outlen = i;
|
||||
dest[i] = '\0';
|
||||
*output = dest;
|
||||
return SQ_OK;
|
||||
}
|
||||
|
||||
void sqstd_pushstringf(HSQUIRRELVM v,const SQChar *s,...)
|
||||
{
|
||||
SQInteger n=256;
|
||||
va_list args;
|
||||
begin:
|
||||
va_start(args,s);
|
||||
SQChar *b=sq_getscratchpad(v,n);
|
||||
SQInteger r=scvsprintf(b,n,s,args);
|
||||
va_end(args);
|
||||
if (r>=n) {
|
||||
n=r+1;//required+null
|
||||
goto begin;
|
||||
} else if (r<0) {
|
||||
sq_pushnull(v);
|
||||
} else {
|
||||
sq_pushstring(v,b,r);
|
||||
}
|
||||
}
|
||||
|
||||
static SQInteger _string_printf(HSQUIRRELVM v)
|
||||
{
|
||||
SQChar *dest = NULL;
|
||||
SQInteger length = 0;
|
||||
if(SQ_FAILED(sqstd_format(v,2,&length,&dest)))
|
||||
return -1;
|
||||
|
||||
SQPRINTFUNCTION printfunc = sq_getprintfunc(v);
|
||||
if(printfunc) printfunc(v,_SC("%s"),dest);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _string_format(HSQUIRRELVM v)
|
||||
{
|
||||
SQChar *dest = NULL;
|
||||
SQInteger length = 0;
|
||||
if(SQ_FAILED(sqstd_format(v,2,&length,&dest)))
|
||||
return -1;
|
||||
sq_pushstring(v,dest,length);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static void __strip_l(const SQChar *str,const SQChar **start)
|
||||
{
|
||||
const SQChar *t = str;
|
||||
while(((*t) != '\0') && scisspace(*t)){ t++; }
|
||||
*start = t;
|
||||
}
|
||||
|
||||
static void __strip_r(const SQChar *str,SQInteger len,const SQChar **end)
|
||||
{
|
||||
if(len == 0) {
|
||||
*end = str;
|
||||
return;
|
||||
}
|
||||
const SQChar *t = &str[len-1];
|
||||
while(t >= str && scisspace(*t)) { t--; }
|
||||
*end = t + 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_strip(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str,*start,*end;
|
||||
sq_getstring(v,2,&str);
|
||||
SQInteger len = sq_getsize(v,2);
|
||||
__strip_l(str,&start);
|
||||
__strip_r(str,len,&end);
|
||||
sq_pushstring(v,start,end - start);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_lstrip(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str,*start;
|
||||
sq_getstring(v,2,&str);
|
||||
__strip_l(str,&start);
|
||||
sq_pushstring(v,start,-1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_rstrip(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str,*end;
|
||||
sq_getstring(v,2,&str);
|
||||
SQInteger len = sq_getsize(v,2);
|
||||
__strip_r(str,len,&end);
|
||||
sq_pushstring(v,str,end - str);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_split(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str,*seps;
|
||||
SQInteger sepsize;
|
||||
SQBool skipempty = SQFalse;
|
||||
sq_getstring(v,2,&str);
|
||||
sq_getstringandsize(v,3,&seps,&sepsize);
|
||||
if(sepsize == 0) return sq_throwerror(v,_SC("empty separators string"));
|
||||
if(sq_gettop(v)>3) {
|
||||
sq_getbool(v,4,&skipempty);
|
||||
}
|
||||
const SQChar *start = str;
|
||||
const SQChar *end = str;
|
||||
sq_newarray(v,0);
|
||||
while(*end != '\0')
|
||||
{
|
||||
SQChar cur = *end;
|
||||
for(SQInteger i = 0; i < sepsize; i++)
|
||||
{
|
||||
if(cur == seps[i])
|
||||
{
|
||||
if(!skipempty || (end != start)) {
|
||||
sq_pushstring(v,start,end-start);
|
||||
sq_arrayappend(v,-2);
|
||||
}
|
||||
start = end + 1;
|
||||
break;
|
||||
}
|
||||
}
|
||||
end++;
|
||||
}
|
||||
if(end != start)
|
||||
{
|
||||
sq_pushstring(v,start,end-start);
|
||||
sq_arrayappend(v,-2);
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_escape(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str;
|
||||
SQChar *dest,*resstr;
|
||||
SQInteger size;
|
||||
sq_getstring(v,2,&str);
|
||||
size = sq_getsize(v,2);
|
||||
if(size == 0) {
|
||||
sq_push(v,2);
|
||||
return 1;
|
||||
}
|
||||
#ifdef SQUNICODE
|
||||
#if WCHAR_SIZE == 2
|
||||
const SQChar *escpat = _SC("\\x%04x");
|
||||
const SQInteger maxescsize = 6;
|
||||
#else //WCHAR_SIZE == 4
|
||||
const SQChar *escpat = _SC("\\x%08x");
|
||||
const SQInteger maxescsize = 10;
|
||||
#endif
|
||||
#else
|
||||
const SQChar *escpat = _SC("\\x%02x");
|
||||
const SQInteger maxescsize = 4;
|
||||
#endif
|
||||
SQInteger destcharsize = (size * maxescsize); //assumes every char could be escaped
|
||||
resstr = dest = (SQChar *)sq_getscratchpad(v,destcharsize * sizeof(SQChar));
|
||||
SQChar c;
|
||||
SQChar escch;
|
||||
SQInteger escaped = 0;
|
||||
for(int n = 0; n < size; n++){
|
||||
c = *str++;
|
||||
escch = 0;
|
||||
if(scisprint(c) || c == 0) {
|
||||
switch(c) {
|
||||
case '\a': escch = 'a'; break;
|
||||
case '\b': escch = 'b'; break;
|
||||
case '\t': escch = 't'; break;
|
||||
case '\n': escch = 'n'; break;
|
||||
case '\v': escch = 'v'; break;
|
||||
case '\f': escch = 'f'; break;
|
||||
case '\r': escch = 'r'; break;
|
||||
case '\\': escch = '\\'; break;
|
||||
case '\"': escch = '\"'; break;
|
||||
case '\'': escch = '\''; break;
|
||||
case 0: escch = '0'; break;
|
||||
}
|
||||
if(escch) {
|
||||
*dest++ = '\\';
|
||||
*dest++ = escch;
|
||||
escaped++;
|
||||
}
|
||||
else {
|
||||
*dest++ = c;
|
||||
}
|
||||
}
|
||||
else {
|
||||
|
||||
dest += scsprintf(dest, destcharsize, escpat, c);
|
||||
escaped++;
|
||||
}
|
||||
}
|
||||
|
||||
if(escaped) {
|
||||
sq_pushstring(v,resstr,dest - resstr);
|
||||
}
|
||||
else {
|
||||
sq_push(v,2); //nothing escaped
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_startswith(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str,*cmp;
|
||||
sq_getstring(v,2,&str);
|
||||
sq_getstring(v,3,&cmp);
|
||||
SQInteger len = sq_getsize(v,2);
|
||||
SQInteger cmplen = sq_getsize(v,3);
|
||||
SQBool ret = SQFalse;
|
||||
if(cmplen <= len) {
|
||||
ret = memcmp(str,cmp,sq_rsl(cmplen)) == 0 ? SQTrue : SQFalse;
|
||||
}
|
||||
sq_pushbool(v,ret);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _string_endswith(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *str,*cmp;
|
||||
sq_getstring(v,2,&str);
|
||||
sq_getstring(v,3,&cmp);
|
||||
SQInteger len = sq_getsize(v,2);
|
||||
SQInteger cmplen = sq_getsize(v,3);
|
||||
SQBool ret = SQFalse;
|
||||
if(cmplen <= len) {
|
||||
ret = memcmp(&str[len - cmplen],cmp,sq_rsl(cmplen)) == 0 ? SQTrue : SQFalse;
|
||||
}
|
||||
sq_pushbool(v,ret);
|
||||
return 1;
|
||||
}
|
||||
|
||||
#define SETUP_REX(v) \
|
||||
SQRex *self = NULL; \
|
||||
if(SQ_FAILED(sq_getinstanceup(v,1,(SQUserPointer *)&self,rex_typetag,SQFalse))) { \
|
||||
return sq_throwerror(v,_SC("invalid type tag")); \
|
||||
}
|
||||
|
||||
static SQInteger _rexobj_releasehook(SQUserPointer p, SQInteger SQ_UNUSED_ARG(size))
|
||||
{
|
||||
SQRex *self = ((SQRex *)p);
|
||||
sqstd_rex_free(self);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _regexp_match(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_REX(v);
|
||||
const SQChar *str;
|
||||
sq_getstring(v,2,&str);
|
||||
if(sqstd_rex_match(self,str) == SQTrue)
|
||||
{
|
||||
sq_pushbool(v,SQTrue);
|
||||
return 1;
|
||||
}
|
||||
sq_pushbool(v,SQFalse);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static void _addrexmatch(HSQUIRRELVM v,const SQChar *str,const SQChar *begin,const SQChar *end)
|
||||
{
|
||||
sq_newtable(v);
|
||||
sq_pushstring(v,_SC("begin"),-1);
|
||||
sq_pushinteger(v,begin - str);
|
||||
sq_rawset(v,-3);
|
||||
sq_pushstring(v,_SC("end"),-1);
|
||||
sq_pushinteger(v,end - str);
|
||||
sq_rawset(v,-3);
|
||||
}
|
||||
|
||||
static SQInteger _regexp_search(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_REX(v);
|
||||
const SQChar *str,*begin,*end;
|
||||
SQInteger start = 0;
|
||||
sq_getstring(v,2,&str);
|
||||
if(sq_gettop(v) > 2) sq_getinteger(v,3,&start);
|
||||
if(sqstd_rex_search(self,str+start,&begin,&end) == SQTrue) {
|
||||
_addrexmatch(v,str,begin,end);
|
||||
return 1;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _regexp_capture(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_REX(v);
|
||||
const SQChar *str,*begin,*end;
|
||||
SQInteger start = 0;
|
||||
sq_getstring(v,2,&str);
|
||||
if(sq_gettop(v) > 2) sq_getinteger(v,3,&start);
|
||||
if(sqstd_rex_search(self,str+start,&begin,&end) == SQTrue) {
|
||||
SQInteger n = sqstd_rex_getsubexpcount(self);
|
||||
SQRexMatch match;
|
||||
sq_newarray(v,0);
|
||||
for(SQInteger i = 0;i < n; i++) {
|
||||
sqstd_rex_getsubexp(self,i,&match);
|
||||
if(match.len > 0)
|
||||
_addrexmatch(v,str,match.begin,match.begin+match.len);
|
||||
else
|
||||
_addrexmatch(v,str,str,str); //empty match
|
||||
sq_arrayappend(v,-2);
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _regexp_subexpcount(HSQUIRRELVM v)
|
||||
{
|
||||
SETUP_REX(v);
|
||||
sq_pushinteger(v,sqstd_rex_getsubexpcount(self));
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _regexp_constructor(HSQUIRRELVM v)
|
||||
{
|
||||
SQRex *self = NULL;
|
||||
if (SQ_FAILED(sq_getinstanceup(v, 1, (SQUserPointer *)&self, rex_typetag, SQFalse))) {
|
||||
return sq_throwerror(v, _SC("invalid type tag"));
|
||||
}
|
||||
if (self != NULL) {
|
||||
return sq_throwerror(v, _SC("invalid regexp object"));
|
||||
}
|
||||
const SQChar *error,*pattern;
|
||||
sq_getstring(v,2,&pattern);
|
||||
SQRex *rex = sqstd_rex_compile(pattern,&error);
|
||||
if(!rex) return sq_throwerror(v,error);
|
||||
sq_setinstanceup(v,1,rex);
|
||||
sq_setreleasehook(v,1,_rexobj_releasehook);
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _regexp__typeof(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushstring(v,_SC("regexp"),-1);
|
||||
return 1;
|
||||
}
|
||||
|
||||
#define _DECL_REX_FUNC(name,nparams,pmask) {_SC(#name),_regexp_##name,nparams,pmask}
|
||||
static const SQRegFunction rexobj_funcs[]={
|
||||
_DECL_REX_FUNC(constructor,2,_SC(".s")),
|
||||
_DECL_REX_FUNC(search,-2,_SC("xsn")),
|
||||
_DECL_REX_FUNC(match,2,_SC("xs")),
|
||||
_DECL_REX_FUNC(capture,-2,_SC("xsn")),
|
||||
_DECL_REX_FUNC(subexpcount,1,_SC("x")),
|
||||
_DECL_REX_FUNC(_typeof,1,_SC("x")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
#undef _DECL_REX_FUNC
|
||||
|
||||
#define _DECL_FUNC(name,nparams,pmask) {_SC(#name),_string_##name,nparams,pmask}
|
||||
static const SQRegFunction stringlib_funcs[]={
|
||||
_DECL_FUNC(format,-2,_SC(".s")),
|
||||
_DECL_FUNC(printf,-2,_SC(".s")),
|
||||
_DECL_FUNC(strip,2,_SC(".s")),
|
||||
_DECL_FUNC(lstrip,2,_SC(".s")),
|
||||
_DECL_FUNC(rstrip,2,_SC(".s")),
|
||||
_DECL_FUNC(split,-3,_SC(".ssb")),
|
||||
_DECL_FUNC(escape,2,_SC(".s")),
|
||||
_DECL_FUNC(startswith,3,_SC(".ss")),
|
||||
_DECL_FUNC(endswith,3,_SC(".ss")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
#undef _DECL_FUNC
|
||||
|
||||
|
||||
SQInteger sqstd_register_stringlib(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushstring(v,_SC("regexp"),-1);
|
||||
sq_newclass(v,SQFalse);
|
||||
rex_typetag = (SQUserPointer)rexobj_funcs;
|
||||
sq_settypetag(v, -1, rex_typetag);
|
||||
SQInteger i = 0;
|
||||
while(rexobj_funcs[i].name != 0) {
|
||||
const SQRegFunction &f = rexobj_funcs[i];
|
||||
sq_pushstring(v,f.name,-1);
|
||||
sq_newclosure(v,f.f,0);
|
||||
sq_setparamscheck(v,f.nparamscheck,f.typemask);
|
||||
sq_setnativeclosurename(v,-1,f.name);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
|
||||
i = 0;
|
||||
while(stringlib_funcs[i].name!=0)
|
||||
{
|
||||
sq_pushstring(v,stringlib_funcs[i].name,-1);
|
||||
sq_newclosure(v,stringlib_funcs[i].f,0);
|
||||
sq_setparamscheck(v,stringlib_funcs[i].nparamscheck,stringlib_funcs[i].typemask);
|
||||
sq_setnativeclosurename(v,-1,stringlib_funcs[i].name);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
|
|
@ -1,154 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#include <squirrel.h>
|
||||
#include <time.h>
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <sqstdsystem.h>
|
||||
|
||||
#ifdef SQUNICODE
|
||||
#include <wchar.h>
|
||||
#define scgetenv _wgetenv
|
||||
#define scsystem _wsystem
|
||||
#define scasctime _wasctime
|
||||
#define scremove _wremove
|
||||
#define screname _wrename
|
||||
#else
|
||||
#define scgetenv getenv
|
||||
#define scsystem system
|
||||
#define scasctime asctime
|
||||
#define scremove remove
|
||||
#define screname rename
|
||||
#endif
|
||||
#ifdef IOS
|
||||
#include <spawn.h>
|
||||
extern char **environ;
|
||||
#endif
|
||||
|
||||
static SQInteger _system_getenv(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *s;
|
||||
if(SQ_SUCCEEDED(sq_getstring(v,2,&s))){
|
||||
sq_pushstring(v,scgetenv(s),-1);
|
||||
return 1;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _system_system(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *s;
|
||||
if(SQ_SUCCEEDED(sq_getstring(v,2,&s))){
|
||||
#ifdef IOS
|
||||
pid_t pid;
|
||||
posix_spawn(&pid, s, NULL, NULL, NULL, environ);
|
||||
sq_pushinteger(v, 0);
|
||||
#else
|
||||
sq_pushinteger(v,scsystem(s));
|
||||
#endif
|
||||
return 1;
|
||||
}
|
||||
return sq_throwerror(v,_SC("wrong param"));
|
||||
}
|
||||
|
||||
static SQInteger _system_clock(HSQUIRRELVM v)
|
||||
{
|
||||
sq_pushfloat(v,((SQFloat)clock())/(SQFloat)CLOCKS_PER_SEC);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _system_time(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger t = (SQInteger)time(NULL);
|
||||
sq_pushinteger(v,t);
|
||||
return 1;
|
||||
}
|
||||
|
||||
static SQInteger _system_remove(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *s;
|
||||
sq_getstring(v,2,&s);
|
||||
if(scremove(s)==-1)
|
||||
return sq_throwerror(v,_SC("remove() failed"));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static SQInteger _system_rename(HSQUIRRELVM v)
|
||||
{
|
||||
const SQChar *oldn,*newn;
|
||||
sq_getstring(v,2,&oldn);
|
||||
sq_getstring(v,3,&newn);
|
||||
if(screname(oldn,newn)==-1)
|
||||
return sq_throwerror(v,_SC("rename() failed"));
|
||||
return 0;
|
||||
}
|
||||
|
||||
static void _set_integer_slot(HSQUIRRELVM v,const SQChar *name,SQInteger val)
|
||||
{
|
||||
sq_pushstring(v,name,-1);
|
||||
sq_pushinteger(v,val);
|
||||
sq_rawset(v,-3);
|
||||
}
|
||||
|
||||
static SQInteger _system_date(HSQUIRRELVM v)
|
||||
{
|
||||
time_t t;
|
||||
SQInteger it;
|
||||
SQInteger format = 'l';
|
||||
if(sq_gettop(v) > 1) {
|
||||
sq_getinteger(v,2,&it);
|
||||
t = it;
|
||||
if(sq_gettop(v) > 2) {
|
||||
sq_getinteger(v,3,(SQInteger*)&format);
|
||||
}
|
||||
}
|
||||
else {
|
||||
time(&t);
|
||||
}
|
||||
tm *date;
|
||||
if(format == 'u')
|
||||
date = gmtime(&t);
|
||||
else
|
||||
date = localtime(&t);
|
||||
if(!date)
|
||||
return sq_throwerror(v,_SC("crt api failure"));
|
||||
sq_newtable(v);
|
||||
_set_integer_slot(v, _SC("sec"), date->tm_sec);
|
||||
_set_integer_slot(v, _SC("min"), date->tm_min);
|
||||
_set_integer_slot(v, _SC("hour"), date->tm_hour);
|
||||
_set_integer_slot(v, _SC("day"), date->tm_mday);
|
||||
_set_integer_slot(v, _SC("month"), date->tm_mon);
|
||||
_set_integer_slot(v, _SC("year"), date->tm_year+1900);
|
||||
_set_integer_slot(v, _SC("wday"), date->tm_wday);
|
||||
_set_integer_slot(v, _SC("yday"), date->tm_yday);
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
||||
|
||||
#define _DECL_FUNC(name,nparams,pmask) {_SC(#name),_system_##name,nparams,pmask}
|
||||
static const SQRegFunction systemlib_funcs[]={
|
||||
_DECL_FUNC(getenv,2,_SC(".s")),
|
||||
_DECL_FUNC(system,2,_SC(".s")),
|
||||
_DECL_FUNC(clock,0,NULL),
|
||||
_DECL_FUNC(time,1,NULL),
|
||||
_DECL_FUNC(date,-1,_SC(".nn")),
|
||||
_DECL_FUNC(remove,2,_SC(".s")),
|
||||
_DECL_FUNC(rename,3,_SC(".ss")),
|
||||
{NULL,(SQFUNCTION)0,0,NULL}
|
||||
};
|
||||
#undef _DECL_FUNC
|
||||
|
||||
SQInteger sqstd_register_systemlib(HSQUIRRELVM v)
|
||||
{
|
||||
SQInteger i=0;
|
||||
while(systemlib_funcs[i].name!=0)
|
||||
{
|
||||
sq_pushstring(v,systemlib_funcs[i].name,-1);
|
||||
sq_newclosure(v,systemlib_funcs[i].f,0);
|
||||
sq_setparamscheck(v,systemlib_funcs[i].nparamscheck,systemlib_funcs[i].typemask);
|
||||
sq_setnativeclosurename(v,-1,systemlib_funcs[i].name);
|
||||
sq_newslot(v,-3,SQFalse);
|
||||
i++;
|
||||
}
|
||||
return 1;
|
||||
}
|
||||
File diff suppressed because it is too large
Load Diff
|
|
@ -1,94 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQARRAY_H_
|
||||
#define _SQARRAY_H_
|
||||
|
||||
struct SQArray : public CHAINABLE_OBJ
|
||||
{
|
||||
private:
|
||||
SQArray(SQSharedState *ss,SQInteger nsize){_values.resize(nsize); INIT_CHAIN();ADD_TO_CHAIN(&_ss(this)->_gc_chain,this);}
|
||||
~SQArray()
|
||||
{
|
||||
REMOVE_FROM_CHAIN(&_ss(this)->_gc_chain,this);
|
||||
}
|
||||
public:
|
||||
static SQArray* Create(SQSharedState *ss,SQInteger nInitialSize){
|
||||
SQArray *newarray=(SQArray*)SQ_MALLOC(sizeof(SQArray));
|
||||
new (newarray) SQArray(ss,nInitialSize);
|
||||
return newarray;
|
||||
}
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
SQObjectType GetType() {return OT_ARRAY;}
|
||||
#endif
|
||||
void Finalize(){
|
||||
_values.resize(0);
|
||||
}
|
||||
bool Get(const SQInteger nidx,SQObjectPtr &val)
|
||||
{
|
||||
if(nidx>=0 && nidx<(SQInteger)_values.size()){
|
||||
SQObjectPtr &o = _values[nidx];
|
||||
val = _realval(o);
|
||||
return true;
|
||||
}
|
||||
else return false;
|
||||
}
|
||||
bool Set(const SQInteger nidx,const SQObjectPtr &val)
|
||||
{
|
||||
if(nidx>=0 && nidx<(SQInteger)_values.size()){
|
||||
_values[nidx]=val;
|
||||
return true;
|
||||
}
|
||||
else return false;
|
||||
}
|
||||
SQInteger Next(const SQObjectPtr &refpos,SQObjectPtr &outkey,SQObjectPtr &outval)
|
||||
{
|
||||
SQUnsignedInteger idx=TranslateIndex(refpos);
|
||||
while(idx<_values.size()){
|
||||
//first found
|
||||
outkey=(SQInteger)idx;
|
||||
SQObjectPtr &o = _values[idx];
|
||||
outval = _realval(o);
|
||||
//return idx for the next iteration
|
||||
return ++idx;
|
||||
}
|
||||
//nothing to iterate anymore
|
||||
return -1;
|
||||
}
|
||||
SQArray *Clone(){SQArray *anew=Create(_opt_ss(this),0); anew->_values.copy(_values); return anew; }
|
||||
SQInteger Size() const {return _values.size();}
|
||||
void Resize(SQInteger size)
|
||||
{
|
||||
SQObjectPtr _null;
|
||||
Resize(size,_null);
|
||||
}
|
||||
void Resize(SQInteger size,SQObjectPtr &fill) { _values.resize(size,fill); ShrinkIfNeeded(); }
|
||||
void Reserve(SQInteger size) { _values.reserve(size); }
|
||||
void Append(const SQObject &o){_values.push_back(o);}
|
||||
void Extend(const SQArray *a);
|
||||
SQObjectPtr &Top(){return _values.top();}
|
||||
void Pop(){_values.pop_back(); ShrinkIfNeeded(); }
|
||||
bool Insert(SQInteger idx,const SQObject &val){
|
||||
if(idx < 0 || idx > (SQInteger)_values.size())
|
||||
return false;
|
||||
_values.insert(idx,val);
|
||||
return true;
|
||||
}
|
||||
void ShrinkIfNeeded() {
|
||||
if(_values.size() <= _values.capacity()>>2) //shrink the array
|
||||
_values.shrinktofit();
|
||||
}
|
||||
bool Remove(SQInteger idx){
|
||||
if(idx < 0 || idx >= (SQInteger)_values.size())
|
||||
return false;
|
||||
_values.remove(idx);
|
||||
ShrinkIfNeeded();
|
||||
return true;
|
||||
}
|
||||
void Release()
|
||||
{
|
||||
sq_delete(this,SQArray);
|
||||
}
|
||||
|
||||
SQObjectPtrVec _values;
|
||||
};
|
||||
#endif //_SQARRAY_H_
|
||||
File diff suppressed because it is too large
Load Diff
|
|
@ -1,213 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#include "sqvm.h"
|
||||
#include "sqtable.h"
|
||||
#include "sqclass.h"
|
||||
#include "sqfuncproto.h"
|
||||
#include "sqclosure.h"
|
||||
|
||||
|
||||
|
||||
SQClass::SQClass(SQSharedState *ss,SQClass *base)
|
||||
{
|
||||
_base = base;
|
||||
_typetag = 0;
|
||||
_hook = NULL;
|
||||
_udsize = 0;
|
||||
_locked = false;
|
||||
_constructoridx = -1;
|
||||
if(_base) {
|
||||
_constructoridx = _base->_constructoridx;
|
||||
_udsize = _base->_udsize;
|
||||
_defaultvalues.copy(base->_defaultvalues);
|
||||
_methods.copy(base->_methods);
|
||||
_COPY_VECTOR(_metamethods,base->_metamethods,MT_LAST);
|
||||
__ObjAddRef(_base);
|
||||
}
|
||||
_members = base?base->_members->Clone() : SQTable::Create(ss,0);
|
||||
__ObjAddRef(_members);
|
||||
|
||||
INIT_CHAIN();
|
||||
ADD_TO_CHAIN(&_sharedstate->_gc_chain, this);
|
||||
}
|
||||
|
||||
void SQClass::Finalize() {
|
||||
_attributes.Null();
|
||||
_NULL_SQOBJECT_VECTOR(_defaultvalues,_defaultvalues.size());
|
||||
_methods.resize(0);
|
||||
_NULL_SQOBJECT_VECTOR(_metamethods,MT_LAST);
|
||||
__ObjRelease(_members);
|
||||
if(_base) {
|
||||
__ObjRelease(_base);
|
||||
}
|
||||
}
|
||||
|
||||
SQClass::~SQClass()
|
||||
{
|
||||
REMOVE_FROM_CHAIN(&_sharedstate->_gc_chain, this);
|
||||
Finalize();
|
||||
}
|
||||
|
||||
bool SQClass::NewSlot(SQSharedState *ss,const SQObjectPtr &key,const SQObjectPtr &val,bool bstatic)
|
||||
{
|
||||
SQObjectPtr temp;
|
||||
bool belongs_to_static_table = sq_type(val) == OT_CLOSURE || sq_type(val) == OT_NATIVECLOSURE || bstatic;
|
||||
if(_locked && !belongs_to_static_table)
|
||||
return false; //the class already has an instance so cannot be modified
|
||||
if(_members->Get(key,temp) && _isfield(temp)) //overrides the default value
|
||||
{
|
||||
_defaultvalues[_member_idx(temp)].val = val;
|
||||
return true;
|
||||
}
|
||||
if (_members->CountUsed() >= MEMBER_MAX_COUNT) {
|
||||
return false;
|
||||
}
|
||||
if(belongs_to_static_table) {
|
||||
SQInteger mmidx;
|
||||
if((sq_type(val) == OT_CLOSURE || sq_type(val) == OT_NATIVECLOSURE) &&
|
||||
(mmidx = ss->GetMetaMethodIdxByName(key)) != -1) {
|
||||
_metamethods[mmidx] = val;
|
||||
}
|
||||
else {
|
||||
SQObjectPtr theval = val;
|
||||
if(_base && sq_type(val) == OT_CLOSURE) {
|
||||
theval = _closure(val)->Clone();
|
||||
_closure(theval)->_base = _base;
|
||||
__ObjAddRef(_base); //ref for the closure
|
||||
}
|
||||
if(sq_type(temp) == OT_NULL) {
|
||||
bool isconstructor;
|
||||
SQVM::IsEqual(ss->_constructoridx, key, isconstructor);
|
||||
if(isconstructor) {
|
||||
_constructoridx = (SQInteger)_methods.size();
|
||||
}
|
||||
SQClassMember m;
|
||||
m.val = theval;
|
||||
_members->NewSlot(key,SQObjectPtr(_make_method_idx(_methods.size())));
|
||||
_methods.push_back(m);
|
||||
}
|
||||
else {
|
||||
_methods[_member_idx(temp)].val = theval;
|
||||
}
|
||||
}
|
||||
return true;
|
||||
}
|
||||
SQClassMember m;
|
||||
m.val = val;
|
||||
_members->NewSlot(key,SQObjectPtr(_make_field_idx(_defaultvalues.size())));
|
||||
_defaultvalues.push_back(m);
|
||||
return true;
|
||||
}
|
||||
|
||||
SQInstance *SQClass::CreateInstance()
|
||||
{
|
||||
if(!_locked) Lock();
|
||||
return SQInstance::Create(_opt_ss(this),this);
|
||||
}
|
||||
|
||||
SQInteger SQClass::Next(const SQObjectPtr &refpos, SQObjectPtr &outkey, SQObjectPtr &outval)
|
||||
{
|
||||
SQObjectPtr oval;
|
||||
SQInteger idx = _members->Next(false,refpos,outkey,oval);
|
||||
if(idx != -1) {
|
||||
if(_ismethod(oval)) {
|
||||
outval = _methods[_member_idx(oval)].val;
|
||||
}
|
||||
else {
|
||||
SQObjectPtr &o = _defaultvalues[_member_idx(oval)].val;
|
||||
outval = _realval(o);
|
||||
}
|
||||
}
|
||||
return idx;
|
||||
}
|
||||
|
||||
bool SQClass::SetAttributes(const SQObjectPtr &key,const SQObjectPtr &val)
|
||||
{
|
||||
SQObjectPtr idx;
|
||||
if(_members->Get(key,idx)) {
|
||||
if(_isfield(idx))
|
||||
_defaultvalues[_member_idx(idx)].attrs = val;
|
||||
else
|
||||
_methods[_member_idx(idx)].attrs = val;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool SQClass::GetAttributes(const SQObjectPtr &key,SQObjectPtr &outval)
|
||||
{
|
||||
SQObjectPtr idx;
|
||||
if(_members->Get(key,idx)) {
|
||||
outval = (_isfield(idx)?_defaultvalues[_member_idx(idx)].attrs:_methods[_member_idx(idx)].attrs);
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////////////////
|
||||
void SQInstance::Init(SQSharedState *ss)
|
||||
{
|
||||
_userpointer = NULL;
|
||||
_hook = NULL;
|
||||
__ObjAddRef(_class);
|
||||
_delegate = _class->_members;
|
||||
INIT_CHAIN();
|
||||
ADD_TO_CHAIN(&_sharedstate->_gc_chain, this);
|
||||
}
|
||||
|
||||
SQInstance::SQInstance(SQSharedState *ss, SQClass *c, SQInteger memsize)
|
||||
{
|
||||
_memsize = memsize;
|
||||
_class = c;
|
||||
SQUnsignedInteger nvalues = _class->_defaultvalues.size();
|
||||
for(SQUnsignedInteger n = 0; n < nvalues; n++) {
|
||||
new (&_values[n]) SQObjectPtr(_class->_defaultvalues[n].val);
|
||||
}
|
||||
Init(ss);
|
||||
}
|
||||
|
||||
SQInstance::SQInstance(SQSharedState *ss, SQInstance *i, SQInteger memsize)
|
||||
{
|
||||
_memsize = memsize;
|
||||
_class = i->_class;
|
||||
SQUnsignedInteger nvalues = _class->_defaultvalues.size();
|
||||
for(SQUnsignedInteger n = 0; n < nvalues; n++) {
|
||||
new (&_values[n]) SQObjectPtr(i->_values[n]);
|
||||
}
|
||||
Init(ss);
|
||||
}
|
||||
|
||||
void SQInstance::Finalize()
|
||||
{
|
||||
SQUnsignedInteger nvalues = _class->_defaultvalues.size();
|
||||
__ObjRelease(_class);
|
||||
_NULL_SQOBJECT_VECTOR(_values,nvalues);
|
||||
}
|
||||
|
||||
SQInstance::~SQInstance()
|
||||
{
|
||||
REMOVE_FROM_CHAIN(&_sharedstate->_gc_chain, this);
|
||||
if(_class){ Finalize(); } //if _class is null it was already finalized by the GC
|
||||
}
|
||||
|
||||
bool SQInstance::GetMetaMethod(SQVM* SQ_UNUSED_ARG(v),SQMetaMethod mm,SQObjectPtr &res)
|
||||
{
|
||||
if(sq_type(_class->_metamethods[mm]) != OT_NULL) {
|
||||
res = _class->_metamethods[mm];
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool SQInstance::InstanceOf(SQClass *trg)
|
||||
{
|
||||
SQClass *parent = _class;
|
||||
while(parent != NULL) {
|
||||
if(parent == trg)
|
||||
return true;
|
||||
parent = parent->_base;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
|
@ -1,163 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQCLASS_H_
|
||||
#define _SQCLASS_H_
|
||||
|
||||
struct SQInstance;
|
||||
|
||||
struct SQClassMember {
|
||||
SQObjectPtr val;
|
||||
SQObjectPtr attrs;
|
||||
void Null() {
|
||||
val.Null();
|
||||
attrs.Null();
|
||||
}
|
||||
};
|
||||
|
||||
typedef sqvector<SQClassMember> SQClassMemberVec;
|
||||
|
||||
#define MEMBER_TYPE_METHOD 0x01000000
|
||||
#define MEMBER_TYPE_FIELD 0x02000000
|
||||
#define MEMBER_MAX_COUNT 0x00FFFFFF
|
||||
|
||||
#define _ismethod(o) (_integer(o)&MEMBER_TYPE_METHOD)
|
||||
#define _isfield(o) (_integer(o)&MEMBER_TYPE_FIELD)
|
||||
#define _make_method_idx(i) ((SQInteger)(MEMBER_TYPE_METHOD|i))
|
||||
#define _make_field_idx(i) ((SQInteger)(MEMBER_TYPE_FIELD|i))
|
||||
#define _member_type(o) (_integer(o)&0xFF000000)
|
||||
#define _member_idx(o) (_integer(o)&0x00FFFFFF)
|
||||
|
||||
struct SQClass : public CHAINABLE_OBJ
|
||||
{
|
||||
SQClass(SQSharedState *ss,SQClass *base);
|
||||
public:
|
||||
static SQClass* Create(SQSharedState *ss,SQClass *base) {
|
||||
SQClass *newclass = (SQClass *)SQ_MALLOC(sizeof(SQClass));
|
||||
new (newclass) SQClass(ss, base);
|
||||
return newclass;
|
||||
}
|
||||
~SQClass();
|
||||
bool NewSlot(SQSharedState *ss, const SQObjectPtr &key,const SQObjectPtr &val,bool bstatic);
|
||||
bool Get(const SQObjectPtr &key,SQObjectPtr &val) {
|
||||
if(_members->Get(key,val)) {
|
||||
if(_isfield(val)) {
|
||||
SQObjectPtr &o = _defaultvalues[_member_idx(val)].val;
|
||||
val = _realval(o);
|
||||
}
|
||||
else {
|
||||
val = _methods[_member_idx(val)].val;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
bool GetConstructor(SQObjectPtr &ctor)
|
||||
{
|
||||
if(_constructoridx != -1) {
|
||||
ctor = _methods[_constructoridx].val;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
bool SetAttributes(const SQObjectPtr &key,const SQObjectPtr &val);
|
||||
bool GetAttributes(const SQObjectPtr &key,SQObjectPtr &outval);
|
||||
void Lock() { _locked = true; if(_base) _base->Lock(); }
|
||||
void Release() {
|
||||
if (_hook) { _hook(_typetag,0);}
|
||||
sq_delete(this, SQClass);
|
||||
}
|
||||
void Finalize();
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable ** );
|
||||
SQObjectType GetType() {return OT_CLASS;}
|
||||
#endif
|
||||
SQInteger Next(const SQObjectPtr &refpos, SQObjectPtr &outkey, SQObjectPtr &outval);
|
||||
SQInstance *CreateInstance();
|
||||
SQTable *_members;
|
||||
SQClass *_base;
|
||||
SQClassMemberVec _defaultvalues;
|
||||
SQClassMemberVec _methods;
|
||||
SQObjectPtr _metamethods[MT_LAST];
|
||||
SQObjectPtr _attributes;
|
||||
SQUserPointer _typetag;
|
||||
SQRELEASEHOOK _hook;
|
||||
bool _locked;
|
||||
SQInteger _constructoridx;
|
||||
SQInteger _udsize;
|
||||
};
|
||||
|
||||
#define calcinstancesize(_theclass_) \
|
||||
(_theclass_->_udsize + sq_aligning(sizeof(SQInstance) + (sizeof(SQObjectPtr)*(_theclass_->_defaultvalues.size()>0?_theclass_->_defaultvalues.size()-1:0))))
|
||||
|
||||
struct SQInstance : public SQDelegable
|
||||
{
|
||||
void Init(SQSharedState *ss);
|
||||
SQInstance(SQSharedState *ss, SQClass *c, SQInteger memsize);
|
||||
SQInstance(SQSharedState *ss, SQInstance *c, SQInteger memsize);
|
||||
public:
|
||||
static SQInstance* Create(SQSharedState *ss,SQClass *theclass) {
|
||||
|
||||
SQInteger size = calcinstancesize(theclass);
|
||||
SQInstance *newinst = (SQInstance *)SQ_MALLOC(size);
|
||||
new (newinst) SQInstance(ss, theclass,size);
|
||||
if(theclass->_udsize) {
|
||||
newinst->_userpointer = ((unsigned char *)newinst) + (size - theclass->_udsize);
|
||||
}
|
||||
return newinst;
|
||||
}
|
||||
SQInstance *Clone(SQSharedState *ss)
|
||||
{
|
||||
SQInteger size = calcinstancesize(_class);
|
||||
SQInstance *newinst = (SQInstance *)SQ_MALLOC(size);
|
||||
new (newinst) SQInstance(ss, this,size);
|
||||
if(_class->_udsize) {
|
||||
newinst->_userpointer = ((unsigned char *)newinst) + (size - _class->_udsize);
|
||||
}
|
||||
return newinst;
|
||||
}
|
||||
~SQInstance();
|
||||
bool Get(const SQObjectPtr &key,SQObjectPtr &val) {
|
||||
if(_class->_members->Get(key,val)) {
|
||||
if(_isfield(val)) {
|
||||
SQObjectPtr &o = _values[_member_idx(val)];
|
||||
val = _realval(o);
|
||||
}
|
||||
else {
|
||||
val = _class->_methods[_member_idx(val)].val;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
bool Set(const SQObjectPtr &key,const SQObjectPtr &val) {
|
||||
SQObjectPtr idx;
|
||||
if(_class->_members->Get(key,idx) && _isfield(idx)) {
|
||||
_values[_member_idx(idx)] = val;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
void Release() {
|
||||
_uiRef++;
|
||||
if (_hook) { _hook(_userpointer,0);}
|
||||
_uiRef--;
|
||||
if(_uiRef > 0) return;
|
||||
SQInteger size = _memsize;
|
||||
this->~SQInstance();
|
||||
SQ_FREE(this, size);
|
||||
}
|
||||
void Finalize();
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable ** );
|
||||
SQObjectType GetType() {return OT_INSTANCE;}
|
||||
#endif
|
||||
bool InstanceOf(SQClass *trg);
|
||||
bool GetMetaMethod(SQVM *v,SQMetaMethod mm,SQObjectPtr &res);
|
||||
|
||||
SQClass *_class;
|
||||
SQUserPointer _userpointer;
|
||||
SQRELEASEHOOK _hook;
|
||||
SQInteger _memsize;
|
||||
SQObjectPtr _values[1];
|
||||
};
|
||||
|
||||
#endif //_SQCLASS_H_
|
||||
|
|
@ -1,201 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQCLOSURE_H_
|
||||
#define _SQCLOSURE_H_
|
||||
|
||||
|
||||
#define _CALC_CLOSURE_SIZE(func) (sizeof(SQClosure) + (func->_noutervalues*sizeof(SQObjectPtr)) + (func->_ndefaultparams*sizeof(SQObjectPtr)))
|
||||
|
||||
struct SQFunctionProto;
|
||||
struct SQClass;
|
||||
struct SQClosure : public CHAINABLE_OBJ
|
||||
{
|
||||
private:
|
||||
SQClosure(SQSharedState *ss,SQFunctionProto *func){_function = func; __ObjAddRef(_function); _base = NULL; INIT_CHAIN();ADD_TO_CHAIN(&_ss(this)->_gc_chain,this); _env = NULL; _root=NULL;}
|
||||
public:
|
||||
static SQClosure *Create(SQSharedState *ss,SQFunctionProto *func,SQWeakRef *root){
|
||||
SQInteger size = _CALC_CLOSURE_SIZE(func);
|
||||
SQClosure *nc=(SQClosure*)SQ_MALLOC(size);
|
||||
new (nc) SQClosure(ss,func);
|
||||
nc->_outervalues = (SQObjectPtr *)(nc + 1);
|
||||
nc->_defaultparams = &nc->_outervalues[func->_noutervalues];
|
||||
nc->_root = root;
|
||||
__ObjAddRef(nc->_root);
|
||||
_CONSTRUCT_VECTOR(SQObjectPtr,func->_noutervalues,nc->_outervalues);
|
||||
_CONSTRUCT_VECTOR(SQObjectPtr,func->_ndefaultparams,nc->_defaultparams);
|
||||
return nc;
|
||||
}
|
||||
void Release(){
|
||||
SQFunctionProto *f = _function;
|
||||
SQInteger size = _CALC_CLOSURE_SIZE(f);
|
||||
_DESTRUCT_VECTOR(SQObjectPtr,f->_noutervalues,_outervalues);
|
||||
_DESTRUCT_VECTOR(SQObjectPtr,f->_ndefaultparams,_defaultparams);
|
||||
__ObjRelease(_function);
|
||||
this->~SQClosure();
|
||||
sq_vm_free(this,size);
|
||||
}
|
||||
void SetRoot(SQWeakRef *r)
|
||||
{
|
||||
__ObjRelease(_root);
|
||||
_root = r;
|
||||
__ObjAddRef(_root);
|
||||
}
|
||||
SQClosure *Clone()
|
||||
{
|
||||
SQFunctionProto *f = _function;
|
||||
SQClosure * ret = SQClosure::Create(_opt_ss(this),f,_root);
|
||||
ret->_env = _env;
|
||||
if(ret->_env) __ObjAddRef(ret->_env);
|
||||
_COPY_VECTOR(ret->_outervalues,_outervalues,f->_noutervalues);
|
||||
_COPY_VECTOR(ret->_defaultparams,_defaultparams,f->_ndefaultparams);
|
||||
return ret;
|
||||
}
|
||||
~SQClosure();
|
||||
|
||||
bool Save(SQVM *v,SQUserPointer up,SQWRITEFUNC write);
|
||||
static bool Load(SQVM *v,SQUserPointer up,SQREADFUNC read,SQObjectPtr &ret);
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
void Finalize(){
|
||||
SQFunctionProto *f = _function;
|
||||
_NULL_SQOBJECT_VECTOR(_outervalues,f->_noutervalues);
|
||||
_NULL_SQOBJECT_VECTOR(_defaultparams,f->_ndefaultparams);
|
||||
}
|
||||
SQObjectType GetType() {return OT_CLOSURE;}
|
||||
#endif
|
||||
SQWeakRef *_env;
|
||||
SQWeakRef *_root;
|
||||
SQClass *_base;
|
||||
SQFunctionProto *_function;
|
||||
SQObjectPtr *_outervalues;
|
||||
SQObjectPtr *_defaultparams;
|
||||
};
|
||||
|
||||
//////////////////////////////////////////////
|
||||
struct SQOuter : public CHAINABLE_OBJ
|
||||
{
|
||||
|
||||
private:
|
||||
SQOuter(SQSharedState *ss, SQObjectPtr *outer){_valptr = outer; _next = NULL; INIT_CHAIN(); ADD_TO_CHAIN(&_ss(this)->_gc_chain,this); }
|
||||
|
||||
public:
|
||||
static SQOuter *Create(SQSharedState *ss, SQObjectPtr *outer)
|
||||
{
|
||||
SQOuter *nc = (SQOuter*)SQ_MALLOC(sizeof(SQOuter));
|
||||
new (nc) SQOuter(ss, outer);
|
||||
return nc;
|
||||
}
|
||||
~SQOuter() { REMOVE_FROM_CHAIN(&_ss(this)->_gc_chain,this); }
|
||||
|
||||
void Release()
|
||||
{
|
||||
this->~SQOuter();
|
||||
sq_vm_free(this,sizeof(SQOuter));
|
||||
}
|
||||
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
void Finalize() { _value.Null(); }
|
||||
SQObjectType GetType() {return OT_OUTER;}
|
||||
#endif
|
||||
|
||||
SQObjectPtr *_valptr; /* pointer to value on stack, or _value below */
|
||||
SQInteger _idx; /* idx in stack array, for relocation */
|
||||
SQObjectPtr _value; /* value of outer after stack frame is closed */
|
||||
SQOuter *_next; /* pointer to next outer when frame is open */
|
||||
};
|
||||
|
||||
//////////////////////////////////////////////
|
||||
struct SQGenerator : public CHAINABLE_OBJ
|
||||
{
|
||||
enum SQGeneratorState{eRunning,eSuspended,eDead};
|
||||
private:
|
||||
SQGenerator(SQSharedState *ss,SQClosure *closure){_closure=closure;_state=eRunning;_ci._generator=NULL;INIT_CHAIN();ADD_TO_CHAIN(&_ss(this)->_gc_chain,this);}
|
||||
public:
|
||||
static SQGenerator *Create(SQSharedState *ss,SQClosure *closure){
|
||||
SQGenerator *nc=(SQGenerator*)SQ_MALLOC(sizeof(SQGenerator));
|
||||
new (nc) SQGenerator(ss,closure);
|
||||
return nc;
|
||||
}
|
||||
~SQGenerator()
|
||||
{
|
||||
REMOVE_FROM_CHAIN(&_ss(this)->_gc_chain,this);
|
||||
}
|
||||
void Kill(){
|
||||
_state=eDead;
|
||||
_stack.resize(0);
|
||||
_closure.Null();}
|
||||
void Release(){
|
||||
sq_delete(this,SQGenerator);
|
||||
}
|
||||
|
||||
bool Yield(SQVM *v,SQInteger target);
|
||||
bool Resume(SQVM *v,SQObjectPtr &dest);
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
void Finalize(){_stack.resize(0);_closure.Null();}
|
||||
SQObjectType GetType() {return OT_GENERATOR;}
|
||||
#endif
|
||||
SQObjectPtr _closure;
|
||||
SQObjectPtrVec _stack;
|
||||
SQVM::CallInfo _ci;
|
||||
ExceptionsTraps _etraps;
|
||||
SQGeneratorState _state;
|
||||
};
|
||||
|
||||
#define _CALC_NATVIVECLOSURE_SIZE(noutervalues) (sizeof(SQNativeClosure) + (noutervalues*sizeof(SQObjectPtr)))
|
||||
|
||||
struct SQNativeClosure : public CHAINABLE_OBJ
|
||||
{
|
||||
private:
|
||||
SQNativeClosure(SQSharedState *ss,SQFUNCTION func){_function=func;INIT_CHAIN();ADD_TO_CHAIN(&_ss(this)->_gc_chain,this); _env = NULL;}
|
||||
public:
|
||||
static SQNativeClosure *Create(SQSharedState *ss,SQFUNCTION func,SQInteger nouters)
|
||||
{
|
||||
SQInteger size = _CALC_NATVIVECLOSURE_SIZE(nouters);
|
||||
SQNativeClosure *nc=(SQNativeClosure*)SQ_MALLOC(size);
|
||||
new (nc) SQNativeClosure(ss,func);
|
||||
nc->_outervalues = (SQObjectPtr *)(nc + 1);
|
||||
nc->_noutervalues = nouters;
|
||||
_CONSTRUCT_VECTOR(SQObjectPtr,nc->_noutervalues,nc->_outervalues);
|
||||
return nc;
|
||||
}
|
||||
SQNativeClosure *Clone()
|
||||
{
|
||||
SQNativeClosure * ret = SQNativeClosure::Create(_opt_ss(this),_function,_noutervalues);
|
||||
ret->_env = _env;
|
||||
if(ret->_env) __ObjAddRef(ret->_env);
|
||||
ret->_name = _name;
|
||||
_COPY_VECTOR(ret->_outervalues,_outervalues,_noutervalues);
|
||||
ret->_typecheck.copy(_typecheck);
|
||||
ret->_nparamscheck = _nparamscheck;
|
||||
return ret;
|
||||
}
|
||||
~SQNativeClosure()
|
||||
{
|
||||
__ObjRelease(_env);
|
||||
REMOVE_FROM_CHAIN(&_ss(this)->_gc_chain,this);
|
||||
}
|
||||
void Release(){
|
||||
SQInteger size = _CALC_NATVIVECLOSURE_SIZE(_noutervalues);
|
||||
_DESTRUCT_VECTOR(SQObjectPtr,_noutervalues,_outervalues);
|
||||
this->~SQNativeClosure();
|
||||
sq_free(this,size);
|
||||
}
|
||||
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
void Finalize() { _NULL_SQOBJECT_VECTOR(_outervalues,_noutervalues); }
|
||||
SQObjectType GetType() {return OT_NATIVECLOSURE;}
|
||||
#endif
|
||||
SQInteger _nparamscheck;
|
||||
SQIntVec _typecheck;
|
||||
SQObjectPtr *_outervalues;
|
||||
SQUnsignedInteger _noutervalues;
|
||||
SQWeakRef *_env;
|
||||
SQFUNCTION _function;
|
||||
SQObjectPtr _name;
|
||||
};
|
||||
|
||||
|
||||
|
||||
#endif //_SQCLOSURE_H_
|
||||
File diff suppressed because it is too large
Load Diff
|
|
@ -1,79 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQCOMPILER_H_
|
||||
#define _SQCOMPILER_H_
|
||||
|
||||
struct SQVM;
|
||||
|
||||
#define TK_IDENTIFIER 258
|
||||
#define TK_STRING_LITERAL 259
|
||||
#define TK_INTEGER 260
|
||||
#define TK_FLOAT 261
|
||||
#define TK_BASE 262
|
||||
#define TK_DELETE 263
|
||||
#define TK_EQ 264
|
||||
#define TK_NE 265
|
||||
#define TK_LE 266
|
||||
#define TK_GE 267
|
||||
#define TK_SWITCH 268
|
||||
#define TK_ARROW 269
|
||||
#define TK_AND 270
|
||||
#define TK_OR 271
|
||||
#define TK_IF 272
|
||||
#define TK_ELSE 273
|
||||
#define TK_WHILE 274
|
||||
#define TK_BREAK 275
|
||||
#define TK_FOR 276
|
||||
#define TK_DO 277
|
||||
#define TK_NULL 278
|
||||
#define TK_FOREACH 279
|
||||
#define TK_IN 280
|
||||
#define TK_NEWSLOT 281
|
||||
#define TK_MODULO 282
|
||||
#define TK_LOCAL 283
|
||||
#define TK_CLONE 284
|
||||
#define TK_FUNCTION 285
|
||||
#define TK_RETURN 286
|
||||
#define TK_TYPEOF 287
|
||||
#define TK_UMINUS 288
|
||||
#define TK_PLUSEQ 289
|
||||
#define TK_MINUSEQ 290
|
||||
#define TK_CONTINUE 291
|
||||
#define TK_YIELD 292
|
||||
#define TK_TRY 293
|
||||
#define TK_CATCH 294
|
||||
#define TK_THROW 295
|
||||
#define TK_SHIFTL 296
|
||||
#define TK_SHIFTR 297
|
||||
#define TK_RESUME 298
|
||||
#define TK_DOUBLE_COLON 299
|
||||
#define TK_CASE 300
|
||||
#define TK_DEFAULT 301
|
||||
#define TK_THIS 302
|
||||
#define TK_PLUSPLUS 303
|
||||
#define TK_MINUSMINUS 304
|
||||
#define TK_3WAYSCMP 305
|
||||
#define TK_USHIFTR 306
|
||||
#define TK_CLASS 307
|
||||
#define TK_EXTENDS 308
|
||||
#define TK_CONSTRUCTOR 310
|
||||
#define TK_INSTANCEOF 311
|
||||
#define TK_VARPARAMS 312
|
||||
#define TK___LINE__ 313
|
||||
#define TK___FILE__ 314
|
||||
#define TK_TRUE 315
|
||||
#define TK_FALSE 316
|
||||
#define TK_MULEQ 317
|
||||
#define TK_DIVEQ 318
|
||||
#define TK_MODEQ 319
|
||||
#define TK_ATTR_OPEN 320
|
||||
#define TK_ATTR_CLOSE 321
|
||||
#define TK_STATIC 322
|
||||
#define TK_ENUM 323
|
||||
#define TK_CONST 324
|
||||
#define TK_RAWCALL 325
|
||||
|
||||
|
||||
|
||||
typedef void(*CompilerErrorFunc)(void *ud, const SQChar *s);
|
||||
bool Compile(SQVM *vm, SQLEXREADFUNC rg, SQUserPointer up, const SQChar *sourcename, SQObjectPtr &out, bool raiseerror, bool lineinfo);
|
||||
#endif //_SQCOMPILER_H_
|
||||
|
|
@ -1,118 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#include <stdarg.h>
|
||||
#include "sqvm.h"
|
||||
#include "sqfuncproto.h"
|
||||
#include "sqclosure.h"
|
||||
#include "sqstring.h"
|
||||
|
||||
SQRESULT sq_getfunctioninfo(HSQUIRRELVM v,SQInteger level,SQFunctionInfo *fi)
|
||||
{
|
||||
SQInteger cssize = v->_callsstacksize;
|
||||
if (cssize > level) {
|
||||
SQVM::CallInfo &ci = v->_callsstack[cssize-level-1];
|
||||
if(sq_isclosure(ci._closure)) {
|
||||
SQClosure *c = _closure(ci._closure);
|
||||
SQFunctionProto *proto = c->_function;
|
||||
fi->funcid = proto;
|
||||
fi->name = sq_type(proto->_name) == OT_STRING?_stringval(proto->_name):_SC("unknown");
|
||||
fi->source = sq_type(proto->_sourcename) == OT_STRING?_stringval(proto->_sourcename):_SC("unknown");
|
||||
fi->line = proto->_lineinfos[0]._line;
|
||||
return SQ_OK;
|
||||
}
|
||||
}
|
||||
return sq_throwerror(v,_SC("the object is not a closure"));
|
||||
}
|
||||
|
||||
SQRESULT sq_stackinfos(HSQUIRRELVM v, SQInteger level, SQStackInfos *si)
|
||||
{
|
||||
SQInteger cssize = v->_callsstacksize;
|
||||
if (cssize > level) {
|
||||
memset(si, 0, sizeof(SQStackInfos));
|
||||
SQVM::CallInfo &ci = v->_callsstack[cssize-level-1];
|
||||
switch (sq_type(ci._closure)) {
|
||||
case OT_CLOSURE:{
|
||||
SQFunctionProto *func = _closure(ci._closure)->_function;
|
||||
if (sq_type(func->_name) == OT_STRING)
|
||||
si->funcname = _stringval(func->_name);
|
||||
if (sq_type(func->_sourcename) == OT_STRING)
|
||||
si->source = _stringval(func->_sourcename);
|
||||
si->line = func->GetLine(ci._ip);
|
||||
}
|
||||
break;
|
||||
case OT_NATIVECLOSURE:
|
||||
si->source = _SC("NATIVE");
|
||||
si->funcname = _SC("unknown");
|
||||
if(sq_type(_nativeclosure(ci._closure)->_name) == OT_STRING)
|
||||
si->funcname = _stringval(_nativeclosure(ci._closure)->_name);
|
||||
si->line = -1;
|
||||
break;
|
||||
default: break; //shutup compiler
|
||||
}
|
||||
return SQ_OK;
|
||||
}
|
||||
return SQ_ERROR;
|
||||
}
|
||||
|
||||
void SQVM::Raise_Error(const SQChar *s, ...)
|
||||
{
|
||||
va_list vl;
|
||||
va_start(vl, s);
|
||||
SQInteger buffersize = (SQInteger)scstrlen(s)+(NUMBER_MAX_CHAR*2);
|
||||
scvsprintf(_sp(sq_rsl(buffersize)),buffersize, s, vl);
|
||||
va_end(vl);
|
||||
_lasterror = SQString::Create(_ss(this),_spval,-1);
|
||||
}
|
||||
|
||||
void SQVM::Raise_Error(const SQObjectPtr &desc)
|
||||
{
|
||||
_lasterror = desc;
|
||||
}
|
||||
|
||||
SQString *SQVM::PrintObjVal(const SQObjectPtr &o)
|
||||
{
|
||||
switch(sq_type(o)) {
|
||||
case OT_STRING: return _string(o);
|
||||
case OT_INTEGER:
|
||||
scsprintf(_sp(sq_rsl(NUMBER_MAX_CHAR+1)),sq_rsl(NUMBER_MAX_CHAR), _PRINT_INT_FMT, _integer(o));
|
||||
return SQString::Create(_ss(this), _spval);
|
||||
break;
|
||||
case OT_FLOAT:
|
||||
scsprintf(_sp(sq_rsl(NUMBER_MAX_CHAR+1)), sq_rsl(NUMBER_MAX_CHAR), _SC("%.14g"), _float(o));
|
||||
return SQString::Create(_ss(this), _spval);
|
||||
break;
|
||||
default:
|
||||
return SQString::Create(_ss(this), GetTypeName(o));
|
||||
}
|
||||
}
|
||||
|
||||
void SQVM::Raise_IdxError(const SQObjectPtr &o)
|
||||
{
|
||||
SQObjectPtr oval = PrintObjVal(o);
|
||||
Raise_Error(_SC("the index '%.50s' does not exist"), _stringval(oval));
|
||||
}
|
||||
|
||||
void SQVM::Raise_CompareError(const SQObject &o1, const SQObject &o2)
|
||||
{
|
||||
SQObjectPtr oval1 = PrintObjVal(o1), oval2 = PrintObjVal(o2);
|
||||
Raise_Error(_SC("comparison between '%.50s' and '%.50s'"), _stringval(oval1), _stringval(oval2));
|
||||
}
|
||||
|
||||
|
||||
void SQVM::Raise_ParamTypeError(SQInteger nparam,SQInteger typemask,SQInteger type)
|
||||
{
|
||||
SQObjectPtr exptypes = SQString::Create(_ss(this), _SC(""), -1);
|
||||
SQInteger found = 0;
|
||||
for(SQInteger i=0; i<16; i++)
|
||||
{
|
||||
SQInteger mask = ((SQInteger)1) << i;
|
||||
if(typemask & (mask)) {
|
||||
if(found>0) StringCat(exptypes,SQString::Create(_ss(this), _SC("|"), -1), exptypes);
|
||||
found ++;
|
||||
StringCat(exptypes,SQString::Create(_ss(this), IdType2Name((SQObjectType)mask), -1), exptypes);
|
||||
}
|
||||
}
|
||||
Raise_Error(_SC("parameter %d has an invalid type '%s' ; expected: '%s'"), nparam, IdType2Name((SQObjectType)type), _stringval(exptypes));
|
||||
}
|
||||
|
|
@ -1,154 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQFUNCTION_H_
|
||||
#define _SQFUNCTION_H_
|
||||
|
||||
#include "sqopcodes.h"
|
||||
|
||||
enum SQOuterType {
|
||||
otLOCAL = 0,
|
||||
otOUTER = 1
|
||||
};
|
||||
|
||||
struct SQOuterVar
|
||||
{
|
||||
|
||||
SQOuterVar(){}
|
||||
SQOuterVar(const SQObjectPtr &name,const SQObjectPtr &src,SQOuterType t)
|
||||
{
|
||||
_name = name;
|
||||
_src=src;
|
||||
_type=t;
|
||||
}
|
||||
SQOuterVar(const SQOuterVar &ov)
|
||||
{
|
||||
_type=ov._type;
|
||||
_src=ov._src;
|
||||
_name=ov._name;
|
||||
}
|
||||
SQOuterType _type;
|
||||
SQObjectPtr _name;
|
||||
SQObjectPtr _src;
|
||||
};
|
||||
|
||||
struct SQLocalVarInfo
|
||||
{
|
||||
SQLocalVarInfo():_start_op(0),_end_op(0),_pos(0){}
|
||||
SQLocalVarInfo(const SQLocalVarInfo &lvi)
|
||||
{
|
||||
_name=lvi._name;
|
||||
_start_op=lvi._start_op;
|
||||
_end_op=lvi._end_op;
|
||||
_pos=lvi._pos;
|
||||
}
|
||||
SQObjectPtr _name;
|
||||
SQUnsignedInteger _start_op;
|
||||
SQUnsignedInteger _end_op;
|
||||
SQUnsignedInteger _pos;
|
||||
};
|
||||
|
||||
struct SQLineInfo { SQInteger _line;SQInteger _op; };
|
||||
|
||||
typedef sqvector<SQOuterVar> SQOuterVarVec;
|
||||
typedef sqvector<SQLocalVarInfo> SQLocalVarInfoVec;
|
||||
typedef sqvector<SQLineInfo> SQLineInfoVec;
|
||||
|
||||
#define _FUNC_SIZE(ni,nl,nparams,nfuncs,nouters,nlineinf,localinf,defparams) (sizeof(SQFunctionProto) \
|
||||
+((ni-1)*sizeof(SQInstruction))+(nl*sizeof(SQObjectPtr)) \
|
||||
+(nparams*sizeof(SQObjectPtr))+(nfuncs*sizeof(SQObjectPtr)) \
|
||||
+(nouters*sizeof(SQOuterVar))+(nlineinf*sizeof(SQLineInfo)) \
|
||||
+(localinf*sizeof(SQLocalVarInfo))+(defparams*sizeof(SQInteger)))
|
||||
|
||||
|
||||
struct SQFunctionProto : public CHAINABLE_OBJ
|
||||
{
|
||||
private:
|
||||
SQFunctionProto(SQSharedState *ss);
|
||||
~SQFunctionProto();
|
||||
|
||||
public:
|
||||
static SQFunctionProto *Create(SQSharedState *ss,SQInteger ninstructions,
|
||||
SQInteger nliterals,SQInteger nparameters,
|
||||
SQInteger nfunctions,SQInteger noutervalues,
|
||||
SQInteger nlineinfos,SQInteger nlocalvarinfos,SQInteger ndefaultparams)
|
||||
{
|
||||
SQFunctionProto *f;
|
||||
//I compact the whole class and members in a single memory allocation
|
||||
f = (SQFunctionProto *)sq_vm_malloc(_FUNC_SIZE(ninstructions,nliterals,nparameters,nfunctions,noutervalues,nlineinfos,nlocalvarinfos,ndefaultparams));
|
||||
new (f) SQFunctionProto(ss);
|
||||
f->_ninstructions = ninstructions;
|
||||
f->_literals = (SQObjectPtr*)&f->_instructions[ninstructions];
|
||||
f->_nliterals = nliterals;
|
||||
f->_parameters = (SQObjectPtr*)&f->_literals[nliterals];
|
||||
f->_nparameters = nparameters;
|
||||
f->_functions = (SQObjectPtr*)&f->_parameters[nparameters];
|
||||
f->_nfunctions = nfunctions;
|
||||
f->_outervalues = (SQOuterVar*)&f->_functions[nfunctions];
|
||||
f->_noutervalues = noutervalues;
|
||||
f->_lineinfos = (SQLineInfo *)&f->_outervalues[noutervalues];
|
||||
f->_nlineinfos = nlineinfos;
|
||||
f->_localvarinfos = (SQLocalVarInfo *)&f->_lineinfos[nlineinfos];
|
||||
f->_nlocalvarinfos = nlocalvarinfos;
|
||||
f->_defaultparams = (SQInteger *)&f->_localvarinfos[nlocalvarinfos];
|
||||
f->_ndefaultparams = ndefaultparams;
|
||||
|
||||
_CONSTRUCT_VECTOR(SQObjectPtr,f->_nliterals,f->_literals);
|
||||
_CONSTRUCT_VECTOR(SQObjectPtr,f->_nparameters,f->_parameters);
|
||||
_CONSTRUCT_VECTOR(SQObjectPtr,f->_nfunctions,f->_functions);
|
||||
_CONSTRUCT_VECTOR(SQOuterVar,f->_noutervalues,f->_outervalues);
|
||||
//_CONSTRUCT_VECTOR(SQLineInfo,f->_nlineinfos,f->_lineinfos); //not required are 2 integers
|
||||
_CONSTRUCT_VECTOR(SQLocalVarInfo,f->_nlocalvarinfos,f->_localvarinfos);
|
||||
return f;
|
||||
}
|
||||
void Release(){
|
||||
_DESTRUCT_VECTOR(SQObjectPtr,_nliterals,_literals);
|
||||
_DESTRUCT_VECTOR(SQObjectPtr,_nparameters,_parameters);
|
||||
_DESTRUCT_VECTOR(SQObjectPtr,_nfunctions,_functions);
|
||||
_DESTRUCT_VECTOR(SQOuterVar,_noutervalues,_outervalues);
|
||||
//_DESTRUCT_VECTOR(SQLineInfo,_nlineinfos,_lineinfos); //not required are 2 integers
|
||||
_DESTRUCT_VECTOR(SQLocalVarInfo,_nlocalvarinfos,_localvarinfos);
|
||||
SQInteger size = _FUNC_SIZE(_ninstructions,_nliterals,_nparameters,_nfunctions,_noutervalues,_nlineinfos,_nlocalvarinfos,_ndefaultparams);
|
||||
this->~SQFunctionProto();
|
||||
sq_vm_free(this,size);
|
||||
}
|
||||
|
||||
const SQChar* GetLocal(SQVM *v,SQUnsignedInteger stackbase,SQUnsignedInteger nseq,SQUnsignedInteger nop);
|
||||
SQInteger GetLine(SQInstruction *curr);
|
||||
bool Save(SQVM *v,SQUserPointer up,SQWRITEFUNC write);
|
||||
static bool Load(SQVM *v,SQUserPointer up,SQREADFUNC read,SQObjectPtr &ret);
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
void Finalize(){ _NULL_SQOBJECT_VECTOR(_literals,_nliterals); }
|
||||
SQObjectType GetType() {return OT_FUNCPROTO;}
|
||||
#endif
|
||||
SQObjectPtr _sourcename;
|
||||
SQObjectPtr _name;
|
||||
SQInteger _stacksize;
|
||||
bool _bgenerator;
|
||||
SQInteger _varparams;
|
||||
|
||||
SQInteger _nlocalvarinfos;
|
||||
SQLocalVarInfo *_localvarinfos;
|
||||
|
||||
SQInteger _nlineinfos;
|
||||
SQLineInfo *_lineinfos;
|
||||
|
||||
SQInteger _nliterals;
|
||||
SQObjectPtr *_literals;
|
||||
|
||||
SQInteger _nparameters;
|
||||
SQObjectPtr *_parameters;
|
||||
|
||||
SQInteger _nfunctions;
|
||||
SQObjectPtr *_functions;
|
||||
|
||||
SQInteger _noutervalues;
|
||||
SQOuterVar *_outervalues;
|
||||
|
||||
SQInteger _ndefaultparams;
|
||||
SQInteger *_defaultparams;
|
||||
|
||||
SQInteger _ninstructions;
|
||||
SQInstruction _instructions[1];
|
||||
};
|
||||
|
||||
#endif //_SQFUNCTION_H_
|
||||
|
|
@ -1,649 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#ifndef NO_COMPILER
|
||||
#include "sqcompiler.h"
|
||||
#include "sqstring.h"
|
||||
#include "sqfuncproto.h"
|
||||
#include "sqtable.h"
|
||||
#include "sqopcodes.h"
|
||||
#include "sqfuncstate.h"
|
||||
|
||||
#ifdef _DEBUG_DUMP
|
||||
SQInstructionDesc g_InstrDesc[]={
|
||||
{_SC("_OP_LINE")},
|
||||
{_SC("_OP_LOAD")},
|
||||
{_SC("_OP_LOADINT")},
|
||||
{_SC("_OP_LOADFLOAT")},
|
||||
{_SC("_OP_DLOAD")},
|
||||
{_SC("_OP_TAILCALL")},
|
||||
{_SC("_OP_CALL")},
|
||||
{_SC("_OP_PREPCALL")},
|
||||
{_SC("_OP_PREPCALLK")},
|
||||
{_SC("_OP_GETK")},
|
||||
{_SC("_OP_MOVE")},
|
||||
{_SC("_OP_NEWSLOT")},
|
||||
{_SC("_OP_DELETE")},
|
||||
{_SC("_OP_SET")},
|
||||
{_SC("_OP_GET")},
|
||||
{_SC("_OP_EQ")},
|
||||
{_SC("_OP_NE")},
|
||||
{_SC("_OP_ADD")},
|
||||
{_SC("_OP_SUB")},
|
||||
{_SC("_OP_MUL")},
|
||||
{_SC("_OP_DIV")},
|
||||
{_SC("_OP_MOD")},
|
||||
{_SC("_OP_BITW")},
|
||||
{_SC("_OP_RETURN")},
|
||||
{_SC("_OP_LOADNULLS")},
|
||||
{_SC("_OP_LOADROOT")},
|
||||
{_SC("_OP_LOADBOOL")},
|
||||
{_SC("_OP_DMOVE")},
|
||||
{_SC("_OP_JMP")},
|
||||
{_SC("_OP_JCMP")},
|
||||
{_SC("_OP_JZ")},
|
||||
{_SC("_OP_SETOUTER")},
|
||||
{_SC("_OP_GETOUTER")},
|
||||
{_SC("_OP_NEWOBJ")},
|
||||
{_SC("_OP_APPENDARRAY")},
|
||||
{_SC("_OP_COMPARITH")},
|
||||
{_SC("_OP_INC")},
|
||||
{_SC("_OP_INCL")},
|
||||
{_SC("_OP_PINC")},
|
||||
{_SC("_OP_PINCL")},
|
||||
{_SC("_OP_CMP")},
|
||||
{_SC("_OP_EXISTS")},
|
||||
{_SC("_OP_INSTANCEOF")},
|
||||
{_SC("_OP_AND")},
|
||||
{_SC("_OP_OR")},
|
||||
{_SC("_OP_NEG")},
|
||||
{_SC("_OP_NOT")},
|
||||
{_SC("_OP_BWNOT")},
|
||||
{_SC("_OP_CLOSURE")},
|
||||
{_SC("_OP_YIELD")},
|
||||
{_SC("_OP_RESUME")},
|
||||
{_SC("_OP_FOREACH")},
|
||||
{_SC("_OP_POSTFOREACH")},
|
||||
{_SC("_OP_CLONE")},
|
||||
{_SC("_OP_TYPEOF")},
|
||||
{_SC("_OP_PUSHTRAP")},
|
||||
{_SC("_OP_POPTRAP")},
|
||||
{_SC("_OP_THROW")},
|
||||
{_SC("_OP_NEWSLOTA")},
|
||||
{_SC("_OP_GETBASE")},
|
||||
{_SC("_OP_CLOSE")},
|
||||
};
|
||||
#endif
|
||||
void DumpLiteral(SQObjectPtr &o)
|
||||
{
|
||||
switch(sq_type(o)){
|
||||
case OT_STRING: scprintf(_SC("\"%s\""),_stringval(o));break;
|
||||
case OT_FLOAT: scprintf(_SC("{%f}"),_float(o));break;
|
||||
case OT_INTEGER: scprintf(_SC("{") _PRINT_INT_FMT _SC("}"),_integer(o));break;
|
||||
case OT_BOOL: scprintf(_SC("%s"),_integer(o)?_SC("true"):_SC("false"));break;
|
||||
default: scprintf(_SC("(%s %p)"),GetTypeName(o),(void*)_rawval(o));break; break; //shut up compiler
|
||||
}
|
||||
}
|
||||
|
||||
SQFuncState::SQFuncState(SQSharedState *ss,SQFuncState *parent,CompilerErrorFunc efunc,void *ed)
|
||||
{
|
||||
_nliterals = 0;
|
||||
_literals = SQTable::Create(ss,0);
|
||||
_strings = SQTable::Create(ss,0);
|
||||
_sharedstate = ss;
|
||||
_lastline = 0;
|
||||
_optimization = true;
|
||||
_parent = parent;
|
||||
_stacksize = 0;
|
||||
_traps = 0;
|
||||
_returnexp = 0;
|
||||
_varparams = false;
|
||||
_errfunc = efunc;
|
||||
_errtarget = ed;
|
||||
_bgenerator = false;
|
||||
_outers = 0;
|
||||
_ss = ss;
|
||||
|
||||
}
|
||||
|
||||
void SQFuncState::Error(const SQChar *err)
|
||||
{
|
||||
_errfunc(_errtarget,err);
|
||||
}
|
||||
|
||||
#ifdef _DEBUG_DUMP
|
||||
void SQFuncState::Dump(SQFunctionProto *func)
|
||||
{
|
||||
SQUnsignedInteger n=0,i;
|
||||
SQInteger si;
|
||||
scprintf(_SC("SQInstruction sizeof %d\n"),(SQInt32)sizeof(SQInstruction));
|
||||
scprintf(_SC("SQObject sizeof %d\n"), (SQInt32)sizeof(SQObject));
|
||||
scprintf(_SC("--------------------------------------------------------------------\n"));
|
||||
scprintf(_SC("*****FUNCTION [%s]\n"),sq_type(func->_name)==OT_STRING?_stringval(func->_name):_SC("unknown"));
|
||||
scprintf(_SC("-----LITERALS\n"));
|
||||
SQObjectPtr refidx,key,val;
|
||||
SQInteger idx;
|
||||
SQObjectPtrVec templiterals;
|
||||
templiterals.resize(_nliterals);
|
||||
while((idx=_table(_literals)->Next(false,refidx,key,val))!=-1) {
|
||||
refidx=idx;
|
||||
templiterals[_integer(val)]=key;
|
||||
}
|
||||
for(i=0;i<templiterals.size();i++){
|
||||
scprintf(_SC("[%d] "), (SQInt32)n);
|
||||
DumpLiteral(templiterals[i]);
|
||||
scprintf(_SC("\n"));
|
||||
n++;
|
||||
}
|
||||
scprintf(_SC("-----PARAMS\n"));
|
||||
if(_varparams)
|
||||
scprintf(_SC("<<VARPARAMS>>\n"));
|
||||
n=0;
|
||||
for(i=0;i<_parameters.size();i++){
|
||||
scprintf(_SC("[%d] "), (SQInt32)n);
|
||||
DumpLiteral(_parameters[i]);
|
||||
scprintf(_SC("\n"));
|
||||
n++;
|
||||
}
|
||||
scprintf(_SC("-----LOCALS\n"));
|
||||
for(si=0;si<func->_nlocalvarinfos;si++){
|
||||
SQLocalVarInfo lvi=func->_localvarinfos[si];
|
||||
scprintf(_SC("[%d] %s \t%d %d\n"), (SQInt32)lvi._pos,_stringval(lvi._name), (SQInt32)lvi._start_op, (SQInt32)lvi._end_op);
|
||||
n++;
|
||||
}
|
||||
scprintf(_SC("-----LINE INFO\n"));
|
||||
for(i=0;i<_lineinfos.size();i++){
|
||||
SQLineInfo li=_lineinfos[i];
|
||||
scprintf(_SC("op [%d] line [%d] \n"), (SQInt32)li._op, (SQInt32)li._line);
|
||||
n++;
|
||||
}
|
||||
scprintf(_SC("-----dump\n"));
|
||||
n=0;
|
||||
for(i=0;i<_instructions.size();i++){
|
||||
SQInstruction &inst=_instructions[i];
|
||||
if(inst.op==_OP_LOAD || inst.op==_OP_DLOAD || inst.op==_OP_PREPCALLK || inst.op==_OP_GETK ){
|
||||
|
||||
SQInteger lidx = inst._arg1;
|
||||
scprintf(_SC("[%03d] %15s %d "), (SQInt32)n,g_InstrDesc[inst.op].name,inst._arg0);
|
||||
if(lidx >= 0xFFFFFFFF)
|
||||
scprintf(_SC("null"));
|
||||
else {
|
||||
SQInteger refidx;
|
||||
SQObjectPtr val,key,refo;
|
||||
while(((refidx=_table(_literals)->Next(false,refo,key,val))!= -1) && (_integer(val) != lidx)) {
|
||||
refo = refidx;
|
||||
}
|
||||
DumpLiteral(key);
|
||||
}
|
||||
if(inst.op != _OP_DLOAD) {
|
||||
scprintf(_SC(" %d %d \n"),inst._arg2,inst._arg3);
|
||||
}
|
||||
else {
|
||||
scprintf(_SC(" %d "),inst._arg2);
|
||||
lidx = inst._arg3;
|
||||
if(lidx >= 0xFFFFFFFF)
|
||||
scprintf(_SC("null"));
|
||||
else {
|
||||
SQInteger refidx;
|
||||
SQObjectPtr val,key,refo;
|
||||
while(((refidx=_table(_literals)->Next(false,refo,key,val))!= -1) && (_integer(val) != lidx)) {
|
||||
refo = refidx;
|
||||
}
|
||||
DumpLiteral(key);
|
||||
scprintf(_SC("\n"));
|
||||
}
|
||||
}
|
||||
}
|
||||
else if(inst.op==_OP_LOADFLOAT) {
|
||||
scprintf(_SC("[%03d] %15s %d %f %d %d\n"), (SQInt32)n,g_InstrDesc[inst.op].name,inst._arg0,*((SQFloat*)&inst._arg1),inst._arg2,inst._arg3);
|
||||
}
|
||||
/* else if(inst.op==_OP_ARITH){
|
||||
scprintf(_SC("[%03d] %15s %d %d %d %c\n"),n,g_InstrDesc[inst.op].name,inst._arg0,inst._arg1,inst._arg2,inst._arg3);
|
||||
}*/
|
||||
else {
|
||||
scprintf(_SC("[%03d] %15s %d %d %d %d\n"), (SQInt32)n,g_InstrDesc[inst.op].name,inst._arg0,inst._arg1,inst._arg2,inst._arg3);
|
||||
}
|
||||
n++;
|
||||
}
|
||||
scprintf(_SC("-----\n"));
|
||||
scprintf(_SC("stack size[%d]\n"), (SQInt32)func->_stacksize);
|
||||
scprintf(_SC("--------------------------------------------------------------------\n\n"));
|
||||
}
|
||||
#endif
|
||||
|
||||
SQInteger SQFuncState::GetNumericConstant(const SQInteger cons)
|
||||
{
|
||||
return GetConstant(SQObjectPtr(cons));
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::GetNumericConstant(const SQFloat cons)
|
||||
{
|
||||
return GetConstant(SQObjectPtr(cons));
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::GetConstant(const SQObject &cons)
|
||||
{
|
||||
SQObjectPtr val;
|
||||
if(!_table(_literals)->Get(cons,val))
|
||||
{
|
||||
val = _nliterals;
|
||||
_table(_literals)->NewSlot(cons,val);
|
||||
_nliterals++;
|
||||
if(_nliterals > MAX_LITERALS) {
|
||||
val.Null();
|
||||
Error(_SC("internal compiler error: too many literals"));
|
||||
}
|
||||
}
|
||||
return _integer(val);
|
||||
}
|
||||
|
||||
void SQFuncState::SetInstructionParams(SQInteger pos,SQInteger arg0,SQInteger arg1,SQInteger arg2,SQInteger arg3)
|
||||
{
|
||||
_instructions[pos]._arg0=(unsigned char)*((SQUnsignedInteger *)&arg0);
|
||||
_instructions[pos]._arg1=(SQInt32)*((SQUnsignedInteger *)&arg1);
|
||||
_instructions[pos]._arg2=(unsigned char)*((SQUnsignedInteger *)&arg2);
|
||||
_instructions[pos]._arg3=(unsigned char)*((SQUnsignedInteger *)&arg3);
|
||||
}
|
||||
|
||||
void SQFuncState::SetInstructionParam(SQInteger pos,SQInteger arg,SQInteger val)
|
||||
{
|
||||
switch(arg){
|
||||
case 0:_instructions[pos]._arg0=(unsigned char)*((SQUnsignedInteger *)&val);break;
|
||||
case 1:case 4:_instructions[pos]._arg1=(SQInt32)*((SQUnsignedInteger *)&val);break;
|
||||
case 2:_instructions[pos]._arg2=(unsigned char)*((SQUnsignedInteger *)&val);break;
|
||||
case 3:_instructions[pos]._arg3=(unsigned char)*((SQUnsignedInteger *)&val);break;
|
||||
};
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::AllocStackPos()
|
||||
{
|
||||
SQInteger npos=_vlocals.size();
|
||||
_vlocals.push_back(SQLocalVarInfo());
|
||||
if(_vlocals.size()>((SQUnsignedInteger)_stacksize)) {
|
||||
if(_stacksize>MAX_FUNC_STACKSIZE) Error(_SC("internal compiler error: too many locals"));
|
||||
_stacksize=_vlocals.size();
|
||||
}
|
||||
return npos;
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::PushTarget(SQInteger n)
|
||||
{
|
||||
if(n!=-1){
|
||||
_targetstack.push_back(n);
|
||||
return n;
|
||||
}
|
||||
n=AllocStackPos();
|
||||
_targetstack.push_back(n);
|
||||
return n;
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::GetUpTarget(SQInteger n){
|
||||
return _targetstack[((_targetstack.size()-1)-n)];
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::TopTarget(){
|
||||
return _targetstack.back();
|
||||
}
|
||||
SQInteger SQFuncState::PopTarget()
|
||||
{
|
||||
SQUnsignedInteger npos=_targetstack.back();
|
||||
assert(npos < _vlocals.size());
|
||||
SQLocalVarInfo &t = _vlocals[npos];
|
||||
if(sq_type(t._name)==OT_NULL){
|
||||
_vlocals.pop_back();
|
||||
}
|
||||
_targetstack.pop_back();
|
||||
return npos;
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::GetStackSize()
|
||||
{
|
||||
return _vlocals.size();
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::CountOuters(SQInteger stacksize)
|
||||
{
|
||||
SQInteger outers = 0;
|
||||
SQInteger k = _vlocals.size() - 1;
|
||||
while(k >= stacksize) {
|
||||
SQLocalVarInfo &lvi = _vlocals[k];
|
||||
k--;
|
||||
if(lvi._end_op == UINT_MINUS_ONE) { //this means is an outer
|
||||
outers++;
|
||||
}
|
||||
}
|
||||
return outers;
|
||||
}
|
||||
|
||||
void SQFuncState::SetStackSize(SQInteger n)
|
||||
{
|
||||
SQInteger size=_vlocals.size();
|
||||
while(size>n){
|
||||
size--;
|
||||
SQLocalVarInfo lvi = _vlocals.back();
|
||||
if(sq_type(lvi._name)!=OT_NULL){
|
||||
if(lvi._end_op == UINT_MINUS_ONE) { //this means is an outer
|
||||
_outers--;
|
||||
}
|
||||
lvi._end_op = GetCurrentPos();
|
||||
_localvarinfos.push_back(lvi);
|
||||
}
|
||||
_vlocals.pop_back();
|
||||
}
|
||||
}
|
||||
|
||||
bool SQFuncState::IsConstant(const SQObject &name,SQObject &e)
|
||||
{
|
||||
SQObjectPtr val;
|
||||
if(_table(_sharedstate->_consts)->Get(name,val)) {
|
||||
e = val;
|
||||
return true;
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool SQFuncState::IsLocal(SQUnsignedInteger stkpos)
|
||||
{
|
||||
if(stkpos>=_vlocals.size())return false;
|
||||
else if(sq_type(_vlocals[stkpos]._name)!=OT_NULL)return true;
|
||||
return false;
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::PushLocalVariable(const SQObject &name)
|
||||
{
|
||||
SQInteger pos=_vlocals.size();
|
||||
SQLocalVarInfo lvi;
|
||||
lvi._name=name;
|
||||
lvi._start_op=GetCurrentPos()+1;
|
||||
lvi._pos=_vlocals.size();
|
||||
_vlocals.push_back(lvi);
|
||||
if(_vlocals.size()>((SQUnsignedInteger)_stacksize))_stacksize=_vlocals.size();
|
||||
return pos;
|
||||
}
|
||||
|
||||
|
||||
|
||||
SQInteger SQFuncState::GetLocalVariable(const SQObject &name)
|
||||
{
|
||||
SQInteger locals=_vlocals.size();
|
||||
while(locals>=1){
|
||||
SQLocalVarInfo &lvi = _vlocals[locals-1];
|
||||
if(sq_type(lvi._name)==OT_STRING && _string(lvi._name)==_string(name)){
|
||||
return locals-1;
|
||||
}
|
||||
locals--;
|
||||
}
|
||||
return -1;
|
||||
}
|
||||
|
||||
void SQFuncState::MarkLocalAsOuter(SQInteger pos)
|
||||
{
|
||||
SQLocalVarInfo &lvi = _vlocals[pos];
|
||||
lvi._end_op = UINT_MINUS_ONE;
|
||||
_outers++;
|
||||
}
|
||||
|
||||
SQInteger SQFuncState::GetOuterVariable(const SQObject &name)
|
||||
{
|
||||
SQInteger outers = _outervalues.size();
|
||||
for(SQInteger i = 0; i<outers; i++) {
|
||||
if(_string(_outervalues[i]._name) == _string(name))
|
||||
return i;
|
||||
}
|
||||
SQInteger pos=-1;
|
||||
if(_parent) {
|
||||
pos = _parent->GetLocalVariable(name);
|
||||
if(pos == -1) {
|
||||
pos = _parent->GetOuterVariable(name);
|
||||
if(pos != -1) {
|
||||
_outervalues.push_back(SQOuterVar(name,SQObjectPtr(SQInteger(pos)),otOUTER)); //local
|
||||
return _outervalues.size() - 1;
|
||||
}
|
||||
}
|
||||
else {
|
||||
_parent->MarkLocalAsOuter(pos);
|
||||
_outervalues.push_back(SQOuterVar(name,SQObjectPtr(SQInteger(pos)),otLOCAL)); //local
|
||||
return _outervalues.size() - 1;
|
||||
|
||||
|
||||
}
|
||||
}
|
||||
return -1;
|
||||
}
|
||||
|
||||
void SQFuncState::AddParameter(const SQObject &name)
|
||||
{
|
||||
PushLocalVariable(name);
|
||||
_parameters.push_back(name);
|
||||
}
|
||||
|
||||
void SQFuncState::AddLineInfos(SQInteger line,bool lineop,bool force)
|
||||
{
|
||||
if(_lastline!=line || force){
|
||||
SQLineInfo li;
|
||||
li._line=line;li._op=(GetCurrentPos()+1);
|
||||
if(lineop)AddInstruction(_OP_LINE,0,line);
|
||||
if(_lastline!=line) {
|
||||
_lineinfos.push_back(li);
|
||||
}
|
||||
_lastline=line;
|
||||
}
|
||||
}
|
||||
|
||||
void SQFuncState::DiscardTarget()
|
||||
{
|
||||
SQInteger discardedtarget = PopTarget();
|
||||
SQInteger size = _instructions.size();
|
||||
if(size > 0 && _optimization){
|
||||
SQInstruction &pi = _instructions[size-1];//previous instruction
|
||||
switch(pi.op) {
|
||||
case _OP_SET:case _OP_NEWSLOT:case _OP_SETOUTER:case _OP_CALL:
|
||||
if(pi._arg0 == discardedtarget) {
|
||||
pi._arg0 = 0xFF;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void SQFuncState::AddInstruction(SQInstruction &i)
|
||||
{
|
||||
SQInteger size = _instructions.size();
|
||||
if(size > 0 && _optimization){ //simple optimizer
|
||||
SQInstruction &pi = _instructions[size-1];//previous instruction
|
||||
switch(i.op) {
|
||||
case _OP_JZ:
|
||||
if( pi.op == _OP_CMP && pi._arg1 < 0xFF) {
|
||||
pi.op = _OP_JCMP;
|
||||
pi._arg0 = (unsigned char)pi._arg1;
|
||||
pi._arg1 = i._arg1;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_SET:
|
||||
case _OP_NEWSLOT:
|
||||
if(i._arg0 == i._arg3) {
|
||||
i._arg0 = 0xFF;
|
||||
}
|
||||
break;
|
||||
case _OP_SETOUTER:
|
||||
if(i._arg0 == i._arg2) {
|
||||
i._arg0 = 0xFF;
|
||||
}
|
||||
break;
|
||||
case _OP_RETURN:
|
||||
if( _parent && i._arg0 != MAX_FUNC_STACKSIZE && pi.op == _OP_CALL && _returnexp < size-1) {
|
||||
pi.op = _OP_TAILCALL;
|
||||
} else if(pi.op == _OP_CLOSE){
|
||||
pi = i;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_GET:
|
||||
if( pi.op == _OP_LOAD && pi._arg0 == i._arg2 && (!IsLocal(pi._arg0))){
|
||||
pi._arg2 = (unsigned char)i._arg1;
|
||||
pi.op = _OP_GETK;
|
||||
pi._arg0 = i._arg0;
|
||||
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_PREPCALL:
|
||||
if( pi.op == _OP_LOAD && pi._arg0 == i._arg1 && (!IsLocal(pi._arg0))){
|
||||
pi.op = _OP_PREPCALLK;
|
||||
pi._arg0 = i._arg0;
|
||||
pi._arg2 = i._arg2;
|
||||
pi._arg3 = i._arg3;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_APPENDARRAY: {
|
||||
SQInteger aat = -1;
|
||||
switch(pi.op) {
|
||||
case _OP_LOAD: aat = AAT_LITERAL; break;
|
||||
case _OP_LOADINT: aat = AAT_INT; break;
|
||||
case _OP_LOADBOOL: aat = AAT_BOOL; break;
|
||||
case _OP_LOADFLOAT: aat = AAT_FLOAT; break;
|
||||
default: break;
|
||||
}
|
||||
if(aat != -1 && pi._arg0 == i._arg1 && (!IsLocal(pi._arg0))){
|
||||
pi.op = _OP_APPENDARRAY;
|
||||
pi._arg0 = i._arg0;
|
||||
pi._arg2 = (unsigned char)aat;
|
||||
pi._arg3 = MAX_FUNC_STACKSIZE;
|
||||
return;
|
||||
}
|
||||
}
|
||||
break;
|
||||
case _OP_MOVE:
|
||||
switch(pi.op) {
|
||||
case _OP_GET: case _OP_ADD: case _OP_SUB: case _OP_MUL: case _OP_DIV: case _OP_MOD: case _OP_BITW:
|
||||
case _OP_LOADINT: case _OP_LOADFLOAT: case _OP_LOADBOOL: case _OP_LOAD:
|
||||
|
||||
if(pi._arg0 == i._arg1)
|
||||
{
|
||||
pi._arg0 = i._arg0;
|
||||
_optimization = false;
|
||||
//_result_elimination = false;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
if(pi.op == _OP_MOVE)
|
||||
{
|
||||
pi.op = _OP_DMOVE;
|
||||
pi._arg2 = i._arg0;
|
||||
pi._arg3 = (unsigned char)i._arg1;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_LOAD:
|
||||
if(pi.op == _OP_LOAD && i._arg1 < 256) {
|
||||
pi.op = _OP_DLOAD;
|
||||
pi._arg2 = i._arg0;
|
||||
pi._arg3 = (unsigned char)i._arg1;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_EQ:case _OP_NE:
|
||||
if(pi.op == _OP_LOAD && pi._arg0 == i._arg1 && (!IsLocal(pi._arg0) ))
|
||||
{
|
||||
pi.op = i.op;
|
||||
pi._arg0 = i._arg0;
|
||||
pi._arg2 = i._arg2;
|
||||
pi._arg3 = MAX_FUNC_STACKSIZE;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_LOADNULLS:
|
||||
if((pi.op == _OP_LOADNULLS && pi._arg0+pi._arg1 == i._arg0)) {
|
||||
|
||||
pi._arg1 = pi._arg1 + 1;
|
||||
pi.op = _OP_LOADNULLS;
|
||||
return;
|
||||
}
|
||||
break;
|
||||
case _OP_LINE:
|
||||
if(pi.op == _OP_LINE) {
|
||||
_instructions.pop_back();
|
||||
_lineinfos.pop_back();
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
_optimization = true;
|
||||
_instructions.push_back(i);
|
||||
}
|
||||
|
||||
SQObject SQFuncState::CreateString(const SQChar *s,SQInteger len)
|
||||
{
|
||||
SQObjectPtr ns(SQString::Create(_sharedstate,s,len));
|
||||
_table(_strings)->NewSlot(ns,(SQInteger)1);
|
||||
return ns;
|
||||
}
|
||||
|
||||
SQObject SQFuncState::CreateTable()
|
||||
{
|
||||
SQObjectPtr nt(SQTable::Create(_sharedstate,0));
|
||||
_table(_strings)->NewSlot(nt,(SQInteger)1);
|
||||
return nt;
|
||||
}
|
||||
|
||||
SQFunctionProto *SQFuncState::BuildProto()
|
||||
{
|
||||
|
||||
SQFunctionProto *f=SQFunctionProto::Create(_ss,_instructions.size(),
|
||||
_nliterals,_parameters.size(),_functions.size(),_outervalues.size(),
|
||||
_lineinfos.size(),_localvarinfos.size(),_defaultparams.size());
|
||||
|
||||
SQObjectPtr refidx,key,val;
|
||||
SQInteger idx;
|
||||
|
||||
f->_stacksize = _stacksize;
|
||||
f->_sourcename = _sourcename;
|
||||
f->_bgenerator = _bgenerator;
|
||||
f->_name = _name;
|
||||
|
||||
while((idx=_table(_literals)->Next(false,refidx,key,val))!=-1) {
|
||||
f->_literals[_integer(val)]=key;
|
||||
refidx=idx;
|
||||
}
|
||||
|
||||
for(SQUnsignedInteger nf = 0; nf < _functions.size(); nf++) f->_functions[nf] = _functions[nf];
|
||||
for(SQUnsignedInteger np = 0; np < _parameters.size(); np++) f->_parameters[np] = _parameters[np];
|
||||
for(SQUnsignedInteger no = 0; no < _outervalues.size(); no++) f->_outervalues[no] = _outervalues[no];
|
||||
for(SQUnsignedInteger nl = 0; nl < _localvarinfos.size(); nl++) f->_localvarinfos[nl] = _localvarinfos[nl];
|
||||
for(SQUnsignedInteger ni = 0; ni < _lineinfos.size(); ni++) f->_lineinfos[ni] = _lineinfos[ni];
|
||||
for(SQUnsignedInteger nd = 0; nd < _defaultparams.size(); nd++) f->_defaultparams[nd] = _defaultparams[nd];
|
||||
|
||||
memcpy(f->_instructions,&_instructions[0],_instructions.size()*sizeof(SQInstruction));
|
||||
|
||||
f->_varparams = _varparams;
|
||||
|
||||
return f;
|
||||
}
|
||||
|
||||
SQFuncState *SQFuncState::PushChildState(SQSharedState *ss)
|
||||
{
|
||||
SQFuncState *child = (SQFuncState *)sq_malloc(sizeof(SQFuncState));
|
||||
new (child) SQFuncState(ss,this,_errfunc,_errtarget);
|
||||
_childstates.push_back(child);
|
||||
return child;
|
||||
}
|
||||
|
||||
void SQFuncState::PopChildState()
|
||||
{
|
||||
SQFuncState *child = _childstates.back();
|
||||
sq_delete(child,SQFuncState);
|
||||
_childstates.pop_back();
|
||||
}
|
||||
|
||||
SQFuncState::~SQFuncState()
|
||||
{
|
||||
while(_childstates.size() > 0)
|
||||
{
|
||||
PopChildState();
|
||||
}
|
||||
}
|
||||
|
||||
#endif
|
||||
|
|
@ -1,91 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQFUNCSTATE_H_
|
||||
#define _SQFUNCSTATE_H_
|
||||
///////////////////////////////////
|
||||
#include "squtils.h"
|
||||
|
||||
struct SQFuncState
|
||||
{
|
||||
SQFuncState(SQSharedState *ss,SQFuncState *parent,CompilerErrorFunc efunc,void *ed);
|
||||
~SQFuncState();
|
||||
#ifdef _DEBUG_DUMP
|
||||
void Dump(SQFunctionProto *func);
|
||||
#endif
|
||||
void Error(const SQChar *err);
|
||||
SQFuncState *PushChildState(SQSharedState *ss);
|
||||
void PopChildState();
|
||||
void AddInstruction(SQOpcode _op,SQInteger arg0=0,SQInteger arg1=0,SQInteger arg2=0,SQInteger arg3=0){SQInstruction i(_op,arg0,arg1,arg2,arg3);AddInstruction(i);}
|
||||
void AddInstruction(SQInstruction &i);
|
||||
void SetInstructionParams(SQInteger pos,SQInteger arg0,SQInteger arg1,SQInteger arg2=0,SQInteger arg3=0);
|
||||
void SetInstructionParam(SQInteger pos,SQInteger arg,SQInteger val);
|
||||
SQInstruction &GetInstruction(SQInteger pos){return _instructions[pos];}
|
||||
void PopInstructions(SQInteger size){for(SQInteger i=0;i<size;i++)_instructions.pop_back();}
|
||||
void SetStackSize(SQInteger n);
|
||||
SQInteger CountOuters(SQInteger stacksize);
|
||||
void SnoozeOpt(){_optimization=false;}
|
||||
void AddDefaultParam(SQInteger trg) { _defaultparams.push_back(trg); }
|
||||
SQInteger GetDefaultParamCount() { return _defaultparams.size(); }
|
||||
SQInteger GetCurrentPos(){return _instructions.size()-1;}
|
||||
SQInteger GetNumericConstant(const SQInteger cons);
|
||||
SQInteger GetNumericConstant(const SQFloat cons);
|
||||
SQInteger PushLocalVariable(const SQObject &name);
|
||||
void AddParameter(const SQObject &name);
|
||||
//void AddOuterValue(const SQObject &name);
|
||||
SQInteger GetLocalVariable(const SQObject &name);
|
||||
void MarkLocalAsOuter(SQInteger pos);
|
||||
SQInteger GetOuterVariable(const SQObject &name);
|
||||
SQInteger GenerateCode();
|
||||
SQInteger GetStackSize();
|
||||
SQInteger CalcStackFrameSize();
|
||||
void AddLineInfos(SQInteger line,bool lineop,bool force=false);
|
||||
SQFunctionProto *BuildProto();
|
||||
SQInteger AllocStackPos();
|
||||
SQInteger PushTarget(SQInteger n=-1);
|
||||
SQInteger PopTarget();
|
||||
SQInteger TopTarget();
|
||||
SQInteger GetUpTarget(SQInteger n);
|
||||
void DiscardTarget();
|
||||
bool IsLocal(SQUnsignedInteger stkpos);
|
||||
SQObject CreateString(const SQChar *s,SQInteger len = -1);
|
||||
SQObject CreateTable();
|
||||
bool IsConstant(const SQObject &name,SQObject &e);
|
||||
SQInteger _returnexp;
|
||||
SQLocalVarInfoVec _vlocals;
|
||||
SQIntVec _targetstack;
|
||||
SQInteger _stacksize;
|
||||
bool _varparams;
|
||||
bool _bgenerator;
|
||||
SQIntVec _unresolvedbreaks;
|
||||
SQIntVec _unresolvedcontinues;
|
||||
SQObjectPtrVec _functions;
|
||||
SQObjectPtrVec _parameters;
|
||||
SQOuterVarVec _outervalues;
|
||||
SQInstructionVec _instructions;
|
||||
SQLocalVarInfoVec _localvarinfos;
|
||||
SQObjectPtr _literals;
|
||||
SQObjectPtr _strings;
|
||||
SQObjectPtr _name;
|
||||
SQObjectPtr _sourcename;
|
||||
SQInteger _nliterals;
|
||||
SQLineInfoVec _lineinfos;
|
||||
SQFuncState *_parent;
|
||||
SQIntVec _scope_blocks;
|
||||
SQIntVec _breaktargets;
|
||||
SQIntVec _continuetargets;
|
||||
SQIntVec _defaultparams;
|
||||
SQInteger _lastline;
|
||||
SQInteger _traps; //contains number of nested exception traps
|
||||
SQInteger _outers;
|
||||
bool _optimization;
|
||||
SQSharedState *_sharedstate;
|
||||
sqvector<SQFuncState*> _childstates;
|
||||
SQInteger GetConstant(const SQObject &cons);
|
||||
private:
|
||||
CompilerErrorFunc _errfunc;
|
||||
void *_errtarget;
|
||||
SQSharedState *_ss;
|
||||
};
|
||||
|
||||
|
||||
#endif //_SQFUNCSTATE_H_
|
||||
|
||||
|
|
@ -1,563 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#include <ctype.h>
|
||||
#include <stdlib.h>
|
||||
#include "sqtable.h"
|
||||
#include "sqstring.h"
|
||||
#include "sqcompiler.h"
|
||||
#include "sqlexer.h"
|
||||
|
||||
#define CUR_CHAR (_currdata)
|
||||
#define RETURN_TOKEN(t) { _prevtoken = _curtoken; _curtoken = t; return t;}
|
||||
#define IS_EOB() (CUR_CHAR <= SQUIRREL_EOB)
|
||||
#define NEXT() {Next();_currentcolumn++;}
|
||||
#define INIT_TEMP_STRING() { _longstr.resize(0);}
|
||||
#define APPEND_CHAR(c) { _longstr.push_back(c);}
|
||||
#define TERMINATE_BUFFER() {_longstr.push_back(_SC('\0'));}
|
||||
#define ADD_KEYWORD(key,id) _keywords->NewSlot( SQString::Create(ss, _SC(#key)) ,SQInteger(id))
|
||||
|
||||
SQLexer::SQLexer(){}
|
||||
SQLexer::~SQLexer()
|
||||
{
|
||||
_keywords->Release();
|
||||
}
|
||||
|
||||
void SQLexer::Init(SQSharedState *ss, SQLEXREADFUNC rg, SQUserPointer up,CompilerErrorFunc efunc,void *ed)
|
||||
{
|
||||
_errfunc = efunc;
|
||||
_errtarget = ed;
|
||||
_sharedstate = ss;
|
||||
_keywords = SQTable::Create(ss, 37);
|
||||
ADD_KEYWORD(while, TK_WHILE);
|
||||
ADD_KEYWORD(do, TK_DO);
|
||||
ADD_KEYWORD(if, TK_IF);
|
||||
ADD_KEYWORD(else, TK_ELSE);
|
||||
ADD_KEYWORD(break, TK_BREAK);
|
||||
ADD_KEYWORD(continue, TK_CONTINUE);
|
||||
ADD_KEYWORD(return, TK_RETURN);
|
||||
ADD_KEYWORD(null, TK_NULL);
|
||||
ADD_KEYWORD(function, TK_FUNCTION);
|
||||
ADD_KEYWORD(local, TK_LOCAL);
|
||||
ADD_KEYWORD(for, TK_FOR);
|
||||
ADD_KEYWORD(foreach, TK_FOREACH);
|
||||
ADD_KEYWORD(in, TK_IN);
|
||||
ADD_KEYWORD(typeof, TK_TYPEOF);
|
||||
ADD_KEYWORD(base, TK_BASE);
|
||||
ADD_KEYWORD(delete, TK_DELETE);
|
||||
ADD_KEYWORD(try, TK_TRY);
|
||||
ADD_KEYWORD(catch, TK_CATCH);
|
||||
ADD_KEYWORD(throw, TK_THROW);
|
||||
ADD_KEYWORD(clone, TK_CLONE);
|
||||
ADD_KEYWORD(yield, TK_YIELD);
|
||||
ADD_KEYWORD(resume, TK_RESUME);
|
||||
ADD_KEYWORD(switch, TK_SWITCH);
|
||||
ADD_KEYWORD(case, TK_CASE);
|
||||
ADD_KEYWORD(default, TK_DEFAULT);
|
||||
ADD_KEYWORD(this, TK_THIS);
|
||||
ADD_KEYWORD(class,TK_CLASS);
|
||||
ADD_KEYWORD(extends,TK_EXTENDS);
|
||||
ADD_KEYWORD(constructor,TK_CONSTRUCTOR);
|
||||
ADD_KEYWORD(instanceof,TK_INSTANCEOF);
|
||||
ADD_KEYWORD(true,TK_TRUE);
|
||||
ADD_KEYWORD(false,TK_FALSE);
|
||||
ADD_KEYWORD(static,TK_STATIC);
|
||||
ADD_KEYWORD(enum,TK_ENUM);
|
||||
ADD_KEYWORD(const,TK_CONST);
|
||||
ADD_KEYWORD(__LINE__,TK___LINE__);
|
||||
ADD_KEYWORD(__FILE__,TK___FILE__);
|
||||
ADD_KEYWORD(rawcall, TK_RAWCALL);
|
||||
|
||||
|
||||
_readf = rg;
|
||||
_up = up;
|
||||
_lasttokenline = _currentline = 1;
|
||||
_currentcolumn = 0;
|
||||
_prevtoken = -1;
|
||||
_reached_eof = SQFalse;
|
||||
Next();
|
||||
}
|
||||
|
||||
void SQLexer::Error(const SQChar *err)
|
||||
{
|
||||
_errfunc(_errtarget,err);
|
||||
}
|
||||
|
||||
void SQLexer::Next()
|
||||
{
|
||||
SQInteger t = _readf(_up);
|
||||
if(t > MAX_CHAR) Error(_SC("Invalid character"));
|
||||
if(t != 0) {
|
||||
_currdata = (LexChar)t;
|
||||
return;
|
||||
}
|
||||
_currdata = SQUIRREL_EOB;
|
||||
_reached_eof = SQTrue;
|
||||
}
|
||||
|
||||
const SQChar *SQLexer::Tok2Str(SQInteger tok)
|
||||
{
|
||||
SQObjectPtr itr, key, val;
|
||||
SQInteger nitr;
|
||||
while((nitr = _keywords->Next(false,itr, key, val)) != -1) {
|
||||
itr = (SQInteger)nitr;
|
||||
if(((SQInteger)_integer(val)) == tok)
|
||||
return _stringval(key);
|
||||
}
|
||||
return NULL;
|
||||
}
|
||||
|
||||
void SQLexer::LexBlockComment()
|
||||
{
|
||||
bool done = false;
|
||||
while(!done) {
|
||||
switch(CUR_CHAR) {
|
||||
case _SC('*'): { NEXT(); if(CUR_CHAR == _SC('/')) { done = true; NEXT(); }}; continue;
|
||||
case _SC('\n'): _currentline++; NEXT(); continue;
|
||||
case SQUIRREL_EOB: Error(_SC("missing \"*/\" in comment"));
|
||||
default: NEXT();
|
||||
}
|
||||
}
|
||||
}
|
||||
void SQLexer::LexLineComment()
|
||||
{
|
||||
do { NEXT(); } while (CUR_CHAR != _SC('\n') && (!IS_EOB()));
|
||||
}
|
||||
|
||||
SQInteger SQLexer::Lex()
|
||||
{
|
||||
_lasttokenline = _currentline;
|
||||
while(CUR_CHAR != SQUIRREL_EOB) {
|
||||
switch(CUR_CHAR){
|
||||
case _SC('\t'): case _SC('\r'): case _SC(' '): NEXT(); continue;
|
||||
case _SC('\n'):
|
||||
_currentline++;
|
||||
_prevtoken=_curtoken;
|
||||
_curtoken=_SC('\n');
|
||||
NEXT();
|
||||
_currentcolumn=1;
|
||||
continue;
|
||||
case _SC('#'): LexLineComment(); continue;
|
||||
case _SC('/'):
|
||||
NEXT();
|
||||
switch(CUR_CHAR){
|
||||
case _SC('*'):
|
||||
NEXT();
|
||||
LexBlockComment();
|
||||
continue;
|
||||
case _SC('/'):
|
||||
LexLineComment();
|
||||
continue;
|
||||
case _SC('='):
|
||||
NEXT();
|
||||
RETURN_TOKEN(TK_DIVEQ);
|
||||
continue;
|
||||
case _SC('>'):
|
||||
NEXT();
|
||||
RETURN_TOKEN(TK_ATTR_CLOSE);
|
||||
continue;
|
||||
default:
|
||||
RETURN_TOKEN('/');
|
||||
}
|
||||
case _SC('='):
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC('=')){ RETURN_TOKEN('=') }
|
||||
else { NEXT(); RETURN_TOKEN(TK_EQ); }
|
||||
case _SC('<'):
|
||||
NEXT();
|
||||
switch(CUR_CHAR) {
|
||||
case _SC('='):
|
||||
NEXT();
|
||||
if(CUR_CHAR == _SC('>')) {
|
||||
NEXT();
|
||||
RETURN_TOKEN(TK_3WAYSCMP);
|
||||
}
|
||||
RETURN_TOKEN(TK_LE)
|
||||
break;
|
||||
case _SC('-'): NEXT(); RETURN_TOKEN(TK_NEWSLOT); break;
|
||||
case _SC('<'): NEXT(); RETURN_TOKEN(TK_SHIFTL); break;
|
||||
case _SC('/'): NEXT(); RETURN_TOKEN(TK_ATTR_OPEN); break;
|
||||
}
|
||||
RETURN_TOKEN('<');
|
||||
case _SC('>'):
|
||||
NEXT();
|
||||
if (CUR_CHAR == _SC('=')){ NEXT(); RETURN_TOKEN(TK_GE);}
|
||||
else if(CUR_CHAR == _SC('>')){
|
||||
NEXT();
|
||||
if(CUR_CHAR == _SC('>')){
|
||||
NEXT();
|
||||
RETURN_TOKEN(TK_USHIFTR);
|
||||
}
|
||||
RETURN_TOKEN(TK_SHIFTR);
|
||||
}
|
||||
else { RETURN_TOKEN('>') }
|
||||
case _SC('!'):
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC('=')){ RETURN_TOKEN('!')}
|
||||
else { NEXT(); RETURN_TOKEN(TK_NE); }
|
||||
case _SC('@'): {
|
||||
SQInteger stype;
|
||||
NEXT();
|
||||
if(CUR_CHAR != _SC('"')) {
|
||||
RETURN_TOKEN('@');
|
||||
}
|
||||
if((stype=ReadString('"',true))!=-1) {
|
||||
RETURN_TOKEN(stype);
|
||||
}
|
||||
Error(_SC("error parsing the string"));
|
||||
}
|
||||
case _SC('"'):
|
||||
case _SC('\''): {
|
||||
SQInteger stype;
|
||||
if((stype=ReadString(CUR_CHAR,false))!=-1){
|
||||
RETURN_TOKEN(stype);
|
||||
}
|
||||
Error(_SC("error parsing the string"));
|
||||
}
|
||||
case _SC('{'): case _SC('}'): case _SC('('): case _SC(')'): case _SC('['): case _SC(']'):
|
||||
case _SC(';'): case _SC(','): case _SC('?'): case _SC('^'): case _SC('~'):
|
||||
{SQInteger ret = CUR_CHAR;
|
||||
NEXT(); RETURN_TOKEN(ret); }
|
||||
case _SC('.'):
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC('.')){ RETURN_TOKEN('.') }
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC('.')){ Error(_SC("invalid token '..'")); }
|
||||
NEXT();
|
||||
RETURN_TOKEN(TK_VARPARAMS);
|
||||
case _SC('&'):
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC('&')){ RETURN_TOKEN('&') }
|
||||
else { NEXT(); RETURN_TOKEN(TK_AND); }
|
||||
case _SC('|'):
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC('|')){ RETURN_TOKEN('|') }
|
||||
else { NEXT(); RETURN_TOKEN(TK_OR); }
|
||||
case _SC(':'):
|
||||
NEXT();
|
||||
if (CUR_CHAR != _SC(':')){ RETURN_TOKEN(':') }
|
||||
else { NEXT(); RETURN_TOKEN(TK_DOUBLE_COLON); }
|
||||
case _SC('*'):
|
||||
NEXT();
|
||||
if (CUR_CHAR == _SC('=')){ NEXT(); RETURN_TOKEN(TK_MULEQ);}
|
||||
else RETURN_TOKEN('*');
|
||||
case _SC('%'):
|
||||
NEXT();
|
||||
if (CUR_CHAR == _SC('=')){ NEXT(); RETURN_TOKEN(TK_MODEQ);}
|
||||
else RETURN_TOKEN('%');
|
||||
case _SC('-'):
|
||||
NEXT();
|
||||
if (CUR_CHAR == _SC('=')){ NEXT(); RETURN_TOKEN(TK_MINUSEQ);}
|
||||
else if (CUR_CHAR == _SC('-')){ NEXT(); RETURN_TOKEN(TK_MINUSMINUS);}
|
||||
else RETURN_TOKEN('-');
|
||||
case _SC('+'):
|
||||
NEXT();
|
||||
if (CUR_CHAR == _SC('=')){ NEXT(); RETURN_TOKEN(TK_PLUSEQ);}
|
||||
else if (CUR_CHAR == _SC('+')){ NEXT(); RETURN_TOKEN(TK_PLUSPLUS);}
|
||||
else RETURN_TOKEN('+');
|
||||
case SQUIRREL_EOB:
|
||||
return 0;
|
||||
default:{
|
||||
if (scisdigit(CUR_CHAR)) {
|
||||
SQInteger ret = ReadNumber();
|
||||
RETURN_TOKEN(ret);
|
||||
}
|
||||
else if (scisalpha(CUR_CHAR) || CUR_CHAR == _SC('_')) {
|
||||
SQInteger t = ReadID();
|
||||
RETURN_TOKEN(t);
|
||||
}
|
||||
else {
|
||||
SQInteger c = CUR_CHAR;
|
||||
if (sciscntrl((int)c)) Error(_SC("unexpected character(control)"));
|
||||
NEXT();
|
||||
RETURN_TOKEN(c);
|
||||
}
|
||||
RETURN_TOKEN(0);
|
||||
}
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
SQInteger SQLexer::GetIDType(const SQChar *s,SQInteger len)
|
||||
{
|
||||
SQObjectPtr t;
|
||||
if(_keywords->GetStr(s,len, t)) {
|
||||
return SQInteger(_integer(t));
|
||||
}
|
||||
return TK_IDENTIFIER;
|
||||
}
|
||||
|
||||
#ifdef SQUNICODE
|
||||
#if WCHAR_SIZE == 2
|
||||
SQInteger SQLexer::AddUTF16(SQUnsignedInteger ch)
|
||||
{
|
||||
if (ch >= 0x10000)
|
||||
{
|
||||
SQUnsignedInteger code = (ch - 0x10000);
|
||||
APPEND_CHAR((SQChar)(0xD800 | (code >> 10)));
|
||||
APPEND_CHAR((SQChar)(0xDC00 | (code & 0x3FF)));
|
||||
return 2;
|
||||
}
|
||||
else {
|
||||
APPEND_CHAR((SQChar)ch);
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
#else
|
||||
SQInteger SQLexer::AddUTF8(SQUnsignedInteger ch)
|
||||
{
|
||||
if (ch < 0x80) {
|
||||
APPEND_CHAR((char)ch);
|
||||
return 1;
|
||||
}
|
||||
if (ch < 0x800) {
|
||||
APPEND_CHAR((SQChar)((ch >> 6) | 0xC0));
|
||||
APPEND_CHAR((SQChar)((ch & 0x3F) | 0x80));
|
||||
return 2;
|
||||
}
|
||||
if (ch < 0x10000) {
|
||||
APPEND_CHAR((SQChar)((ch >> 12) | 0xE0));
|
||||
APPEND_CHAR((SQChar)(((ch >> 6) & 0x3F) | 0x80));
|
||||
APPEND_CHAR((SQChar)((ch & 0x3F) | 0x80));
|
||||
return 3;
|
||||
}
|
||||
if (ch < 0x110000) {
|
||||
APPEND_CHAR((SQChar)((ch >> 18) | 0xF0));
|
||||
APPEND_CHAR((SQChar)(((ch >> 12) & 0x3F) | 0x80));
|
||||
APPEND_CHAR((SQChar)(((ch >> 6) & 0x3F) | 0x80));
|
||||
APPEND_CHAR((SQChar)((ch & 0x3F) | 0x80));
|
||||
return 4;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
#endif
|
||||
|
||||
SQInteger SQLexer::ProcessStringHexEscape(SQChar *dest, SQInteger maxdigits)
|
||||
{
|
||||
NEXT();
|
||||
if (!isxdigit(CUR_CHAR)) Error(_SC("hexadecimal number expected"));
|
||||
SQInteger n = 0;
|
||||
while (isxdigit(CUR_CHAR) && n < maxdigits) {
|
||||
dest[n] = CUR_CHAR;
|
||||
n++;
|
||||
NEXT();
|
||||
}
|
||||
dest[n] = 0;
|
||||
return n;
|
||||
}
|
||||
|
||||
SQInteger SQLexer::ReadString(SQInteger ndelim,bool verbatim)
|
||||
{
|
||||
INIT_TEMP_STRING();
|
||||
NEXT();
|
||||
if(IS_EOB()) return -1;
|
||||
for(;;) {
|
||||
while(CUR_CHAR != ndelim) {
|
||||
SQInteger x = CUR_CHAR;
|
||||
switch (x) {
|
||||
case SQUIRREL_EOB:
|
||||
Error(_SC("unfinished string"));
|
||||
return -1;
|
||||
case _SC('\n'):
|
||||
if(!verbatim) Error(_SC("newline in a constant"));
|
||||
APPEND_CHAR(CUR_CHAR); NEXT();
|
||||
_currentline++;
|
||||
break;
|
||||
case _SC('\\'):
|
||||
if(verbatim) {
|
||||
APPEND_CHAR('\\'); NEXT();
|
||||
}
|
||||
else {
|
||||
NEXT();
|
||||
switch(CUR_CHAR) {
|
||||
case _SC('x'): {
|
||||
const SQInteger maxdigits = sizeof(SQChar) * 2;
|
||||
SQChar temp[maxdigits + 1];
|
||||
ProcessStringHexEscape(temp, maxdigits);
|
||||
SQChar *stemp;
|
||||
APPEND_CHAR((SQChar)scstrtoul(temp, &stemp, 16));
|
||||
}
|
||||
break;
|
||||
case _SC('U'):
|
||||
case _SC('u'): {
|
||||
const SQInteger maxdigits = CUR_CHAR == 'u' ? 4 : 8;
|
||||
SQChar temp[8 + 1];
|
||||
ProcessStringHexEscape(temp, maxdigits);
|
||||
SQChar *stemp;
|
||||
#ifdef SQUNICODE
|
||||
#if WCHAR_SIZE == 2
|
||||
AddUTF16(scstrtoul(temp, &stemp, 16));
|
||||
#else
|
||||
APPEND_CHAR((SQChar)scstrtoul(temp, &stemp, 16));
|
||||
#endif
|
||||
#else
|
||||
AddUTF8(scstrtoul(temp, &stemp, 16));
|
||||
#endif
|
||||
}
|
||||
break;
|
||||
case _SC('t'): APPEND_CHAR(_SC('\t')); NEXT(); break;
|
||||
case _SC('a'): APPEND_CHAR(_SC('\a')); NEXT(); break;
|
||||
case _SC('b'): APPEND_CHAR(_SC('\b')); NEXT(); break;
|
||||
case _SC('n'): APPEND_CHAR(_SC('\n')); NEXT(); break;
|
||||
case _SC('r'): APPEND_CHAR(_SC('\r')); NEXT(); break;
|
||||
case _SC('v'): APPEND_CHAR(_SC('\v')); NEXT(); break;
|
||||
case _SC('f'): APPEND_CHAR(_SC('\f')); NEXT(); break;
|
||||
case _SC('0'): APPEND_CHAR(_SC('\0')); NEXT(); break;
|
||||
case _SC('\\'): APPEND_CHAR(_SC('\\')); NEXT(); break;
|
||||
case _SC('"'): APPEND_CHAR(_SC('"')); NEXT(); break;
|
||||
case _SC('\''): APPEND_CHAR(_SC('\'')); NEXT(); break;
|
||||
default:
|
||||
Error(_SC("unrecognised escaper char"));
|
||||
break;
|
||||
}
|
||||
}
|
||||
break;
|
||||
default:
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
}
|
||||
}
|
||||
NEXT();
|
||||
if(verbatim && CUR_CHAR == '"') { //double quotation
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
}
|
||||
else {
|
||||
break;
|
||||
}
|
||||
}
|
||||
TERMINATE_BUFFER();
|
||||
SQInteger len = _longstr.size()-1;
|
||||
if(ndelim == _SC('\'')) {
|
||||
if(len == 0) Error(_SC("empty constant"));
|
||||
if(len > 1) Error(_SC("constant too long"));
|
||||
_nvalue = _longstr[0];
|
||||
return TK_INTEGER;
|
||||
}
|
||||
_svalue = &_longstr[0];
|
||||
return TK_STRING_LITERAL;
|
||||
}
|
||||
|
||||
void LexHexadecimal(const SQChar *s,SQUnsignedInteger *res)
|
||||
{
|
||||
*res = 0;
|
||||
while(*s != 0)
|
||||
{
|
||||
if(scisdigit(*s)) *res = (*res)*16+((*s++)-'0');
|
||||
else if(scisxdigit(*s)) *res = (*res)*16+(toupper(*s++)-'A'+10);
|
||||
else { assert(0); }
|
||||
}
|
||||
}
|
||||
|
||||
void LexInteger(const SQChar *s,SQUnsignedInteger *res)
|
||||
{
|
||||
*res = 0;
|
||||
while(*s != 0)
|
||||
{
|
||||
*res = (*res)*10+((*s++)-'0');
|
||||
}
|
||||
}
|
||||
|
||||
SQInteger scisodigit(SQInteger c) { return c >= _SC('0') && c <= _SC('7'); }
|
||||
|
||||
void LexOctal(const SQChar *s,SQUnsignedInteger *res)
|
||||
{
|
||||
*res = 0;
|
||||
while(*s != 0)
|
||||
{
|
||||
if(scisodigit(*s)) *res = (*res)*8+((*s++)-'0');
|
||||
else { assert(0); }
|
||||
}
|
||||
}
|
||||
|
||||
SQInteger isexponent(SQInteger c) { return c == 'e' || c=='E'; }
|
||||
|
||||
|
||||
#define MAX_HEX_DIGITS (sizeof(SQInteger)*2)
|
||||
SQInteger SQLexer::ReadNumber()
|
||||
{
|
||||
#define TINT 1
|
||||
#define TFLOAT 2
|
||||
#define THEX 3
|
||||
#define TSCIENTIFIC 4
|
||||
#define TOCTAL 5
|
||||
SQInteger type = TINT, firstchar = CUR_CHAR;
|
||||
SQChar *sTemp;
|
||||
INIT_TEMP_STRING();
|
||||
NEXT();
|
||||
if(firstchar == _SC('0') && (toupper(CUR_CHAR) == _SC('X') || scisodigit(CUR_CHAR)) ) {
|
||||
if(scisodigit(CUR_CHAR)) {
|
||||
type = TOCTAL;
|
||||
while(scisodigit(CUR_CHAR)) {
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
}
|
||||
if(scisdigit(CUR_CHAR)) Error(_SC("invalid octal number"));
|
||||
}
|
||||
else {
|
||||
NEXT();
|
||||
type = THEX;
|
||||
while(isxdigit(CUR_CHAR)) {
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
}
|
||||
if(_longstr.size() > MAX_HEX_DIGITS) Error(_SC("too many digits for an Hex number"));
|
||||
}
|
||||
}
|
||||
else {
|
||||
APPEND_CHAR((int)firstchar);
|
||||
while (CUR_CHAR == _SC('.') || scisdigit(CUR_CHAR) || isexponent(CUR_CHAR)) {
|
||||
if(CUR_CHAR == _SC('.') || isexponent(CUR_CHAR)) type = TFLOAT;
|
||||
if(isexponent(CUR_CHAR)) {
|
||||
if(type != TFLOAT) Error(_SC("invalid numeric format"));
|
||||
type = TSCIENTIFIC;
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
if(CUR_CHAR == '+' || CUR_CHAR == '-'){
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
}
|
||||
if(!scisdigit(CUR_CHAR)) Error(_SC("exponent expected"));
|
||||
}
|
||||
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
}
|
||||
}
|
||||
TERMINATE_BUFFER();
|
||||
switch(type) {
|
||||
case TSCIENTIFIC:
|
||||
case TFLOAT:
|
||||
_fvalue = (SQFloat)scstrtod(&_longstr[0],&sTemp);
|
||||
return TK_FLOAT;
|
||||
case TINT:
|
||||
LexInteger(&_longstr[0],(SQUnsignedInteger *)&_nvalue);
|
||||
return TK_INTEGER;
|
||||
case THEX:
|
||||
LexHexadecimal(&_longstr[0],(SQUnsignedInteger *)&_nvalue);
|
||||
return TK_INTEGER;
|
||||
case TOCTAL:
|
||||
LexOctal(&_longstr[0],(SQUnsignedInteger *)&_nvalue);
|
||||
return TK_INTEGER;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
SQInteger SQLexer::ReadID()
|
||||
{
|
||||
SQInteger res;
|
||||
INIT_TEMP_STRING();
|
||||
do {
|
||||
APPEND_CHAR(CUR_CHAR);
|
||||
NEXT();
|
||||
} while(scisalnum(CUR_CHAR) || CUR_CHAR == _SC('_'));
|
||||
TERMINATE_BUFFER();
|
||||
res = GetIDType(&_longstr[0],_longstr.size() - 1);
|
||||
if(res == TK_IDENTIFIER || res == TK_CONSTRUCTOR) {
|
||||
_svalue = &_longstr[0];
|
||||
}
|
||||
return res;
|
||||
}
|
||||
|
|
@ -1,55 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQLEXER_H_
|
||||
#define _SQLEXER_H_
|
||||
|
||||
#ifdef SQUNICODE
|
||||
typedef SQChar LexChar;
|
||||
#else
|
||||
typedef unsigned char LexChar;
|
||||
#endif
|
||||
|
||||
struct SQLexer
|
||||
{
|
||||
SQLexer();
|
||||
~SQLexer();
|
||||
void Init(SQSharedState *ss,SQLEXREADFUNC rg,SQUserPointer up,CompilerErrorFunc efunc,void *ed);
|
||||
void Error(const SQChar *err);
|
||||
SQInteger Lex();
|
||||
const SQChar *Tok2Str(SQInteger tok);
|
||||
private:
|
||||
SQInteger GetIDType(const SQChar *s,SQInteger len);
|
||||
SQInteger ReadString(SQInteger ndelim,bool verbatim);
|
||||
SQInteger ReadNumber();
|
||||
void LexBlockComment();
|
||||
void LexLineComment();
|
||||
SQInteger ReadID();
|
||||
void Next();
|
||||
#ifdef SQUNICODE
|
||||
#if WCHAR_SIZE == 2
|
||||
SQInteger AddUTF16(SQUnsignedInteger ch);
|
||||
#endif
|
||||
#else
|
||||
SQInteger AddUTF8(SQUnsignedInteger ch);
|
||||
#endif
|
||||
SQInteger ProcessStringHexEscape(SQChar *dest, SQInteger maxdigits);
|
||||
SQInteger _curtoken;
|
||||
SQTable *_keywords;
|
||||
SQBool _reached_eof;
|
||||
public:
|
||||
SQInteger _prevtoken;
|
||||
SQInteger _currentline;
|
||||
SQInteger _lasttokenline;
|
||||
SQInteger _currentcolumn;
|
||||
const SQChar *_svalue;
|
||||
SQInteger _nvalue;
|
||||
SQFloat _fvalue;
|
||||
SQLEXREADFUNC _readf;
|
||||
SQUserPointer _up;
|
||||
LexChar _currdata;
|
||||
SQSharedState *_sharedstate;
|
||||
sqvector<SQChar> _longstr;
|
||||
CompilerErrorFunc _errfunc;
|
||||
void *_errtarget;
|
||||
};
|
||||
|
||||
#endif
|
||||
|
|
@ -1,11 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#ifndef SQ_EXCLUDE_DEFAULT_MEMFUNCTIONS
|
||||
void *sq_vm_malloc(SQUnsignedInteger size){ return malloc(size); }
|
||||
|
||||
void *sq_vm_realloc(void *p, SQUnsignedInteger SQ_UNUSED_ARG(oldsize), SQUnsignedInteger size){ return realloc(p, size); }
|
||||
|
||||
void sq_vm_free(void *p, SQUnsignedInteger SQ_UNUSED_ARG(size)){ free(p); }
|
||||
#endif
|
||||
|
|
@ -1,677 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#include "sqvm.h"
|
||||
#include "sqstring.h"
|
||||
#include "sqarray.h"
|
||||
#include "sqtable.h"
|
||||
#include "squserdata.h"
|
||||
#include "sqfuncproto.h"
|
||||
#include "sqclass.h"
|
||||
#include "sqclosure.h"
|
||||
|
||||
|
||||
const SQChar *IdType2Name(SQObjectType type)
|
||||
{
|
||||
switch(_RAW_TYPE(type))
|
||||
{
|
||||
case _RT_NULL:return _SC("null");
|
||||
case _RT_INTEGER:return _SC("integer");
|
||||
case _RT_FLOAT:return _SC("float");
|
||||
case _RT_BOOL:return _SC("bool");
|
||||
case _RT_STRING:return _SC("string");
|
||||
case _RT_TABLE:return _SC("table");
|
||||
case _RT_ARRAY:return _SC("array");
|
||||
case _RT_GENERATOR:return _SC("generator");
|
||||
case _RT_CLOSURE:
|
||||
case _RT_NATIVECLOSURE:
|
||||
return _SC("function");
|
||||
case _RT_USERDATA:
|
||||
case _RT_USERPOINTER:
|
||||
return _SC("userdata");
|
||||
case _RT_THREAD: return _SC("thread");
|
||||
case _RT_FUNCPROTO: return _SC("function");
|
||||
case _RT_CLASS: return _SC("class");
|
||||
case _RT_INSTANCE: return _SC("instance");
|
||||
case _RT_WEAKREF: return _SC("weakref");
|
||||
case _RT_OUTER: return _SC("outer");
|
||||
default:
|
||||
return NULL;
|
||||
}
|
||||
}
|
||||
|
||||
const SQChar *GetTypeName(const SQObjectPtr &obj1)
|
||||
{
|
||||
return IdType2Name(sq_type(obj1));
|
||||
}
|
||||
|
||||
SQString *SQString::Create(SQSharedState *ss,const SQChar *s,SQInteger len)
|
||||
{
|
||||
SQString *str=ADD_STRING(ss,s,len);
|
||||
return str;
|
||||
}
|
||||
|
||||
void SQString::Release()
|
||||
{
|
||||
REMOVE_STRING(_sharedstate,this);
|
||||
}
|
||||
|
||||
SQInteger SQString::Next(const SQObjectPtr &refpos, SQObjectPtr &outkey, SQObjectPtr &outval)
|
||||
{
|
||||
SQInteger idx = (SQInteger)TranslateIndex(refpos);
|
||||
while(idx < _len){
|
||||
outkey = (SQInteger)idx;
|
||||
outval = (SQInteger)((SQUnsignedInteger)_val[idx]);
|
||||
//return idx for the next iteration
|
||||
return ++idx;
|
||||
}
|
||||
//nothing to iterate anymore
|
||||
return -1;
|
||||
}
|
||||
|
||||
SQUnsignedInteger TranslateIndex(const SQObjectPtr &idx)
|
||||
{
|
||||
switch(sq_type(idx)){
|
||||
case OT_NULL:
|
||||
return 0;
|
||||
case OT_INTEGER:
|
||||
return (SQUnsignedInteger)_integer(idx);
|
||||
default: assert(0); break;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
SQWeakRef *SQRefCounted::GetWeakRef(SQObjectType type)
|
||||
{
|
||||
if(!_weakref) {
|
||||
sq_new(_weakref,SQWeakRef);
|
||||
#if defined(SQUSEDOUBLE) && !defined(_SQ64)
|
||||
_weakref->_obj._unVal.raw = 0; //clean the whole union on 32 bits with double
|
||||
#endif
|
||||
_weakref->_obj._type = type;
|
||||
_weakref->_obj._unVal.pRefCounted = this;
|
||||
}
|
||||
return _weakref;
|
||||
}
|
||||
|
||||
SQRefCounted::~SQRefCounted()
|
||||
{
|
||||
if(_weakref) {
|
||||
_weakref->_obj._type = OT_NULL;
|
||||
_weakref->_obj._unVal.pRefCounted = NULL;
|
||||
}
|
||||
}
|
||||
|
||||
void SQWeakRef::Release() {
|
||||
if(ISREFCOUNTED(_obj._type)) {
|
||||
_obj._unVal.pRefCounted->_weakref = NULL;
|
||||
}
|
||||
sq_delete(this,SQWeakRef);
|
||||
}
|
||||
|
||||
bool SQDelegable::GetMetaMethod(SQVM *v,SQMetaMethod mm,SQObjectPtr &res) {
|
||||
if(_delegate) {
|
||||
return _delegate->Get((*_ss(v)->_metamethods)[mm],res);
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
bool SQDelegable::SetDelegate(SQTable *mt)
|
||||
{
|
||||
SQTable *temp = mt;
|
||||
if(temp == this) return false;
|
||||
while (temp) {
|
||||
if (temp->_delegate == this) return false; //cycle detected
|
||||
temp = temp->_delegate;
|
||||
}
|
||||
if (mt) __ObjAddRef(mt);
|
||||
__ObjRelease(_delegate);
|
||||
_delegate = mt;
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SQGenerator::Yield(SQVM *v,SQInteger target)
|
||||
{
|
||||
if(_state==eSuspended) { v->Raise_Error(_SC("internal vm error, yielding dead generator")); return false;}
|
||||
if(_state==eDead) { v->Raise_Error(_SC("internal vm error, yielding a dead generator")); return false; }
|
||||
SQInteger size = v->_top-v->_stackbase;
|
||||
|
||||
_stack.resize(size);
|
||||
SQObject _this = v->_stack[v->_stackbase];
|
||||
_stack._vals[0] = ISREFCOUNTED(sq_type(_this)) ? SQObjectPtr(_refcounted(_this)->GetWeakRef(sq_type(_this))) : _this;
|
||||
for(SQInteger n =1; n<target; n++) {
|
||||
_stack._vals[n] = v->_stack[v->_stackbase+n];
|
||||
}
|
||||
for(SQInteger j =0; j < size; j++)
|
||||
{
|
||||
v->_stack[v->_stackbase+j].Null();
|
||||
}
|
||||
|
||||
_ci = *v->ci;
|
||||
_ci._generator=NULL;
|
||||
for(SQInteger i=0;i<_ci._etraps;i++) {
|
||||
_etraps.push_back(v->_etraps.top());
|
||||
v->_etraps.pop_back();
|
||||
// store relative stack base and size in case of resume to other _top
|
||||
SQExceptionTrap &et = _etraps.back();
|
||||
et._stackbase -= v->_stackbase;
|
||||
et._stacksize -= v->_stackbase;
|
||||
}
|
||||
_state=eSuspended;
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SQGenerator::Resume(SQVM *v,SQObjectPtr &dest)
|
||||
{
|
||||
if(_state==eDead){ v->Raise_Error(_SC("resuming dead generator")); return false; }
|
||||
if(_state==eRunning){ v->Raise_Error(_SC("resuming active generator")); return false; }
|
||||
SQInteger size = _stack.size();
|
||||
SQInteger target = &dest - &(v->_stack._vals[v->_stackbase]);
|
||||
assert(target>=0 && target<=255);
|
||||
SQInteger newbase = v->_top;
|
||||
if(!v->EnterFrame(v->_top, v->_top + size, false))
|
||||
return false;
|
||||
v->ci->_generator = this;
|
||||
v->ci->_target = (SQInt32)target;
|
||||
v->ci->_closure = _ci._closure;
|
||||
v->ci->_ip = _ci._ip;
|
||||
v->ci->_literals = _ci._literals;
|
||||
v->ci->_ncalls = _ci._ncalls;
|
||||
v->ci->_etraps = _ci._etraps;
|
||||
v->ci->_root = _ci._root;
|
||||
|
||||
|
||||
for(SQInteger i=0;i<_ci._etraps;i++) {
|
||||
v->_etraps.push_back(_etraps.top());
|
||||
_etraps.pop_back();
|
||||
SQExceptionTrap &et = v->_etraps.back();
|
||||
// restore absolute stack base and size
|
||||
et._stackbase += newbase;
|
||||
et._stacksize += newbase;
|
||||
}
|
||||
SQObject _this = _stack._vals[0];
|
||||
v->_stack[v->_stackbase] = sq_type(_this) == OT_WEAKREF ? _weakref(_this)->_obj : _this;
|
||||
|
||||
for(SQInteger n = 1; n<size; n++) {
|
||||
v->_stack[v->_stackbase+n] = _stack._vals[n];
|
||||
_stack._vals[n].Null();
|
||||
}
|
||||
|
||||
_state=eRunning;
|
||||
if (v->_debughook)
|
||||
v->CallDebugHook(_SC('c'));
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
void SQArray::Extend(const SQArray *a){
|
||||
SQInteger xlen;
|
||||
if((xlen=a->Size()))
|
||||
for(SQInteger i=0;i<xlen;i++)
|
||||
Append(a->_values[i]);
|
||||
}
|
||||
|
||||
const SQChar* SQFunctionProto::GetLocal(SQVM *vm,SQUnsignedInteger stackbase,SQUnsignedInteger nseq,SQUnsignedInteger nop)
|
||||
{
|
||||
SQUnsignedInteger nvars=_nlocalvarinfos;
|
||||
const SQChar *res=NULL;
|
||||
if(nvars>=nseq){
|
||||
for(SQUnsignedInteger i=0;i<nvars;i++){
|
||||
if(_localvarinfos[i]._start_op<=nop && _localvarinfos[i]._end_op>=nop)
|
||||
{
|
||||
if(nseq==0){
|
||||
vm->Push(vm->_stack[stackbase+_localvarinfos[i]._pos]);
|
||||
res=_stringval(_localvarinfos[i]._name);
|
||||
break;
|
||||
}
|
||||
nseq--;
|
||||
}
|
||||
}
|
||||
}
|
||||
return res;
|
||||
}
|
||||
|
||||
|
||||
SQInteger SQFunctionProto::GetLine(SQInstruction *curr)
|
||||
{
|
||||
SQInteger op = (SQInteger)(curr-_instructions);
|
||||
SQInteger line=_lineinfos[0]._line;
|
||||
SQInteger low = 0;
|
||||
SQInteger high = _nlineinfos - 1;
|
||||
SQInteger mid = 0;
|
||||
while(low <= high)
|
||||
{
|
||||
mid = low + ((high - low) >> 1);
|
||||
SQInteger curop = _lineinfos[mid]._op;
|
||||
if(curop > op)
|
||||
{
|
||||
high = mid - 1;
|
||||
}
|
||||
else if(curop < op) {
|
||||
if(mid < (_nlineinfos - 1)
|
||||
&& _lineinfos[mid + 1]._op >= op) {
|
||||
break;
|
||||
}
|
||||
low = mid + 1;
|
||||
}
|
||||
else { //equal
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
while(mid > 0 && _lineinfos[mid]._op >= op) mid--;
|
||||
|
||||
line = _lineinfos[mid]._line;
|
||||
|
||||
return line;
|
||||
}
|
||||
|
||||
SQClosure::~SQClosure()
|
||||
{
|
||||
__ObjRelease(_root);
|
||||
__ObjRelease(_env);
|
||||
__ObjRelease(_base);
|
||||
REMOVE_FROM_CHAIN(&_ss(this)->_gc_chain,this);
|
||||
}
|
||||
|
||||
#define _CHECK_IO(exp) { if(!exp)return false; }
|
||||
bool SafeWrite(HSQUIRRELVM v,SQWRITEFUNC write,SQUserPointer up,SQUserPointer dest,SQInteger size)
|
||||
{
|
||||
if(write(up,dest,size) != size) {
|
||||
v->Raise_Error(_SC("io error (write function failure)"));
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SafeRead(HSQUIRRELVM v,SQREADFUNC read,SQUserPointer up,SQUserPointer dest,SQInteger size)
|
||||
{
|
||||
if(size && read(up,dest,size) != size) {
|
||||
v->Raise_Error(_SC("io error, read function failure, the origin stream could be corrupted/trucated"));
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
bool WriteTag(HSQUIRRELVM v,SQWRITEFUNC write,SQUserPointer up,SQUnsignedInteger32 tag)
|
||||
{
|
||||
return SafeWrite(v,write,up,&tag,sizeof(tag));
|
||||
}
|
||||
|
||||
bool CheckTag(HSQUIRRELVM v,SQREADFUNC read,SQUserPointer up,SQUnsignedInteger32 tag)
|
||||
{
|
||||
SQUnsignedInteger32 t;
|
||||
_CHECK_IO(SafeRead(v,read,up,&t,sizeof(t)));
|
||||
if(t != tag){
|
||||
v->Raise_Error(_SC("invalid or corrupted closure stream"));
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
bool WriteObject(HSQUIRRELVM v,SQUserPointer up,SQWRITEFUNC write,SQObjectPtr &o)
|
||||
{
|
||||
SQUnsignedInteger32 _type = (SQUnsignedInteger32)sq_type(o);
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_type,sizeof(_type)));
|
||||
switch(sq_type(o)){
|
||||
case OT_STRING:
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_string(o)->_len,sizeof(SQInteger)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,_stringval(o),sq_rsl(_string(o)->_len)));
|
||||
break;
|
||||
case OT_BOOL:
|
||||
case OT_INTEGER:
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_integer(o),sizeof(SQInteger)));break;
|
||||
case OT_FLOAT:
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_float(o),sizeof(SQFloat)));break;
|
||||
case OT_NULL:
|
||||
break;
|
||||
default:
|
||||
v->Raise_Error(_SC("cannot serialize a %s"),GetTypeName(o));
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
bool ReadObject(HSQUIRRELVM v,SQUserPointer up,SQREADFUNC read,SQObjectPtr &o)
|
||||
{
|
||||
SQUnsignedInteger32 _type;
|
||||
_CHECK_IO(SafeRead(v,read,up,&_type,sizeof(_type)));
|
||||
SQObjectType t = (SQObjectType)_type;
|
||||
switch(t){
|
||||
case OT_STRING:{
|
||||
SQInteger len;
|
||||
_CHECK_IO(SafeRead(v,read,up,&len,sizeof(SQInteger)));
|
||||
_CHECK_IO(SafeRead(v,read,up,_ss(v)->GetScratchPad(sq_rsl(len)),sq_rsl(len)));
|
||||
o=SQString::Create(_ss(v),_ss(v)->GetScratchPad(-1),len);
|
||||
}
|
||||
break;
|
||||
case OT_INTEGER:{
|
||||
SQInteger i;
|
||||
_CHECK_IO(SafeRead(v,read,up,&i,sizeof(SQInteger))); o = i; break;
|
||||
}
|
||||
case OT_BOOL:{
|
||||
SQInteger i;
|
||||
_CHECK_IO(SafeRead(v,read,up,&i,sizeof(SQInteger))); o._type = OT_BOOL; o._unVal.nInteger = i; break;
|
||||
}
|
||||
case OT_FLOAT:{
|
||||
SQFloat f;
|
||||
_CHECK_IO(SafeRead(v,read,up,&f,sizeof(SQFloat))); o = f; break;
|
||||
}
|
||||
case OT_NULL:
|
||||
o.Null();
|
||||
break;
|
||||
default:
|
||||
v->Raise_Error(_SC("cannot serialize a %s"),IdType2Name(t));
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SQClosure::Save(SQVM *v,SQUserPointer up,SQWRITEFUNC write)
|
||||
{
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_HEAD));
|
||||
_CHECK_IO(WriteTag(v,write,up,sizeof(SQChar)));
|
||||
_CHECK_IO(WriteTag(v,write,up,sizeof(SQInteger)));
|
||||
_CHECK_IO(WriteTag(v,write,up,sizeof(SQFloat)));
|
||||
_CHECK_IO(_function->Save(v,up,write));
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_TAIL));
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SQClosure::Load(SQVM *v,SQUserPointer up,SQREADFUNC read,SQObjectPtr &ret)
|
||||
{
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_HEAD));
|
||||
_CHECK_IO(CheckTag(v,read,up,sizeof(SQChar)));
|
||||
_CHECK_IO(CheckTag(v,read,up,sizeof(SQInteger)));
|
||||
_CHECK_IO(CheckTag(v,read,up,sizeof(SQFloat)));
|
||||
SQObjectPtr func;
|
||||
_CHECK_IO(SQFunctionProto::Load(v,up,read,func));
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_TAIL));
|
||||
ret = SQClosure::Create(_ss(v),_funcproto(func),_table(v->_roottable)->GetWeakRef(OT_TABLE));
|
||||
//FIXME: load an root for this closure
|
||||
return true;
|
||||
}
|
||||
|
||||
SQFunctionProto::SQFunctionProto(SQSharedState *ss)
|
||||
{
|
||||
_stacksize=0;
|
||||
_bgenerator=false;
|
||||
INIT_CHAIN();ADD_TO_CHAIN(&_ss(this)->_gc_chain,this);
|
||||
}
|
||||
|
||||
SQFunctionProto::~SQFunctionProto()
|
||||
{
|
||||
REMOVE_FROM_CHAIN(&_ss(this)->_gc_chain,this);
|
||||
}
|
||||
|
||||
bool SQFunctionProto::Save(SQVM *v,SQUserPointer up,SQWRITEFUNC write)
|
||||
{
|
||||
SQInteger i,nliterals = _nliterals,nparameters = _nparameters;
|
||||
SQInteger noutervalues = _noutervalues,nlocalvarinfos = _nlocalvarinfos;
|
||||
SQInteger nlineinfos=_nlineinfos,ninstructions = _ninstructions,nfunctions=_nfunctions;
|
||||
SQInteger ndefaultparams = _ndefaultparams;
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(WriteObject(v,up,write,_sourcename));
|
||||
_CHECK_IO(WriteObject(v,up,write,_name));
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&nliterals,sizeof(nliterals)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&nparameters,sizeof(nparameters)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&noutervalues,sizeof(noutervalues)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&nlocalvarinfos,sizeof(nlocalvarinfos)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&nlineinfos,sizeof(nlineinfos)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&ndefaultparams,sizeof(ndefaultparams)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&ninstructions,sizeof(ninstructions)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&nfunctions,sizeof(nfunctions)));
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
for(i=0;i<nliterals;i++){
|
||||
_CHECK_IO(WriteObject(v,up,write,_literals[i]));
|
||||
}
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
for(i=0;i<nparameters;i++){
|
||||
_CHECK_IO(WriteObject(v,up,write,_parameters[i]));
|
||||
}
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
for(i=0;i<noutervalues;i++){
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_outervalues[i]._type,sizeof(SQUnsignedInteger)));
|
||||
_CHECK_IO(WriteObject(v,up,write,_outervalues[i]._src));
|
||||
_CHECK_IO(WriteObject(v,up,write,_outervalues[i]._name));
|
||||
}
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
for(i=0;i<nlocalvarinfos;i++){
|
||||
SQLocalVarInfo &lvi=_localvarinfos[i];
|
||||
_CHECK_IO(WriteObject(v,up,write,lvi._name));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&lvi._pos,sizeof(SQUnsignedInteger)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&lvi._start_op,sizeof(SQUnsignedInteger)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&lvi._end_op,sizeof(SQUnsignedInteger)));
|
||||
}
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeWrite(v,write,up,_lineinfos,sizeof(SQLineInfo)*nlineinfos));
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeWrite(v,write,up,_defaultparams,sizeof(SQInteger)*ndefaultparams));
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeWrite(v,write,up,_instructions,sizeof(SQInstruction)*ninstructions));
|
||||
|
||||
_CHECK_IO(WriteTag(v,write,up,SQ_CLOSURESTREAM_PART));
|
||||
for(i=0;i<nfunctions;i++){
|
||||
_CHECK_IO(_funcproto(_functions[i])->Save(v,up,write));
|
||||
}
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_stacksize,sizeof(_stacksize)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_bgenerator,sizeof(_bgenerator)));
|
||||
_CHECK_IO(SafeWrite(v,write,up,&_varparams,sizeof(_varparams)));
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SQFunctionProto::Load(SQVM *v,SQUserPointer up,SQREADFUNC read,SQObjectPtr &ret)
|
||||
{
|
||||
SQInteger i, nliterals,nparameters;
|
||||
SQInteger noutervalues ,nlocalvarinfos ;
|
||||
SQInteger nlineinfos,ninstructions ,nfunctions,ndefaultparams ;
|
||||
SQObjectPtr sourcename, name;
|
||||
SQObjectPtr o;
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(ReadObject(v, up, read, sourcename));
|
||||
_CHECK_IO(ReadObject(v, up, read, name));
|
||||
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeRead(v,read,up, &nliterals, sizeof(nliterals)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &nparameters, sizeof(nparameters)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &noutervalues, sizeof(noutervalues)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &nlocalvarinfos, sizeof(nlocalvarinfos)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &nlineinfos, sizeof(nlineinfos)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &ndefaultparams, sizeof(ndefaultparams)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &ninstructions, sizeof(ninstructions)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &nfunctions, sizeof(nfunctions)));
|
||||
|
||||
|
||||
SQFunctionProto *f = SQFunctionProto::Create(_opt_ss(v),ninstructions,nliterals,nparameters,
|
||||
nfunctions,noutervalues,nlineinfos,nlocalvarinfos,ndefaultparams);
|
||||
SQObjectPtr proto = f; //gets a ref in case of failure
|
||||
f->_sourcename = sourcename;
|
||||
f->_name = name;
|
||||
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
|
||||
for(i = 0;i < nliterals; i++){
|
||||
_CHECK_IO(ReadObject(v, up, read, o));
|
||||
f->_literals[i] = o;
|
||||
}
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
|
||||
for(i = 0; i < nparameters; i++){
|
||||
_CHECK_IO(ReadObject(v, up, read, o));
|
||||
f->_parameters[i] = o;
|
||||
}
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
|
||||
for(i = 0; i < noutervalues; i++){
|
||||
SQUnsignedInteger type;
|
||||
SQObjectPtr name;
|
||||
_CHECK_IO(SafeRead(v,read,up, &type, sizeof(SQUnsignedInteger)));
|
||||
_CHECK_IO(ReadObject(v, up, read, o));
|
||||
_CHECK_IO(ReadObject(v, up, read, name));
|
||||
f->_outervalues[i] = SQOuterVar(name,o, (SQOuterType)type);
|
||||
}
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
|
||||
for(i = 0; i < nlocalvarinfos; i++){
|
||||
SQLocalVarInfo lvi;
|
||||
_CHECK_IO(ReadObject(v, up, read, lvi._name));
|
||||
_CHECK_IO(SafeRead(v,read,up, &lvi._pos, sizeof(SQUnsignedInteger)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &lvi._start_op, sizeof(SQUnsignedInteger)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &lvi._end_op, sizeof(SQUnsignedInteger)));
|
||||
f->_localvarinfos[i] = lvi;
|
||||
}
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeRead(v,read,up, f->_lineinfos, sizeof(SQLineInfo)*nlineinfos));
|
||||
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeRead(v,read,up, f->_defaultparams, sizeof(SQInteger)*ndefaultparams));
|
||||
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
_CHECK_IO(SafeRead(v,read,up, f->_instructions, sizeof(SQInstruction)*ninstructions));
|
||||
|
||||
_CHECK_IO(CheckTag(v,read,up,SQ_CLOSURESTREAM_PART));
|
||||
for(i = 0; i < nfunctions; i++){
|
||||
_CHECK_IO(_funcproto(o)->Load(v, up, read, o));
|
||||
f->_functions[i] = o;
|
||||
}
|
||||
_CHECK_IO(SafeRead(v,read,up, &f->_stacksize, sizeof(f->_stacksize)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &f->_bgenerator, sizeof(f->_bgenerator)));
|
||||
_CHECK_IO(SafeRead(v,read,up, &f->_varparams, sizeof(f->_varparams)));
|
||||
|
||||
ret = f;
|
||||
return true;
|
||||
}
|
||||
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
|
||||
#define START_MARK() if(!(_uiRef&MARK_FLAG)){ \
|
||||
_uiRef|=MARK_FLAG;
|
||||
|
||||
#define END_MARK() RemoveFromChain(&_sharedstate->_gc_chain, this); \
|
||||
AddToChain(chain, this); }
|
||||
|
||||
void SQVM::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
SQSharedState::MarkObject(_lasterror,chain);
|
||||
SQSharedState::MarkObject(_errorhandler,chain);
|
||||
SQSharedState::MarkObject(_debughook_closure,chain);
|
||||
SQSharedState::MarkObject(_roottable, chain);
|
||||
SQSharedState::MarkObject(temp_reg, chain);
|
||||
for(SQUnsignedInteger i = 0; i < _stack.size(); i++) SQSharedState::MarkObject(_stack[i], chain);
|
||||
for(SQInteger k = 0; k < _callsstacksize; k++) SQSharedState::MarkObject(_callsstack[k]._closure, chain);
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQArray::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
SQInteger len = _values.size();
|
||||
for(SQInteger i = 0;i < len; i++) SQSharedState::MarkObject(_values[i], chain);
|
||||
END_MARK()
|
||||
}
|
||||
void SQTable::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
if(_delegate) _delegate->Mark(chain);
|
||||
SQInteger len = _numofnodes;
|
||||
for(SQInteger i = 0; i < len; i++){
|
||||
SQSharedState::MarkObject(_nodes[i].key, chain);
|
||||
SQSharedState::MarkObject(_nodes[i].val, chain);
|
||||
}
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQClass::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
_members->Mark(chain);
|
||||
if(_base) _base->Mark(chain);
|
||||
SQSharedState::MarkObject(_attributes, chain);
|
||||
for(SQUnsignedInteger i =0; i< _defaultvalues.size(); i++) {
|
||||
SQSharedState::MarkObject(_defaultvalues[i].val, chain);
|
||||
SQSharedState::MarkObject(_defaultvalues[i].attrs, chain);
|
||||
}
|
||||
for(SQUnsignedInteger j =0; j< _methods.size(); j++) {
|
||||
SQSharedState::MarkObject(_methods[j].val, chain);
|
||||
SQSharedState::MarkObject(_methods[j].attrs, chain);
|
||||
}
|
||||
for(SQUnsignedInteger k =0; k< MT_LAST; k++) {
|
||||
SQSharedState::MarkObject(_metamethods[k], chain);
|
||||
}
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQInstance::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
_class->Mark(chain);
|
||||
SQUnsignedInteger nvalues = _class->_defaultvalues.size();
|
||||
for(SQUnsignedInteger i =0; i< nvalues; i++) {
|
||||
SQSharedState::MarkObject(_values[i], chain);
|
||||
}
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQGenerator::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
for(SQUnsignedInteger i = 0; i < _stack.size(); i++) SQSharedState::MarkObject(_stack[i], chain);
|
||||
SQSharedState::MarkObject(_closure, chain);
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQFunctionProto::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
for(SQInteger i = 0; i < _nliterals; i++) SQSharedState::MarkObject(_literals[i], chain);
|
||||
for(SQInteger k = 0; k < _nfunctions; k++) SQSharedState::MarkObject(_functions[k], chain);
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQClosure::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
if(_base) _base->Mark(chain);
|
||||
SQFunctionProto *fp = _function;
|
||||
fp->Mark(chain);
|
||||
for(SQInteger i = 0; i < fp->_noutervalues; i++) SQSharedState::MarkObject(_outervalues[i], chain);
|
||||
for(SQInteger k = 0; k < fp->_ndefaultparams; k++) SQSharedState::MarkObject(_defaultparams[k], chain);
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQNativeClosure::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
for(SQUnsignedInteger i = 0; i < _noutervalues; i++) SQSharedState::MarkObject(_outervalues[i], chain);
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQOuter::Mark(SQCollectable **chain)
|
||||
{
|
||||
START_MARK()
|
||||
/* If the valptr points to a closed value, that value is alive */
|
||||
if(_valptr == &_value) {
|
||||
SQSharedState::MarkObject(_value, chain);
|
||||
}
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQUserData::Mark(SQCollectable **chain){
|
||||
START_MARK()
|
||||
if(_delegate) _delegate->Mark(chain);
|
||||
END_MARK()
|
||||
}
|
||||
|
||||
void SQCollectable::UnMark() { _uiRef&=~MARK_FLAG; }
|
||||
|
||||
#endif
|
||||
|
||||
|
|
@ -1,353 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQOBJECT_H_
|
||||
#define _SQOBJECT_H_
|
||||
|
||||
#include "squtils.h"
|
||||
|
||||
#ifdef _SQ64
|
||||
#define UINT_MINUS_ONE (0xFFFFFFFFFFFFFFFF)
|
||||
#else
|
||||
#define UINT_MINUS_ONE (0xFFFFFFFF)
|
||||
#endif
|
||||
|
||||
#define SQ_CLOSURESTREAM_HEAD (('S'<<24)|('Q'<<16)|('I'<<8)|('R'))
|
||||
#define SQ_CLOSURESTREAM_PART (('P'<<24)|('A'<<16)|('R'<<8)|('T'))
|
||||
#define SQ_CLOSURESTREAM_TAIL (('T'<<24)|('A'<<16)|('I'<<8)|('L'))
|
||||
|
||||
struct SQSharedState;
|
||||
|
||||
enum SQMetaMethod{
|
||||
MT_ADD=0,
|
||||
MT_SUB=1,
|
||||
MT_MUL=2,
|
||||
MT_DIV=3,
|
||||
MT_UNM=4,
|
||||
MT_MODULO=5,
|
||||
MT_SET=6,
|
||||
MT_GET=7,
|
||||
MT_TYPEOF=8,
|
||||
MT_NEXTI=9,
|
||||
MT_CMP=10,
|
||||
MT_CALL=11,
|
||||
MT_CLONED=12,
|
||||
MT_NEWSLOT=13,
|
||||
MT_DELSLOT=14,
|
||||
MT_TOSTRING=15,
|
||||
MT_NEWMEMBER=16,
|
||||
MT_INHERITED=17,
|
||||
MT_LAST = 18
|
||||
};
|
||||
|
||||
#define MM_ADD _SC("_add")
|
||||
#define MM_SUB _SC("_sub")
|
||||
#define MM_MUL _SC("_mul")
|
||||
#define MM_DIV _SC("_div")
|
||||
#define MM_UNM _SC("_unm")
|
||||
#define MM_MODULO _SC("_modulo")
|
||||
#define MM_SET _SC("_set")
|
||||
#define MM_GET _SC("_get")
|
||||
#define MM_TYPEOF _SC("_typeof")
|
||||
#define MM_NEXTI _SC("_nexti")
|
||||
#define MM_CMP _SC("_cmp")
|
||||
#define MM_CALL _SC("_call")
|
||||
#define MM_CLONED _SC("_cloned")
|
||||
#define MM_NEWSLOT _SC("_newslot")
|
||||
#define MM_DELSLOT _SC("_delslot")
|
||||
#define MM_TOSTRING _SC("_tostring")
|
||||
#define MM_NEWMEMBER _SC("_newmember")
|
||||
#define MM_INHERITED _SC("_inherited")
|
||||
|
||||
|
||||
#define _CONSTRUCT_VECTOR(type,size,ptr) { \
|
||||
for(SQInteger n = 0; n < ((SQInteger)size); n++) { \
|
||||
new (&ptr[n]) type(); \
|
||||
} \
|
||||
}
|
||||
|
||||
#define _DESTRUCT_VECTOR(type,size,ptr) { \
|
||||
for(SQInteger nl = 0; nl < ((SQInteger)size); nl++) { \
|
||||
ptr[nl].~type(); \
|
||||
} \
|
||||
}
|
||||
|
||||
#define _COPY_VECTOR(dest,src,size) { \
|
||||
for(SQInteger _n_ = 0; _n_ < ((SQInteger)size); _n_++) { \
|
||||
dest[_n_] = src[_n_]; \
|
||||
} \
|
||||
}
|
||||
|
||||
#define _NULL_SQOBJECT_VECTOR(vec,size) { \
|
||||
for(SQInteger _n_ = 0; _n_ < ((SQInteger)size); _n_++) { \
|
||||
vec[_n_].Null(); \
|
||||
} \
|
||||
}
|
||||
|
||||
#define MINPOWER2 4
|
||||
|
||||
struct SQRefCounted
|
||||
{
|
||||
SQUnsignedInteger _uiRef;
|
||||
struct SQWeakRef *_weakref;
|
||||
SQRefCounted() { _uiRef = 0; _weakref = NULL; }
|
||||
virtual ~SQRefCounted();
|
||||
SQWeakRef *GetWeakRef(SQObjectType type);
|
||||
virtual void Release()=0;
|
||||
|
||||
};
|
||||
|
||||
struct SQWeakRef : SQRefCounted
|
||||
{
|
||||
void Release();
|
||||
SQObject _obj;
|
||||
};
|
||||
|
||||
#define _realval(o) (sq_type((o)) != OT_WEAKREF?(SQObject)o:_weakref(o)->_obj)
|
||||
|
||||
struct SQObjectPtr;
|
||||
|
||||
#define __AddRef(type,unval) if(ISREFCOUNTED(type)) \
|
||||
{ \
|
||||
unval.pRefCounted->_uiRef++; \
|
||||
}
|
||||
|
||||
#define __Release(type,unval) if(ISREFCOUNTED(type) && ((--unval.pRefCounted->_uiRef)==0)) \
|
||||
{ \
|
||||
unval.pRefCounted->Release(); \
|
||||
}
|
||||
|
||||
#define __ObjRelease(obj) { \
|
||||
if((obj)) { \
|
||||
(obj)->_uiRef--; \
|
||||
if((obj)->_uiRef == 0) \
|
||||
(obj)->Release(); \
|
||||
(obj) = NULL; \
|
||||
} \
|
||||
}
|
||||
|
||||
#define __ObjAddRef(obj) { \
|
||||
(obj)->_uiRef++; \
|
||||
}
|
||||
|
||||
#define is_delegable(t) (sq_type(t)&SQOBJECT_DELEGABLE)
|
||||
#define raw_type(obj) _RAW_TYPE((obj)._type)
|
||||
|
||||
#define _integer(obj) ((obj)._unVal.nInteger)
|
||||
#define _float(obj) ((obj)._unVal.fFloat)
|
||||
#define _string(obj) ((obj)._unVal.pString)
|
||||
#define _table(obj) ((obj)._unVal.pTable)
|
||||
#define _array(obj) ((obj)._unVal.pArray)
|
||||
#define _closure(obj) ((obj)._unVal.pClosure)
|
||||
#define _generator(obj) ((obj)._unVal.pGenerator)
|
||||
#define _nativeclosure(obj) ((obj)._unVal.pNativeClosure)
|
||||
#define _userdata(obj) ((obj)._unVal.pUserData)
|
||||
#define _userpointer(obj) ((obj)._unVal.pUserPointer)
|
||||
#define _thread(obj) ((obj)._unVal.pThread)
|
||||
#define _funcproto(obj) ((obj)._unVal.pFunctionProto)
|
||||
#define _class(obj) ((obj)._unVal.pClass)
|
||||
#define _instance(obj) ((obj)._unVal.pInstance)
|
||||
#define _delegable(obj) ((SQDelegable *)(obj)._unVal.pDelegable)
|
||||
#define _weakref(obj) ((obj)._unVal.pWeakRef)
|
||||
#define _outer(obj) ((obj)._unVal.pOuter)
|
||||
#define _refcounted(obj) ((obj)._unVal.pRefCounted)
|
||||
#define _rawval(obj) ((obj)._unVal.raw)
|
||||
|
||||
#define _stringval(obj) (obj)._unVal.pString->_val
|
||||
#define _userdataval(obj) ((SQUserPointer)sq_aligning((obj)._unVal.pUserData + 1))
|
||||
|
||||
#define tofloat(num) ((sq_type(num)==OT_INTEGER)?(SQFloat)_integer(num):_float(num))
|
||||
#define tointeger(num) ((sq_type(num)==OT_FLOAT)?(SQInteger)_float(num):_integer(num))
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
#if defined(SQUSEDOUBLE) && !defined(_SQ64) || !defined(SQUSEDOUBLE) && defined(_SQ64)
|
||||
#define SQ_REFOBJECT_INIT() SQ_OBJECT_RAWINIT()
|
||||
#else
|
||||
#define SQ_REFOBJECT_INIT()
|
||||
#endif
|
||||
|
||||
#define _REF_TYPE_DECL(type,_class,sym) \
|
||||
SQObjectPtr(_class * x) \
|
||||
{ \
|
||||
SQ_OBJECT_RAWINIT() \
|
||||
_type=type; \
|
||||
_unVal.sym = x; \
|
||||
assert(_unVal.pTable); \
|
||||
_unVal.pRefCounted->_uiRef++; \
|
||||
} \
|
||||
inline SQObjectPtr& operator=(_class *x) \
|
||||
{ \
|
||||
SQObjectType tOldType; \
|
||||
SQObjectValue unOldVal; \
|
||||
tOldType=_type; \
|
||||
unOldVal=_unVal; \
|
||||
_type = type; \
|
||||
SQ_REFOBJECT_INIT() \
|
||||
_unVal.sym = x; \
|
||||
_unVal.pRefCounted->_uiRef++; \
|
||||
__Release(tOldType,unOldVal); \
|
||||
return *this; \
|
||||
}
|
||||
|
||||
#define _SCALAR_TYPE_DECL(type,_class,sym) \
|
||||
SQObjectPtr(_class x) \
|
||||
{ \
|
||||
SQ_OBJECT_RAWINIT() \
|
||||
_type=type; \
|
||||
_unVal.sym = x; \
|
||||
} \
|
||||
inline SQObjectPtr& operator=(_class x) \
|
||||
{ \
|
||||
__Release(_type,_unVal); \
|
||||
_type = type; \
|
||||
SQ_OBJECT_RAWINIT() \
|
||||
_unVal.sym = x; \
|
||||
return *this; \
|
||||
}
|
||||
struct SQObjectPtr : public SQObject
|
||||
{
|
||||
SQObjectPtr()
|
||||
{
|
||||
SQ_OBJECT_RAWINIT()
|
||||
_type=OT_NULL;
|
||||
_unVal.pUserPointer=NULL;
|
||||
}
|
||||
SQObjectPtr(const SQObjectPtr &o)
|
||||
{
|
||||
_type = o._type;
|
||||
_unVal = o._unVal;
|
||||
__AddRef(_type,_unVal);
|
||||
}
|
||||
SQObjectPtr(const SQObject &o)
|
||||
{
|
||||
_type = o._type;
|
||||
_unVal = o._unVal;
|
||||
__AddRef(_type,_unVal);
|
||||
}
|
||||
_REF_TYPE_DECL(OT_TABLE,SQTable,pTable)
|
||||
_REF_TYPE_DECL(OT_CLASS,SQClass,pClass)
|
||||
_REF_TYPE_DECL(OT_INSTANCE,SQInstance,pInstance)
|
||||
_REF_TYPE_DECL(OT_ARRAY,SQArray,pArray)
|
||||
_REF_TYPE_DECL(OT_CLOSURE,SQClosure,pClosure)
|
||||
_REF_TYPE_DECL(OT_NATIVECLOSURE,SQNativeClosure,pNativeClosure)
|
||||
_REF_TYPE_DECL(OT_OUTER,SQOuter,pOuter)
|
||||
_REF_TYPE_DECL(OT_GENERATOR,SQGenerator,pGenerator)
|
||||
_REF_TYPE_DECL(OT_STRING,SQString,pString)
|
||||
_REF_TYPE_DECL(OT_USERDATA,SQUserData,pUserData)
|
||||
_REF_TYPE_DECL(OT_WEAKREF,SQWeakRef,pWeakRef)
|
||||
_REF_TYPE_DECL(OT_THREAD,SQVM,pThread)
|
||||
_REF_TYPE_DECL(OT_FUNCPROTO,SQFunctionProto,pFunctionProto)
|
||||
|
||||
_SCALAR_TYPE_DECL(OT_INTEGER,SQInteger,nInteger)
|
||||
_SCALAR_TYPE_DECL(OT_FLOAT,SQFloat,fFloat)
|
||||
_SCALAR_TYPE_DECL(OT_USERPOINTER,SQUserPointer,pUserPointer)
|
||||
|
||||
SQObjectPtr(bool bBool)
|
||||
{
|
||||
SQ_OBJECT_RAWINIT()
|
||||
_type = OT_BOOL;
|
||||
_unVal.nInteger = bBool?1:0;
|
||||
}
|
||||
inline SQObjectPtr& operator=(bool b)
|
||||
{
|
||||
__Release(_type,_unVal);
|
||||
SQ_OBJECT_RAWINIT()
|
||||
_type = OT_BOOL;
|
||||
_unVal.nInteger = b?1:0;
|
||||
return *this;
|
||||
}
|
||||
|
||||
~SQObjectPtr()
|
||||
{
|
||||
__Release(_type,_unVal);
|
||||
}
|
||||
|
||||
inline SQObjectPtr& operator=(const SQObjectPtr& obj)
|
||||
{
|
||||
SQObjectType tOldType;
|
||||
SQObjectValue unOldVal;
|
||||
tOldType=_type;
|
||||
unOldVal=_unVal;
|
||||
_unVal = obj._unVal;
|
||||
_type = obj._type;
|
||||
__AddRef(_type,_unVal);
|
||||
__Release(tOldType,unOldVal);
|
||||
return *this;
|
||||
}
|
||||
inline SQObjectPtr& operator=(const SQObject& obj)
|
||||
{
|
||||
SQObjectType tOldType;
|
||||
SQObjectValue unOldVal;
|
||||
tOldType=_type;
|
||||
unOldVal=_unVal;
|
||||
_unVal = obj._unVal;
|
||||
_type = obj._type;
|
||||
__AddRef(_type,_unVal);
|
||||
__Release(tOldType,unOldVal);
|
||||
return *this;
|
||||
}
|
||||
inline void Null()
|
||||
{
|
||||
SQObjectType tOldType = _type;
|
||||
SQObjectValue unOldVal = _unVal;
|
||||
_type = OT_NULL;
|
||||
_unVal.raw = (SQRawObjectVal)NULL;
|
||||
__Release(tOldType ,unOldVal);
|
||||
}
|
||||
private:
|
||||
SQObjectPtr(const SQChar *){} //safety
|
||||
};
|
||||
|
||||
|
||||
inline void _Swap(SQObject &a,SQObject &b)
|
||||
{
|
||||
SQObjectType tOldType = a._type;
|
||||
SQObjectValue unOldVal = a._unVal;
|
||||
a._type = b._type;
|
||||
a._unVal = b._unVal;
|
||||
b._type = tOldType;
|
||||
b._unVal = unOldVal;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////////////////////////////////////////
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
#define MARK_FLAG 0x80000000
|
||||
struct SQCollectable : public SQRefCounted {
|
||||
SQCollectable *_next;
|
||||
SQCollectable *_prev;
|
||||
SQSharedState *_sharedstate;
|
||||
virtual SQObjectType GetType()=0;
|
||||
virtual void Release()=0;
|
||||
virtual void Mark(SQCollectable **chain)=0;
|
||||
void UnMark();
|
||||
virtual void Finalize()=0;
|
||||
static void AddToChain(SQCollectable **chain,SQCollectable *c);
|
||||
static void RemoveFromChain(SQCollectable **chain,SQCollectable *c);
|
||||
};
|
||||
|
||||
|
||||
#define ADD_TO_CHAIN(chain,obj) AddToChain(chain,obj)
|
||||
#define REMOVE_FROM_CHAIN(chain,obj) {if(!(_uiRef&MARK_FLAG))RemoveFromChain(chain,obj);}
|
||||
#define CHAINABLE_OBJ SQCollectable
|
||||
#define INIT_CHAIN() {_next=NULL;_prev=NULL;_sharedstate=ss;}
|
||||
#else
|
||||
|
||||
#define ADD_TO_CHAIN(chain,obj) ((void)0)
|
||||
#define REMOVE_FROM_CHAIN(chain,obj) ((void)0)
|
||||
#define CHAINABLE_OBJ SQRefCounted
|
||||
#define INIT_CHAIN() ((void)0)
|
||||
#endif
|
||||
|
||||
struct SQDelegable : public CHAINABLE_OBJ {
|
||||
bool SetDelegate(SQTable *m);
|
||||
virtual bool GetMetaMethod(SQVM *v,SQMetaMethod mm,SQObjectPtr &res);
|
||||
SQTable *_delegate;
|
||||
};
|
||||
|
||||
SQUnsignedInteger TranslateIndex(const SQObjectPtr &idx);
|
||||
typedef sqvector<SQObjectPtr> SQObjectPtrVec;
|
||||
typedef sqvector<SQInteger> SQIntVec;
|
||||
const SQChar *GetTypeName(const SQObjectPtr &obj1);
|
||||
const SQChar *IdType2Name(SQObjectType type);
|
||||
|
||||
|
||||
|
||||
#endif //_SQOBJECT_H_
|
||||
|
|
@ -1,132 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQOPCODES_H_
|
||||
#define _SQOPCODES_H_
|
||||
|
||||
#define MAX_FUNC_STACKSIZE 0xFF
|
||||
#define MAX_LITERALS ((SQInteger)0x7FFFFFFF)
|
||||
|
||||
enum BitWiseOP {
|
||||
BW_AND = 0,
|
||||
BW_OR = 2,
|
||||
BW_XOR = 3,
|
||||
BW_SHIFTL = 4,
|
||||
BW_SHIFTR = 5,
|
||||
BW_USHIFTR = 6
|
||||
};
|
||||
|
||||
enum CmpOP {
|
||||
CMP_G = 0,
|
||||
CMP_GE = 2,
|
||||
CMP_L = 3,
|
||||
CMP_LE = 4,
|
||||
CMP_3W = 5
|
||||
};
|
||||
|
||||
enum NewObjectType {
|
||||
NOT_TABLE = 0,
|
||||
NOT_ARRAY = 1,
|
||||
NOT_CLASS = 2
|
||||
};
|
||||
|
||||
enum AppendArrayType {
|
||||
AAT_STACK = 0,
|
||||
AAT_LITERAL = 1,
|
||||
AAT_INT = 2,
|
||||
AAT_FLOAT = 3,
|
||||
AAT_BOOL = 4
|
||||
};
|
||||
|
||||
enum SQOpcode
|
||||
{
|
||||
_OP_LINE= 0x00,
|
||||
_OP_LOAD= 0x01,
|
||||
_OP_LOADINT= 0x02,
|
||||
_OP_LOADFLOAT= 0x03,
|
||||
_OP_DLOAD= 0x04,
|
||||
_OP_TAILCALL= 0x05,
|
||||
_OP_CALL= 0x06,
|
||||
_OP_PREPCALL= 0x07,
|
||||
_OP_PREPCALLK= 0x08,
|
||||
_OP_GETK= 0x09,
|
||||
_OP_MOVE= 0x0A,
|
||||
_OP_NEWSLOT= 0x0B,
|
||||
_OP_DELETE= 0x0C,
|
||||
_OP_SET= 0x0D,
|
||||
_OP_GET= 0x0E,
|
||||
_OP_EQ= 0x0F,
|
||||
_OP_NE= 0x10,
|
||||
_OP_ADD= 0x11,
|
||||
_OP_SUB= 0x12,
|
||||
_OP_MUL= 0x13,
|
||||
_OP_DIV= 0x14,
|
||||
_OP_MOD= 0x15,
|
||||
_OP_BITW= 0x16,
|
||||
_OP_RETURN= 0x17,
|
||||
_OP_LOADNULLS= 0x18,
|
||||
_OP_LOADROOT= 0x19,
|
||||
_OP_LOADBOOL= 0x1A,
|
||||
_OP_DMOVE= 0x1B,
|
||||
_OP_JMP= 0x1C,
|
||||
//_OP_JNZ= 0x1D,
|
||||
_OP_JCMP= 0x1D,
|
||||
_OP_JZ= 0x1E,
|
||||
_OP_SETOUTER= 0x1F,
|
||||
_OP_GETOUTER= 0x20,
|
||||
_OP_NEWOBJ= 0x21,
|
||||
_OP_APPENDARRAY= 0x22,
|
||||
_OP_COMPARITH= 0x23,
|
||||
_OP_INC= 0x24,
|
||||
_OP_INCL= 0x25,
|
||||
_OP_PINC= 0x26,
|
||||
_OP_PINCL= 0x27,
|
||||
_OP_CMP= 0x28,
|
||||
_OP_EXISTS= 0x29,
|
||||
_OP_INSTANCEOF= 0x2A,
|
||||
_OP_AND= 0x2B,
|
||||
_OP_OR= 0x2C,
|
||||
_OP_NEG= 0x2D,
|
||||
_OP_NOT= 0x2E,
|
||||
_OP_BWNOT= 0x2F,
|
||||
_OP_CLOSURE= 0x30,
|
||||
_OP_YIELD= 0x31,
|
||||
_OP_RESUME= 0x32,
|
||||
_OP_FOREACH= 0x33,
|
||||
_OP_POSTFOREACH= 0x34,
|
||||
_OP_CLONE= 0x35,
|
||||
_OP_TYPEOF= 0x36,
|
||||
_OP_PUSHTRAP= 0x37,
|
||||
_OP_POPTRAP= 0x38,
|
||||
_OP_THROW= 0x39,
|
||||
_OP_NEWSLOTA= 0x3A,
|
||||
_OP_GETBASE= 0x3B,
|
||||
_OP_CLOSE= 0x3C
|
||||
};
|
||||
|
||||
struct SQInstructionDesc {
|
||||
const SQChar *name;
|
||||
};
|
||||
|
||||
struct SQInstruction
|
||||
{
|
||||
SQInstruction(){};
|
||||
SQInstruction(SQOpcode _op,SQInteger a0=0,SQInteger a1=0,SQInteger a2=0,SQInteger a3=0)
|
||||
{ op = (unsigned char)_op;
|
||||
_arg0 = (unsigned char)a0;_arg1 = (SQInt32)a1;
|
||||
_arg2 = (unsigned char)a2;_arg3 = (unsigned char)a3;
|
||||
}
|
||||
|
||||
|
||||
SQInt32 _arg1;
|
||||
unsigned char op;
|
||||
unsigned char _arg0;
|
||||
unsigned char _arg2;
|
||||
unsigned char _arg3;
|
||||
};
|
||||
|
||||
#include "squtils.h"
|
||||
typedef sqvector<SQInstruction> SQInstructionVec;
|
||||
|
||||
#define NEW_SLOT_ATTRIBUTES_FLAG 0x01
|
||||
#define NEW_SLOT_STATIC_FLAG 0x02
|
||||
|
||||
#endif // _SQOPCODES_H_
|
||||
|
|
@ -1,20 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQPCHEADER_H_
|
||||
#define _SQPCHEADER_H_
|
||||
|
||||
#if defined(_MSC_VER) && defined(_DEBUG)
|
||||
#include <crtdbg.h>
|
||||
#endif
|
||||
|
||||
#include <limits.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <assert.h>
|
||||
#include <new>
|
||||
//squirrel stuff
|
||||
#include <squirrel.h>
|
||||
#include "sqobject.h"
|
||||
#include "sqstate.h"
|
||||
|
||||
#endif //_SQPCHEADER_H_
|
||||
|
|
@ -1,647 +0,0 @@
|
|||
/*
|
||||
see copyright notice in squirrel.h
|
||||
*/
|
||||
#include "sqpcheader.h"
|
||||
#include "sqopcodes.h"
|
||||
#include "sqvm.h"
|
||||
#include "sqfuncproto.h"
|
||||
#include "sqclosure.h"
|
||||
#include "sqstring.h"
|
||||
#include "sqtable.h"
|
||||
#include "sqarray.h"
|
||||
#include "squserdata.h"
|
||||
#include "sqclass.h"
|
||||
|
||||
SQSharedState::SQSharedState()
|
||||
{
|
||||
_compilererrorhandler = NULL;
|
||||
_printfunc = NULL;
|
||||
_errorfunc = NULL;
|
||||
_debuginfo = false;
|
||||
_notifyallexceptions = false;
|
||||
_foreignptr = NULL;
|
||||
_releasehook = NULL;
|
||||
}
|
||||
|
||||
#define newsysstring(s) { \
|
||||
_systemstrings->push_back(SQString::Create(this,s)); \
|
||||
}
|
||||
|
||||
#define newmetamethod(s) { \
|
||||
_metamethods->push_back(SQString::Create(this,s)); \
|
||||
_table(_metamethodsmap)->NewSlot(_metamethods->back(),(SQInteger)(_metamethods->size()-1)); \
|
||||
}
|
||||
|
||||
bool CompileTypemask(SQIntVec &res,const SQChar *typemask)
|
||||
{
|
||||
SQInteger i = 0;
|
||||
SQInteger mask = 0;
|
||||
while(typemask[i] != 0) {
|
||||
switch(typemask[i]) {
|
||||
case 'o': mask |= _RT_NULL; break;
|
||||
case 'i': mask |= _RT_INTEGER; break;
|
||||
case 'f': mask |= _RT_FLOAT; break;
|
||||
case 'n': mask |= (_RT_FLOAT | _RT_INTEGER); break;
|
||||
case 's': mask |= _RT_STRING; break;
|
||||
case 't': mask |= _RT_TABLE; break;
|
||||
case 'a': mask |= _RT_ARRAY; break;
|
||||
case 'u': mask |= _RT_USERDATA; break;
|
||||
case 'c': mask |= (_RT_CLOSURE | _RT_NATIVECLOSURE); break;
|
||||
case 'b': mask |= _RT_BOOL; break;
|
||||
case 'g': mask |= _RT_GENERATOR; break;
|
||||
case 'p': mask |= _RT_USERPOINTER; break;
|
||||
case 'v': mask |= _RT_THREAD; break;
|
||||
case 'x': mask |= _RT_INSTANCE; break;
|
||||
case 'y': mask |= _RT_CLASS; break;
|
||||
case 'r': mask |= _RT_WEAKREF; break;
|
||||
case '.': mask = -1; res.push_back(mask); i++; mask = 0; continue;
|
||||
case ' ': i++; continue; //ignores spaces
|
||||
default:
|
||||
return false;
|
||||
}
|
||||
i++;
|
||||
if(typemask[i] == '|') {
|
||||
i++;
|
||||
if(typemask[i] == 0)
|
||||
return false;
|
||||
continue;
|
||||
}
|
||||
res.push_back(mask);
|
||||
mask = 0;
|
||||
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
SQTable *CreateDefaultDelegate(SQSharedState *ss,const SQRegFunction *funcz)
|
||||
{
|
||||
SQInteger i=0;
|
||||
SQTable *t=SQTable::Create(ss,0);
|
||||
while(funcz[i].name!=0){
|
||||
SQNativeClosure *nc = SQNativeClosure::Create(ss,funcz[i].f,0);
|
||||
nc->_nparamscheck = funcz[i].nparamscheck;
|
||||
nc->_name = SQString::Create(ss,funcz[i].name);
|
||||
if(funcz[i].typemask && !CompileTypemask(nc->_typecheck,funcz[i].typemask))
|
||||
return NULL;
|
||||
t->NewSlot(SQString::Create(ss,funcz[i].name),nc);
|
||||
i++;
|
||||
}
|
||||
return t;
|
||||
}
|
||||
|
||||
void SQSharedState::Init()
|
||||
{
|
||||
_scratchpad=NULL;
|
||||
_scratchpadsize=0;
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
_gc_chain=NULL;
|
||||
#endif
|
||||
_stringtable = (SQStringTable*)SQ_MALLOC(sizeof(SQStringTable));
|
||||
new (_stringtable) SQStringTable(this);
|
||||
sq_new(_metamethods,SQObjectPtrVec);
|
||||
sq_new(_systemstrings,SQObjectPtrVec);
|
||||
sq_new(_types,SQObjectPtrVec);
|
||||
_metamethodsmap = SQTable::Create(this,MT_LAST-1);
|
||||
//adding type strings to avoid memory trashing
|
||||
//types names
|
||||
newsysstring(_SC("null"));
|
||||
newsysstring(_SC("table"));
|
||||
newsysstring(_SC("array"));
|
||||
newsysstring(_SC("closure"));
|
||||
newsysstring(_SC("string"));
|
||||
newsysstring(_SC("userdata"));
|
||||
newsysstring(_SC("integer"));
|
||||
newsysstring(_SC("float"));
|
||||
newsysstring(_SC("userpointer"));
|
||||
newsysstring(_SC("function"));
|
||||
newsysstring(_SC("generator"));
|
||||
newsysstring(_SC("thread"));
|
||||
newsysstring(_SC("class"));
|
||||
newsysstring(_SC("instance"));
|
||||
newsysstring(_SC("bool"));
|
||||
//meta methods
|
||||
newmetamethod(MM_ADD);
|
||||
newmetamethod(MM_SUB);
|
||||
newmetamethod(MM_MUL);
|
||||
newmetamethod(MM_DIV);
|
||||
newmetamethod(MM_UNM);
|
||||
newmetamethod(MM_MODULO);
|
||||
newmetamethod(MM_SET);
|
||||
newmetamethod(MM_GET);
|
||||
newmetamethod(MM_TYPEOF);
|
||||
newmetamethod(MM_NEXTI);
|
||||
newmetamethod(MM_CMP);
|
||||
newmetamethod(MM_CALL);
|
||||
newmetamethod(MM_CLONED);
|
||||
newmetamethod(MM_NEWSLOT);
|
||||
newmetamethod(MM_DELSLOT);
|
||||
newmetamethod(MM_TOSTRING);
|
||||
newmetamethod(MM_NEWMEMBER);
|
||||
newmetamethod(MM_INHERITED);
|
||||
|
||||
_constructoridx = SQString::Create(this,_SC("constructor"));
|
||||
_registry = SQTable::Create(this,0);
|
||||
_consts = SQTable::Create(this,0);
|
||||
_table_default_delegate = CreateDefaultDelegate(this,_table_default_delegate_funcz);
|
||||
_array_default_delegate = CreateDefaultDelegate(this,_array_default_delegate_funcz);
|
||||
_string_default_delegate = CreateDefaultDelegate(this,_string_default_delegate_funcz);
|
||||
_number_default_delegate = CreateDefaultDelegate(this,_number_default_delegate_funcz);
|
||||
_closure_default_delegate = CreateDefaultDelegate(this,_closure_default_delegate_funcz);
|
||||
_generator_default_delegate = CreateDefaultDelegate(this,_generator_default_delegate_funcz);
|
||||
_thread_default_delegate = CreateDefaultDelegate(this,_thread_default_delegate_funcz);
|
||||
_class_default_delegate = CreateDefaultDelegate(this,_class_default_delegate_funcz);
|
||||
_instance_default_delegate = CreateDefaultDelegate(this,_instance_default_delegate_funcz);
|
||||
_weakref_default_delegate = CreateDefaultDelegate(this,_weakref_default_delegate_funcz);
|
||||
}
|
||||
|
||||
SQSharedState::~SQSharedState()
|
||||
{
|
||||
if(_releasehook) { _releasehook(_foreignptr,0); _releasehook = NULL; }
|
||||
_constructoridx.Null();
|
||||
_table(_registry)->Finalize();
|
||||
_table(_consts)->Finalize();
|
||||
_table(_metamethodsmap)->Finalize();
|
||||
_registry.Null();
|
||||
_consts.Null();
|
||||
_metamethodsmap.Null();
|
||||
while(!_systemstrings->empty()) {
|
||||
_systemstrings->back().Null();
|
||||
_systemstrings->pop_back();
|
||||
}
|
||||
_thread(_root_vm)->Finalize();
|
||||
_root_vm.Null();
|
||||
_table_default_delegate.Null();
|
||||
_array_default_delegate.Null();
|
||||
_string_default_delegate.Null();
|
||||
_number_default_delegate.Null();
|
||||
_closure_default_delegate.Null();
|
||||
_generator_default_delegate.Null();
|
||||
_thread_default_delegate.Null();
|
||||
_class_default_delegate.Null();
|
||||
_instance_default_delegate.Null();
|
||||
_weakref_default_delegate.Null();
|
||||
_refs_table.Finalize();
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
SQCollectable *t = _gc_chain;
|
||||
SQCollectable *nx = NULL;
|
||||
if(t) {
|
||||
t->_uiRef++;
|
||||
while(t) {
|
||||
t->Finalize();
|
||||
nx = t->_next;
|
||||
if(nx) nx->_uiRef++;
|
||||
if(--t->_uiRef == 0)
|
||||
t->Release();
|
||||
t = nx;
|
||||
}
|
||||
}
|
||||
assert(_gc_chain==NULL); //just to proove a theory
|
||||
while(_gc_chain){
|
||||
_gc_chain->_uiRef++;
|
||||
_gc_chain->Release();
|
||||
}
|
||||
#endif
|
||||
|
||||
sq_delete(_types,SQObjectPtrVec);
|
||||
sq_delete(_systemstrings,SQObjectPtrVec);
|
||||
sq_delete(_metamethods,SQObjectPtrVec);
|
||||
sq_delete(_stringtable,SQStringTable);
|
||||
if(_scratchpad)SQ_FREE(_scratchpad,_scratchpadsize);
|
||||
}
|
||||
|
||||
|
||||
SQInteger SQSharedState::GetMetaMethodIdxByName(const SQObjectPtr &name)
|
||||
{
|
||||
if(sq_type(name) != OT_STRING)
|
||||
return -1;
|
||||
SQObjectPtr ret;
|
||||
if(_table(_metamethodsmap)->Get(name,ret)) {
|
||||
return _integer(ret);
|
||||
}
|
||||
return -1;
|
||||
}
|
||||
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
|
||||
void SQSharedState::MarkObject(SQObjectPtr &o,SQCollectable **chain)
|
||||
{
|
||||
switch(sq_type(o)){
|
||||
case OT_TABLE:_table(o)->Mark(chain);break;
|
||||
case OT_ARRAY:_array(o)->Mark(chain);break;
|
||||
case OT_USERDATA:_userdata(o)->Mark(chain);break;
|
||||
case OT_CLOSURE:_closure(o)->Mark(chain);break;
|
||||
case OT_NATIVECLOSURE:_nativeclosure(o)->Mark(chain);break;
|
||||
case OT_GENERATOR:_generator(o)->Mark(chain);break;
|
||||
case OT_THREAD:_thread(o)->Mark(chain);break;
|
||||
case OT_CLASS:_class(o)->Mark(chain);break;
|
||||
case OT_INSTANCE:_instance(o)->Mark(chain);break;
|
||||
case OT_OUTER:_outer(o)->Mark(chain);break;
|
||||
case OT_FUNCPROTO:_funcproto(o)->Mark(chain);break;
|
||||
default: break; //shutup compiler
|
||||
}
|
||||
}
|
||||
|
||||
void SQSharedState::RunMark(SQVM* SQ_UNUSED_ARG(vm),SQCollectable **tchain)
|
||||
{
|
||||
SQVM *vms = _thread(_root_vm);
|
||||
|
||||
vms->Mark(tchain);
|
||||
|
||||
_refs_table.Mark(tchain);
|
||||
MarkObject(_registry,tchain);
|
||||
MarkObject(_consts,tchain);
|
||||
MarkObject(_metamethodsmap,tchain);
|
||||
MarkObject(_table_default_delegate,tchain);
|
||||
MarkObject(_array_default_delegate,tchain);
|
||||
MarkObject(_string_default_delegate,tchain);
|
||||
MarkObject(_number_default_delegate,tchain);
|
||||
MarkObject(_generator_default_delegate,tchain);
|
||||
MarkObject(_thread_default_delegate,tchain);
|
||||
MarkObject(_closure_default_delegate,tchain);
|
||||
MarkObject(_class_default_delegate,tchain);
|
||||
MarkObject(_instance_default_delegate,tchain);
|
||||
MarkObject(_weakref_default_delegate,tchain);
|
||||
|
||||
}
|
||||
|
||||
SQInteger SQSharedState::ResurrectUnreachable(SQVM *vm)
|
||||
{
|
||||
SQInteger n=0;
|
||||
SQCollectable *tchain=NULL;
|
||||
|
||||
RunMark(vm,&tchain);
|
||||
|
||||
SQCollectable *resurrected = _gc_chain;
|
||||
SQCollectable *t = resurrected;
|
||||
|
||||
_gc_chain = tchain;
|
||||
|
||||
SQArray *ret = NULL;
|
||||
if(resurrected) {
|
||||
ret = SQArray::Create(this,0);
|
||||
SQCollectable *rlast = NULL;
|
||||
while(t) {
|
||||
rlast = t;
|
||||
SQObjectType type = t->GetType();
|
||||
if(type != OT_FUNCPROTO && type != OT_OUTER) {
|
||||
SQObject sqo;
|
||||
sqo._type = type;
|
||||
sqo._unVal.pRefCounted = t;
|
||||
ret->Append(sqo);
|
||||
}
|
||||
t = t->_next;
|
||||
n++;
|
||||
}
|
||||
|
||||
assert(rlast->_next == NULL);
|
||||
rlast->_next = _gc_chain;
|
||||
if(_gc_chain)
|
||||
{
|
||||
_gc_chain->_prev = rlast;
|
||||
}
|
||||
_gc_chain = resurrected;
|
||||
}
|
||||
|
||||
t = _gc_chain;
|
||||
while(t) {
|
||||
t->UnMark();
|
||||
t = t->_next;
|
||||
}
|
||||
|
||||
if(ret) {
|
||||
SQObjectPtr temp = ret;
|
||||
vm->Push(temp);
|
||||
}
|
||||
else {
|
||||
vm->PushNull();
|
||||
}
|
||||
return n;
|
||||
}
|
||||
|
||||
SQInteger SQSharedState::CollectGarbage(SQVM *vm)
|
||||
{
|
||||
SQInteger n = 0;
|
||||
SQCollectable *tchain = NULL;
|
||||
|
||||
RunMark(vm,&tchain);
|
||||
|
||||
SQCollectable *t = _gc_chain;
|
||||
SQCollectable *nx = NULL;
|
||||
if(t) {
|
||||
t->_uiRef++;
|
||||
while(t) {
|
||||
t->Finalize();
|
||||
nx = t->_next;
|
||||
if(nx) nx->_uiRef++;
|
||||
if(--t->_uiRef == 0)
|
||||
t->Release();
|
||||
t = nx;
|
||||
n++;
|
||||
}
|
||||
}
|
||||
|
||||
t = tchain;
|
||||
while(t) {
|
||||
t->UnMark();
|
||||
t = t->_next;
|
||||
}
|
||||
_gc_chain = tchain;
|
||||
|
||||
return n;
|
||||
}
|
||||
#endif
|
||||
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void SQCollectable::AddToChain(SQCollectable **chain,SQCollectable *c)
|
||||
{
|
||||
c->_prev = NULL;
|
||||
c->_next = *chain;
|
||||
if(*chain) (*chain)->_prev = c;
|
||||
*chain = c;
|
||||
}
|
||||
|
||||
void SQCollectable::RemoveFromChain(SQCollectable **chain,SQCollectable *c)
|
||||
{
|
||||
if(c->_prev) c->_prev->_next = c->_next;
|
||||
else *chain = c->_next;
|
||||
if(c->_next)
|
||||
c->_next->_prev = c->_prev;
|
||||
c->_next = NULL;
|
||||
c->_prev = NULL;
|
||||
}
|
||||
#endif
|
||||
|
||||
SQChar* SQSharedState::GetScratchPad(SQInteger size)
|
||||
{
|
||||
SQInteger newsize;
|
||||
if(size>0) {
|
||||
if(_scratchpadsize < size) {
|
||||
newsize = size + (size>>1);
|
||||
_scratchpad = (SQChar *)SQ_REALLOC(_scratchpad,_scratchpadsize,newsize);
|
||||
_scratchpadsize = newsize;
|
||||
|
||||
}else if(_scratchpadsize >= (size<<5)) {
|
||||
newsize = _scratchpadsize >> 1;
|
||||
_scratchpad = (SQChar *)SQ_REALLOC(_scratchpad,_scratchpadsize,newsize);
|
||||
_scratchpadsize = newsize;
|
||||
}
|
||||
}
|
||||
return _scratchpad;
|
||||
}
|
||||
|
||||
RefTable::RefTable()
|
||||
{
|
||||
AllocNodes(4);
|
||||
}
|
||||
|
||||
void RefTable::Finalize()
|
||||
{
|
||||
RefNode *nodes = _nodes;
|
||||
for(SQUnsignedInteger n = 0; n < _numofslots; n++) {
|
||||
nodes->obj.Null();
|
||||
nodes++;
|
||||
}
|
||||
}
|
||||
|
||||
RefTable::~RefTable()
|
||||
{
|
||||
SQ_FREE(_buckets,(_numofslots * sizeof(RefNode *)) + (_numofslots * sizeof(RefNode)));
|
||||
}
|
||||
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void RefTable::Mark(SQCollectable **chain)
|
||||
{
|
||||
RefNode *nodes = (RefNode *)_nodes;
|
||||
for(SQUnsignedInteger n = 0; n < _numofslots; n++) {
|
||||
if(sq_type(nodes->obj) != OT_NULL) {
|
||||
SQSharedState::MarkObject(nodes->obj,chain);
|
||||
}
|
||||
nodes++;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
void RefTable::AddRef(SQObject &obj)
|
||||
{
|
||||
SQHash mainpos;
|
||||
RefNode *prev;
|
||||
RefNode *ref = Get(obj,mainpos,&prev,true);
|
||||
ref->refs++;
|
||||
}
|
||||
|
||||
SQUnsignedInteger RefTable::GetRefCount(SQObject &obj)
|
||||
{
|
||||
SQHash mainpos;
|
||||
RefNode *prev;
|
||||
RefNode *ref = Get(obj,mainpos,&prev,true);
|
||||
return ref->refs;
|
||||
}
|
||||
|
||||
|
||||
SQBool RefTable::Release(SQObject &obj)
|
||||
{
|
||||
SQHash mainpos;
|
||||
RefNode *prev;
|
||||
RefNode *ref = Get(obj,mainpos,&prev,false);
|
||||
if(ref) {
|
||||
if(--ref->refs == 0) {
|
||||
SQObjectPtr o = ref->obj;
|
||||
if(prev) {
|
||||
prev->next = ref->next;
|
||||
}
|
||||
else {
|
||||
_buckets[mainpos] = ref->next;
|
||||
}
|
||||
ref->next = _freelist;
|
||||
_freelist = ref;
|
||||
_slotused--;
|
||||
ref->obj.Null();
|
||||
//<<FIXME>>test for shrink?
|
||||
return SQTrue;
|
||||
}
|
||||
}
|
||||
else {
|
||||
assert(0);
|
||||
}
|
||||
return SQFalse;
|
||||
}
|
||||
|
||||
void RefTable::Resize(SQUnsignedInteger size)
|
||||
{
|
||||
RefNode **oldbucks = _buckets;
|
||||
RefNode *t = _nodes;
|
||||
SQUnsignedInteger oldnumofslots = _numofslots;
|
||||
AllocNodes(size);
|
||||
//rehash
|
||||
SQUnsignedInteger nfound = 0;
|
||||
for(SQUnsignedInteger n = 0; n < oldnumofslots; n++) {
|
||||
if(sq_type(t->obj) != OT_NULL) {
|
||||
//add back;
|
||||
assert(t->refs != 0);
|
||||
RefNode *nn = Add(::HashObj(t->obj)&(_numofslots-1),t->obj);
|
||||
nn->refs = t->refs;
|
||||
t->obj.Null();
|
||||
nfound++;
|
||||
}
|
||||
t++;
|
||||
}
|
||||
assert(nfound == oldnumofslots);
|
||||
SQ_FREE(oldbucks,(oldnumofslots * sizeof(RefNode *)) + (oldnumofslots * sizeof(RefNode)));
|
||||
}
|
||||
|
||||
RefTable::RefNode *RefTable::Add(SQHash mainpos,SQObject &obj)
|
||||
{
|
||||
RefNode *t = _buckets[mainpos];
|
||||
RefNode *newnode = _freelist;
|
||||
newnode->obj = obj;
|
||||
_buckets[mainpos] = newnode;
|
||||
_freelist = _freelist->next;
|
||||
newnode->next = t;
|
||||
assert(newnode->refs == 0);
|
||||
_slotused++;
|
||||
return newnode;
|
||||
}
|
||||
|
||||
RefTable::RefNode *RefTable::Get(SQObject &obj,SQHash &mainpos,RefNode **prev,bool add)
|
||||
{
|
||||
RefNode *ref;
|
||||
mainpos = ::HashObj(obj)&(_numofslots-1);
|
||||
*prev = NULL;
|
||||
for (ref = _buckets[mainpos]; ref; ) {
|
||||
if(_rawval(ref->obj) == _rawval(obj) && sq_type(ref->obj) == sq_type(obj))
|
||||
break;
|
||||
*prev = ref;
|
||||
ref = ref->next;
|
||||
}
|
||||
if(ref == NULL && add) {
|
||||
if(_numofslots == _slotused) {
|
||||
assert(_freelist == 0);
|
||||
Resize(_numofslots*2);
|
||||
mainpos = ::HashObj(obj)&(_numofslots-1);
|
||||
}
|
||||
ref = Add(mainpos,obj);
|
||||
}
|
||||
return ref;
|
||||
}
|
||||
|
||||
void RefTable::AllocNodes(SQUnsignedInteger size)
|
||||
{
|
||||
RefNode **bucks;
|
||||
RefNode *nodes;
|
||||
bucks = (RefNode **)SQ_MALLOC((size * sizeof(RefNode *)) + (size * sizeof(RefNode)));
|
||||
nodes = (RefNode *)&bucks[size];
|
||||
RefNode *temp = nodes;
|
||||
SQUnsignedInteger n;
|
||||
for(n = 0; n < size - 1; n++) {
|
||||
bucks[n] = NULL;
|
||||
temp->refs = 0;
|
||||
new (&temp->obj) SQObjectPtr;
|
||||
temp->next = temp+1;
|
||||
temp++;
|
||||
}
|
||||
bucks[n] = NULL;
|
||||
temp->refs = 0;
|
||||
new (&temp->obj) SQObjectPtr;
|
||||
temp->next = NULL;
|
||||
_freelist = nodes;
|
||||
_nodes = nodes;
|
||||
_buckets = bucks;
|
||||
_slotused = 0;
|
||||
_numofslots = size;
|
||||
}
|
||||
//////////////////////////////////////////////////////////////////////////
|
||||
//SQStringTable
|
||||
/*
|
||||
* The following code is based on Lua 4.0 (Copyright 1994-2002 Tecgraf, PUC-Rio.)
|
||||
* http://www.lua.org/copyright.html#4
|
||||
* http://www.lua.org/source/4.0.1/src_lstring.c.html
|
||||
*/
|
||||
|
||||
SQStringTable::SQStringTable(SQSharedState *ss)
|
||||
{
|
||||
_sharedstate = ss;
|
||||
AllocNodes(4);
|
||||
_slotused = 0;
|
||||
}
|
||||
|
||||
SQStringTable::~SQStringTable()
|
||||
{
|
||||
SQ_FREE(_strings,sizeof(SQString*)*_numofslots);
|
||||
_strings = NULL;
|
||||
}
|
||||
|
||||
void SQStringTable::AllocNodes(SQInteger size)
|
||||
{
|
||||
_numofslots = size;
|
||||
_strings = (SQString**)SQ_MALLOC(sizeof(SQString*)*_numofslots);
|
||||
memset(_strings,0,sizeof(SQString*)*_numofslots);
|
||||
}
|
||||
|
||||
SQString *SQStringTable::Add(const SQChar *news,SQInteger len)
|
||||
{
|
||||
if(len<0)
|
||||
len = (SQInteger)scstrlen(news);
|
||||
SQHash newhash = ::_hashstr(news,len);
|
||||
SQHash h = newhash&(_numofslots-1);
|
||||
SQString *s;
|
||||
for (s = _strings[h]; s; s = s->_next){
|
||||
if(s->_len == len && (!memcmp(news,s->_val,sq_rsl(len))))
|
||||
return s; //found
|
||||
}
|
||||
|
||||
SQString *t = (SQString *)SQ_MALLOC(sq_rsl(len)+sizeof(SQString));
|
||||
new (t) SQString;
|
||||
t->_sharedstate = _sharedstate;
|
||||
memcpy(t->_val,news,sq_rsl(len));
|
||||
t->_val[len] = _SC('\0');
|
||||
t->_len = len;
|
||||
t->_hash = newhash;
|
||||
t->_next = _strings[h];
|
||||
_strings[h] = t;
|
||||
_slotused++;
|
||||
if (_slotused > _numofslots) /* too crowded? */
|
||||
Resize(_numofslots*2);
|
||||
return t;
|
||||
}
|
||||
|
||||
void SQStringTable::Resize(SQInteger size)
|
||||
{
|
||||
SQInteger oldsize=_numofslots;
|
||||
SQString **oldtable=_strings;
|
||||
AllocNodes(size);
|
||||
for (SQInteger i=0; i<oldsize; i++){
|
||||
SQString *p = oldtable[i];
|
||||
while(p){
|
||||
SQString *next = p->_next;
|
||||
SQHash h = p->_hash&(_numofslots-1);
|
||||
p->_next = _strings[h];
|
||||
_strings[h] = p;
|
||||
p = next;
|
||||
}
|
||||
}
|
||||
SQ_FREE(oldtable,oldsize*sizeof(SQString*));
|
||||
}
|
||||
|
||||
void SQStringTable::Remove(SQString *bs)
|
||||
{
|
||||
SQString *s;
|
||||
SQString *prev=NULL;
|
||||
SQHash h = bs->_hash&(_numofslots - 1);
|
||||
|
||||
for (s = _strings[h]; s; ){
|
||||
if(s == bs){
|
||||
if(prev)
|
||||
prev->_next = s->_next;
|
||||
else
|
||||
_strings[h] = s->_next;
|
||||
_slotused--;
|
||||
SQInteger slen = s->_len;
|
||||
s->~SQString();
|
||||
SQ_FREE(s,sizeof(SQString) + sq_rsl(slen));
|
||||
return;
|
||||
}
|
||||
prev = s;
|
||||
s = s->_next;
|
||||
}
|
||||
assert(0);//if this fail something is wrong
|
||||
}
|
||||
|
|
@ -1,136 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTATE_H_
|
||||
#define _SQSTATE_H_
|
||||
|
||||
#include "squtils.h"
|
||||
#include "sqobject.h"
|
||||
struct SQString;
|
||||
struct SQTable;
|
||||
//max number of character for a printed number
|
||||
#define NUMBER_MAX_CHAR 50
|
||||
|
||||
struct SQStringTable
|
||||
{
|
||||
SQStringTable(SQSharedState*ss);
|
||||
~SQStringTable();
|
||||
SQString *Add(const SQChar *,SQInteger len);
|
||||
void Remove(SQString *);
|
||||
private:
|
||||
void Resize(SQInteger size);
|
||||
void AllocNodes(SQInteger size);
|
||||
SQString **_strings;
|
||||
SQUnsignedInteger _numofslots;
|
||||
SQUnsignedInteger _slotused;
|
||||
SQSharedState *_sharedstate;
|
||||
};
|
||||
|
||||
struct RefTable {
|
||||
struct RefNode {
|
||||
SQObjectPtr obj;
|
||||
SQUnsignedInteger refs;
|
||||
struct RefNode *next;
|
||||
};
|
||||
RefTable();
|
||||
~RefTable();
|
||||
void AddRef(SQObject &obj);
|
||||
SQBool Release(SQObject &obj);
|
||||
SQUnsignedInteger GetRefCount(SQObject &obj);
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
void Mark(SQCollectable **chain);
|
||||
#endif
|
||||
void Finalize();
|
||||
private:
|
||||
RefNode *Get(SQObject &obj,SQHash &mainpos,RefNode **prev,bool add);
|
||||
RefNode *Add(SQHash mainpos,SQObject &obj);
|
||||
void Resize(SQUnsignedInteger size);
|
||||
void AllocNodes(SQUnsignedInteger size);
|
||||
SQUnsignedInteger _numofslots;
|
||||
SQUnsignedInteger _slotused;
|
||||
RefNode *_nodes;
|
||||
RefNode *_freelist;
|
||||
RefNode **_buckets;
|
||||
};
|
||||
|
||||
#define ADD_STRING(ss,str,len) ss->_stringtable->Add(str,len)
|
||||
#define REMOVE_STRING(ss,bstr) ss->_stringtable->Remove(bstr)
|
||||
|
||||
struct SQObjectPtr;
|
||||
|
||||
struct SQSharedState
|
||||
{
|
||||
SQSharedState();
|
||||
~SQSharedState();
|
||||
void Init();
|
||||
public:
|
||||
SQChar* GetScratchPad(SQInteger size);
|
||||
SQInteger GetMetaMethodIdxByName(const SQObjectPtr &name);
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
SQInteger CollectGarbage(SQVM *vm);
|
||||
void RunMark(SQVM *vm,SQCollectable **tchain);
|
||||
SQInteger ResurrectUnreachable(SQVM *vm);
|
||||
static void MarkObject(SQObjectPtr &o,SQCollectable **chain);
|
||||
#endif
|
||||
SQObjectPtrVec *_metamethods;
|
||||
SQObjectPtr _metamethodsmap;
|
||||
SQObjectPtrVec *_systemstrings;
|
||||
SQObjectPtrVec *_types;
|
||||
SQStringTable *_stringtable;
|
||||
RefTable _refs_table;
|
||||
SQObjectPtr _registry;
|
||||
SQObjectPtr _consts;
|
||||
SQObjectPtr _constructoridx;
|
||||
#ifndef NO_GARBAGE_COLLECTOR
|
||||
SQCollectable *_gc_chain;
|
||||
#endif
|
||||
SQObjectPtr _root_vm;
|
||||
SQObjectPtr _table_default_delegate;
|
||||
static const SQRegFunction _table_default_delegate_funcz[];
|
||||
SQObjectPtr _array_default_delegate;
|
||||
static const SQRegFunction _array_default_delegate_funcz[];
|
||||
SQObjectPtr _string_default_delegate;
|
||||
static const SQRegFunction _string_default_delegate_funcz[];
|
||||
SQObjectPtr _number_default_delegate;
|
||||
static const SQRegFunction _number_default_delegate_funcz[];
|
||||
SQObjectPtr _generator_default_delegate;
|
||||
static const SQRegFunction _generator_default_delegate_funcz[];
|
||||
SQObjectPtr _closure_default_delegate;
|
||||
static const SQRegFunction _closure_default_delegate_funcz[];
|
||||
SQObjectPtr _thread_default_delegate;
|
||||
static const SQRegFunction _thread_default_delegate_funcz[];
|
||||
SQObjectPtr _class_default_delegate;
|
||||
static const SQRegFunction _class_default_delegate_funcz[];
|
||||
SQObjectPtr _instance_default_delegate;
|
||||
static const SQRegFunction _instance_default_delegate_funcz[];
|
||||
SQObjectPtr _weakref_default_delegate;
|
||||
static const SQRegFunction _weakref_default_delegate_funcz[];
|
||||
|
||||
SQCOMPILERERROR _compilererrorhandler;
|
||||
SQPRINTFUNCTION _printfunc;
|
||||
SQPRINTFUNCTION _errorfunc;
|
||||
bool _debuginfo;
|
||||
bool _notifyallexceptions;
|
||||
SQUserPointer _foreignptr;
|
||||
SQRELEASEHOOK _releasehook;
|
||||
private:
|
||||
SQChar *_scratchpad;
|
||||
SQInteger _scratchpadsize;
|
||||
};
|
||||
|
||||
#define _sp(s) (_sharedstate->GetScratchPad(s))
|
||||
#define _spval (_sharedstate->GetScratchPad(-1))
|
||||
|
||||
#define _table_ddel _table(_sharedstate->_table_default_delegate)
|
||||
#define _array_ddel _table(_sharedstate->_array_default_delegate)
|
||||
#define _string_ddel _table(_sharedstate->_string_default_delegate)
|
||||
#define _number_ddel _table(_sharedstate->_number_default_delegate)
|
||||
#define _generator_ddel _table(_sharedstate->_generator_default_delegate)
|
||||
#define _closure_ddel _table(_sharedstate->_closure_default_delegate)
|
||||
#define _thread_ddel _table(_sharedstate->_thread_default_delegate)
|
||||
#define _class_ddel _table(_sharedstate->_class_default_delegate)
|
||||
#define _instance_ddel _table(_sharedstate->_instance_default_delegate)
|
||||
#define _weakref_ddel _table(_sharedstate->_weakref_default_delegate)
|
||||
|
||||
bool CompileTypemask(SQIntVec &res,const SQChar *typemask);
|
||||
|
||||
|
||||
#endif //_SQSTATE_H_
|
||||
|
|
@ -1,32 +0,0 @@
|
|||
/* see copyright notice in squirrel.h */
|
||||
#ifndef _SQSTRING_H_
|
||||
#define _SQSTRING_H_
|
||||
|
||||
inline SQHash _hashstr (const SQChar *s, size_t l)
|
||||
{
|
||||
SQHash h = (SQHash)l; /* seed */
|
||||
size_t step = (l >> 5) + 1; /* if string is too long, don't hash all its chars */
|
||||
size_t l1;
|
||||
for (l1 = l; l1 >= step; l1 -= step)
|
||||
h = h ^ ((h << 5) + (h >> 2) + ((unsigned short)s[l1 - 1]));
|
||||
return h;
|
||||
}
|
||||
|
||||
struct SQString : public SQRefCounted
|
||||
{
|
||||
SQString(){}
|
||||
~SQString(){}
|
||||
public:
|
||||
static SQString *Create(SQSharedState *ss, const SQChar *, SQInteger len = -1 );
|
||||
SQInteger Next(const SQObjectPtr &refpos, SQObjectPtr &outkey, SQObjectPtr &outval);
|
||||
void Release();
|
||||
SQSharedState *_sharedstate;
|
||||
SQString *_next; //chain for the string table
|
||||
SQInteger _len;
|
||||
SQHash _hash;
|
||||
SQChar _val[1];
|
||||
};
|
||||
|
||||
|
||||
|
||||
#endif //_SQSTRING_H_
|
||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue