Make the SSH connection timeout configurable in the SSH tab of the Terminal

Server Config dialog.

src/sbbs3/ctrl/TelnetCfgDlgUnit.cpp

@@ -75,6 +75,7 @@ void __fastcall TTelnetCfgDlg::FormShow(TObject *Sender)
         strListCombine(MainForm->bbs_startup.ssh_interfaces, str, sizeof(str)-1, ",");
         SshInterfaceEdit->Text=AnsiString(str);
     }
+    SshConnTimeoutEdit->Text=AnsiString((int)MainForm->bbs_startup.ssh_connect_timeout);
 
 	TelnetPortEdit->Text=AnsiString((int)MainForm->bbs_startup.telnet_port);
 	RLoginPortEdit->Text=AnsiString((int)MainForm->bbs_startup.rlogin_port);
@@ -124,6 +125,7 @@ void __fastcall TTelnetCfgDlg::OKBtnClick(TObject *Sender)
 
     iniFreeStringList(MainForm->bbs_startup.ssh_interfaces);
     MainForm->bbs_startup.ssh_interfaces = strListSplitCopy(NULL, SshInterfaceEdit->Text.c_str(), ",");
+    MainForm->bbs_startup.ssh_connect_timeout=SshConnTimeoutEdit->Text.ToIntDef(0);
 
     MainForm->bbs_startup.telnet_port=TelnetPortEdit->Text.ToIntDef(23);
     MainForm->bbs_startup.rlogin_port=RLoginPortEdit->Text.ToIntDef(513);

src/sbbs3/ctrl/TelnetCfgDlgUnit.dfm

 object TelnetCfgDlg: TTelnetCfgDlg
-  Left = 377
-  Top = 354
+  Left = 1133
+  Top = 475
   BorderStyle = bsDialog
   Caption = 'Terminal Server Configuration'
   ClientHeight = 234
@@ -17,8 +17,8 @@ object TelnetCfgDlg: TTelnetCfgDlg
     Top = 3
     Width = 278
     Height = 186
-    ActivePage = GeneralTabSheet
-    TabIndex = 0
+    ActivePage = SshTabSheet
+    TabIndex = 3
     TabOrder = 0
     object GeneralTabSheet: TTabSheet
       Caption = 'General'
@@ -44,7 +44,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Width = 74
         Height = 20
         AutoSize = False
-        Caption = 'Max Con-Con'
+        Caption = 'Max Con-Conn'
       end
       object AutoStartCheckBox: TCheckBox
         Left = 148
@@ -331,6 +331,14 @@ object TelnetCfgDlg: TTelnetCfgDlg
         AutoSize = False
         Caption = 'Interfaces (IPs)'
       end
+      object SshConnectTimeoutLabel: TLabel
+        Left = 7
+        Top = 62
+        Width = 78
+        Height = 21
+        AutoSize = False
+        Caption = 'Conn Timeout'
+      end
       object SshPortEdit: TEdit
         Left = 85
         Top = 10
@@ -365,6 +373,16 @@ object TelnetCfgDlg: TTelnetCfgDlg
         ShowHint = True
         TabOrder = 2
       end
+      object SshConnTimeoutEdit: TEdit
+        Left = 85
+        Top = 62
+        Width = 39
+        Height = 21
+        Hint = 'SSH Connection Timeout (in seconds)'
+        ParentShowHint = False
+        ShowHint = True
+        TabOrder = 3
+      end
     end
     object SoundTabSheet: TTabSheet
       Caption = 'Sound'

src/sbbs3/ctrl/TelnetCfgDlgUnit.h

@@ -101,6 +101,8 @@ __published:
     TCheckBox *IdentityCheckBox;
     TLabel *MaxConConLabel;
     TEdit *MaxConConEdit;
+    TLabel *SshConnectTimeoutLabel;
+    TEdit *SshConnTimeoutEdit;
 	void __fastcall FormShow(TObject *Sender);
 	void __fastcall OKBtnClick(TObject *Sender);
 	void __fastcall AnswerSoundButtonClick(TObject *Sender);