[
######################################################################
########### Please only make changes to the script here ###########
######################################################################
###### Please enter all SSIDs to be searched for here
wlan_ssid_field = mkarray ( "<WLAN_SSID_1>",
"<WLAN_SSID_2>",
"<WLAN_SSID_3>",
"<WLAN_SSID_4>");
###### Please enter the passwords here in the correct order for the SSID!
###### Example: WLAN_SSID_1 for WLAN_Password_1
wlan_passwort_field = mkarray ( "<WLAN_Password_1>",
"<WLAN_Password_2>",
"<WLAN_Password_3>",
"<WLAN_Password_4>");
###### Please specify here where this function should be entered, under
###### WLAN Client Configuration. Under WLAN Client, 10 (1 - 10) entries are possible.
wlan_client_entry = 10; #### int Value 1 to 10 Possible
###### Which WLAN module should be used (WLAN 1 or WLAN 2)?
wlan_interface = 2; #### The one for WLAN 1 or the two for WLAN 2
###############################################################################
DEBUG=false; # Enable debugging with true or disable with false
###############################################################################
prio_value = 0;
release = 0;
if (length(wlan_ssid_field) == length(wlan_passwort_field)){
if(DEBUG)printf("Both fields are the same\n");
} else {
if(DEBUG)printf("An SSID:%s or password:%s is missing for execution.\n",length(wlan_ssid_field),length(wlan_passwort_field));
nb_syslog("An SSID:%s or password:%s is missing for execution.",length(wlan_ssid_field),length(wlan_passwort_field));
printf("end of program\n");
exit(1);
}
if (wlan_client_entry > 0){
if(DEBUG)printf("The value wlan_client_entry is greater than zero: %s\n",wlan_client_entry);
if (wlan_client_entry <=10 ){
if(DEBUG)printf("The value wlan_client_entry is less than or equal to ten: %s\n",wlan_client_entry);
wlan_client_entry = wlan_client_entry -1;
if(DEBUG)printf("The value wlan_client_entry has been changed: %s\n",wlan_client_entry);
prio_value = 10 - wlan_client_entry;
if(DEBUG)printf("The value prio_value is: %s\n",prio_value);
} else {
if(DEBUG)printf("The value wlan_client_entry is greater than ten: %s\n",wlan_client_entry);
nb_syslog("The value wlan_client_entry is greater than ten: %s",wlan_client_entry);
printf("end of program\n");
exit(2);
}
} else{
if(DEBUG)printf("The value wlan_client_entry is less than or equal to zero: %s\n",wlan_client_entry);
nb_syslog("The value wlan_client_entry is less than or equal to zero: %s",wlan_client_entry);
printf("end of program\n");
exit(2);
}
switch (wlan_interface){
case 1: if(DEBUG)printf("The value one for WLAN 1: %s\n",wlan_interface);
wlan_interface = wlan_interface - 1;
if(DEBUG)printf("The value after the change: %s\n",wlan_interface);
wlan_scan = "WLAN1";
if(DEBUG)printf("Output of the WLAN scan interface: %s\n",wlan_scan);
break;
case 2: if(DEBUG)printf("The value two for WLAN 2: %s\n",wlan_interface);
wlan_interface = wlan_interface - 1;
if(DEBUG)printf("The value after the change: %s\n",wlan_interface);
wlan_scan = "WLAN2";
if(DEBUG)printf("Output of the WLAN scan interface: %s\n",wlan_scan);
break;
default: if(DEBUG)printf("The value is not WLAN 1 or WLAN 2: %s\n",wlan_interface);
nb_syslog("The value is not WLAN 1 or WLAN 2: %s",wlan_interface);
printf("end of program\n");
exit(3);
break;
}
while(true){
lan_link = struct_get(nb_status("wan"),"WANLINK1_STATE");
if (lan_link == "up") { /* WAN LINK setup */
if(DEBUG)printf("LAN is up\n"); /* WANLINK1 is LAN2/WAN , WANLINK2 is WLAN2 , WANLINK3 is WWAN1 and WANLINK4 is WWAN2 */
} else { /* Must be adjusted according to customer requirements */
if(DEBUG)printf("LAN is down\n");
wlan_off = struct_get(nb_status("wlan"),"WLAN2_OPER_TYPE");
wlan_link = struct_get(nb_status("wan"),"WANLINK2_STATE");
if (wlan_link == "down" || wlan_off == "off" || wlan_link == "dialing"){
if(DEBUG)printf("WLAN is down\n");
hotlink = struct_get(nb_status("wan"),"WAN_HOTLINK");
if (hotlink == "WANLINK3" || hotlink == "WANLINK4" || release == 1){
if (release != 1){
if(DEBUG)printf("WWAN is currently online\n");
} else {
if(DEBUG)printf("WWAN is currently not online\n");
}
if(DEBUG)printf("Search for Wi-Fi now\n");
sleep(1);
wlan_networks = nb_scan_networks(spriend of programntf("%s",wlan_scan)); # scan WLAN module
wlan_count = struct_get(wlan_networks,"NETWORK_COUNT");
if(DEBUG)printf("%s SSIDs were found during the scan.\n\n", wlan_count);
for (i=0; (int)wlan_count > i; ++i){
number_count = i + 1;
if(DEBUG)printf("Which number is used: %s\n",number_count);
wlan_ssid = struct_get(wlan_networks,sprintf("NETWORK%s_SSID",number_count));
if(DEBUG)printf("The WLAN SSID that is there: %s\n", wlan_ssid);
if(DEBUG)printf("The WLAN stored in memory location %s\n\n",wlan_client_entry);
#####################################################################
##### From here, the Wi-Fi networks are stored #####
#####################################################################
for (q=0; ((int)temp = length(wlan_ssid_field)) > q; ++q){
index = q + 1;
if(DEBUG)printf("Which ssid field: %s\n",wlan_ssid_field[q]);
if(DEBUG)printf("How many SSIDs: %s\n",temp);
if(DEBUG)printf("Output the index: %s\n",index);
if (wlan_ssid == wlan_ssid_field[q]){
if(DEBUG)printf("The wireless network %s has been found.\n",wlan_ssid);
ssid = struct_get(wlan_networks,sprintf("NETWORK%s_SSID",number_count));
cipher = struct_get(wlan_networks,sprintf("NETWORK%s_CIPHER_1",number_count));
if(DEBUG)printf("What parameters do we have: %s \n", cipher);
if (cipher == "CCMP"){
cipher = tolower(cipher);
} else {
cipher = "all";
}
encryption = struct_get(wlan_networks,sprintf("NETWORK%s_ENCRYPTION_1",number_count));
if (encryption == "WPA-PSK"){
encryption = "wpa1andwpa2";
}
if (encryption == "WPA2-SAE"){
encryption = "wpa2andwpa3";
}
if (encryption == "WPA2-PSK"){
encryption = "wpa2";
}
## Scan from Wi-Fi
nb_config_set("wlan.1.settings.channel=0");
ret = nb_config_done();
while (ret){
if(DEBUG)printf("The config parameter channel 0 is in the execution: %s\n",ret);
ret = nb_config_done();
sleep(1);
}
if(DEBUG)printf("The config parameter channel 0 is set to: %s\n",ret);
nb_config_set(sprintf("wlan.%s.client.%s.ssid=%s",wlan_interface,wlan_client_entry,ssid));
ret = nb_config_done();
while (ret){
if(DEBUG)printf("The config parameter %s is in execution: %s\n",ssid,ret);
ret = nb_config_done();
sleep(1);
}
if(DEBUG)printf("The config parameter %s is set to: %s\n",ssid,ret);
nb_config_set(sprintf("wlan.%s.client.%s.cipher=%s",wlan_interface,wlan_client_entry,cipher));
ret = nb_config_done();
while (ret){
if(DEBUG)printf("The config parameter %s is in execution: %s\n",cipher,ret);
ret = nb_config_done();
sleep(1);
}
if(DEBUG)printf("The config parameter %s is set to: %s\n",cipher,ret);
nb_config_set(sprintf("wlan.%s.client.%s.secproto=%s",wlan_interface,wlan_client_entry,encryption));
ret = nb_config_done();
while (ret){
if(DEBUG)printf("The config parameter %s is in execution: %s\n",encryption,ret);
ret = nb_config_done();
sleep(1);
}
if(DEBUG)printf("The config parameter %s is set to: %s\n",encryption,ret);
## Feste Wert
nb_config_set(sprintf("wlan.%s.client.%s.secmode=wpa-psk",wlan_interface,wlan_client_entry));
ret = nb_config_done();
while (ret){
if(DEBUG)printf("The config parameter secmode is in the execution: %s\n",ret);
ret = nb_config_done();
sleep(1);
}
if(DEBUG)printf("The config parameter secmode is set by: %s\n",ret);
nb_config_set(sprintf("wlan.%s.client.%s.prio=%s",wlan_interface,wlan_client_entry,prio_value));
ret = nb_config_done();
while (ret){
if(DEBUG)printf("The config parameter prio is in the execution: %s\n",ret);
ret = nb_config_done();
sleep(1);
}
if(DEBUG)printf("The config parameter prio is set by: %s\n",ret);
## Wi-Fi password
nb_config_set(sprintf("wlan.%s.client.%s.psk=%s",wlan_interface,wlan_client_entry,(wlan_passwort_field[q]))); ## Passwort wird aus der Feld gezogen
ret = nb_config_done();
while (ret){
if(DEBUG)if(DEBUG)printf("The config parameter psk is in the execution: %s\n",ret);
ret = nb_config_done();
sleep(1);
}
q = length(wlan_ssid_field);
if(DEBUG)printf("Value of q: %s\n",q);
if(DEBUG)printf("The config parameter psk is set to: %s\n",ret);
i = 100; ## for end loop
release = 0;
} else {
if(DEBUG)printf("no\n");
}
}
}
if(DEBUG)printf("The value i is: %s\n",i);
if (i <= 100) {
if(DEBUG)printf("No suitable Wi-Fi network found\n");
}
} else{
if(DEBUG)printf("The status of the hotlink at the moment %s\n", hotlink);
for (a=0; 3 > a; ++a){
if(DEBUG)printf("Waiting for WWAN to come online\n");
sleep(60);
if(DEBUG)printf("The value a: %s\n",a);
wwan_link = struct_get(nb_status("wan"),"WANLINK1_STATE");
if(DEBUG)printf("Is WWAN still down: %s\n",wwan_link);
if (wwan_link == "down" || "dialing" && a == 2){
a = 10;
release = 1;
if(DEBUG)printf("Value release: %s\n",release );
if(DEBUG)printf("The WWAN is still down after 3 minutes.\n");
if(DEBUG)printf("Search for Wi-Fi\n");
}
}
}
}
wlan_link = struct_get(nb_status("wan"),"WANLINK2_STATE");
if (wlan_link == "up"){
ret = nb_config_done();
if(DEBUG)printf("The configuration has been completed: %s\n\n",ret);
if(DEBUG)printf("WLAN is up\n\n");
} else{
if(DEBUG)printf("WLAN is Down\n\n");
}
}
printf("New search after 30 seconds\n");
sleep(30);
}
printf("end of program\n");
nb_syslog("end of program");
exit(0);
]