mirror of
https://github.com/FreeRTOS/FreeRTOS-Kernel.git
synced 2025-08-18 09:08:33 -04:00
Updated AVR32 demos and added AVR32 UC3B demo.
This commit is contained in:
Richard Barry
parent
45e7e5ac55
commit
94c94d3c0e
164 changed files with 21458 additions and 3994 deletions
|
|
@ -1,16 +1,14 @@
|
|||
/* This source file is part of the ATMEL FREERTOS-0.9.0 Release */
|
||||
|
||||
/*This file has been prepared for Doxygen automatic documentation generation.*/
|
||||
/*! \file *********************************************************************
|
||||
*
|
||||
* \brief Basic SMTP Host for AVR32 UC3.
|
||||
* \brief Basic SMTP Client for AVR32 UC3.
|
||||
*
|
||||
* - Compiler: GNU GCC for AVR32
|
||||
* - Supported devices: All AVR32 devices can be used.
|
||||
* - AppNote:
|
||||
*
|
||||
* \author Atmel Corporation: http://www.atmel.com \n
|
||||
* Support email: avr32@atmel.com
|
||||
* Support and FAQ: http://support.atmel.no/
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
|
|
@ -41,27 +39,28 @@
|
|||
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
/*
|
||||
Implements a simplistic SMTP client.
|
||||
Implements a simplistic SMTP client. First time the task is started, connection is made and
|
||||
email is sent. Mail flag is then reset. Each time you press the Push Button 0, a new mail will be sent.
|
||||
*/
|
||||
|
||||
#if (SMTP_USED == 1)
|
||||
|
||||
#include <string.h>
|
||||
|
||||
/* Scheduler includes. */
|
||||
// Scheduler includes.
|
||||
#include "FreeRTOS.h"
|
||||
#include "task.h"
|
||||
#include "BasicSMTP.h"
|
||||
|
||||
|
||||
/* Demo includes. */
|
||||
#include "AVR32_EMAC.h"
|
||||
// Demo includes.
|
||||
#include "portmacro.h"
|
||||
#include "partest.h"
|
||||
#include "intc.h"
|
||||
#include "gpio.h"
|
||||
|
||||
/* lwIP includes. */
|
||||
// lwIP includes.
|
||||
#include "lwip/api.h"
|
||||
#include "lwip/tcpip.h"
|
||||
#include "lwip/memp.h"
|
||||
|
|
@ -73,75 +72,106 @@
|
|||
#include "lwip/sockets.h"
|
||||
#include "netif/loopif.h"
|
||||
|
||||
/*! SMTP default port */
|
||||
//! SMTP default port
|
||||
#define SMTP_PORT 25
|
||||
/*! SMTP EHLO code answer */
|
||||
//! SMTP EHLO code answer
|
||||
#define SMTP_EHLO_STRING "220"
|
||||
/*! SMTP end of transmission code answer */
|
||||
//! SMTP end of transmission code answer
|
||||
#define SMTP_END_OF_TRANSMISSION_STRING "221"
|
||||
/*! SMTP OK code answer */
|
||||
//! SMTP OK code answer
|
||||
#define SMTP_OK_STRING "250"
|
||||
/*! SMTP start of transmission code answer */
|
||||
//! SMTP start of transmission code answer
|
||||
#define SMTP_START_OF_TRANSMISSION_STRING "354"
|
||||
/*! SMTP DATA<CRLF> */
|
||||
//! SMTP DATA<CRLF>
|
||||
#define SMTP_DATA_STRING "DATA\r\n"
|
||||
/*! SMTP <CRLF>.<CRLF> */
|
||||
//! SMTP <CRLF>.<CRLF>
|
||||
#define SMTP_MAIL_END_STRING "\r\n.\r\n"
|
||||
/*! SMTP QUIT<CRLFCRLF> */
|
||||
#define SMTP_QUIT_STRING "QUIT\r\n\r\n"
|
||||
//! SMTP QUIT<CRLFCRLF>
|
||||
#define SMTP_QUIT_STRING "QUIT\r\n"
|
||||
|
||||
|
||||
/*! Server address */
|
||||
//! Server address
|
||||
#error configure SMTP server address
|
||||
portCHAR cServer[] = "192.168.0.1";
|
||||
|
||||
/*! Fill here the ehlo with your SMTP server name */
|
||||
#error configure SMTP server
|
||||
char ehlo[] = "EHLO smtp.domain.com\r\n";
|
||||
//! Fill here the mailfrom with your mail address
|
||||
#error configure SMTP mail sender
|
||||
char cMailfrom[] = "MAIL FROM: <sender@domain.com>\r\n";
|
||||
|
||||
/*! Fill here the mailfrom with your mail address */
|
||||
#error configure mail sender
|
||||
char mailfrom[] = "MAIL FROM: <sender@domain.com>\r\n";
|
||||
//! Fill here the mailto with your contact mail address
|
||||
#error configure SMTP mail recipient
|
||||
char cMailto[] = "RCPT TO: <recipient@domain.com>\r\n";
|
||||
|
||||
/*! Fill here the mailto with your contact mail address */
|
||||
#error configure mail receiver
|
||||
char mailto[] = "RCPT TO: <receiver@domain.com>\r\n";
|
||||
//! Fill here the mailcontent with the mail you want to send
|
||||
#error configure SMTP mail content
|
||||
char cMailcontent[] ="Subject: *** SPAM ***\r\nFROM: \"Your Name here\" <sender@domain.com>\r\nTO: \"Your Contact here\" <recipient@domain.com>\r\n\r\nSay what you want here.";
|
||||
|
||||
/*! Fill here the mailcontent with the mail you want to send */
|
||||
#error configure mail content
|
||||
char mailcontent[] ="Subject: *** SPAM ***\r\nFROM: \"Your Name here\" <sender@domain.com>\r\nTO: \"Your Contact here\" <receiver@domain.com>\r\n\r\nSay what you want here.";
|
||||
//! flag to send mail
|
||||
Bool bSendMail = pdFALSE;
|
||||
|
||||
Bool bSendMail = pdTRUE;
|
||||
//! buffer for SMTP response
|
||||
portCHAR cTempBuffer[200];
|
||||
|
||||
/*! Basic SMTP Host task definition */
|
||||
portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
||||
|
||||
//_____ D E C L A R A T I O N S ____________________________________________
|
||||
//! interrupt handler.
|
||||
#if __GNUC__
|
||||
__attribute__((naked))
|
||||
#elif __ICCAVR32__
|
||||
#pragma shadow_registers = full // Naked.
|
||||
#endif
|
||||
void vpushb_ISR( void );
|
||||
|
||||
//! soft interrupt handler. where treatment should be done
|
||||
#if __GNUC__
|
||||
__attribute__((__noinline__))
|
||||
#endif
|
||||
static portBASE_TYPE prvpushb_ISR_NonNakedBehaviour( void );
|
||||
|
||||
|
||||
|
||||
//! Basic SMTP client task definition
|
||||
portTASK_FUNCTION( vBasicSMTPClient, pvParameters )
|
||||
{
|
||||
struct sockaddr_in stServeurSockAddr;
|
||||
portLONG lRetval;
|
||||
portLONG lSocket = -1;
|
||||
|
||||
// configure push button 0 to produce IT on falling edge
|
||||
gpio_enable_pin_interrupt(GPIO_PUSH_BUTTON_0 , GPIO_FALLING_EDGE);
|
||||
// Disable all interrupts
|
||||
vPortEnterCritical();
|
||||
// register push button 0 handler on level 3
|
||||
INTC_register_interrupt( (__int_handler)&vpushb_ISR, AVR32_GPIO_IRQ_0 + (GPIO_PUSH_BUTTON_0/8), INT3);
|
||||
// Enable all interrupts
|
||||
vPortExitCritical();
|
||||
|
||||
for (;;)
|
||||
{
|
||||
// wait for a signal to send a mail
|
||||
while (bSendMail != pdTRUE) vTaskDelay(200);
|
||||
|
||||
// Disable all interrupts
|
||||
vPortEnterCritical();
|
||||
// clear the flag
|
||||
bSendMail = pdFALSE;
|
||||
// Enable all interrupts
|
||||
vPortExitCritical();
|
||||
// clear the LED
|
||||
vParTestSetLED( 3 , pdFALSE );
|
||||
// Set up port
|
||||
memset(&stServeurSockAddr, 0, sizeof(stServeurSockAddr));
|
||||
stServeurSockAddr.sin_len = sizeof(stServeurSockAddr);
|
||||
stServeurSockAddr.sin_addr.s_addr = inet_addr(cServer);
|
||||
stServeurSockAddr.sin_port = htons(SMTP_PORT);
|
||||
stServeurSockAddr.sin_family = AF_INET;
|
||||
|
||||
// clear the flag
|
||||
bSendMail = pdFALSE;
|
||||
|
||||
|
||||
// socket as a stream
|
||||
if ( (lSocket = socket(AF_INET, SOCK_STREAM, 0)) < 0)
|
||||
{
|
||||
// socket failed, blink a LED and stay here
|
||||
for (;;) {
|
||||
vParTestToggleLED( 0 );
|
||||
vParTestToggleLED( 4 );
|
||||
vTaskDelay( 200 );
|
||||
}
|
||||
}
|
||||
|
|
@ -150,14 +180,14 @@ portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
|||
{
|
||||
// connect failed, blink a LED and stay here
|
||||
for (;;) {
|
||||
vParTestToggleLED( 1 );
|
||||
vParTestToggleLED( 6 );
|
||||
vTaskDelay( 200 );
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
//Server: 220 SMTP Ready
|
||||
/* wait for SMTP Server answer */
|
||||
// wait for SMTP Server answer
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
|
|
@ -165,26 +195,23 @@ portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
|||
if (strncmp(cTempBuffer, SMTP_EHLO_STRING, sizeof(cTempBuffer)) >= 0)
|
||||
{
|
||||
//Client: EHLO smtp.domain.com
|
||||
/* send ehlo */
|
||||
send(lSocket, cEhlo, strlen(cEhlo), 0);
|
||||
// send ehlo
|
||||
send(lSocket, "HELO ", 5, 0);
|
||||
send(lSocket, cServer, strlen(cServer), 0);
|
||||
send(lSocket, "\r\n", 2, 0);
|
||||
//Server: 250
|
||||
/* wait for SMTP Server answer */
|
||||
// wait for SMTP Server answer
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
}while (lRetval <= 0);
|
||||
if (strncmp(cTempBuffer, SMTP_OK_STRING, sizeof(cTempBuffer)) >= 0)
|
||||
{
|
||||
//Server: 250 HELP
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
}while (lRetval <= 0);
|
||||
//Client: MAIL FROM:<sender@domain.com>
|
||||
/* send MAIL FROM */
|
||||
// send MAIL FROM
|
||||
send(lSocket, cMailfrom, strlen(cMailfrom), 0);
|
||||
//Server: 250 OK
|
||||
/* wait for SMTP Server answer */
|
||||
// wait for SMTP Server answer
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
|
|
@ -192,10 +219,10 @@ portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
|||
if (strncmp(cTempBuffer, SMTP_OK_STRING, sizeof(cTempBuffer)) >= 0)
|
||||
{
|
||||
//Client: RCPT TO:<receiver@domain.com>
|
||||
/* send RCPT TO */
|
||||
// send RCPT TO
|
||||
send(lSocket, cMailto, strlen(cMailto), 0);
|
||||
//Server: 250 OK
|
||||
/* wait for SMTP Server answer */
|
||||
// wait for SMTP Server answer
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
|
|
@ -203,23 +230,23 @@ portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
|||
if (strncmp(cTempBuffer, SMTP_OK_STRING, sizeof(cTempBuffer)) >= 0)
|
||||
{
|
||||
//Client: DATA<CRLF>
|
||||
/* send DATA */
|
||||
// send DATA
|
||||
send(lSocket, SMTP_DATA_STRING, 6, 0);
|
||||
//Server: 354 Start mail input; end with <CRLF>.<CRLF>
|
||||
/* wait for SMTP Server answer */
|
||||
// wait for SMTP Server answer
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
}while (lRetval <= 0);
|
||||
if (strncmp(cTempBuffer, SMTP_START_OF_TRANSMISSION_STRING, sizeof(cTempBuffer)) >= 0)
|
||||
{
|
||||
/* send content */
|
||||
// send content
|
||||
send(lSocket, cMailcontent, strlen(cMailcontent), 0);
|
||||
//Client: <CRLF>.<CRLF>
|
||||
/* send "<CRLF>.<CRLF>" */
|
||||
// send "<CRLF>.<CRLF>"
|
||||
send(lSocket, SMTP_MAIL_END_STRING, 5, 0);
|
||||
//Server: 250 OK
|
||||
/* wait for SMTP Server answer */
|
||||
// wait for SMTP Server answer
|
||||
do
|
||||
{
|
||||
lRetval = recv(lSocket, cTempBuffer, sizeof(cTempBuffer), 0);
|
||||
|
|
@ -227,7 +254,7 @@ portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
|||
if (strncmp(cTempBuffer, SMTP_OK_STRING, sizeof(cTempBuffer)) >= 0)
|
||||
{
|
||||
//Client: QUIT<CRLFCRLF>
|
||||
/* send QUIT */
|
||||
// send QUIT
|
||||
send(lSocket, SMTP_QUIT_STRING, 8, 0);
|
||||
//Server: 221 smtp.domain.com closing transmission
|
||||
do
|
||||
|
|
@ -243,10 +270,56 @@ portTASK_FUNCTION( vBasicSMTPHost, pvParameters )
|
|||
}
|
||||
}
|
||||
}
|
||||
/* close socket */
|
||||
// close socket
|
||||
close(lSocket);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/*! \brief push button naked interrupt handler.
|
||||
*
|
||||
*/
|
||||
#if __GNUC__
|
||||
__attribute__((naked))
|
||||
#elif __ICCAVR32__
|
||||
#pragma shadow_registers = full // Naked.
|
||||
#endif
|
||||
void vpushb_ISR( void )
|
||||
{
|
||||
/* This ISR can cause a context switch, so the first statement must be a
|
||||
call to the portENTER_SWITCHING_ISR() macro. This must be BEFORE any
|
||||
variable declarations. */
|
||||
portENTER_SWITCHING_ISR();
|
||||
|
||||
prvpushb_ISR_NonNakedBehaviour();
|
||||
|
||||
portEXIT_SWITCHING_ISR();
|
||||
}
|
||||
|
||||
/*! \brief push button interrupt handler. Here, declarations should be done
|
||||
*
|
||||
*/
|
||||
#if __GNUC__
|
||||
__attribute__((__noinline__))
|
||||
#elif __ICCAVR32__
|
||||
#pragma optimize = no_inline
|
||||
#endif
|
||||
static portBASE_TYPE prvpushb_ISR_NonNakedBehaviour( void )
|
||||
{
|
||||
if (gpio_get_pin_interrupt_flag(GPIO_PUSH_BUTTON_0))
|
||||
{
|
||||
// set the flag
|
||||
bSendMail = pdTRUE;
|
||||
// allow new interrupt : clear the IFR flag
|
||||
gpio_clear_pin_interrupt_flag(GPIO_PUSH_BUTTON_0);
|
||||
}
|
||||
// no context switch required, task is polling the flag
|
||||
return( pdFALSE );
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
#endif
|
||||
|
|
|
|||
|
|
@ -1,16 +1,14 @@
|
|||
/* This header file is part of the ATMEL FREERTOS-0.9.0 Release */
|
||||
|
||||
/*This file has been prepared for Doxygen automatic documentation generation.*/
|
||||
/*! \file *********************************************************************
|
||||
*
|
||||
* \brief Basic SMTP Host for AVR32 UC3.
|
||||
* \brief Basic SMTP Client for AVR32 UC3.
|
||||
*
|
||||
* - Compiler: GNU GCC for AVR32
|
||||
* - Supported devices: All AVR32 devices can be used.
|
||||
* - AppNote:
|
||||
*
|
||||
* \author Atmel Corporation: http://www.atmel.com \n
|
||||
* Support email: avr32@atmel.com
|
||||
* Support and FAQ: http://support.atmel.no/
|
||||
*
|
||||
*****************************************************************************/
|
||||
|
||||
|
|
@ -48,8 +46,8 @@
|
|||
#include "portmacro.h"
|
||||
|
||||
|
||||
/* The function that implements the SMTP host task. */
|
||||
portTASK_FUNCTION_PROTO( vBasicSMTPHost, pvParameters );
|
||||
/* The function that implements the SMTP client task. */
|
||||
portTASK_FUNCTION_PROTO( vBasicSMTPClient, pvParameters );
|
||||
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue