第七次实验:CC2530平台上多跳通信的TinyOS编程
module P2MM
{
uses interface Boot;
uses interface Timer<TMilli> as Timer0;
uses interface SplitControl as AMControl;
uses interface AMPacket;
uses interface AMSend;
uses interface Receive;
uses interface Packet;
}
implementation
{
typedef nx_struct P2MMsg {nx_uint16_t nodeid[3];nx_uint16_t num;nx_uint16_t counter;}P2MMsg;
uint8_t counter=0;
bool busy =FALSE;
message_t pkt;
task void test() { }
/**********************************************
* 函数名:booted()
* 功 能:系统启动完毕后自动触发
* 参 数:无
***********************************************/
event void Boot.booted()
{
call AMControl.start();
}
/**********************************************
* 函数名:fired()
* 功 能:定时器触发事件
* 参 数:无
***********************************************/
event void Timer0.fired()
{
counter++;
if (!busy)
{
P2MMsg* btrpkt = (P2MMsg*)(call Packet.getPayload(&pkt, sizeof(P2MMsg)));
btrpkt->num=0;
btrpkt->nodeid[btrpkt->num] = TOS_NODE_ID;
btrpkt->counter = counter;
call AMPacket.setGroup(&pkt,TOS_IEEE_GROUP);
if (call AMSend.send(0xFFFF, &pkt, sizeof(P2MMsg)) == SUCCESS)
busy = TRUE;
}
}
/**********************************************
* 函数名:startDone(error_t err)
* 功 能:SplitControl控制启动完成事件
* 参 数:error_t err
***********************************************/
event void AMControl.startDone(error_t err)
{
if(err==SUCCESS)
{
if(TOS_NODE_ID!=0x1)
call Timer0.startPeriodic(1000);
}
else
call AMControl.start();
}
/**********************************************
* 函数名:sendDone(message_t* msg, error_t erro)
* 功 能:AM消息发送完毕事件
* 参 数:message_t* msg, error_t erro
***********************************************/
event void AMSend.sendDone(message_t* msg, error_t erro)
{
if (&pkt == msg)
busy = FALSE;
}
/**********************************************
* 函数名:receive(message_t* msg, void* payload, uint8_t len)
* 功 能:Receive接收事件
* 参 数:message_t* msg, void* payload, uint8_t len
***********************************************/
event message_t* Receive.receive(message_t* msg, void* payload, uint8_t len)
{
if (len == sizeof(P2MMsg))
{
P2MMsg* btrpkt = (P2MMsg*)payload;
DbgOut(9,"Data is %d,Start is %d,Other is %d,%d\r\n",(uint16_t)btrpkt->counter,
(uint16_t)btrpkt->nodeid[0],(uint16_t)btrpkt->nodeid[1],(uint16_t)btrpkt->nodeid[2]);
btrpkt->num++;
if(TOS_NODE_ID!=0x1){
if(btrpkt->num<3){
bool flag=TRUE;
uint16_t i;
for(i=0;i<btrpkt->num;i++){
if(btrpkt->nodeid[i] == TOS_NODE_ID)
flag=FALSE;
}
if(flag){
btrpkt->nodeid[btrpkt->num] = TOS_NODE_ID;
call AMSend.send(0xFFFF, msg, sizeof(P2MMsg));
}
}
}
}
}
event void AMControl.stopDone(error_t err) { }
}
configuration P2MC {}
#define AM_DATA_TYPE 123
implementation
{
components P2MM as App;
components MainC;
App.Boot ->MainC;
components ActiveMessageC as AM; //消息组件
App.Packet -> AM.Packet;
App.AMPacket -> AM.AMPacket;
App.AMSend -> AM.AMSend[AM_DATA_TYPE];
App.Receive -> AM.Receive[AM_DATA_TYPE];
App.AMControl -> AM.SplitControl;
components new TimerMilliC () as Timer0;
App.Timer0 ->Timer0;
}
COMPONENT= P2MC
PFLAGS += -DUART_DEBUG
PFLAGS += -DUART_BAUDRATE=9600
include $(MAKERULES)
好课程内容。
第七次实验:CC2530平台上多跳通信的TinyOS编程的更多相关文章
- 实验三 CC2530平台上CC2530平台上定时器组件的
实验三 CC2530平台上CC2530平台上定时器组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步掌握CC2530定时器的PWM功能,及其TinyOS ...
- 第一次实验: CC2530平台上电源管理与休眠
实验一 CC2530平台上电源管理与休眠 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步的认识TinyOS编程的基础和简单的程序编写 学生通过本实验能够初步的了解和掌握Ti ...
- 实验六 CC2530平台上P2P通信的TinyOS编程
实验六 CC2530平台上P2P通信的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步的掌握射频通信TinyOS编程方法 学生通过本实验应理解TinyOS中 ...
- [4G]Linux平台上实现4G通信
转自:http://blog.sina.com.cn/s/blog_7880d3350102wb92.html 在ARM平台上实现4G模块的PPP拨号上网,参考网上的资料和自己的理解,从一无所知到开发 ...
- 实验五 CC2530平台上ADC组件的TinyOS编程
实验五 CC2530平台上ADC组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步掌握传感器的ADC组件应用方法 学生通过本实验能够初步的了解和掌握CC ...
- 实验四 CC2530平台上UART组件的TinyOS编程
实验四 CC2530平台上UART组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步掌握CC2530的UART.及其TinyOS编程方法 学生通过本实验 ...
- 第二次实验:CC2530平台上GPIO组件的TinyOS编程
实验二 CC2530平台上GPIO组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生理解和掌握CC2530的GPIO及外部中断,及其TinyOS编程方法 学 ...
- 检验实时3D像素流送平台好坏的七个标准!(上)
将交互式3D像素流送技术作为有价值的企业工具之后,就该寻找像素流送服务供应商了.问题在于交互式3D像素流送是一种新兴技术,因此很难知道要问供应商的正确问题.在开始使用之前,这里有7个问题,您应该从候选 ...
- JVM 平台上的各种语言的开发指南
JVM 平台上的各种语言的开发指南 为什么我们需要如此多的JVM语言? 在2013年你可以有50中JVM语言的选择来用于你的下一个项目.尽管你可以说出一大打的名字,你会准备为你的下一个项目选择一种新的 ...
随机推荐
- 棋牌平台开发教程之扎金花大小比较算法在php中的实现
PHP中扎金花比大小如何实现 在棋牌游戏中,不管是现实的还是线上的,扎金花无疑是最热门棋牌游戏之一,鄙人从小就酷爱扎金花,机缘巧合后面从事了IT行业,话不多说,直接进去正题吧. 扎金花两副牌的比较规则 ...
- unity中多个门的开关动画保持独立性
List<Animation> storeAnimation; public void Awake() { storeAnimation = new List<Animation&g ...
- Python爬虫入门之Urllib库的高级用法
1.设置Headers 有些网站不会同意程序直接用上面的方式进行访问,如果识别有问题,那么站点根本不会响应,所以为了完全模拟浏览器的工作,我们需要设置一些Headers 的属性. 首先,打开我们的浏览 ...
- python学习---装饰器
什么是装饰器 器即函数 装饰即修饰,意指为其他函数添加新功能 装饰器定义:本质就是函数,功能是为其他函数添加新功能 装饰器需要遵循的原则 1.不修改被装饰函数的源代码(开放封闭原则) 2.为被装饰函数 ...
- C# [Win32] [API] WS_TABSTOP 無效的解決辦法
關鍵: IsDialogMessage function MSG msg; int bRet = 1; while (bRet != 0) { if (PeekMessageW(&msg, ( ...
- select、poll、epoll的区别
本文写于2017-02-26,从老账号迁移到本账号,原文地址:https://www.cnblogs.com/huangweiyang/p/6444746.html select.poll.epoll ...
- leetcode python 033 旋转数组查找
## 假设升序,import random def find(y): l,m=len(y),0 while l>1: n=int(l/2) if y[0] ...
- DevExpress ASP.NET Core Controls 2019发展蓝图(No.1)
本文主要为大家介绍DevExpress ASP.NET Core Controls2019年的官方发展蓝图,更多精彩内容欢迎持续收藏关注哦~ [DevExpress ASP.NET Controls ...
- 以方法调用的原理解释Ruby中“puts ‘Hello‘”
这里尽管缺少消息发送所需要的点(.)以及该消息的显示接收者,却依然发送了消息puts并传递了参数“Hello”给一个对象:默认对象self.在程序运行期间,虽然作为self的对象通过特定规则发生改变, ...
- Hadoop Hive HBase Spark Storm概念解释
HadoopHadoop是什么? 答:一个分布式系统基础架构. Hadoop解决了什么问题? 答:解决了大数据(大到一台计算机无法进行存储,一台计算机无法在要求的时间内进行处理)的可靠存储(HDFS) ...