Lua移植到标准ANSI C环境

news2024/11/29 12:49:24

本文目录

  • 1、引言
  • 2、环境准备
    • 2.1 源码下载
    • 2.2 项目构建环境准备
  • 3、项目编译
    • 3.1 添加main.c
    • 3.2 Kconfig选择模块
    • 3.3 项目构建
    • 3.4 项目编译
  • 4、运行

文章对应视频教程：

在下方喔 ~~~ 欢迎关注


点击图片或链接访问我的B站主页~~~

lau解释器移植与功能验证

1、引言

本文将介绍如何将Lua解释器移植到标准的ANSI C环境。
实现ANSI C的移植，就可以实现在嵌入式各类板卡的移植。
当然，你的板卡得具备ANSI C环境，一般情况keil、GCC都会有C库实现。
关于Lua解释器的重要性，或者有何特殊指出，可以看看我得上篇文章：
《可用于嵌入式的解释器调研对比，及lua解释器介绍》

2、环境准备

2.1 源码下载

您可以在Lua官方网站上下载Lua解释器的源代码。以下是Lua官方网站的链接：

Lua解释器下载

在该网页上，点击的Lua解释器源代码的下载链接（图中红色框部分），进行源代码下载，可能有点慢。

在这里插入图片描述
下载完成后，进行接下，得到下图的文件，提取其中的src文件夹，将src中的makefile、lua.c、luac.c文件删除，待用。
在这里插入图片描述

2.2 项目构建环境准备

参考往期博客《Cmake+Kconfig项目构建》，搭建一个空的项目框架，用来测试Lua是否移植成功。

复制项目构建模板，修改名字，修改CMakeLists.txt和kconfig文件，方便后续模块化移植到自己的项目中，目录结构如下。

在这里插入图片描述
这里也可以直接复制到keil工程中，只要你的环境具有ANSI C接口即可。

将前面准备好的源码复制到source/lua文件夹下，注意是将src中的makefile、lua.c、luac.c文件删除后，剩下的代码。

3、项目编译

3.1 添加main.c

我们需要在main.c中实现对lua代码的解释功能。
由于我在window环境下，我可以很轻松的打开文件，所以直接采用的文件读取的方式执行。
大家也可以直接将代码写在内存中，类似与下面这种方式：

char buff[] = "printf(123)";

我这边的代码比较复杂，还是用读取文件实现。

main.c内容如下：

#include "stdio.h"
#include <stdlib.h>

#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"
#include "string.h"

#define BUFFER_SIZE 1024*1024*1

static lua_State *L = NULL ;

int lua_deal_line(const char *str)
{
	int ret = luaL_dostring(L,str);
	if(ret != LUA_OK)
	{
		printf("%s\r\n",lua_tostring(L ,-1));
		return -1;
	}	
	return 0;
}


int main(void)
{
	L = luaL_newstate();
	luaL_openlibs(L);

    FILE *file;
    char buffer[BUFFER_SIZE] = {0};
    size_t read_size;

    // 打开文件
    file = fopen("test.lua", "rb"); // 使用"rb"模式以二进制方式读取文件
    if (file == NULL) {
        perror("无法打开文件");
        return 1;
    }

    // 读取文件内容到缓冲区
    read_size = fread(buffer, 1, BUFFER_SIZE - 1, file); // 保留一个字节给'\0'
    if (read_size == 0 && ferror(file)) {
        perror("read file error\r\n");
        fclose(file);
        return 1;
    }

    // 添加字符串末尾的空字符
    buffer[read_size] = '\0';

    // 关闭文件
    fclose(file);


    lua_deal_line(buffer);

    lua_close(L);
    return 1;
}

创建test.lua文件放在当前路径下。

-- Lua 基本语法
print("Running basic syntax test...")
assert(true)  -- 如果代码运行到这里，没有错误发生，那么基本语法测试通过

-- Lua 数据类型
print("Running data type test...")
local num = 10          -- number
local str = "Hello"     -- string
local bool = true       -- boolean
local tbl = {1, 2, 3}   -- table
local func = function() return "I am a function" end  -- function
assert(type(num) == "number")
assert(type(str) == "string")
assert(type(bool) == "boolean")
assert(type(tbl) == "table")
assert(type(func) == "function")

-- Lua 变量
print("Running variable test...")
local localVar = "I am local"
_G.globalVar = "I am global"
assert(localVar == "I am local")
assert(_G.globalVar == "I am global")

-- Lua 循环
print("Running loop test...")
local sum = 0
for i = 1, 5 do
    sum = sum + i
end
assert(sum == 15)

sum = 0
local i = 1
while i <= 5 do
    sum = sum + i
    i = i + 1
end
assert(sum == 15)

-- Lua 流程控制
print("Running control flow test...")
local x = 10
local result
if x > 5 then
    result = "greater"
elseif x == 5 then
    result = "equal"
else
    result = "less"
end
assert(result == "greater")

-- Lua 函数
print("Running function test...")
function add(a, b)
    return a + b
end
assert(add(5, 3) == 8)

-- Lua 运算符
print("Running operator test...")
local a, b = 10, 20
assert(a + b == 30)
assert(a - b == -10)
assert(a * b == 200)
assert(a / b == 0.5)
assert(a % b == 10)
assert(a ^ 2 == 100)

-- Lua 字符串
print("Running string test...")
local s = "Lua"
assert(#s == 3)
assert(s .. " programming" == "Lua programming")

-- Lua 数组
print("Running array test...")
local arr = {10, 20, 30, 40, 50}
assert(arr[1] == 10)
assert(#arr == 5)

-- Lua 迭代器
print("Running iterator test...")
local function squareIterator(max, current)
    current = current + 1
    if current <= max then
        return current, current * current
    end
end
local results = {}
for i, n in squareIterator, 5, 0 do
    table.insert(results, n)
end
assert(#results == 5)
assert(results[1] == 1)
assert(results[5] == 25)

-- Lua table(表)
print("Running table test...")
local person = {name = "John", age = 30}
assert(person.name == "John")
assert(person.age == 30)

-- Lua 模块与包
print("Running module test...")
-- 假设有一个 module_name.lua 文件，内容如下：
-- local M = {}
-- function M.hello() return "Hello, module!" end
-- return M
-- local module = require("module_name")
-- assert(module.hello() == "Hello, module!")

-- Lua 元表(Metatable)
print("Running metatable test...")
local mt = {
    __add = function(table1, table2)
        local sum = {}
        for k, v in pairs(table1) do
            sum[k] = v + table2[k]
        end
        return sum
    end
}
local t1 = {1, 2, 3}
local t2 = {4, 5, 6}
setmetatable(t1, mt)
local t3 = t1 + t2
assert(t3[1] == 5)
assert(t3[2] == 7)
assert(t3[3] == 9)

-- Lua 协同程序(coroutine)
-- print("Running coroutine test...")
-- local co = coroutine.create(function()
--     for i = 1, 5 do
--         coroutine.yield(i)
--     end
-- end)
-- local _, first = coroutine.resume(co)
-- assert(first == 1)
-- local _, second = coroutine.resume(co)
-- assert(second == 2)

-- Lua 文件 I/O
-- print("Running file I/O test...")
-- local file = io.open("test.txt", "w")
-- file:write("Hello, file!")
-- file:close()
-- file = io.open("test.txt", "r")
-- local content = file:read("*all")
-- file:close()
-- assert(content == "Hello, file!")

-- Lua 错误处理
print("Running error handling test...")
local status, err = pcall(function()
    error("An error occurred")
end)
assert(not status)
assert(string.find(err, "An error occurred"))

-- Lua 调试(Debug)
-- print("Running debug test...")
-- local debug = require("debug")
-- local traceback
-- local function myfunc()
--     traceback = debug.traceback("Stack trace")
-- end
-- myfunc()
-- assert(string.find(traceback, "Stack trace"))

-- Lua 垃圾回收
print("Running garbage collection test...")
local tbl = {1, 2, 3}
setmetatable(tbl, {__gc = function() print("Garbage collected") end})
tbl = nil
collectgarbage()  -- 在控制台中应能看到 "Garbage collected"

-- Lua 面向对象
print("Running object-oriented test...")
local Animal = {name = "", age = 0}
function Animal:new(o, name, age)
    o = o or {}
    setmetatable(o, self)
    self.__index = self
    self.name = name or ""
    self.age = age or 0
    return o
end
function Animal:speak()
    return "I am " .. self.name .. ", " .. self.age .. " years old."
end

local dog = Animal:new(nil, "Dog", 5)
assert(dog:speak() == "I am Dog, 5 years old.")

print("All tests passed!")

3.2 Kconfig选择模块

在project\pro1目录下，打开powershell，输入python .\ck_script.py cn进入到图形配置界面。

在这里插入图片描述

确保回车选中该模块，再按Q Y按键退出。

3.3 项目构建

在powershell，输入python .\ck_script.py b进行项目构建，构建完成后，对文件的编译规则就已经生成。
在这里插入图片描述

3.4 项目编译

在powershell，输入python .\ck_script.py m进行项目编译，结果如下。

在这里插入图片描述

4、运行

在powershell，输入.\lua.exe运行程序，结果如下。
在这里插入图片描述
这个Lua脚本验证了我们需要的基本语法、数据类型、变量、循环、流程控制、函数、运算符、字符串、数组、迭代器、table(表)、元表(Metatable)、错误处理、垃圾回收、面向对象等功能。

时间流逝、年龄增长，是自己的磨炼、对知识技术的应用，还有那不变的一颗对嵌入式热爱的心！

到这里就结束了！希望大家给我的文章和B站视频
点赞o(￣▽￣)ｄ、关注(o)/~、评论(▽)！

本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如若转载，请注明出处：http://www.coloradmin.cn/o/1802154.html

如若内容造成侵权/违法违规/事实不符，请联系多彩编程网进行投诉反馈，一经查实，立即删除！

相关文章

探索LLM 在金融领域有哪些潜在应用——通过使用 GPT-4 测试金融工程、市场预测和风险管理等 11 项任务

探索LLM 在金融领域有哪些潜在应用——通过使用 GPT-4 测试金融工程、市场预测和风险管理等 11 项任务

概述 近年来&#xff0c;用于自然语言理解和生成的人工智能技术在自然语言处理领域取得了突破性进展&#xff0c;OpenAI 的 GPT 和其他大规模语言模型在该领域取得了显著进步。这些模型通过先进的计算能力和算法&#xff0c;展示了处理复杂任务的能力&#xff0c;如理解复杂语…
阅读更多...
安装vs2022低版本

安装vs2022低版本

https://learn.microsoft.com/en-us/visualstudio/releases/2022/release-history#updating-your-installation-to-a-specific-release 参考https://www.cnblogs.com/bodong/p/18084619
阅读更多...
Sketch文件轻松转换为PSD的简便方法

Sketch文件轻松转换为PSD的简便方法

由于Sketch只支持在Mac上使用&#xff0c;当设计师使用Sketch完成设计草案&#xff0c;需要与使用Windows的同事连接设计项目时&#xff0c;会遇到同事无法打开或在Photoshop中查看和编辑的情况&#xff0c;这真的很尴尬。别担心&#xff01;在本文中&#xff0c;我们将分享Ske…
阅读更多...
计算机网络--物理层

计算机网络--物理层

计算机网络--计算机网络概念 计算机网络--物理层 计算机网络--数据链路层 计算机网络--网络层 计算机网络--传输层 计算机网络--应用层 1. 基本概念 物理层的概念&#xff1a;物理层解决如何在在连接各种计算机的传输媒体上传输数据比特流&#xff0c;而不是指具体的传输…
阅读更多...
生气时，你的“心”会发生什么变化？孟德尔随机化分析猛如虎，结果都是套路...

生气时，你的“心”会发生什么变化？孟德尔随机化分析猛如虎，结果都是套路...

“不生气不生气&#xff0c;气出病来无人替”&#xff0c;不少人遇事常这样宽慰自己。事实上&#xff0c;“气死”真不是危言耸听。越来越多的研究证明了情绪稳定对健康的重要性&#xff0c;那么&#xff0c;当情绪频繁波动时&#xff0c;我们的心血管究竟会发生什么变化&#…
阅读更多...
老师如何制作高考后志愿填报信息采集系统？

老师如何制作高考后志愿填报信息采集系统？

高考结束后&#xff0c;志愿填报成为学生们的头等大事。面对众多选择&#xff0c;如何高效、准确地填报志愿&#xff0c;是每个学生和家长都关心的问题。作为老师&#xff0c;能否利用现有的技术工具&#xff0c;帮助学生更好地完成志愿填报呢&#xff1f; 老师们需要一个能够…
阅读更多...
群体优化算法---灰狼优化算法学习介绍以及在卷积神经网络训练上的应用

群体优化算法---灰狼优化算法学习介绍以及在卷积神经网络训练上的应用

**长文预警**介绍 在自然界中&#xff0c;狼群的社会结构和捕猎策略展现了高度的智能和协调性&#xff0c;灰狼优化算法&#xff08;Grey Wolf Optimizer, GWO&#xff09;正是受此启发提出的一种群体智能优化算法。GWO主要模拟了灰狼的社会等级制度和捕猎行为&#xff0c;其核…
阅读更多...
MySQL数据库(详解)

MySQL数据库(详解)

目录 前言 一、数据库的基本概念 1.数据(Data) 2.表 3.数据库 4.数据库管理系统(DBMS) 5.数据库系统 二、数据库系统发展史 1.第一代数据库 2.第二代数据库 3.第三代数据库 三、当今主流数据库介绍 1.SQL Server (微软公司产品) 2.Oracle (甲骨文公司产品) 3.DB…
阅读更多...
[office] 如何在Excel中拉动单元格时表头不变形- #学习方法#职场发展#经验分享

[office] 如何在Excel中拉动单元格时表头不变形- #学习方法#职场发展#经验分享

如何在Excel中拉动单元格时表头不变形? 如何在Excel中拉动单元格时表头不变形&#xff1f;Excel是我们常用的办公软件&#xff0c;当我们使用Excel拉动单元格时表头不变形&#xff0c;该如何操作呢&#xff0c;下面小编就为大家做详细讲解 如何在Excel中拉动单元格时表头不变…
阅读更多...
[word] 在Word中插入分页符 #经验分享#经验分享#笔记

[word] 在Word中插入分页符 #经验分享#经验分享#笔记

在Word中插入分页符 在 Word中插入分页符&#xff1f;教大家如何在正文中快速的插入分页符。 ? ? ?1、在正文中选择我们要分页的位置。 ? ? ?2、点击插入&#xff0c;选择分页功能里面的“分页符”功能&#xff0c;即可成功在我们选择的位置进行分页。 ? ? ? ?以上…
阅读更多...
存在d盘里的数据突然没有了？别担心，恢复方案在此

存在d盘里的数据突然没有了？别担心，恢复方案在此

在数字化时代&#xff0c;数据存储的重要性不言而喻。然而&#xff0c;有时候我们会遭遇一些意想不到的困扰&#xff0c;比如存储在D盘的数据突然消失。这不仅可能导致重要文件的丢失&#xff0c;还可能影响我们的工作和生活。本文将探讨D盘数据消失的可能原因&#xff0c;提供…
阅读更多...
这10个python库，下载都超过5亿

这10个python库，下载都超过5亿

python的库数不胜数。哪些库使用得最多呢。今天分享10个下载都超过5亿的python库。从高到低排序 第一名&#xff1a;Urllib3 下载次数&#xff1a;8.93亿次 介绍&#xff1a;Urllib3是一个功能强大且用户友好的HTTP客户端库&#xff0c;提供了许多Python标准库中没有的特性&…
阅读更多...
Golang | Leetcode Golang题解之第137题只出现一次的数字II

Golang | Leetcode Golang题解之第137题只出现一次的数字II

题目&#xff1a; 题解&#xff1a; func singleNumber(nums []int) int {a, b : 0, 0for _, num : range nums {b (b ^ num) &^ aa (a ^ num) &^ b}return b }
阅读更多...
Linux卸载残留MySQL【带图文命令巨详细】

Linux卸载残留MySQL【带图文命令巨详细】

Linux卸载残留MySQL 1、检查残留mysql2、检查并删除残留mysql依赖3、检查是否自带mariadb库 1、检查残留mysql 如果残留mysql组件&#xff0c;使用命令 rpm -e --nodeps 残留组件名 按顺序进行移除操作 #检查系统是否残留过mysql rpm -qa | grep mysql2、检查并删除残留mysql…
阅读更多...
【小白专用24.6.8】C#Lambda表达式

【小白专用24.6.8】C#Lambda表达式

Lambda表达式可以采用以下任意一种形式的表达式&#xff1a; 1.表达式Lambda&#xff0c;表达式为其主体&#xff1a; (input-parameters) > expression 1 2.语句Lambda&#xff0c;语句块作为其主体&#xff1a; (input-parameters) > {<sequence-of-statements>…
阅读更多...
数据结构之初识泛型

数据结构之初识泛型

目录&#xff1a; 一.什么是泛型 二.引出泛型 三.泛型语法及&#xff0c;泛型类的使用和裸类型(Raw Type) 的了解 . 四.泛型的编译&#xff1a; 五.泛型的上界 六.泛型方法 注意&#xff1a;在看泛型之前可以&#xff0c;回顾一下&#xff0c;包装类&#xff0c;包装类就是服务…
阅读更多...
Mac保姆级配置jdk环境

Mac保姆级配置jdk环境

1.找到下载的jdk环境 通常是这个。留作备用 /Library/Java/JavaVirtualMachines/jdk1.8.0_291.jdk/Contents/Home/bin 然后新开一个终端下执行以下命令 sudo vim ~/.bash_profile 进入编辑模式后 按 i 开始添加内容结束编辑模式按 ESC结束后保存输入 :wq!不保存输入 :q! 注意…
阅读更多...
Elastic Platform 8.14：ES|QL 正式发布、静态加密和向量搜索优化

Elastic Platform 8.14：ES|QL 正式发布、静态加密和向量搜索优化

作者&#xff1a;来自 Elastic Gilad Gal, Tyler Perkins, Alex Chalkias, Trevor Blackford, Ninoslav Miskovic, Fabio Busatto, Aris Papadopoulos Elastic Platform 8.14 提供了 Elasticsearch 查询语言 (ES|QL) 的正式发行版 (GA) — Elastic 中数据探索和操作的未来。它还…
阅读更多...
编写一个程序，提示用户输入三个点 p0、p1 和 p2，显示 p2 是否在从 p0 到 p1 的线段左侧、右侧，或者在该直线上。

编写一个程序，提示用户输入三个点 p0、p1 和 p2，显示 p2 是否在从 p0 到 p1 的线段左侧、右侧，或者在该直线上。

(几何:点的位置)给定一个从点 p0(x0&#xff0c;y0)到pl(xl&#xff0c;pl)的有向线段&#xff0c;可以使用下面的条件来确定点 p2(x2&#xff0c;y2)是在线段的左侧、右侧&#xff0c;或者在该直线上(见下图): 编写一个程序&#xff0c;提示用户输入三个点 p0、p1 和 p2&#…
阅读更多...
力扣78. 子集

力扣78. 子集

给你一个整数数组nums&#xff0c;数组中的元素互不相同。返回该数组所有可能的子集&#xff08;幂集&#xff09;。解集不能包含重复的子集。你可以按任意顺序返回解集。 示例 1&#xff1a; 输入&#xff1a;nums [1,2,3] 输出&#xff1a;[[],[1],[2],[1,2],[3],[1,3…
阅读更多...
推荐文章
最新文章

Copyright @ 2022~2023