mbox_send_wait.c 3.2 KB
Newer Older
1
/*
2
 * 程序清单:邮箱例程_发送阻塞
3
 *
4
 * 这个程序用来测试邮箱发送时候的阻塞情况。
5 6 7 8 9
 *
 */
#include <rtthread.h>
#include "tc_comm.h"

10
/* 指向线程控制块的指针 */
11 12 13
static rt_thread_t tid1 = RT_NULL;
static rt_thread_t tid2 = RT_NULL;

14
/* 邮箱控制块 */
15
static struct rt_mailbox mb;
16
/* 用于放邮件的内存池 */
17 18 19 20 21
static char mb_pool[32];

static char mb_str1[] = "I'm a mail!";
static char mb_str2[] = "this is another mail!";

22
/* 线程1入口 */
23 24 25 26 27 28
static void thread1_entry(void* parameter)
{
	unsigned char* str;

	while (1)
	{
29
		/* 从邮箱中收取邮件 */
30 31 32 33
		if (rt_mb_recv(&mb, (rt_uint32_t*)&str, RT_WAITING_FOREVER) == RT_EOK)
		{
			rt_kprintf("thread1: get a mail from mailbox, the content:%s\n", str);

34
			/* 延时20个OS Tick */
35 36 37 38 39
			rt_thread_delay(50);
		}
	}
}

40
/* 线程2入口 */
41 42 43
static void thread2_entry(void* parameter)
{
	rt_uint8_t count;
44
    char  *str;
45 46 47 48 49 50 51

	count = 0;
	while (1)
	{
		count ++;
		if (count & 0x1)
		{
52
			/* 发送mb_str1地址到邮箱中 */
53 54 55 56
            str = mb_str1;
		}
		else
		{
57
			/* 发送mb_str2地址到邮箱中 */
58 59 60
            str = mb_str2;
		}

61
        /* 不停的发送邮件,如果满了则等待10个tick,然后超时 */
62 63 64 65 66 67 68 69 70
        if( rt_mb_send_wait(&mb, (rt_uint32_t)str,10) == RT_EOK )
            rt_kprintf("thread2: sent a mail to mailbox, the content:%s\n", str);
        else
            rt_kprintf("thread2: timeout while waiting to send a mail.\n");
	}
}

int mbox_send_wait_init()
{
71
	/* 初始化一个mailbox */
72
	rt_mb_init(&mb,
73 74 75 76
		"mbt",             /* 名称是mbt */
		&mb_pool[0],       /* 邮箱用到的内存池是mb_pool */
		sizeof(mb_pool)/4,   /* 大小是mb_pool大小除以4,因为一封邮件的大小是4字节 */
		RT_IPC_FLAG_FIFO); /* 采用FIFO方式进行线程等待 */
77

78
	/* 创建线程1 */
79
	tid1 = rt_thread_create("t1",
80
		thread1_entry, RT_NULL, /* 线程入口是thread1_entry, 入口参数是RT_NULL */
81 82 83 84 85 86
		THREAD_STACK_SIZE, THREAD_PRIORITY, THREAD_TIMESLICE);
	if (tid1 != RT_NULL)
		rt_thread_startup(tid1);
	else
		tc_stat(TC_STAT_END | TC_STAT_FAILED);

87
	/* 创建线程2 */
88
	tid2 = rt_thread_create("t2",
89
		thread2_entry, RT_NULL, /* 线程入口是thread2_entry, 入口参数是RT_NULL */
90 91 92 93 94 95 96 97 98 99 100 101
		THREAD_STACK_SIZE, THREAD_PRIORITY, THREAD_TIMESLICE);
	if (tid2 != RT_NULL)
		rt_thread_startup(tid2);
	else
		tc_stat(TC_STAT_END | TC_STAT_FAILED);

	return 0;
}

#ifdef RT_USING_TC
static void _tc_cleanup()
{
102
	/* 调度器上锁,上锁后,将不再切换到其他线程,仅响应中断 */
103 104
	rt_enter_critical();

105
	/* 删除线程 */
106 107 108 109 110
	if (tid1 != RT_NULL && tid1->stat != RT_THREAD_CLOSE)
		rt_thread_delete(tid1);
	if (tid2 != RT_NULL && tid2->stat != RT_THREAD_CLOSE)
		rt_thread_delete(tid2);

111
	/* 执行邮箱对象脱离 */
112 113
	rt_mb_detach(&mb);

114
	/* 调度器解锁 */
115 116
	rt_exit_critical();

117
	/* 设置TestCase状态 */
118 119 120 121 122
	tc_done(TC_STAT_PASSED);
}

int _tc_mbox_send_wait()
{
123
	/* 设置TestCase清理回调函数 */
124 125 126
	tc_cleanup(_tc_cleanup);
	mbox_send_wait_init();

127
	/* 返回TestCase运行的最长时间 */
128 129
	return 300;
}
130
/* 输出函数命令到finsh shell中 */
131 132
FINSH_FUNCTION_EXPORT(_tc_mbox_send_wait, a example of mailbox send wait);
#else
133
/* 用户应用入口 */
134 135 136 137 138 139 140 141
int rt_application_init()
{
	mbox_send_wait_init();

	return 0;
}
#endif