ATNEL tech-forum 2016-03-20T18:08:24+01:00 https://forum.atnel.pl/feed.php?f=7&t=14900&mode 2016-03-20T18:08:24+01:00 2016-03-20T18:08:24+01:00 https://forum.atnel.pl/viewtopic.php?t=14900&p=156632#p156632 <![CDATA[Re: Przeszukiwanie stron internetowych za pomocą WIFI232-T.]]> Statystyki: Napisane przez Sucyn — 20 mar 2016, o 18:08

]]> 2016-03-20T00:07:16+01:00 2016-03-20T00:07:16+01:00 https://forum.atnel.pl/viewtopic.php?t=14900&p=156586#p156586 <![CDATA[Re: Przeszukiwanie stron internetowych za pomocą WIFI232-T.]]> icer_cmg!
Twój kod nie działał od razu, ale wystarczyło podmienić inicjalizację usarta z przekazaną szybkością "USART_Init(38400);" na "USART_Init(__UBRR);" i teraz wszystko śmiga!!!

Statystyki: Napisane przez Sucyn — 20 mar 2016, o 00:07

]]> 2016-03-19T22:12:45+01:00 2016-03-19T22:12:45+01:00 https://forum.atnel.pl/viewtopic.php?t=14900&p=156568#p156568 <![CDATA[Re: Przeszukiwanie stron internetowych za pomocą WIFI232-T.]]>
[syntax=c]#include <avr/io.h>
#include <avr/wdt.h>
#include <avr/interrupt.h>
#include <avr/pgmspace.h>
#include <stdlib.h>
#include <string.h>
#include <util/delay.h>

#include "LCD/lcd44780.h"
#include "MK_USART/mkuart.h"


typedef struct {
char *delim1;
uint8_t d1len;
char * delim2;
uint8_t d2len;
char outbuf[31];
int8_t status;
} TPSTR;


TPSTR tpstr;




// deklaracje funkcji

uint8_t strParse(int znak, TPSTR * wpstr);



//************ główna funkcja main() programu *****************************
int main(void) {
// inicjalizacja UART
USART_Init(9600);
lcd_init();



sei();
uart_puts("GET http://pogoda.onet.pl HTTP/1.0\r\n\r\n");
tpstr.status=0;
tpstr.delim1="\x63\x61: ";
tpstr.d1len = strlen(tpstr.delim1);
tpstr.delim2 = "\x09";;
tpstr.d2len = strlen (tpstr.delim2);
uint8_t id=0;

while(1){

int cn=uart_getc();

//lcd_putc(cn); //test

if (strParse (cn, &tpstr)){
id++;

if (1==id){
lcd_str(tpstr.outbuf);
tpstr.status=0;

}
}

}
}


uint8_t strParse(int znak, TPSTR * wpstr){
static uint8_t idx1, idx2, strend;
char mzn=znak;

if( wpstr->status <0 || znak <0) return 0;
if ( !wpstr->status){
char *dml1 = wpstr->delim1;
if (mzn == *(dml1+idx1)){
idx1++;
if( idx1 == wpstr->d1len){
wpstr->status=1;
wpstr->outbuf[0]=9;
idx1=0;
idx2=0;

}
}else idx1=0;

}else if (wpstr->status){
wpstr->outbuf[idx1++]=mzn;
if(idx1 >30) idx1=0;
char *dml2 = wpstr->delim2;
if (mzn == *(dml2+idx2)){
idx2++;
if (1==wpstr->status){

wpstr->status=2;
strend = idx1-idx2;
}
if (idx2 == wpstr->d2len){
idx1=0;
idx2=0;
wpstr->status = -1;
wpstr->outbuf[strend]=0;
return 1;
}
}else {
idx2=0;
wpstr->status =1;

}
}
return 0;
}[/syntax]

Statystyki: Napisane przez icer_cmg — 19 mar 2016, o 22:12

]]> 2016-03-19T16:25:42+01:00 2016-03-19T16:25:42+01:00 https://forum.atnel.pl/viewtopic.php?t=14900&p=156526#p156526 <![CDATA[Przeszukiwanie stron internetowych za pomocą WIFI232-T.]]>

Problemem stało się napisanie programu na at32, która ma za zadanie:
1)wysłać zapytanie na moją stronę internetową przesyłając w adresie url odpowiednią zmienną do poprawnej reakcji skryptu php
2)ze strumienia danych zwrotnych ze strony ma wyszukać pierwszy znacznik "#", następnie kolejne znaki wpisać do tablicy znaków aż do momentu trafienia na drugi znacznik "#"
3) utworzoną w ten sposób tablicę znaków ma porównać z inna ustaloną w programie tablicą
4)jeśli porównanie nie zwróci wartości "NULL" to program wysyła na stronę kolejną zmienną która zastępuje wyszukiwaną dotychczas w bazie danych

Oto kod dla at32:
[syntax=c]#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>
#include <string.h>

#include "MK_USART/mkuart.h"

//Funkcja badająca stronę
uint8_t check(void);

//Pętla glowna
int main(void)
{
USART_Init(__UBRR);

sei();

_delay_ms(200);

while(1)
{
//jesli znaleziono text pomiedzy znacznikami # to wyslij dane "zmiana=ok" na serwer
if(check())uart_puts("GET http://sucyn.c0.pl/index.php?zmiana=ok HTTP/1.0\r\n\r\n");

}


}

uint8_t check(void)
{
int cn=0;
uint16_t i=0;
char znak='\0', slowo[100]="\0", szukane[]="brak";

//zapytanie do strony
uart_puts("GET http://sucyn.c0.pl/index.php?sprawdz=sprawdz HTTP/1.0\r\n\r\n");

//odbieraj po 1 znaku z bufora UART dopuki nie trafi na znacznik #
while(znak!='#')
{
cn=uart_getc();
znak=cn;
}

znak='\0';

//odbieraj po 1 znaku z bufora UART i dopisuj go do tablicy "slowo" dopuki nie trafi na drugi znacznik #
while(znak!='#')
{
cn=uart_getc();
znak=cn;
slowo[i++]=znak;
if(i>99)i=0;
}

_delay_ms(500);

//jesli porownano prawidlowo otrzymany napis z szukanym to zwracaj 1
if(strstr( slowo, szukane )!=NULL)return 1;//Zwraca wskaźnik na pierwsze wystąpienie str2 w łańcuchu str1 lub NULL, jeśli szukany ciąg znaków nie został odnaleziony.

return 0;
}[/syntax]

A tu kod skryptu na serwerze:
[syntax=php]<?php
// Przechwytywanie wartosci zmiennych z adresu url sucyn.c0.pl?.....
$sprawdz=$_GET['sprawdz'];
$zmiana=$_GET['zmiana'];

/* Łączymy się z serwerem */
$link = mysqli_connect(

'***', /* nazwa komputera, na którym działa MySQL */

'***', /* nazwa użytkownika */

'***', /* hasło */

'***'); /* domyślna baza danych */



if (!$link)
{

printf("Brak połączenia z serwerem MySQL. Kod błędu: %s\n", mysqli_connect_error());

exit;

}

// Ustawiamy kodowanie utf8
mysqli_query($link, "SET CHARSET utf8");
// Ustawiamy polskie znaki
mysqli_query($link, "SET NAMES 'utf8' COLLATE 'utf8_polish_ci'");


// Aktualizujemy tabele "test", w niej zmiana w kolumnie "stan" w wierszu gdzie "obiekt='zmiana' wedug nadeslanej wartosci "
if($zmiana!="") mysqli_query($link, "UPDATE test SET stan='$zmiana' WHERE obiekt='zmiana'");


//Wyswietlanie konkretnej danej z bazy
if ($sprawdz=="sprawdz")
{
//wyszukaj zmienna do wyswietlenia
$result = mysqli_query($link,"SELECT stan FROM test WHERE obiekt='zmiana'");
$row = mysqli_fetch_assoc($result);
$a1=$row['stan'];

//wyswietl znienna
echo<<<END
#$a1#
END;
}

/* Zamykamy połączenie z bazą */
mysqli_close($link);

?>[/syntax]

W bibliotece MK_USART zmieniłem wielkość bufora nadawczego i odbiorczego na 100 oraz ze względu na zastosowany kwarc 16MHz szybkość UART'a na 38400. Moduł WIFI skonfigurowany chyba dobrze bo prawidłowo wysyła zapytania do serwera-sprawdzone.
Problemem jest pierwsza pętla wyszukująca pierwszy znacznik "#" ponieważ nigdy się nie kończy tak jak by nie znajdowała tego znacznika.
Proszę o pomoc w znalezieniu przyczyny tego problemu bo wydaje mi się że nie rozumiem do końca zasady działania funkcji "uart_getc()" i pewnie tu coś pomieszałem....

Statystyki: Napisane przez Sucyn — 19 mar 2016, o 16:25

]]>