From 4245fe34792cb67b1fe4b073e3b4d71014c3b277 Mon Sep 17 00:00:00 2001
From: Jan Paul Tuecking <earl@ipfire.org>
Date: Sat, 7 Sep 2013 14:47:28 +0200
Subject: [PATCH] tor: added directory port to tor.cgi

---
 html/cgi-bin/tor.cgi | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/html/cgi-bin/tor.cgi b/html/cgi-bin/tor.cgi
index b6526b91c..befd50834 100755
--- a/html/cgi-bin/tor.cgi
+++ b/html/cgi-bin/tor.cgi
@@ -108,6 +108,7 @@ $settings{'TOR_RELAY_ENABLED'} = 'off';
 $settings{'TOR_RELAY_MODE'} = 'exit';
 $settings{'TOR_RELAY_ADDRESS'} = '';
 $settings{'TOR_RELAY_PORT'} = 9001;
+$settings{'TOR_RELAY_DIRPORT'} = 0;
 $settings{'TOR_RELAY_NICKNAME'} = '';
 $settings{'TOR_RELAY_CONTACT_INFO'} = '';
 $settings{'TOR_RELAY_BANDWIDTH_RATE'} = 0;
@@ -143,6 +144,11 @@ if ($settings{'ACTION'} eq $Lang::tr{'save'}) {
 	if (!&General::validport($settings{'TOR_RELAY_PORT'})) {
 		$errormessage = "$Lang::tr{'tor errmsg invalid relay port'}: $settings{'TOR_RELAY_PORT'}";
 	}
+	if ($settings{'TOR_RELAY_DIRPORT'} ne '0') {
+		if (!&General::validport($settings{'TOR_RELAY_DIRPORT'})) {
+			$errormessage = "$Lang::tr{'tor errmsg invalid directory port'}: $settings{'TOR_RELAY_DIRPORT'}";
+		}
+	}
 
 	if ($settings{'TOR_RELAY_ADDRESS'} ne '') {
 		if ((!&General::validfqdn($settings{'TOR_RELAY_ADDRESS'})) && (!&General::validip($settings{'TOR_RELAY_ADDRESS'}))) {
@@ -395,6 +401,14 @@ END
 					<input type='text' name='TOR_RELAY_PORT' value='$settings{'TOR_RELAY_PORT'}' size='5' />
 				</td>
 			</tr>
+			<tr>
+				<td width='25%'>&nbsp;</td>
+				<td width='30%'>&nbsp;</td>
+				<td width='25%' class='base'>$Lang::tr{'tor directory port'}:</td>
+				<td width='20%'>
+					<input type='text' name='TOR_RELAY_DIRPORT' value='$settings{'TOR_RELAY_DIRPORT'}' size='5' />&nbsp;$Lang::tr{'tor 0 = disabled'}
+				</td>
+			</tr>
 			<tr>
 				<td width='25%' class='base'>$Lang::tr{'tor contact info'}:&nbsp;<img src='/blob.gif' alt='*' /></td>
 				<td width='75%' colspan='3'>
@@ -683,6 +697,10 @@ sub BuildConfiguration() {
 
 		print FILE "ORPort $settings{'TOR_RELAY_PORT'}\n";
 
+		if ($settings{'TOR_RELAY_DIRPORT'} ne '0') {
+			print FILE "DirPort $settings{'TOR_RELAY_DIRPORT'}\n";
+		}
+
 		if ($settings{'TOR_RELAY_ADDRESS'} ne '') {
 			print FILE "Address $settings{'TOR_RELAY_ADDRESS'}\n";
 		}
-- 
2.39.2