Բաց կոդով T5L-ի վրա հիմնված SMTP Mailer

1. C51Sծրագրային ապահովումDնշան

T5L խելացի էկրանի սերիական պորտ 5-ը հաղորդակցվում է WiFi մոդուլի հետ՝ ավարտելու փոխգործակցությունը smtp սերվերի հետ:Հիմնական կոդի մի մասը հետևյալն է.

void uart5_init (u32 baud)

{

SCON3T = 0x80;

SCON3R = 0x80;

baud = (u32) ((կրկնակի) (FOSC/8.0)/baud);

BODE3_DIV_H = (baud>>8)&0xff;

BODE3_DIV_L = baud&0xff;

ES3R = 0;

ES3T = 0;

}

void u5_send_byte (u8 բայթ)

{

SBUF3_TX = բայթ;

while(!(SCON3T&0x01));

SCON3T &= 0xfe;

}

void u5_send_bytes (u8 *bytes,u16 len)

{

u16 i;

համար (i=0;i

{

SBUF3_TX = բայթ;

while(!(SCON3T&0x01));

SCON3T &= 0xfe;

}

}

void get_input (u8 * val, u8 len)

{

u8 i;

համար (i=0;i

{

եթե (val==0xff)

{

val = 0x00;

val[i+1] = 0x00;

վերադարձ;

}

}

}

u8 esp8266_send_cmd(u8 *cmd,u8 *ack,u16 սպասման ժամանակ,u8 clearBuffer)

{

u8 res=0;

rx_sta=0;

եթե (ընդունել&&սպասելու ժամանակը&&cmd)

{

մինչդեռ (--սպասում)

{

sys_delay_ms (10);

if (rx_sta&0X8000)

{

if(esp8266_check_respond(ack))

ընդմիջում;

}

}

if(սպասման ժամանակ==0)res=1;

if(clearBuffer==1)rx_sta=0;

}

վերադարձ ռես;

}

typedef struct{

u8 սմ;

u8 էլ.փոստ[20];

u8 անունը[20];

u8 վերնագիր[20];

u8 msg[60];

}EMAIL_INFO;

EMAIL_INFO email_info;

u8 արձագանքել[80];

u8 wifi_name[30];

u8 wifi_passwd[30];

u8 սերվեր[30];

u8 նավահանգիստ[30];

u8 օգտվողի անուն[30];

u8 auth_code[30];

u8 rx_sta;

sys_read_vp(0x1000,(u8*)&btn_val,1);

if (btn_val)

{

եթե (btn_val==1)

{

sys_read_vp(0x3000,email_info.name,10);

sys_read_vp (0x3020,email_info.email,10);

sys_read_vp (0x3040,email_info.title,10);

sys_read_vp (0x3060,email_info.msg,30);

get_input (email_info.name, 20);

get_input (email_info.email,20);

get_input (email_info.title,20);

get_input (email_info.msg,60);

send_packet((u8*)&email_info,sizeof(EMAIL_INFO));

if (rx_sta)

send_mail (email_info.email,email_info.title,email_info.msg);

}այլ եթե (btn_val==2)

{

sys_read_vp (0x3100, wifi_name, 15);

sys_read_vp (0x3120, wifi_passwd, 15);

get_input (wifi_name, 30);

get_input (wifi_passwd,30);

}այլ եթե (btn_val==3)

{

sys_read_vp (0x3200, սերվեր, 15);

sys_read_vp (0x3220, port, 15);

sys_read_vp (0x3240, օգտվողի անուն, 15);

sys_read_vp (0x3260,auth_code,15);

get_input (սերվեր, 30);

get_input (port, 30);

get_input (օգտանուն, 30);

get_input (auth_code,30);

}

 

btn_val = 0;

sys_write_vp(0x1000,(u8*)&btn_val,1);

}

sys_read_vp (0x2050, (u8*)&btn_val2,1);

if(btn_val2!=old_val)

{

եթե (btn_val2==1)

sys_write_vp(0x3060,"Սա նամակ է T5L-ից!\0\0",30);

այլապես, եթե (btn_val2==2)

sys_write_vp(0x3060," \0\0",30);

ուրիշ, եթե (btn_val2==3)

sys_write_vp(0x3060,"ՀամարձակԿարմիր\0\0",30);

old_val = btn_val2;

}