1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
| #define F_CPU 16000000UL //Quartz clock frequency 16 MHz
#include <string.h> //libs
#include <avr/io.h>
#include <util/delay.h>
#include <avr/pgmspace.h>
#include <stdio.h>
#include <avr/interrupt.h>
#include "i2c.h" //header file for I2C interface functions
#include "UART_routines.h" //header file for UART interface functions
#include "avr_compat.h" //header file for diverse uC reductions/simplifications
#include "enc28j60.h" //header file for Ethernet-Chip define
#include "ip_arp_udp_tcp.h" //header file for describing IP, ARP, UDP, TCP protocols on uC
#include "net.h" //header file for some defines
//-----------------------------------I2C-----------------------------------//
#define LOCAL_ADDR 0x07 //I2C address of this uC, I2C slave
#define TARGET_ADDR 0xA0 //I2C address of target uC, I2C master
//-----------------------------------I2C-----------------------------------//
//-----------------------------------ENC-----------------------------------//
static uint8_t mymac[6] = {0x54,0x55,0x58,0x10,0x00,0x24}; // MAC address of uC
static uint8_t myip[4] = {192,168,0,25}; // IP address of uC
#define MYWWWPORT 80 // listen port for tcp/www
#define MYUDPPORT 1200 // listen port for udp
#define BUFFER_SIZE 550 // buffer for messages
static uint8_t buf[BUFFER_SIZE+1];
static int nPingCount = 0, nAccessCount = 0; // Global counters
// the password string (only the first 5 char checked), (only a-z,0-9,_ characters):
static char password[]="secret"; // must not be longer than 9 char
//-----------------------------------ENC-----------------------------------//
//LED control defines
#define LED_GREEN_ON SETBIT(PORTA,0)
#define LED_GREEN_OFF CLEARBIT(PORTA,0)
#define LED_RED_ON SETBIT(PORTA,1)
#define LED_RED_OFF CLEARBIT(PORTA,1)
//unsigned char BUF[50];
unsigned char BUF123[50];
unsigned char receiveData[10];
u08 receiveDataLength;
int data; data = 0;
// slave operations
// calls when message per I2C was received
void i2cSlaveReceiveService(u08 receiveDataLength, u08* receiveData)
{
LED_RED_ON; //LED ON
//sprintf(BUF,"slave received: %s (length %d)",receiveData,receiveDataLength);
sprintf(BUF123,"%s",receiveData);
usart_write_str(BUF123);TX_NEWLINE; //show received message in UART-software (Terminal)
//_delay_ms(1); //when needed, some delay
LED_RED_OFF; //LED off
}
//function for find char in string
char* strfind(char *dest, const char* sour, int nStart, int nEnd)
{
for (int i = nStart; i <= nEnd; i++)
dest[i - nStart] = sour[i];
dest[nEnd - nStart + 1] = '\0';
return dest;
}
// function for check password in string from udp client
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);
}
int main(void)
{
_delay_ms(100); // some delay for VCC stabilization
DDRA = 0x03; // PA0, PA1 - LEDs, pins are out
LED_GREEN_ON; // LED ON
usart_init(9600); /*initialize UART with baud rate 9600*/
//some variables for udp-server
uint8_t cmd_pos=0;
char cmdval;
char *p = NULL;
int count_num;
char str999[30];
unsigned short data_num;
char data_num_str[30];
uint8_t payloadlen=0;
char str[30];
/*initialize enc28j60*/
uint16_t plen, dat_p;
enc28j60Init(mymac);
enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
enc28j60PhyWrite(PHLCON,0x476);
_delay_ms(100);
init_ip_arp_udp_tcp(mymac,myip,MYWWWPORT);
// initialize i2c function library
void i2cInit(void);
// set local device address and allow response to general call
void i2cSetLocalDeviceAddr(u08 deviceAddr, u08 genCallEn);
// string for out, to test running of UART and I2C
usart_write_str("*************TWI SLAVE RUNNING*************");TX_NEWLINE;
// start of interrupt for receiving of I2C messages
void i2cSetSlaveReceiveHandler( i2cSlaveReceiveService );
while(1)
{
// get the next new packet:
plen = enc28j60PacketReceive(BUFFER_SIZE, buf);
if(eth_type_is_arp_and_my_ip(buf,plen))
{
make_arp_answer_from_request(buf);
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
nPingCount++;
make_echo_reply_from_request(buf,plen);
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]== MYWWWPORT)
{
if (buf[TCP_FLAGS_P] & TCP_FLAGS_SYN_V)
{
// make_tcp_synack_from_syn does already send the syn,ack
make_tcp_synack_from_syn(buf);
continue;
}
if (buf[TCP_FLAGS_P] & TCP_FLAGS_ACK_V)
{
init_len_info(buf); // init some data structures
dat_p = get_tcp_data_pointer();
if (dat_p==0) // we can possibly have no data, just ack:
{
if (buf[TCP_FLAGS_P] & TCP_FLAGS_FIN_V)
{
make_tcp_ack_from_any(buf);
}
continue;
}
// count page requests
nAccessCount++;
// generate WEBPAGE
char szS1[200] = {0};
sprintf(szS1, BUF123);
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("<html><head><title>Webserver on ATMega32</title></head><body bgcolor=\"#CCFFFF\"><font face=\"tahoma\" color=\"#000033\"><strong>Webserver running on Atmega32</strong>"));
//plen=fill_tcp_data_p(buf,plen,PSTR("<html>"));
//active data
plen=fill_tcp_data(buf,plen,szS1);
//plen=fill_tcp_data_p(buf,plen,PSTR("</html>"));
//plen=fill_tcp_data_p(buf,plen,PSTR("</font></body></html>"));
// send data over TCP IP
make_tcp_ack_from_any(buf);
make_tcp_ack_with_data(buf,plen);
}
}
// 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<payloadlen)
{
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 command is t=?
// t=2 t=1 are data
if (buf[UDP_DATA_P+cmd_pos]=='t')
{
cmdval=buf[UDP_DATA_P+cmd_pos+2];
sprintf(str999,"");
if(cmdval=='1'||cmdval=='2'||cmdval=='3'||cmdval=='4'||cmdval=='5')
{
count_num = (int)cmdval;
if (cmdval=='1')
{
p = strfind(str999,buf,UDP_DATA_P+cmd_pos+2+1+1,UDP_DATA_P+cmd_pos+2+1+1);
}
if (cmdval=='2')
{
p = strfind(str999,buf,UDP_DATA_P+cmd_pos+2+1+1,UDP_DATA_P+cmd_pos+2+1+2);
}
data_num = atoi(str999);
sprintf(data_num_str,"%d",data_num);
usart_write_str(data_num_str);TX_NEWLINE; //show received message in UART-software (Terminal)
goto ANSWER;
}
if(cmdval=='?')
{
strcpy(str,"Status: OK");
goto ANSWER;
}
else
{
}
}
strcpy(str,"e=no_such_cmd");
goto ANSWER;
}
strcpy(str,"e=invalid_pw");
ANSWER:
make_udp_reply_from_request(buf,str,strlen(str),MYUDPPORT);
}
}
} |