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编程的更多相关文章

  1. 实验三 CC2530平台上CC2530平台上定时器组件的

    实验三 CC2530平台上CC2530平台上定时器组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步掌握CC2530定时器的PWM功能,及其TinyOS ...

  2. 第一次实验: CC2530平台上电源管理与休眠

    实验一 CC2530平台上电源管理与休眠 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步的认识TinyOS编程的基础和简单的程序编写 学生通过本实验能够初步的了解和掌握Ti ...

  3. 实验六 CC2530平台上P2P通信的TinyOS编程

    实验六 CC2530平台上P2P通信的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步的掌握射频通信TinyOS编程方法 学生通过本实验应理解TinyOS中 ...

  4. [4G]Linux平台上实现4G通信

    转自:http://blog.sina.com.cn/s/blog_7880d3350102wb92.html 在ARM平台上实现4G模块的PPP拨号上网,参考网上的资料和自己的理解,从一无所知到开发 ...

  5. 实验五 CC2530平台上ADC组件的TinyOS编程

    实验五 CC2530平台上ADC组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步掌握传感器的ADC组件应用方法 学生通过本实验能够初步的了解和掌握CC ...

  6. 实验四 CC2530平台上UART组件的TinyOS编程

    实验四 CC2530平台上UART组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生初步掌握CC2530的UART.及其TinyOS编程方法 学生通过本实验 ...

  7. 第二次实验:CC2530平台上GPIO组件的TinyOS编程

    实验二 CC2530平台上GPIO组件的TinyOS编程 实验目的: 加深和巩固学生对于TinyOS编程方法的理解和掌握 让学生理解和掌握CC2530的GPIO及外部中断,及其TinyOS编程方法 学 ...

  8. 检验实时3D像素流送平台好坏的七个标准!(上)

    将交互式3D像素流送技术作为有价值的企业工具之后,就该寻找像素流送服务供应商了.问题在于交互式3D像素流送是一种新兴技术,因此很难知道要问供应商的正确问题.在开始使用之前,这里有7个问题,您应该从候选 ...

  9. JVM 平台上的各种语言的开发指南

    JVM 平台上的各种语言的开发指南 为什么我们需要如此多的JVM语言? 在2013年你可以有50中JVM语言的选择来用于你的下一个项目.尽管你可以说出一大打的名字,你会准备为你的下一个项目选择一种新的 ...

随机推荐

  1. 生产环境ssh登陆策略

    生产环境ssh登陆策略 备份:cp /etc/ssh/sshd_config{,.bak} vim /etc/ssh/sshd_config   17 #Port 22 #修改ssh连接端口 38 # ...

  2. My third homework

    题目要求 定义一个包含有10个整数的数组a并初始化,定义一个指针变量p,p指向数组a,定义函数fun,要求在fun内部访问数组,并打印出数组中各元素的值,要求在fun函数内不要出现数字10. 代码: ...

  3. Django--Managers

    Django--Managers Manager 概念: 1.Manager是Django中的数据模型,可以通过manager进行对数据库的查询操作.可以看其结构它本身是一个空的类,其主要的功能来自于 ...

  4. POJO、JavaBean、DTO的区别

    一.POJO(Plain Ordinary Java Object)简单的Java对象,其中有一些属性及其getter setter方法的类,没有业务逻辑(重点理解一下"没有业务逻辑&quo ...

  5. dom编程艺术笔记1--第二章

    第二章语法部分: 1.js注释:<!-- XXXXX 而“-->”这部分js会认为是注释内容的一部分 2.var 声明变量 不用声明变量类型 3.声明使用一个数组语法:var object ...

  6. CentOS7.6配置do.cker和K.B.S

     方法一: 节点及功能 主机名 IP Master.etcd.registry K8s-01 10.8.8.31 Node1 K8s-02 10.8.8.32 Node2 K8s-03 10.8.8. ...

  7. [转]MYSQL 创建存储过程

    MySQL 存储过程是从 MySQL 5.0 开始增加的新功能.存储过程的优点有一箩筐.不过最主要的还是执行效率和SQL 代码封装.特别是 SQL 代码封装功能,如果没有存储过程,在外部程序访问数据库 ...

  8. Visual C++没事别启用/Za编译选项

    Visual C++对于C++标准的支持不是很完善好像是钦定了的.MS还特意在这里说了些非标准行为[1]以及扩展行为[2].这就不可避免地会让处女座程序猿感到难受(我不是处女座).所以,经过一番goo ...

  9. vs问题--------------标记为系统必备组建...

    问题:标记为系统必备组建 要将程序集“D:\project\DMS\DMSGaeaService\TmsApplication\bin\Debug\Jns.Gaea.dll”标记为系统必备组件,必须对 ...

  10. [转载]一个高效简洁的Aseprite to Unity导入工具

    原文链接 https://zhuanlan.zhihu.com/p/28644268  期待原作者上传至AssetStore. 今天,我的第一个 Unity 插件 MetaSprite 正式发布了它的 ...