ATNEL tech-forum

Re: STM32 VL Discovery Serwer WWW

2014-08-18T17:07:10+01:00

stachn napisał(a):

Czytając ostatni wpis na stronie to sądzę ze niestety nie będzie obszerniejszego wyjaśnienia

będzie będzie trwa przenoszenie strony
trochę cierpliwości

Statystyki: Napisane przez SunRiver — 18 sie 2014, o 17:07

Re: STM32 VL Discovery Serwer WWW

2014-08-18T08:01:29+01:00

Czytając ostatni wpis na stronie to sądzę ze niestety nie będzie obszerniejszego wyjaśnienia

SunRiver napisał(a):

co do strzałki -> to po prostu można powiedzieć "przypisanie" choć to możliwe że zbyt duże uproszczenie z grubsza można powiedzieć że podobne jest do >> w gcc dla AVR niemniej postaram się niektóre rzeczy wyjaśnić w arcie na stronie. gdyż dużo pisania będzie

Statystyki: Napisane przez stachn — 18 sie 2014, o 08:01

Re: STM32 VL Discovery Serwer WWW

2014-08-15T11:01:57+01:00

OK. Dzięki. Wiem że w 99% można korzystać z książek mirka bo je mam - może być kłopot dla tych którzy ich nie mają a zasugerują się tytułem ".. dla (bardzo) początkujących". Mnie to zaskoczyło bo zaliczam się do tych bardzo początkujących pomimo przestudiowania książek mirka. Dlatego prawie wszystko zrozumiałem (przynajmniej jak na razie) za wyjątkiem tego nieszczęsnego symbolu.

Statystyki: Napisane przez stachn — 15 sie 2014, o 11:01

Re: STM32 VL Discovery Serwer WWW

2014-08-15T09:19:18+01:00

Widzisz nie opisywałem języka C i składni , gdyż w dużej mierze spokojnie można korzystać z książek mirka w tej kwestii , a skupiłem się
na konkretnych przykładach i ich realizacji nie wciągając się w znane z wielu książek -- tłumaczenia not czy powielanie opisów składni.
oczywiście może zbyt po macoszemu potraktowałem niektóre zagadnienia , ale zdałem się na inteligencję czytelnika, poniekąd wymuszając
samodzielne myślenie i dociekanie.. Takie było założenie. Niemniej przepraszam za pewne niedogodności, ale zawsze możesz zadać pytanie

co do strzałki -> to po prostu można powiedzieć "przypisanie" choć to możliwe że zbyt duże uproszczenie z grubsza można powiedzieć że podobne jest do >> w gcc dla AVR niemniej postaram się niektóre rzeczy wyjaśnić w arcie na stronie. gdyż dużo pisania będzie

Statystyki: Napisane przez SunRiver — 15 sie 2014, o 09:19

Re: STM32 VL Discovery Serwer WWW

2014-08-14T21:51:01+01:00

Tak - zgadzam się że odwołanie do pinów jest inne, inne rzeczy też chociaż nie jestem w tej chili zdolny napisać co jeszcze. Dosyć daleko "zaszedłem" w książce "Mikrokontrolery Kinetis dla bardzo początkujących" ale brakuje mi tam opisów w stylu książek Mirka. Ale jakoś sobie radzę. Jedynie czego jak na razie nie potrafię "rozgryźć" to właśnie taką strzałkę -> ( a nie treść polecenia). Nie spotkałem się z tym dotychczas a przynajmniej nie pamiętam abym się z tym spotkał. I to mnie trochę denerwuje - nawet w necie szukałem opisu i jakoś nie znalazłem.

Statystyki: Napisane przez stachn — 14 sie 2014, o 21:51

Re: STM32 VL Discovery Serwer WWW

2014-08-14T19:52:26+01:00

Widzisz po prostu odwołanie do pinów w ARM jest troszkę odmienne ... mianowicie

GPIO = General Port Input/Output , C no wiadomo że chodzi o port C
ODR = Output Data Register --- czyli już wiadomo że chcę mieć wyjście
GPIO_Pin_9 -- ustawienie wyjścia dotyczy konkretnie pinu 9 portu C ..

jak widzisz jest inaczej niz w AVR , no ale tak musi być bo i 4 razy lepszy mikrokontroler
do wielu rzeczy się będziesz musiał przyzwyczaić innych nauczyć

Statystyki: Napisane przez SunRiver — 14 sie 2014, o 19:52

Re: STM32 VL Discovery Serwer WWW

2014-08-14T11:30:32+01:00

To by miało i sens. Pierwszy raz spotkałem sie tym w programie "KL25Z_UART a konkretnie w takim poleceniu:

Code:

static void SendChar(unsigned char ch, UART_Desc *desc) {
  desc->isSent = FALSE;  // uruchomi sie tylko raz podczas wysyłania bloku
  /*    

------------------------ [ Dodano po: kilkunastu sekundach ]

To by miało i sens. Pierwszy raz spotkałem sie tym w programie "KL25Z_UART a konkretnie w takim poleceniu:

Code:

static void SendChar(unsigned char ch, UART_Desc *desc) {
  desc->isSent = FALSE;  // uruchomi sie tylko raz podczas wysyłania bloku
  /*    

Statystyki: Napisane przez stachn — 14 sie 2014, o 11:30

Re: STM32 VL Discovery Serwer WWW

2014-08-13T23:13:21+01:00

Wytłumaczę w skórcie(mogę się mylic) to GPIOx gdzie x to literka danego portu to nic innego jak struktura(jak działa struktura jest opisane w BB) z tym że jest to wskaźnik do struktury więc zamiast kropeczki po GPIOx stosuje się "->" ponieważ odwołujemy się do wskaźnika struktury(wiem masło maślane).

Mogę się oczywiście mylić wiec w razie czego proszę o sprostowanie powyższego

Pozdrawiam!

Statystyki: Napisane przez MichalXY — 13 sie 2014, o 23:13

Re: STM32 VL Discovery Serwer WWW

2014-08-13T22:37:25+01:00

Mam trochę nie na temat pytanie ale wiąże się właśnie z STM a mianowicie:
nie wiem co znaczy taki symbol -> np. tutaj GPIOC->ODR |= GPIO_Pin_9;.
spotkałem się już z nim w książce "Mikrokontrolery Kinetis ..." i nie mogę nigdzie znaleźć opisu a sam niezbyt potrafię to skojarzyć. Dotychczas w żadnej książce Mirka tego nie spotkałem. Co znaczy GPIO to wiem ale ta kreska z strzałką to już niestety nie.

Statystyki: Napisane przez stachn — 13 sie 2014, o 22:37

Re: STM32 VL Discovery Serwer WWW

2014-08-06T19:45:46+01:00

trochę kurcze stare to już jest i obawiam się że nie do odzyskania , ale jeszcze grzebię ... kopia powinna gdzieś być

Statystyki: Napisane przez SunRiver — 6 sie 2014, o 19:45

Re: STM32 VL Discovery Serwer WWW

2014-08-06T08:59:01+01:00

Quote:

poszukam tego softu i wrzucę ci cały projekt

Też bym był wdzięczny

Statystyki: Napisane przez Gość — 6 sie 2014, o 08:59

Re: STM32 VL Discovery Serwer WWW

2014-08-05T19:17:14+01:00

Dzięki wielkie Sun.

Statystyki: Napisane przez MichalXY — 5 sie 2014, o 19:17

Re: STM32 VL Discovery Serwer WWW

2014-08-05T19:09:51+01:00

poszukam tego softu i wrzucę ci cały projekt

Statystyki: Napisane przez SunRiver — 5 sie 2014, o 19:09

Re: STM32 VL Discovery Serwer WWW

2014-08-05T12:19:16+01:00

Niestety nie pomogła. Wygląda na to że co bym nie wpisał, czy będzie to dobre czy złe hasło to i tak jest kiszka .

Statystyki: Napisane przez MichalXY — 5 sie 2014, o 12:19

Re: STM32 VL Discovery Serwer WWW

2014-08-05T11:59:33+01:00

a zmiana hasła tez nie pomaga?

Statystyki: Napisane przez tomwisnia — 5 sie 2014, o 11:59

STM32 VL Discovery Serwer WWW

2014-08-05T11:29:20+01:00

Witajcie!

Ostatnio walczę z ethernetem na powyżej płytce VL DISCOVERY. Korzystam z tutoriala autorstwa SunRiver'a i na poczatek zabrałem się za ogarnięcie serwera webowego(link do tego odcinka: http://sunduino.elektroda.eu/wordpress/ ... 6-tcpip-2/)

Sam kod źródłowy jeśli chodzi o ethernet przerobiłem w pliku simple_server.c w linicje 47 gdzie definiujemy numer ip urządzenia (pierwotnie było ustawione na 192,168,1,3 a ja zmieniłem na 192,168,1,25) oraz w linijce 52 gdzie definiuje zmienną baseurl gdzie pierwotnie miała taką postać: http://192.168.1.3/ a ja zmieniłem ją na http://192.168.1.25/ . Po wgraniu wsadu do uC układ daję się pingować.
Po wpisaniu w przeglądarkę numery ip układu czyli 192.168.1.25 wyświetla mi się strona z komunikatem:
User: http://192.168.1.25/password
do tego momentu jest wszystko ok.
Problem polega na tym gdy wpisuje w przeglądarkę User: http://192.168.1.25/LED4 to wyświetla się strona z komunikatem:
401 Unauthorized a patrząc na kod źródłowy komunikat ten pokazuje się wówczas gdy jest złe hasło i/lub jest zła komenda.

Docelowo chce odpalić UDP na STM32 ale żeby się jakoś bliżej poznać z etherenetm to zacząłem od serwera webowego a tutaj taki klopsik

Poniżej podaję kody źródłowe main.c oraz simple_server.c oraz zdjęcia z konfiguracji karty sieciowej w PC.

kod main.c

[syntax=c]/*
* ENC28J60
* SerwerWWW ? STM32VLDiScovery
* SunRiver
* www.sunduino.pl
*/

/* Includes */
#include
#include "stm32f10x.h"
//#include "STM32vldiscovery.h"
#include "ENC28J60.h"
#include "stm_lib/inc/stm32f10x_gpio.h"
#include "stm_lib/inc/stm32f10x_rcc.h"
#include "stm_lib/inc/stm32f10x_spi.h"

#include "ip_arp_udp_tcp.h"
#include "simple_server.h"

//NOTE: MAC address in ENC28J60 is byte-backward !!
const uint8_t ENC_MAC[6] = {0x54,0x55,0x58,0x10,0x00,0x24};
const uint8_t ENC_IP[4]={192,168,1,25};
uint8_t PC_MAC[6];
const uint8_t PC_IP[4]={192,168,1,1};
uint8_t i;
uint16_t dummyread;

/* Private function prototypes */
void SPI1_Init(void);
void Delay(__IO uint32_t nTick);
uint8_t SPI1_ReadWrite(uint8_t writedat);

extern int simple_server(void);

/* Private functions ---------------------------------------------------------*/

/**
* Pętla główna MAIN
*
*/
int main(void)
{
i = 0;

GPIO_InitTypeDef GPIO;
GPIO_InitTypeDef button;

//INICJALIZACJA PINÓW Z PODŁĄCZONYMI DIODAMI LED

GPIO.GPIO_Mode = GPIO_Mode_Out_OD;
GPIO.GPIO_Speed = GPIO_Speed_50MHz;
GPIO.GPIO_Pin = GPIO_Pin_8 | GPIO_Pin_9;
GPIO_Init(GPIOC,&GPIO);

//INICJALIZACJA PINA Z PODŁĄCZONYM PRZYCISKIEM

button.GPIO_Mode = GPIO_Mode_IN_FLOATING;
button.GPIO_Speed = GPIO_Speed_50MHz;
button.GPIO_Pin = GPIO_Pin_0;
GPIO_Init(GPIOA,&button);

SPI1_Init();
enc28j60_init((uint8_t *)ENC_MAC);
Delay(0xFFFFF);
init_ip_arp_udp_tcp((uint8_t *)ENC_MAC, (uint8_t *)ENC_IP, 80);
Delay(0xFFFFF);
i = enc28j60getrev();

i = simple_server();

while(1)
{

GPIOC->ODR |= GPIO_Pin_9;
GPIOC->ODR &= ~(1<<8);

}
}

/**
* Delayek
*
*/
void Delay(__IO uint32_t nTick)
{
for(; nTick != 0; nTick--);
}

/**
* Inicializacja SPI1
*
*/
void SPI1_Init(void)
{

SPI_InitTypeDef SPI_InitStructure;
GPIO_InitTypeDef GPIO_InitStructure;

/* Enable SPI1 and GPIOA clocks */
RCC_APB2PeriphClockCmd(RCC_APB2Periph_SPI1 | RCC_APB2Periph_AFIO | RCC_APB2Periph_GPIOA, ENABLE);

/* Configure SPI1 pins: SCK, MISO and MOSI */
GPIO_InitStructure.GPIO_Pin = GPIO_Pin_5 | GPIO_Pin_7 | GPIO_Pin_6;
GPIO_InitStructure.GPIO_Speed = GPIO_Speed_10MHz;
GPIO_InitStructure.GPIO_Mode = GPIO_Mode_AF_PP;
GPIO_Init(GPIOA, &GPIO_InitStructure);

/* Configure MISO as Input with internal pull-up */
//GPIO_InitStructure.GPIO_Pin = GPIO_Pin_6;
//GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IPU;
//GPIO_Init(GPIOA, &GPIO_InitStructure);

/* Configure PA4 as ENC_SELECT */
GPIO_InitStructure.GPIO_Pin = GPIO_Pin_4;
GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
GPIO_Init(GPIOA, &GPIO_InitStructure);

/* SPI1 configuration */
SPI_InitStructure.SPI_Direction = SPI_Direction_2Lines_FullDuplex;
SPI_InitStructure.SPI_Mode = SPI_Mode_Master;
SPI_InitStructure.SPI_DataSize = SPI_DataSize_8b;
SPI_InitStructure.SPI_CPOL = SPI_CPOL_Low;
SPI_InitStructure.SPI_CPHA = SPI_CPHA_1Edge;
SPI_InitStructure.SPI_NSS = SPI_NSS_Soft;
//SPI_InitStructure.SPI_BaudRatePrescaler = SPI_BaudRatePrescaler_4;
SPI_InitStructure.SPI_BaudRatePrescaler = SPI_BaudRatePrescaler_128; // 24000kHz/256=93kHz < 400kHz
SPI_InitStructure.SPI_FirstBit = SPI_FirstBit_MSB;
SPI_InitStructure.SPI_CRCPolynomial = 7;
SPI_Init(SPI1, &SPI_InitStructure);

SPI_CalculateCRC(SPI1, DISABLE);

/* Enable SPI1 */
SPI_Cmd(SPI1, ENABLE);

/* Drain SPI1 */
while (SPI_I2S_GetFlagStatus(SPI1, SPI_I2S_FLAG_TXE) == RESET) { ; }
dummyread = SPI_I2S_ReceiveData(SPI1);
}

uint8_t SPI1_ReadWrite(uint8_t writedat)
{
uint8_t i = 0;
/* Loop while DR register in not empty */
while(SPI_I2S_GetFlagStatus(SPI1, SPI_I2S_FLAG_TXE) == RESET);
/* Send byte through the SPI1 peripheral */
SPI_I2S_SendData(SPI1, writedat);

// printf ("writedat...%x\r\n",writedat);

/* Wait to receive a byte */
while(SPI_I2S_GetFlagStatus(SPI1, SPI_I2S_FLAG_RXNE) == RESET);
i= SPI_I2S_ReceiveData(SPI1) ;

// printf ("readdat...%x\r\n",i);
/* Return the byte read from the SPI bus */
return i;
}

#ifdef USE_FULL_ASSERT

/**
* @brief Reports the name of the source file and the source line number
* where the assert_param error has occurred.
* @param file: pointer to the source file name
* @param line: assert_param error line source number
* @retval None
*/
void assert_failed(uint8_t* file, uint32_t line)
{
/* User can add his own implementation to report the file name and line number,
ex: printf("Wrong parameters value: file %s on line %d\r\n", file, line) */

/* Infinite loop */
while (1)
{
}
}
#endif

/*
* Minimal __assert_func used by the assert() macro
* */
void __assert_func(const char *file, int line, const char *func, const char *failedexpr)
{
while(1)
{}
}

/*
* Minimal __assert() uses __assert__func()
* */
void __assert(const char *file, int line, const char *failedexpr)
{
__assert_func (file, line, NULL, failedexpr);
}[/syntax]

kod simple_server.c

[syntax=c]/*********************************************
* vim:sw=8:ts=8:si:et
* To use the above modeline in vim you must have "set modeline" in your .vimrc
* Author: Guido Socher
* Copyright: GPL V2
* See http://www.gnu.org/licenses/gpl.html
*
* Ethernet remote device and sensor
* UDP and HTTP interface
url looks like this http://baseurl/password/command
or http://baseurl/password/
*
* Title: Microchip ENC28J60 Ethernet Interface Driver
* Chip type : ATMEGA88 with ENC28J60
* Note: there is a version number in the text. Search for tuxgraphics
*********************************************/

/*********************************************
* modified: 2007-08-08
* Author : awake
* Copyright: GPL V2
* http://www.icdev.com.cn/?2213/
* Host chip: ADUC7026
**********************************************/

#include "stdio.h"
#include
#include "stm32f10x_conf.h"
#include "ENC28J60.h"
#include "net.h"
#include "ip_arp_udp_tcp.h"

#define PSTR(s) s

//extern void delay_ms(unsigned char ms);

// please modify the following two lines. mac and ip have to be unique
// in your local area network. You can not have the same numbers in
// two devices:

static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x24};
static uint8_t myip[4] = {192,168,1,25};

// base url (you can put a DNS name instead of an IP addr. if you have
// a DNS server (baseurl must end in "/"):
//static char baseurl[]="http://192.168.1.3/";
static char baseurl[] = "http://192.168.1.25/";
static uint16_t my_www_port =80; // listen port for tcp/www (max range 1-254)

// or on a different port:
//static char baseurl[]="http://10.0.0.24:88/";
//static uint16_t mywwwport =88; // listen port for tcp/www (max range 1-254)
//
static uint16_t my_udp_port =1200; // listen port for udp
// how did I get the mac addr? Translate the first 3 numbers into ascii is: TUX

#define BUFFER_SIZE 1500 //400
static uint8_t buf[BUFFER_SIZE+1];

// the password string (only the first 5 char checked), (only a-z,0-9,_ characters):

static char password[]="LED4"; // must not be longer than 9 char
const unsigned char WebSide[] = {
"

A/D STM32VL-Discovery:(LED4"lang=EN-US>0~"Negative=\"False\" NumberType=\"1\" TCSC=\"0\" w:st=\"on\">50 AC)

\r\n"
"\r\n"
"" style='width:405.0pt;mso-cellspacing:0cm;background:red;border:outset 4.5pt;\r\n"
" mso-padding-alt:0cm 0cm 0cm 0cm'>\r\n"
" \r\n"
"

\r\n"
" " style='mso-cellspacing:0cm;mso-padding-alt:0cm 0cm 0cm 0cm'>\r\n"
" \r\n"
" \r\n"
};
//
uint8_t verify_password(char *str)
{
// the first characters of the received string are
// a simple password/cookie:
if (strncmp(password,str,5)==0)
{
return(1);
}
return(0);
}

// takes a string of the form password/commandNumber and analyse it
// return values: -1 invalid password, otherwise command number
// -2 no command given but password valid
int8_t analyse_get_url(char *str)
{
uint8_t i=0;
if (verify_password(str)==0)
{
return(-1);
}
// find first "/"
// passw not longer than 9 char:
while(*str && i<10 && *str >',' && *str<'{')
{
if (*str=='/')
{
str++;
break;
}
i++;
str++;
}
if (*str < 0x3a && *str > 0x2f)
{
// is a ASCII number, return it
return(*str-0x30);
}
return(-2);
}

// prepare the webpage by writing the data to the tcp send buffer
uint16_t print_webpage(uint8_t *buf,uint8_t on_off)
{
uint16_t plen;
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\nPragma: no-cache\r\n\r\n"));
plen=fill_tcp_data_p(buf,plen,PSTR("

STM32VL-Discovery TCP/IP

http://www.sunduino.pl

\n"));
plen=fill_tcp_data_p(buf,plen,PSTR("

LED status: "));
if (on_off)
{
plen=fill_tcp_data_p(buf,plen,PSTR(" LIGHTING "));
}
else
{
plen=fill_tcp_data_p(buf,plen,PSTR(" zgaszona "));
}
//plen=fill_tcp_data_p(buf,plen,PSTR(" //plen=fill_tcp_data(buf,plen,baseurl);
//plen=fill_tcp_data(buf,plen,password);
//plen=fill_tcp_data_p(buf,plen,PSTR("\">[DA]

plen=fill_tcp_data_p(buf,plen,PSTR("

"));
if(0 == GPIO_ReadInputDataBit(GPIOA,GPIO_Pin_0))
{
plen=fill_tcp_data_p(buf,plen,PSTR("

Przycisku nie nacinięto.

\n"));
}
else
{
plen=fill_tcp_data_p(buf,plen,PSTR("

Przycisk nacinięty .

\n"));
}
plen=fill_tcp_data_p(buf,plen,PSTR("

// the url looks like this http://baseurl/password/command
plen=fill_tcp_data(buf,plen,baseurl);
plen=fill_tcp_data(buf,plen,password);
if (on_off)
{
plen=fill_tcp_data_p(buf,plen,PSTR("/0\">Wyłącz LED

"));
}
else
{
plen=fill_tcp_data_p(buf,plen,PSTR("/1\">Włącz LED

"));
}
plen=fill_tcp_data_p(buf,plen,PSTR("

STM32F100 Value Line UCOS-II V2.85 WEB\n"));
//plen=fill_tcp_data_p(buf,plen,PSTR(WebSide));

return(plen);
}

int simple_server(void)
{
uint16_t plen;
uint16_t dat_p;
uint8_t i=0;
uint8_t cmd_pos=0;
int8_t cmd;
uint8_t payloadlen=0;
char str[30];
char cmdval;

//Del_1ms(100);

/*inicjacja enc28j60*/
//enc28j60Init(mymac);
//init_ip_arp_udp_tcp(mymac,myip,mywwwport);

enc28j60_write_phy(PHLCON, 0x7a4);

//enc28j60PhyWrite(PHLCON,0x7a4);
//enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
//Del_1ms(20);

//init the ethernet/ip layer:

while(1)
{
//OSTimeDlyHMSM(0, 0, 0, 50);
// get the next new packet:
//plen = enc28j60PacketReceive(BUFFER_SIZE, buf);
plen = enc28j60_recv_packet(buf, BUFFER_SIZE);
//USART_DMASendData(USART1,buf,plen);

/*plen will ne unequal to zero if there is a valid packet (without crc error) */
if(plen==0)
{
continue;
}
// arp is broadcast if unknown but a host may also
// verify the mac address by sending it to
// a unicast address.
if(eth_type_is_arp_and_my_ip(buf,plen))
{
make_arp_answer_from_request(buf);
//USART_DMASendText(USART1,"make_arp_answer_from_request\n");
continue;
}

// check if ip packets are for us:
if(eth_type_is_ip_and_my_ip(buf,plen)==0)
{
continue;
}

if(buf[IP_PROTO_P]==IP_PROTO_ICMP_V && buf[ICMP_TYPE_P]==ICMP_TYPE_ECHOREQUEST_V)
{
// a ping packet, let's send pong
make_echo_reply_from_request(buf, plen);
//USART_DMASendText(USART1,"make_echo_reply_from_request\n");
continue;
}
// tcp port www start, compare only the lower byte
if (buf[IP_PROTO_P]==IP_PROTO_TCP_V&&buf[TCP_DST_PORT_H_P]==0&&buf[TCP_DST_PORT_L_P]==my_www_port)
{
if (buf[TCP_FLAGS_P] & TCP_FLAGS_SYN_V)
{
make_tcp_synack_from_syn(buf);
// make_tcp_synack_from_syn does already send the syn,ack
continue;
}
if (buf[TCP_FLAGS_P] & TCP_FLAGS_ACK_V)
{
init_len_info(buf); // init some data structures
// we can possibly have no data, just ack:
dat_p=get_tcp_data_pointer();
if (dat_p==0)
{
if (buf[TCP_FLAGS_P] & TCP_FLAGS_FIN_V)
{
// finack, answer with ack
make_tcp_ack_from_any(buf);
}
// just an ack with no data, wait for next packet
continue;
}

if (strncmp("GET ",(char *)&(buf[dat_p]),4)!=0)
{
// head, post and other methods:
//
// for possible status codes see:
// http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n

200 OK

"));
goto SENDTCP;
}
if (strncmp("/ ",(char *)&(buf[dat_p+4]),2)==0)
{
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n"));
plen=fill_tcp_data_p(buf,plen,PSTR("

User: "));
plen=fill_tcp_data(buf,plen,baseurl);
plen=fill_tcp_data_p(buf,plen,PSTR("password

"));
goto SENDTCP;
}
cmd=analyse_get_url((char *)&(buf[dat_p+5]));

// for possible status codes see:
// http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
if (cmd==-1)
{
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 401 Unauthorized\r\nContent-Type: text/html\r\n\r\n

401 Unauthorized

"));
// plen=print_webpage(buf,(i));
goto SENDTCP;
}
if (cmd==1)
{
GPIO_SetBits(GPIOC, GPIO_Pin_8);
//plen=fill_tcp_data_p(buf,0,PSTR("Content-Type: text/html\r\n\r\n

OK

"));
i=1;
}
if (cmd==0)
{
//PORTD &= ~(1<//IOSET |= (1<<26);
//LED1OFF();

GPIO_ResetBits(GPIOC, GPIO_Pin_8);
i=0;
}
// if (cmd==-2) or any other value
// just display the status:

SENDTCP:
make_tcp_ack_from_any(buf); // send ack for http get
make_tcp_ack_with_data(buf, (uint16_t)plen); // send data
continue;
}
}
// tcp port www end
//
// udp start, we listen on udp port 1200=0x4B0
if (buf[IP_PROTO_P]==IP_PROTO_UDP_V&&buf[UDP_DST_PORT_H_P]==4&&buf[UDP_DST_PORT_L_P]==0xb0)
{
payloadlen=buf[UDP_LEN_L_P]-UDP_HEADER_LEN;
// you must sent a string starting with v
// e.g udpcom version 10.0.0.24
if (verify_password((char *)&(buf[UDP_DATA_P])))
{
// find the first comma which indicates
// the start of a command:
cmd_pos=0;
while(cmd_pos{
cmd_pos++;
if (buf[UDP_DATA_P+cmd_pos]==',')
{
cmd_pos++; // put on start of cmd
break;
}
}
// a command is one char and a value. At
// least 3 characters long. It has an '=' on
// position 2:
if (cmd_pos<2 || cmd_pos>payloadlen-3 || buf[UDP_DATA_P+cmd_pos+1]!='=')
{
strcpy(str,"e=no_cmd");
goto ANSWER;
}
// supported commands are
// t=1 t=0 t=?
if (buf[UDP_DATA_P+cmd_pos]=='t')
{
cmdval=buf[UDP_DATA_P+cmd_pos+2];
if(cmdval=='1')
{
//PORTD|= (1<//IOCLR |= (1<<26);
//LED1ON();
strcpy(str,"t=1");
goto ANSWER;
}
else if(cmdval=='0')
{
//PORTD &= ~(1<//IOSET |= (1<<26);
//LED1OFF();
strcpy(str,"t=0");
goto ANSWER;
}
else if(cmdval=='?')
{
/*
if (IOPIN & (1<<26))
{
strcpy(str,"t=1");
goto ANSWER;
}
*/
strcpy(str,"t=0");
goto ANSWER;
}
}
strcpy(str,"e=no_such_cmd");
goto ANSWER;
}
strcpy(str,"e=invalid_pw");
ANSWER:
make_udp_reply_from_request(buf,str,strlen(str),my_udp_port);

}
}
// return (0);
}[/syntax]
Konfiguracja karty sieciowej:

Statystyki: Napisane przez MichalXY — 5 sie 2014, o 11:29

\r\n"
"