Implement retries for when network stack fails NetConfigure.

This commit is contained in:
TomAwezome 2022-01-17 00:12:18 -05:00
parent afc785ba27
commit 10a5876ce7

View file

@ -1,21 +1,19 @@
Cd(__DIR__);;
#include "Load"
NetConfigure;
if (Fs != sys_task)
I64 retries = 5;
while (ipv4_globals.local_ip == 0 && retries--) // local_ip is set if NetConfigure is successful
{
if (ipv4_globals.local_ip != 0) // is set if NetConfigure is successful
{
NetRep;
"\nNow run one of the $MA,"Tests",LM="Cd(\"C:/Home/Net/Tests\");Dir;\n"$ or $MA,"Programs",LM="Cd(\"C:/Home/Net/Programs\");Dir;\n"$.\n";
"\nIf a test crashes to Debug, try typing $FG,0$G2;$FG$\n\n";
}
else
{
"\nNetConfigure unsuccessful. See Network Log for details.\n\n";
}
"\nNetConfigure unsuccessful. Retrying...\n";
NetConfigure;
}
if (ipv4_globals.local_ip == 0)
"\nNetConfigure unsuccessful. See Network Log for details.\n\n";
else
"\nNetConfigure successful!\n\n";
NetRep;
if (ipv4_globals.local_ip != 0 && Fs != sys_task)
{
"\nNow run one of the $MA,"Programs",LM="Cd(\"C:/Home/Net/Programs\");Dir;\n"$.\n";
"\nIf anything crashes to Debug, try typing $FG,0$G2;$FG$\n\n";
}