Merge branch 'master' of gitee.com:openLuat/LuatOS

demo/test/use/main.lua

@@ -1,224 +0,0 @@
-
--- LuaTools需要PROJECT和VERSION这两个信息
-PROJECT = "httpdemo"
-VERSION = "1.0.0"
-
---[[
-本demo需要http库, 大部分能联网的设备都具有这个库
-http也是内置库, 无需require
-]]
-
--- sys库是标配
-_G.sys = require("sys")
---[[特别注意, 使用http库需要下列语句]]
-_G.sysplus = require("sysplus")
-
----- MultipartForm上传文件
--- url string 请求URL地址
--- req_headers table 请求头
--- params table 需要传输的数据参数
-local function postMultipartFormData(url, params)
-    local boundary = "----WebKitFormBoundary"..os.time()
-    local req_headers = {
-        ["Content-Type"] = "multipart/form-data; boundary="..boundary,
-    }
-    local body = {}
-
-    -- 解析拼接 body
-    for k,v in pairs(params) do
-        if k=="texts" then
-            local bodyText = ""
-            for kk,vv in pairs(v) do
-                print(kk,vv)
-                bodyText = bodyText.."--"..boundary.."\r\nContent-Disposition: form-data; name=\""..kk.."\"\r\n\r\n"..vv.."\r\n"
-            end
-            table.insert(body, bodyText)
-        elseif k=="files" then
-            local contentType =
-            {
-                txt = "text/plain",             -- 文本
-                jpg = "image/jpeg",             -- JPG 格式图片
-                jpeg = "image/jpeg",            -- JPEG 格式图片
-                png = "image/png",              -- PNG 格式图片   
-                gif = "image/gif",              -- GIF 格式图片
-                html = "image/html",            -- HTML
-                json = "application/json"       -- JSON
-            }
-            
-            for kk,vv in pairs(v) do
-                if type(vv) == "table" then
-                    for i=1, #vv do
-                        print(kk,vv[i])
-                        table.insert(body, "--"..boundary.."\r\nContent-Disposition: form-data; name=\""..kk.."\"; filename=\""..vv[i]:match("[^%/]+%w$").."\"\r\nContent-Type: "..contentType[vv[i]:match("%.(%w+)$")].."\r\n\r\n")
-                        table.insert(body, io.readFile(vv[i]))
-                        table.insert(body, "\r\n")
-                    end
-                else
-                    print(kk,vv)
-                    table.insert(body, "--"..boundary.."\r\nContent-Disposition: form-data; name=\""..kk.."\"; filename=\""..vv:match("[^%/]+%w$").."\"\r\nContent-Type: "..contentType[vv:match("%.(%w+)$")].."\r\n\r\n")
-                    table.insert(body, io.readFile(vv))
-                    table.insert(body, "\r\n")
-                end
-            end
-        end
-    end 
-    table.insert(body, "--"..boundary.."--\r\n")
-    body = table.concat(body)
-    log.info("headers: ", "\r\n" .. json.encode(req_headers), type(body))
-    log.info("body: " .. body:len() .. "\r\n" .. body)
-    local code, headers, body = http.request("POST",url,
-            req_headers,
-            body
-    ).wait()   
-    log.info("http.post", code, headers, body)
-end
-
--- sys.timerLoopStart(function ()
---     log.info("mem.lua", rtos.meminfo())
---     log.info("mem.sys", rtos.meminfo("sys"))
--- end, 3000)
-sys.taskInit(function()
-    -----------------------------
-    -- 统一联网函数, 可自行删减
-    ----------------------------
-    if rtos.bsp():startsWith("ESP32") then
-        -- wifi 联网, ESP32系列均支持
-        local ssid = "uiot"
-        local password = "12345678"
-        log.info("wifi", ssid, password)
-        -- TODO 改成esptouch配网
-        LED = gpio.setup(12, 0, gpio.PULLUP)
-        wlan.init()
-        wlan.setMode(wlan.STATION)
-        wlan.connect(ssid, password, 1)
-        local result, data = sys.waitUntil("IP_READY", 30000)
-        log.info("wlan", "IP_READY", result, data)
-        device_id = wlan.getMac()
-    elseif rtos.bsp() == "AIR105" then
-        -- w5500 以太网, 当前仅Air105支持
-        w5500.init(spi.HSPI_0, 24000000, pin.PC14, pin.PC01, pin.PC00)
-        w5500.config() --默认是DHCP模式
-        w5500.bind(socket.ETH0)
-        LED = gpio.setup(62, 0, gpio.PULLUP)
-        sys.wait(1000)
-        -- TODO 获取mac地址作为device_id
-    elseif rtos.bsp() == "EC618" then
-        -- Air780E/Air600E系列
-        --mobile.simid(2)
-        LED = gpio.setup(27, 0, gpio.PULLUP)
-        device_id = mobile.imei()
-        -- log.info("ipv6", mobile.ipv6(true))
-        sys.waitUntil("IP_READY", 30000)
-    end
-
-    -- 打印一下支持的加密套件, 通常来说, 固件已包含常见的99%的加密套件
-    -- if crypto.cipher_suites then
-    --     log.info("cipher", "suites", json.encode(crypto.cipher_suites()))
-    -- end
-
-    -------------------------------------
-    -------- HTTP 演示代码 --------------
-    -------------------------------------
-
-    
-    socket.sslLog(2)
-    while 1 do
-        -- 最普通的Http GET请求
-        -- local code, headers, body = http.request("GET", "https://www.air32.cn/").wait()
-        -- log.info("http.get", code, headers, body)
-        -- local code, headers, body = http.request("GET", "https://mirrors6.tuna.tsinghua.edu.cn/", nil, nil, {ipv6=true}).wait()
-        -- log.info("http.get", code, headers, body)
-        -- sys.wait(100)
-        	
-        
-        log.info("mem.lua", rtos.meminfo())
-        log.info("mem.sys", rtos.meminfo("sys"))
-        local code, headers, body = http.request("GET", "https://www.luatos.com/").wait()
-        log.info("http.get", code, headers, #body)
-        sys.wait(100)
-        log.info("mem.lua", rtos.meminfo())
-        log.info("mem.sys", rtos.meminfo("sys"))
-        -- 按需打印
-        -- code 响应值, 若大于等于 100 为服务器响应, 小于的均为错误代码
-        -- headers是个table, 一般作为调试数据存在
-        -- body是字符串. 注意lua的字符串是带长度的byte[]/char*, 是可以包含不可见字符的
-        -- log.info("http", code, json.encode(headers or {}), #body > 512 and #body or body)
-
-        -- -- POST request 演示
-        -- local req_headers = {}
-        -- req_headers["Content-Type"] = "application/json"
-        -- local body = json.encode({name="LuatOS"})
-        -- local code, headers, body = http.request("POST","http://site0.cn/api/httptest/simple/date", 
-        --         req_headers,
-        --         body -- POST请求所需要的body, string, zbuff, file均可
-        -- ).wait()
-        -- log.info("http.post", code, headers, body)
-
-        
-        -- -- -- POST multipart/form-data模式 上传文件---手动拼接
-        -- local boundary = "----WebKitFormBoundary"..os.time()
-        -- local req_headers = {
-        --     ["Content-Type"] = "multipart/form-data; boundary="..boundary,
-        -- }
-        -- local body = "--"..boundary.."\r\n"..
-        --              "Content-Disposition: form-data; name=\"uploadFile\"; filename=\"luatos_uploadFile_TEST01.txt\""..
-        --              "\r\nContent-Type: text/plain\r\n\r\n"..
-        --              "1111http_测试一二三四654zacc\r\n"..
-        --              "--"..boundary
-
-        -- log.info("headers: ", "\r\n"..json.encode(req_headers))
-        -- log.info("body: ", "\r\n"..body)
-        -- local code, headers, body = http.request("POST","http://airtest.openluat.com:2900/uploadFileToStatic",
-        --         req_headers,
-        --         body -- POST请求所需要的body, string, zbuff, file均可
-        -- ).wait()
-        -- log.info("http.post", code, headers, body)
-
-        -- -- 也可用postMultipartFormData(url, params) 上传文件
-        -- postMultipartFormData(
-        --     "http://airtest.openluat.com:2900/uploadFileToStatic",
-        --     {
-        --         -- texts = 
-        --         -- {
-        --         --     ["imei"] = "862991234567890",
-        --         --     ["time"] = "20180802180345"
-        --         -- },
-                
-        --         files =
-        --         {
-        --             ["uploadFile"] = "/luadb/luatos_uploadFile.txt",
-        --         }
-        --     }
-        -- )
-    
-        -- -- POST and download, task内的同步操作
-        -- local opts = {}                 -- 额外的配置项
-        -- opts["dst"] = "/data.bin"       -- 下载路径,可选
-        -- opts["timeout"] = 30            -- 超时时长,单位秒,可选
-        -- opts["adapter"] = socket.ETH0  -- 使用哪个网卡,可选
-        -- local code, headers, body = http.request("POST","http://site0.cn/api/httptest/simple/date",
-        --         {}, -- 请求所添加的 headers, 可以是nil
-        --         "", 
-        --         opts
-        -- ).wait()
-        -- log.info("http.post", code, headers, body) -- 只返回code和headers
-    
-        -- local f = io.open("/data.bin", "rb")
-        -- if f then
-        --     local data = f:read("*a")
-        --     log.info("fs", "data", data, data:toHex())
-        -- end
-        
-        -- -- GET request, 开个task让它自行执行去吧, 不管执行结果了
-        -- sys.taskInit(http.request("GET","http://site0.cn/api/httptest/simple/time").wait)
-
-        -- log.info("sys", rtos.meminfo("sys"))
-        -- log.info("lua", rtos.meminfo("lua"))
-        sys.wait(10000)
-    end
-end)
-
--- 用户代码已结束---------------------------------------------
--- 结尾总是这一句
-sys.run()
--- sys.run()之后后面不要加任何语句!!!!!

luat/modules/luat_lib_bit64.c

@@ -1,11 +1,11 @@
 /*
 @module  bit64
-@summary 32位系统上对64位数据的基本算术运算和逻辑运算，64位数据用9字节string存储，byte7~byte0存数据，byte8=0表示整形，其他表示浮点
+@summary 32位系统上对64位数据的基本算术运算和逻辑运算
 @version 0.1
 @date    2023.03.11
-@video
 @tag LUAT_USE_BIT64
 @demo  bit64
+@note 64位数据用9字节string存储，byte7~byte0存数据，byte8=0表示整形，其他表示浮点
 */
 #include "luat_base.h"
 #include "luat_malloc.h"
@@ -17,7 +17,7 @@
 64bit数据转成32bit输出
 @api bit64.to32(data64bit)
 @string 9字节数据
-@return int or number
+@return any 根据64bit数据输出int或者number
  */
 static int l_bit64_to32(lua_State *L)
 {
@@ -73,7 +73,7 @@ static int l_bit64_to64(lua_State *L)
 /**
 64bit数据格式化打印成字符串，用于显示值
 @api bit64.show(a,type,flag)
-@string a
+@string 需要打印的64bit数据
 @int 进制，10=10进制，16=16进制，默认10，只支持10或者16
 @boolean 整形是否按照无符号方式打印，true是，false不是，默认false，浮点忽略
 @return string 可以打印的值
@@ -403,7 +403,7 @@ static int l_bit64_pide(lua_State *L)
 
 /**
 64bit数据位移 a>>b 或者 a<<b
-@api bit64.pide(a,b,flag)
+@api bit64.shift(a,b,flag)
 @string a
 @int b
 @boolean 位移方向，true左移<<，false右移>>，默认false