Postiwr SMTP ffynhonnell agored wedi'i seilio ar T5L

Y mater hwn i chi wthio achos ffynhonnell agored ymarferol iawn sydd wedi ennill gwobrau Fforwm Datblygwyr Diwen - anfonwr post smtp seiliedig ar T5L , mae peirianwyr yn defnyddio sgrin smart T5L , trwy'r modiwl WiFi i gael mynediad i'r gweinydd smtp , i gyflawni'r swyddogaeth o anfon e-byst i'r gweinyddwr , gellir mewnbynnu gweithrediad y sgrin i nodi cyfeiriad e-bost y derbynnydd, teitl e-bost, cynnwys e-bost a gwybodaeth arall ar y sgrin.Mae'n werth nodi bod y cynnwys e-bost hefyd yn cefnogi testun plaen, rheolaethau ffurfweddu, gosod lliw testun a dulliau golygu eraill.

Pensaernïaeth 1.Programme

Mae sgrin smart T5L yn rheoli'r modiwl WiFi i ryngweithio â gweinydd smtp trwy borth cyfresol 5 i gyflawni swyddogaeth anfon e-bost.

afa (1)

Datblygu 2.Interface

Mae meddalwedd DGUS yn cwblhau datblygiad swyddogaethau arddangos a chyffwrdd trwy arosod haenau.Dim ond i feddalwedd DGUS y mae angen i ddefnyddwyr lwytho'r deunyddiau llun parod a sefydlu'r swyddogaethau arddangos a chyffwrdd.

afa (2)

1. C51SofferweddDarwydd

Mae porthladd cyfresol sgrin smart T5L 5 yn cyfathrebu â modiwl WiFi i gwblhau'r rhyngweithio â gweinydd smtp.Mae rhan o'r prif god fel a ganlyn:

gwag uart5_init(u32 baud)

{

SCON3T = 0x80;

SCON3R = 0x80;

baud = (u32)((dwbl)(FOSC/8.0)/baud);

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

BODE3_DIV_L = baud&0xff;

ES3R = 0;

ES3T = 0;

}

gwagle u5_send_byte(u8 beit)

{

SBUF3_TX = beit;

tra(!(SCON3T&0x01));

SCON3T &= 0xfe;

}

gwag u5_send_bytes(u8 *beit, u16 lens)

{

u16 ff;

ar gyfer (i=0; i

{

SBUF3_TX = beit;

tra(!(SCON3T&0x01));

SCON3T &= 0xfe;

}

}

derbyn_mewnbwn gwag(u8 * val, u8 len)

{

u8 i;

ar gyfer (i=0; i

{

os(val==0xff)

{

val = 0x00;

val[i+1] = 0x00;

dychwelyd;

}

}

}

u8 esp8266_send_cmd(u8 * cmd, u8 *ack, u16 amser aros, u8 clirBuffer)

{

u8 res=0;

rx_sta=0;

os(ac&&amser aros&&cmd)

{

tra (-- amser aros)

{

sys_delay_ms(10);

os(rx_sta&0X8000)

{

os(esp8266_check_respond(ack)))

torri;

}

}

os(waittime==0)res=1;

os(clearBuffer==1)rx_sta=0;

}

dychwelyd res;

}

strwythur teipio{

u8 cmd;

e-bost u8[20];

u8 enw[20];

teitl u8[20];

u8 msg[60];

}EMAIL_INFO;

EMAIL_INFO email_info;

u8 ymateb[80];

u8 wifi_name[30];

u8 wifi_passwd[30];

gweinydd u8[30];

porthladd u8[30];

u8 enw defnyddiwr[30];

u8 auth_code[30];

u8 rx_sta;

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

os(btn_val)

{

os(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));

os(rx_sta)

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

}arall os(btn_val==2)

{

sys_read_vp(0x3100, wifi_name,15);

sys_read_vp(0x3120, wifi_passwd,15);

cael_mewnbwn(wifi_name,30);

cael_mewnbwn(wifi_passwd,30);

}arall os(btn_val==3)

{

sys_read_vp(0x3200, gweinydd, 15);

sys_read_vp(0x3220,port,15);

sys_read_vp(0x3240, enw defnyddiwr, 15);

sys_read_vp(0x3260, auth_code,15);

cael_mewnbwn(gweinydd,30);

cael_mewnbwn(port,30);

cael_mewnbwn(enw defnyddiwr, 30);

cael_mewnbwn(auth_code,30);

}

 

btn_val = 0;

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

}

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

os(btn_val2!=hen_val)

{

os(btn_val2==1)

sys_write_vp(0x3060,"E-bost yw hwn oddi wrth T5L!\0\0", 30);

arall os(btn_val2==2)

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

arall os(btn_val2==3)

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

old_val = btn_val2;

}


Amser post: Hydref-31-2023