IRC password can be changed within control panel

This commit is contained in:
Bob Mottram 2015-12-09 14:38:17 +00:00
parent b2084b8dc7
commit e12fd7a87e
1 changed files with 55 additions and 15 deletions

View File

@ -189,6 +189,22 @@ function change_password {
any_key
}
function irc_set_global_password {
dialog --title $"IRC Password" \
--clear \
--backtitle $"Freedombone Control Panel" \
--passwordbox $"Password for all IRC users" 10 50 2> $data
sel=$?
case $sel in
0)
NEW_IRC_PASSWORD=$(<$data)
sed -i "0,/RE/s/Password =.*/Password = $NEW_IRC_PASSWORD/" /etc/ngircd/ngircd.conf
dialog --title $"IRC Password" \
--msgbox $"The IRC password was changed" 6 40
;;
esac
}
function change_ssh_public_key {
select_user
if [ ! $SELECTED_USERNAME ]; then
@ -1013,6 +1029,28 @@ function menu_media {
done
}
function menu_irc {
while true
do
data=$(tempfile 2>/dev/null)
trap "rm -f $data" 0 1 2 5 15
dialog --backtitle $"Freedombone Control Panel" \
--title $"IRC Menu" \
--radiolist $"Choose an operation:" 13 70 3 \
1 $"Set a password for all IRC users" off \
2 $"Exit" on 2> $data
sel=$?
case $sel in
1) break;;
255) break;;
esac
case $(cat $data) in
1) irc_set_global_password;;
2) break;;
esac
done
}
function menu_top_level {
while true
do
@ -1020,7 +1058,7 @@ function menu_top_level {
trap "rm -f $data" 0 1 2 5 15
dialog --backtitle $"Freedombone Control Panel" \
--title $"Control Panel" \
--radiolist $"Choose an operation:" 23 70 16 \
--radiolist $"Choose an operation:" 24 70 17 \
1 $"Backup and Restore" off \
2 $"Show SIP Phone Extensions" off \
3 $"Reset Tripwire" off \
@ -1030,13 +1068,14 @@ function menu_top_level {
7 $"Security Settings" off \
8 $"Hubzilla" off \
9 $"Media menu" off \
10 $"Change the name of this system" off \
11 $"Set the TLS date/time source" off \
12 $"Set a static local IP address" off \
13 $"Check for updates" off \
14 $"Power off the system" off \
15 $"Restart the system" off \
16 $"Exit" on 2> $data
10 $"IRC menu" off \
11 $"Change the name of this system" off \
12 $"Set the TLS date/time source" off \
13 $"Set a static local IP address" off \
14 $"Check for updates" off \
15 $"Power off the system" off \
16 $"Restart the system" off \
17 $"Exit" on 2> $data
sel=$?
case $sel in
1) exit 1;;
@ -1052,13 +1091,14 @@ function menu_top_level {
7) security_settings;;
8) menu_hubzilla;;
9) menu_media;;
10) change_system_name;;
11) set_tls_time_source;;
12) set_static_IP;;
13) check_for_updates;;
14) shut_down_system;;
15) restart_system;;
16) break;;
10) menu_irc;;
11) change_system_name;;
12) set_tls_time_source;;
13) set_static_IP;;
14) check_for_updates;;
15) shut_down_system;;
16) restart_system;;
17) break;;
esac
done
}