AI 助理
文档备案控制台
开发者社区 云计算 文章 正文

五,ESP8266 TCP服务器多连接(基于Lua脚本语言)

2017-09-16 1770
版权
版权声明：
本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《 阿里云开发者社区用户服务协议》和 《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写 侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
简介： 一些时间去准备朋友的元器件了...接着写,,争取今天写完所有的文章,,因为答应了朋友下周5之前要做好朋友的东西对于TCP大家在玩AT指令的时候有没有发现客户端最多连接5个,,,再连接就不行了??所以在用AT指令开发的时候单片机程序一定要记得清除多余的连接现在看用LUA语言怎么做直接先上菜Init.

一些时间去准备朋友的元器件了...

接着写,,争取今天写完所有的文章,,因为答应了朋友下周5之前要做好朋友的东西

对于TCP大家在玩AT指令的时候有没有发现客户端最多连接5个,,,再连接就不行了??

所以在用AT指令开发的时候单片机程序一定要记得清除多余的连接

现在看用LUA语言怎么做

直接先上菜

Init.lua

 

gpio.mode(4,gpio.OUTPUT)
gpio.mode(2,gpio.OUTPUT)
gpio.write(4,1)

tmr.alarm(0, 1000, 1, function()
    gpio.write(4,1-gpio.read(4))
end)

tmr.alarm(1, 1000, 0, function()
    dofile("wifi.lua")
end)

wifi.lua

 

wifi.setmode(wifi.STATIONAP)


cfg={}
cfg.ssid="Hellow8266"
cfg.pwd="11223344"
wifi.ap.config(cfg)


apcfg={}
apcfg.ssid="qqqqq"
apcfg.pwd="11223344"
wifi.sta.config(apcfg)
wifi.sta.connect()


TCPSever=net.createServer(net.TCP,28800) 


TcpConnectCnt = 0
TcpSocketTable={}
TCPSever:listen(8080,function(socket) 
  
    if  TcpConnectCnt == 4 then
        if  TcpSocketTable[0] ~= nil then 
            TcpSocketTable[0]:close()
            TcpSocketTable[0] = nil
        end    
    else
        if  TcpSocketTable[TcpConnectCnt+1] ~= nil then 
            TcpSocketTable[TcpConnectCnt+1]:close()
            TcpSocketTable[TcpConnectCnt+1] = nil
        end 
    end
    
    TcpSocketTable[TcpConnectCnt] = socket
    
    print(TcpConnectCnt.."-Connect")
    
    
    TcpConnectCnt = TcpConnectCnt + 1
    if  TcpConnectCnt == 5 then
        TcpConnectCnt = 0
    end
    
    
    socket:on("receive",function(socket,data) 
          uart.write(0,data) 
    end) 


    socket:on("disconnection",function(sck,c) 
        for i=0,4 do
            if  TcpSocketTable[i] == sck then
                TcpSocketTable[i] = nil
                print(i.."-Disconnect")
            end
        end
    end)
    
end)






uart.on("data",0,function(data) 


    for i=0,5 do
        if  TcpSocketTable[i] ~= nil then
            TcpSocketTable[i]:send(data)
        end
    end
        
end, 0)




printip = 0
wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
    printip = 0
end)




wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)
   if printip == 0 then
      print("+IP"..T.IP)
   end
   printip = 1
end)

下面看解释.............

 

wifi.setmode(wifi.STATIONAP)--模式AP+STATION就不说了

cfg={}
cfg.ssid="Hellow8266"
cfg.pwd="11223344"
wifi.ap.config(cfg)--设置模块的无线和密码

apcfg={}
apcfg.ssid="qqqqq"
apcfg.pwd="11223344"
wifi.sta.config(apcfg)--设置模块连接路由器的无线和密码

--wifi.sta.connect()连接路由器,断开后可能就不自动连接了,可以用下面的
wifi.sta.autoconnect(1)可以用这个断开后自动连接路由器




TCPSever=net.createServer(net.TCP,28800) --创建服务器超过28800S不通信断开已有的连接

TcpConnectCnt = 0--连接个数计数
TcpSocketTable={}--存储socket
TCPSever:listen(8080,function(socket) 

    如果0号连接就把1号关掉,,,1号连接就把2号关掉....4号连接就把0号关掉,这样子循环,
    当然您会问可以连接5个,,这样子只可以连接四个了,,,为什么....因为如果连接了5个就进不
    来这个监听函数了.......所以必须留下一个空位
    
    if  TcpConnectCnt == 4 then
        if  TcpSocketTable[0] ~= nil then 
            TcpSocketTable[0]:close()
            TcpSocketTable[0] = nil
        end    
   else
        if  TcpSocketTable[TcpConnectCnt+1] ~= nil then 
            TcpSocketTable[TcpConnectCnt+1]:close()
            TcpSocketTable[TcpConnectCnt+1] = nil
        end 
   end

    TcpSocketTable[TcpConnectCnt] = socket--把连接的socket存到数组

    
    print(TcpConnectCnt.."-Connect")--打印几号连接了  对了 .. 是连接符
    
    
    TcpConnectCnt = TcpConnectCnt + 1--连接个数加一
    if  TcpConnectCnt == 5 then --归零
        TcpConnectCnt = 0
    end
    
    
    socket:on("receive",function(socket,data) 
          uart.write(0,data) --把接收到的数据发到串口
    end) 

    socket:on("disconnection",function(sck,c) 
        for i=0,4 do --判断是哪个断开了连接,,就把对应的socket变量置为 nil
            if  TcpSocketTable[i] == sck then
                TcpSocketTable[i] = nil
                print(i.."-Disconnect")
            end
        end
    end)
    
end)



uart.on("data",0,function(data) 

    for i=0,4 do  --把串口的数据发向不为 nil 的连接
        if  TcpSocketTable[i] ~= nil then
            TcpSocketTable[i]:send(data)
        end
    end
        
end, 0)

--下面是连接路由器和没有连接路由器的监听函数,,好像是1S检测一次
printip = 0
wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
    printip = 0
end)


wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)
   if printip == 0 then
      print("+IP"..T.IP)
   end
   printip = 1
end)

 

现在把程序下进去

测试软件呢在这里下载--也可以自己下载个网络调试助手

https://item.taobao.com/item.htm?spm=686.1000925.0.0.4a155084jlU4Rd&id=558508797404

连接了路由器了....

 

第一个连接

 

测试数据

 

再来几个连接

 

 

 

 

现在再连接一个

 

 

 

 

 

我现在随意断开一个,看一看串口应该打印哪一个断开了连接

 

 

 

现在发数据

 

 

 

 

好现在呢控制就用多个客户端控制继电器

 

 

 


这篇文章最后的指令,,毕竟最终咱们就要做成那样子.....这样的话8266就应该使用的非常顺手和轻松了

对了在

http://www.cnblogs.com/yangfengwu/p/7520260.html

和http://www.cnblogs.com/yangfengwu/p/7524326.html

这篇两文章中有提及......这次是用多个TCP客户端控制,,还会加上CRC校验

可以直接用软件上的这两个按钮控制

 

 

先写不带CRC校验数据的

为了是程序好浏览,,就定义一个函数,,然后调用

现在的wifi.lua

 

wifi.setmode(wifi.STATIONAP)

cfg={}
cfg.ssid="Hellow8266"
cfg.pwd="11223344"
wifi.ap.config(cfg)

apcfg={}
apcfg.ssid="qqqqq"
apcfg.pwd="11223344"
wifi.sta.config(apcfg)
wifi.sta.connect()

TCPSever=net.createServer(net.TCP,28800) 

TcpConnectCnt = 0
TcpSocketTable={}

TCPSever:listen(8080,function(socket) 
  
    if  TcpConnectCnt == 4 then
        if  TcpSocketTable[0] ~= nil then 
            TcpSocketTable[0]:close()
            TcpSocketTable[0] = nil
        end    
    else
        if  TcpSocketTable[TcpConnectCnt+1] ~= nil then 
            TcpSocketTable[TcpConnectCnt+1]:close()
            TcpSocketTable[TcpConnectCnt+1] = nil
        end 
    end
    
    TcpSocketTable[TcpConnectCnt] = socket
    
    print(TcpConnectCnt.."-Connect")
    
    
    TcpConnectCnt = TcpConnectCnt + 1
    if  TcpConnectCnt == 5 then
        TcpConnectCnt = 0
    end
    
    
    socket:on("receive",function(socket,data) 
          uart.write(0,data) 
          control(data)
    end) 

    socket:on("disconnection",function(sck,c) 
        for i=0,4 do
            if  TcpSocketTable[i] == sck then
                TcpSocketTable[i] = nil
                print(i.."-Disconnect")
            end
        end
    end)
    
end)


function control(data)  
    if  data == "++MD610" then
        gpio.write(2,1)
        print("Relay=1")
    end
    if  data == "++MD600" then
        gpio.write(2,0)
        print("Relay=0")
    end
end  


uart.on("data",0,function(data) 

    for i=0,4 do
        if  TcpSocketTable[i] ~= nil then
            TcpSocketTable[i]:send(data)
        end
    end
        
end, 0)


printip = 0
wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
    printip = 0
end)


wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)
   if printip == 0 then
      print("+IP"..T.IP)
   end
   printip = 1
end)

 

好现在控制一下

 

现在用另一个断开

 

对了最好把信息发给网络对不对,,,控制一下最好通过网络有一个回复

现在的wifi.lua

wifi.setmode(wifi.STATIONAP)

cfg={}
cfg.ssid="Hellow8266"
cfg.pwd="11223344"
wifi.ap.config(cfg)

apcfg={}
apcfg.ssid="qqqqq"
apcfg.pwd="11223344"
wifi.sta.config(apcfg)
wifi.sta.connect()

TCPSever=net.createServer(net.TCP,28800) 

TcpConnectCnt = 0
TcpSocketTable={}
NowSocket=nil
TCPSever:listen(8080,function(socket) 
  
    if  TcpConnectCnt == 4 then
        if  TcpSocketTable[0] ~= nil then 
            TcpSocketTable[0]:close()
            TcpSocketTable[0] = nil
        end    
    else
        if  TcpSocketTable[TcpConnectCnt+1] ~= nil then 
            TcpSocketTable[TcpConnectCnt+1]:close()
            TcpSocketTable[TcpConnectCnt+1] = nil
        end 
    end
    
    TcpSocketTable[TcpConnectCnt] = socket
    
    print(TcpConnectCnt.."-Connect")
    
    
    TcpConnectCnt = TcpConnectCnt + 1
    if  TcpConnectCnt == 5 then
        TcpConnectCnt = 0
    end
    
    
    socket:on("receive",function(socket,data) 
          NowSocket = socket
          uart.write(0,data) 
          control(data)
    end) 

    socket:on("disconnection",function(sck,c) 
        for i=0,4 do
            if  TcpSocketTable[i] == sck then
                TcpSocketTable[i] = nil
                print(i.."-Disconnect")
            end
        end
    end)
    
end)


function control(data)  
    if  data == "++MD610" then
        gpio.write(2,1)
        print("Relay=1")
        if  NowSocket ~= nil then
            NowSocket:send("Relay=1")
            NowSocket = nil
        end
    end
    if  data == "++MD600" then
        gpio.write(2,0)
        print("Relay=0")
        if  NowSocket ~= nil then
            NowSocket:send("Relay=0")
            NowSocket = nil
        end
    end
end  


uart.on("data",0,function(data) 

    for i=0,4 do
        if  TcpSocketTable[i] ~= nil then
            TcpSocketTable[i]:send(data)
        end
    end
        
end, 0)


printip = 0
wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
    printip = 0
end)


wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)
   if printip == 0 then
      print("+IP"..T.IP)
   end
   printip = 1
end)

 

 

 

 

 

好了现在加入CRC16校验数据

现在的wifi.lua

wifi.setmode(wifi.STATIONAP)

cfg={}
cfg.ssid="Hellow8266"
cfg.pwd="11223344"
wifi.ap.config(cfg)

apcfg={}
apcfg.ssid="qqqqq"
apcfg.pwd="11223344"
wifi.sta.config(apcfg)
wifi.sta.connect()

TCPSever=net.createServer(net.TCP,28800) 

TcpConnectCnt = 0
TcpSocketTable={}
NowSocket=nil
TCPSever:listen(8080,function(socket) 
  
    if  TcpConnectCnt == 4 then
        if  TcpSocketTable[0] ~= nil then 
            TcpSocketTable[0]:close()
            TcpSocketTable[0] = nil
        end    
    else
        if  TcpSocketTable[TcpConnectCnt+1] ~= nil then 
            TcpSocketTable[TcpConnectCnt+1]:close()
            TcpSocketTable[TcpConnectCnt+1] = nil
        end 
    end
    
    TcpSocketTable[TcpConnectCnt] = socket
    
    print(TcpConnectCnt.."-Connect")
    
    
    TcpConnectCnt = TcpConnectCnt + 1
    if  TcpConnectCnt == 5 then
        TcpConnectCnt = 0
    end
    
    
    socket:on("receive",function(socket,data) 
          NowSocket = socket
          uart.write(0,data) 
          control(data)
    end) 

    socket:on("disconnection",function(sck,c) 
        for i=0,4 do
            if  TcpSocketTable[i] == sck then
                TcpSocketTable[i] = nil
                print(i.."-Disconnect")
            end
        end
    end)
    
end)


function control(data)  
    local RevLen = string.len (data)
    local crc = ow.crc16(string.sub(data,1,RevLen-2))
    
    local recrc = data:byte(RevLen)
    local recrc = recrc*256
    local recrc = recrc + data:byte(RevLen-1)

    if  crc == recrc then
        if  string.sub(data,1,7) == "++MD610" then
            gpio.write(2,1)
            print("Relay=1")
            if  NowSocket ~= nil then
                NowSocket:send("Relay=1")
                NowSocket = nil
            end
        end
        if  string.sub(data,1,7) == "++MD600" then
            gpio.write(2,0)
            print("Relay=0")
            if  NowSocket ~= nil then
                NowSocket:send("Relay=0")
                NowSocket = nil
            end
        end
    else
        if  NowSocket ~= nil then
                NowSocket:send("CRC16 Faild")
                NowSocket = nil
        end   
    end       

    
end  


uart.on("data",0,function(data) 

    for i=0,4 do
        if  TcpSocketTable[i] ~= nil then
            TcpSocketTable[i]:send(data)
        end
    end
        
end, 0)


printip = 0
wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
    printip = 0
end)


wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)
   if printip == 0 then
      print("+IP"..T.IP)
   end
   printip = 1
end)

 

他呢,,参数要填写字符串

上位机的CRC计算函数

/// 
        /// 
        /// 
        /// 
        /// 
        /// 
        private int crc16_modbus(byte[] modbusdata, int length)
        {
            int i, j;

            int crc = 0x0;

            try
            {
                for (i = 0; i < length; i++)
                {
                    crc ^= modbusdata[i];
                    for (j = 0; j < 8; j++)
                    {
                        if ((crc & 0x01) == 1)
                        {
                            crc = (crc >> 1) ^ 0xa001;
                        }
                        else
                        {
                            crc >>= 1;
                        }
                    }
                }
            }
            catch (Exception)
            {

                throw;
            }

            return crc;
        }


我的置高继电器函数

private void button7_Click_1(object sender, EventArgs e)
        {
            byte[] sendbyte = new byte[7];
            sendbyte[0] = (byte)'+';//2B
            sendbyte[1] = (byte)'+';
            sendbyte[2] = (byte)'M';//4D
            sendbyte[3] = (byte)'D';//44
            sendbyte[4] = (byte)'6';//6
            sendbyte[5] = (byte)'1';//1

            if (comboBox3.Text=="继电器")//pin2
            {
                sendbyte[6] = (byte)'0';
            }
            else if (comboBox3.Text == "CS")//pin8
            {
                sendbyte[6] = (byte)'1';
            }
            else if (comboBox3.Text == "MOSI")//pin7
            {
                sendbyte[6] = (byte)'2';
            }
            else if (comboBox3.Text == "MISO")//pin6
            {
                sendbyte[6] = (byte)'3';
            }
            else if (comboBox3.Text == "CLK")//pin5
            {
                sendbyte[6] = (byte)'4';
            }
            if (radioButtonNetCon.Checked)//网络发送
            {
                TcpSendDataMethod(sendbyte);
            }
            else if (radioButtonSerialCon.Checked)//串口发送
            {
                SerialSend(sendbyte);
            }
        }
/// 
        /// 
        /// 
        /// 
        private void TcpSendDataMethod(byte[] byt)
        {
            int crc = 0;

            byte[] sendbyte = new byte[byt.Length + 2];

            for (int i = 0; i < byt.Length; i++)
            {
                sendbyte[i] = byt[i];
            }

            crc = crc16_modbus(byt, byt.Length);//计算CRC
            byte[] Crcbyte = System.BitConverter.GetBytes(crc);//得到CRC

            sendbyte[sendbyte.Length - 2] = Crcbyte[0];
            sendbyte[sendbyte.Length - 1] = Crcbyte[1];

            try { networkstrem.Write(sendbyte, 0, sendbyte.Length); }
            catch (Exception) { MessageBox.Show("请检查连接", "提示!"); }
        }

 

还要说一点让8266计算CRC,发现8266存储数据是大端模式......

好了现在测试一下用软件的按钮控制

 

 

好啦终于这完这一篇了....累..真心的累.............

 

文章标签：
网络协议
网络架构
杨奉武
目录
相关文章
三三是该溜子
|
缓存 网络协议 Java
【JavaEE】——TCP回显服务器（万字长文超详细）
ServerSocket类，Socket类，PrintWriter缓冲区问题，Socket文件释放问题，多线程问题
三三是该溜子
284 2
椰椰椰耶
|
网络协议 Java API
【网络】TCP回显服务器和客户端的构造，以及相关bug解决方法
【网络】TCP回显服务器和客户端的构造，以及相关bug解决方法
椰椰椰耶
355 2
椰椰椰耶
|
存储 网络协议 Java
【网络】UDP和TCP之间的差别和回显服务器
【网络】UDP和TCP之间的差别和回显服务器
椰椰椰耶
347 1
bruce_xiaowei
|
网络协议 Python
Python创建一个TCP服务器
Python创建一个TCP服务器
bruce_xiaowei
408 0
蓝易云
|
网络协议 数据处理 C语言
利用C语言基于poll实现TCP回声服务器的多路复用模型
此代码仅为示例，展示了如何基于 `poll`实现多路复用的TCP回声服务器的基本框架。在实际应用中，你可能需要对其进行扩展或修改，以满足具体的需求。
蓝易云
490 0
程序员在线
|
弹性计算 运维 安全
阿里云轻量应用服务器与云服务器ECS啥区别？新手帮助教程
阿里云轻量应用服务器适合个人开发者搭建博客、测试环境等低流量场景，操作简单、成本低；ECS适用于企业级高负载业务，功能强大、灵活可扩展。二者在性能、网络、镜像及运维管理上差异显著，用户应根据实际需求选择。
程序员在线
1006 10
程序员在线
|
弹性计算 ice
阿里云4核8g服务器多少钱一年？1个月和1小时价格，省钱购买方法分享
阿里云4核8G服务器价格因实例类型而异，经济型e实例约159元/月，计算型c9i约371元/月，按小时计费最低0.45元。实际购买享折扣，1年最高可省至1578元，附主流ECS实例及CPU型号参考。
程序员在线
965 8
翼龙云TG_yilongcloud
|
12月前
|
运维 安全 Ubuntu
阿里云渠道商：服务器操作系统怎么选？
阿里云提供丰富操作系统镜像，涵盖Windows与主流Linux发行版。选型需综合技术兼容性、运维成本、安全稳定等因素。推荐Alibaba Cloud Linux、Ubuntu等用于Web与容器场景，Windows Server支撑.NET应用。建议优先选用LTS版本并进行测试验证，通过标准化镜像管理提升部署效率与一致性。
翼龙云TG_yilongcloud
1104 4
翼龙云TG_yilongcloud
|
12月前
|
存储 监控 安全
阿里云渠道商：云服务器价格有什么变动？
阿里云带宽与存储费用呈基础资源降价、增值服务差异化趋势。企业应结合业务特点，通过阶梯计价、智能分层、弹性带宽等策略优化成本，借助云监控与预算预警机制，实现高效、可控的云资源管理。
翼龙云TG_yilongcloud
524 2
程序媛在线
|
弹性计算 运维 安全
区别及选择指南：阿里云轻量应用服务器与ECS云服务器有什么区别？
阿里云轻量应用服务器适合个人开发者、学生搭建博客、测试环境，易用且性价比高；ECS功能更强大，适合企业级应用如大数据、高流量网站。根据需求选择：轻量入门首选，ECS专业之选。
程序媛在线
803 2

热门文章

最新文章

  • 1
    五分钟带你读懂 TCP全连接队列（图文并茂）
  • 2
    用vlc搭建简单流媒体服务器（UDP和TCP方式）
  • 3
    TCP的Window Size和Scale参数对传输效率的影响
  • 4
    .Net Micro Framework研究—TCP/IP通信
  • 5
    第二章TCP/IP—iOS网络七层模型
  • 6
    IP协议【图解TCP/IP（笔记九）】
  • 7
    NetFlow是一种数据交换方式，提供网络流量的会话级视图，记录下每个TCP/IP事务的信息
  • 8
    42 张图带你搞懂 TCP 和 UDP（三）
  • 9
    TCP 拥塞控制详解 | 1. 概述
  • 10
    TCP释放连接的四次挥手
  • 1
    高并发秒杀系统实战（Redis+Lua分布式锁防超卖与库存扣减优化）
    3976
  • 2
    【📕分布式锁通关指南 03】通过Lua脚本保证redis操作的原子性
    1053
  • 3
    Redis 功能扩展 Lua 脚本 对Redis扩展 eval redis.call redis.pcall
    1373
  • 4
    ubuntu 22安装lua环境&&编译lua cjson模块
    2297
  • 5
    优化Lua-cURL：减少网络请求延迟的实用方法
    494
  • 6
    公司用什么软件监控电脑：Lua 脚本在监控软件扩展功能的应用
    436
  • 7
    Lua中实现HTTP请求的User-Agent自定义
    685
  • 8
    Lua中实现异步HTTP请求的方法
    603
  • 9
    大数据-50 Redis 分布式锁 乐观锁 Watch SETNX Lua Redisson分布式锁 Java实现分布式锁
    434
  • 10
    大数据-43 Redis 功能扩展 Lua 脚本 对Redis扩展 eval redis.call redis.pcall
    384

    • 相关课程

    更多
  • 大数据实战项目：反爬虫系统（Lua+Spark+Redis+Hadoop框架搭建）第一阶段
  • 大数据实战项目：反爬虫系统（Lua+Spark+Redis+Hadoop框架搭建）第二阶段
  • 大数据实战项目：反爬虫系统（Lua+Spark+Redis+Hadoop框架搭建）第三阶段
  • 大数据实战项目：反爬虫系统（Lua+Spark+Redis+Hadoop框架搭建）第五阶段
  • 大数据实战项目 - 反爬虫系统（Lua+Spark+Redis+Hadoop框架搭建）第七阶段
  • Lua完全自学手册图文教程

    • 相关电子书

    更多
  • 如何运维千台以上游戏云服务器
  • 网站/服务器取证 实践与挑战
  • ECS快储存加密技术
    • 下一篇
    一条命令迁移，帮你实现 OpenClaw 与 Hermes Agent 记忆互通！