Adding retry option in the connection failed dialog.

Perry Werneck
1 parent 07e33432
Showing 3 changed files with 103 additions and 94 deletions Show diff stats
locale/pt_BR.po
src/core/connect.c
src/core/host.c
@@ -5,8 +5,8 @@ msgid &quot;&quot;
 msgstr ""
 "Project-Id-Version: pw3270 5.0\n"
 "Report-Msgid-Bugs-To: \n"
-"POT-Creation-Date: 2020-07-16 15:52-0300\n"
-"PO-Revision-Date: 2020-07-16 15:57-0300\n"
+"POT-Creation-Date: 2020-07-23 11:07-0300\n"
+"PO-Revision-Date: 2020-07-23 11:09-0300\n"
 "Last-Translator: Perry Werneck <perry.werneck@gmail.com>\n"
 "Language-Team: Português <>\n"
 "Language: pt_BR\n"
@@ -31,16 +31,20 @@ msgid &quot;%dx%d screen size is bigger than the maximum size&quot;
 msgstr "Tela %dx%d é maior que o tamanho máximo"
 #: src/core/iocalls.c:554 src/core/iocalls.c:571 src/core/linux/connect.c:80
-#: src/core/linux/connect.c:96
 #, c-format
 msgid "%s"
 msgstr "%s"
-#: src/ssl/notify.c:117
+#: src/ssl/notify.c:71
 #, c-format
 msgid "%s (SSL error %d)"
 msgstr "%s (erro SSL %d)"
+#: src/core/linux/connect.c:86 src/ssl/notify.c:81
+#, c-format
+msgid "%s (rc=%d)"
+msgstr "%s (rc=%d)"
+
 #: src/core/keyboard/kybd.c:1923
 #, c-format
 msgid "%s: Bell not supported"
@@ -71,15 +75,6 @@ msgstr &quot;%s: Caractere desconhecido depois de \\pf&quot;
 msgid "%s: Vertical tab not supported"
 msgstr "%s: Tabulação vertical não é suportada"
-#: src/core/screen.c:775 src/core/screen.c:812 src/core/screen.c:830
-#: src/core/screen.c:975
-msgid "3270 Error"
-msgstr "Erro 3270"
-
-#: src/core/screen.c:793
-msgid "3270 Warning"
-msgstr "Alerta 3270"
-
 #: src/core/actions/table.c:693
 msgid "3270-style backspace"
 msgstr "Backspace no estilo 3270"
@@ -207,7 +202,7 @@ msgstr &quot;Negrito&quot;
 msgid "Break"
 msgstr "Break"
-#: src/core/telnet.c:1647
+#: src/core/telnet.c:1652
 msgid "Broken pipe"
 msgstr "Conexão interrompida"
@@ -231,7 +226,7 @@ msgstr &quot;Arquivo CMS não encontrado, transferência cancelada&quot;
 msgid "CRL signature failure"
 msgstr "Erro na assinatura CRL"
-#: src/core/toggles/init.c:89 src/core/linux/connect.c:229
+#: src/core/toggles/init.c:89 src/core/linux/connect.c:209
 #, c-format
 msgid "Can't %s network keep-alive"
 msgstr "Não foi possível %s opção \"keep-alive\""
@@ -240,25 +235,20 @@ msgstr &quot;Não foi possível %s opção \&quot;keep-alive\&quot;&quot;
 msgid "Can't bind to LDAP server"
 msgstr "Não foi possível conectar ao servidor LDAP"
-#: src/core/linux/connect.c:88
-#, c-format
-msgid "Can't connect to %s"
-msgstr "Não foi possível conectar a %s"
-
-#: src/core/linux/connect.c:180
+#: src/core/connect.c:79
 #, c-format
 msgid "Can't connect to %s:%s"
 msgstr "Não foi possível conectar a %s:%s"
-#: src/ssl/linux/getcrl.c:85
+#: src/ssl/linux/getcrl.c:97
 msgid "Can't decode CRL"
 msgstr "Não foi possível decodificar arquivo CRL"
-#: src/ssl/linux/url.c:116 src/ssl/linux/ldap.c:229
+#: src/ssl/linux/url.c:131 src/ssl/linux/ldap.c:229
 msgid "Can't decode certificate revocation list"
 msgstr "Não foi possível decodificar a lista de certificados revogados"
-#: src/ssl/linux/url.c:99
+#: src/ssl/linux/url.c:109
 msgid "Can't decode certificate revocation list got from LDAP server"
 msgstr ""
 "Não foi possível decodificar a lista de certificados revogados fornecida "
@@ -284,7 +274,7 @@ msgstr &quot;Erro ao inicializar operação CURL&quot;
 msgid "Can't load"
 msgstr "Não foi possível carregar"
-#: src/ssl/linux/getcrl.c:56 src/ssl/linux/getcrl.c:73
+#: src/ssl/linux/getcrl.c:57 src/ssl/linux/getcrl.c:79
 msgid "Can't open CRL File"
 msgstr "Não foi possível abrir arquivo CRL"
@@ -316,7 +306,11 @@ msgstr &quot;Não foi possível setar o socket para o modo não blocante.&quot;
 msgid "Can't start file transfer."
 msgstr "Não foi possível iniciar transferência de arquivo."
-#: src/ssl/negotiate.c:370 src/ssl/crl.c:165
+#: src/ssl/crl.c:167
+msgid "Can't verify"
+msgstr "Não foi possível verificar"
+
+#: src/ssl/negotiate.c:379
 msgid "Can't verify."
 msgstr "Não foi possível verificar"
@@ -324,7 +318,7 @@ msgstr &quot;Não foi possível verificar&quot;
 msgid "Cancelled by user"
 msgstr "Cancelado pelo usuário"
-#: src/core/telnet.c:1068
+#: src/core/telnet.c:1073
 msgid "Cannot connect to specified LU"
 msgstr "Não foi possível conectar na LU pedida"
@@ -334,11 +328,11 @@ msgstr &quot;&quot;
 "Não foi possível criar uma nova estrutura de controle SSL para a conexão "
 "atual."
-#: src/ssl/linux/init.c:90
+#: src/ssl/linux/init.c:91
 msgid "Cant initialize the SSL context."
 msgstr "Erro ao inicializar contexto de segurança"
-#: src/ssl/negotiate.c:243
+#: src/ssl/negotiate.c:247
 msgid ""
 "Cant set the file descriptor for the input/output facility for the TLS/SSL "
 "(encrypted) side of ssl."
@@ -394,16 +388,16 @@ msgstr &quot;Comando incompleto, transferência cancelada&quot;
 msgid "Connect on startup"
 msgstr "Conectar ao iniciar"
-#: src/core/iocalls.c:538 src/core/linux/connect.c:184
-#: src/core/linux/connect.c:215 src/core/linux/connect.c:233
+#: src/core/iocalls.c:538 src/core/linux/connect.c:195
+#: src/core/linux/connect.c:213
 msgid "Connection error"
 msgstr "Erro de conexão"
-#: src/core/linux/connect.c:94
+#: src/core/connect.c:86
 msgid "Connection failed"
 msgstr "Conexão falhou"
-#: src/core/telnet.c:1651
+#: src/core/telnet.c:1656
 msgid "Connection reset by peer"
 msgstr "Conexão foi cancelada pelo servidor"
@@ -411,6 +405,10 @@ msgstr &quot;Conexão foi cancelada pelo servidor&quot;
 msgid "Connection state"
 msgstr "Estado da conexão"
+#: src/ssl/notify.c:99
+msgid "Continue"
+msgstr "Continuar"
+
 #: src/core/toggles/table.c:163 src/core/toggles/table.c:164
 msgid "Cross hair cursor"
 msgstr "Cursor mira"
@@ -485,7 +483,7 @@ msgstr &quot;Apaga palavra&quot;
 msgid "Description of the current security state"
 msgstr "Descrição do estado de segurança atual"
-#: src/core/telnet.c:1322
+#: src/core/telnet.c:1327
 msgid "Device type rejected"
 msgstr "Tipo de dispositivo rejeitado"
@@ -513,7 +511,7 @@ msgstr &quot;Descer&quot;
 msgid "Dup"
 msgstr "Dup"
-#: src/core/telnet.c:862
+#: src/core/telnet.c:865
 msgid "EOR received when not in 3270 mode, ignored."
 msgstr "EOR recebido fora do modo 3270, ignorado."
@@ -565,7 +563,7 @@ msgstr &quot;Apagar todos os campos desprotegidos&quot;
 msgid "Erase input"
 msgstr "Apagar campos"
-#: src/core/util.c:399
+#: src/core/util.c:409
 msgid "Error"
 msgstr "Erro"
@@ -579,7 +577,7 @@ msgstr &quot;Erro \&quot;%s\&quot; lendo arquivo local (rc=%d)&quot;
 msgid "Error \"%s\" writing to local file (rc=%d)"
 msgstr "Erro \"%s\" gravando arquivo local (rc=%d)"
-#: src/ssl/linux/url.c:66
+#: src/ssl/linux/url.c:69
 msgid "Error getting certificate revocation list"
 msgstr "Erro ao obter a lista de certificados revogados"
@@ -651,7 +649,7 @@ msgstr &quot;Tela formatada&quot;
 msgid "Full Screen"
 msgstr "Tela cheia"
-#: src/ssl/linux/url.c:81
+#: src/ssl/linux/url.c:87
 msgid "Got a bad formatted certificate revocation list from LDAP server"
 msgstr ""
 "Obtive lista de certificados revogados com formato inválido do servidor LDAP"
@@ -668,7 +666,7 @@ msgstr &quot;Página de código do host&quot;
 msgid "Host disconnected, transfer cancelled"
 msgstr "Servidor desconectou, transferência cancelada"
-#: src/core/telnet.c:1380
+#: src/core/telnet.c:1385
 msgid "Host illegally added function(s)"
 msgstr "Host illegally added function(s)"
@@ -676,11 +674,11 @@ msgstr &quot;Host illegally added function(s)&quot;
 msgid "Host program error code xxxxxxxxxx: file transfer canceled"
 msgstr "Erro código xxxxxxxxxx no aplicativo do host: Transferência cancelada"
-#: src/core/telnet.c:1305
+#: src/core/telnet.c:1310
 msgid "Host rejected device type or request type"
 msgstr "Servidor rejeitou o tipo de dispositivo ou requisição"
-#: src/core/telnet.c:1318
+#: src/core/telnet.c:1323
 msgid "Host rejected resource(s)"
 msgstr "Servidor rejeitou recurso(s)"
@@ -800,6 +798,11 @@ msgstr &quot;Código de requisição incorreto, transferência cancelada&quot;
 msgid "Insert"
 msgstr "Inserção"
+#: src/core/util.c:59 src/core/util.c:69 src/core/util.c:81 src/core/util.c:322
+#: src/core/util.c:338 src/core/util.c:350 src/core/util.c:365
+msgid "Internal error"
+msgstr "Erro interno"
+
 #: src/ssl/state.c:276
 msgid "Invalid CA certificate"
 msgstr "Certificado CA inválido"
@@ -1190,7 +1193,7 @@ msgstr &quot;&quot;
 "SPACE can be specified in units of TRACKS, CYLINDERS, or AVBLOCK, and only "
 "one option can be used."
-#: src/ssl/negotiate.c:276
+#: src/ssl/negotiate.c:282
 msgid "SSL Connect failed"
 msgstr "Conexão SSL falhou"
@@ -1202,11 +1205,15 @@ msgstr &quot;Erro SSL&quot;
 msgid "SSL Read error"
 msgstr "Erro de leitura SSL"
-#: src/ssl/negotiate.c:242
+#: src/ssl/negotiate.c:246
 msgid "SSL negotiation failed"
 msgstr "Negociação SSL falhou"
-#: src/core/telnet.c:1637
+#: src/ssl/negotiate.c:476
+msgid "SSL negotiation has failed"
+msgstr "Negociação de segurança falhou"
+
+#: src/core/telnet.c:1642
 #, c-format
 msgid ""
 "SSL_write:\n"
@@ -1235,22 +1242,17 @@ msgstr &quot;Pesquisa não produziu nenhum valor&quot;
 msgid "Secure connection was successful."
 msgstr "Conexão segura efetuada com sucesso."
-#: src/ssl/negotiate.c:107 src/ssl/negotiate.c:241 src/ssl/negotiate.c:275
-#: src/ssl/negotiate.c:369 src/ssl/negotiate.c:391 src/ssl/negotiate.c:412
-#: src/ssl/crl.c:164 src/ssl/linux/url.c:65 src/ssl/linux/url.c:80
-#: src/ssl/linux/url.c:98 src/ssl/linux/url.c:115 src/ssl/linux/ldap.c:100
-#: src/ssl/linux/ldap.c:113 src/ssl/linux/ldap.c:134 src/ssl/linux/ldap.c:145
-#: src/ssl/linux/ldap.c:156 src/ssl/linux/ldap.c:181 src/ssl/linux/ldap.c:192
-#: src/ssl/linux/ldap.c:204 src/ssl/linux/ldap.c:228 src/ssl/linux/init.c:89
-#: src/ssl/linux/getcrl.c:55 src/ssl/linux/getcrl.c:72
-#: src/ssl/linux/getcrl.c:84 src/ssl/linux/getcrl.c:112
+#: src/ssl/notify.c:97
+msgid "Security alert"
+msgstr "Alerta de segurança"
+
+#: src/ssl/linux/ldap.c:100 src/ssl/linux/ldap.c:113 src/ssl/linux/ldap.c:134
+#: src/ssl/linux/ldap.c:145 src/ssl/linux/ldap.c:156 src/ssl/linux/ldap.c:181
+#: src/ssl/linux/ldap.c:192 src/ssl/linux/ldap.c:204 src/ssl/linux/ldap.c:228
+#: src/ssl/linux/getcrl.c:125
 msgid "Security error"
 msgstr "Erro de segurança"
-#: src/ssl/negotiate.c:416
-msgid "Security warning"
-msgstr "Alerta de segurança"
-
 #: src/core/actions/table.c:343
 msgid "Select Down"
 msgstr "Seleciona para baixo"
@@ -1359,7 +1361,7 @@ msgstr &quot;Erro no socket&quot;
 msgid "Socket read error"
 msgstr "Erro ao ler dados da rede"
-#: src/core/telnet.c:1658
+#: src/core/telnet.c:1663
 msgid "Socket write error"
 msgstr "Erro ao enviar dados para a rede"
@@ -1387,7 +1389,7 @@ msgstr &quot;Sys Req&quot;
 msgid "Sys Request"
 msgstr "Sys Request"
-#: src/core/telnet.c:1141
+#: src/core/telnet.c:1146
 msgid "TLS negotiation failure"
 msgstr "Negociação TLS falhou"
@@ -1458,7 +1460,7 @@ msgstr &quot;&quot;
 "A lista de revogação de certificados (CRL) de um certificado não pôde ser "
 "encontrada."
-#: src/ssl/negotiate.c:392
+#: src/ssl/negotiate.c:406
 msgid "The SSL certificate for this host is not trusted."
 msgstr "O certificado SSL deste servidor não é confiável"
@@ -1466,11 +1468,11 @@ msgstr &quot;O certificado SSL deste servidor não é confiável&quot;
 msgid "The URL argument should be in the format ldap://[HOST]/[DN]?attribute"
 msgstr "A URL deve ser no formato ldap://[HOST]/[DN]?attribute"
-#: src/ssl/linux/getcrl.c:57
+#: src/ssl/linux/getcrl.c:58
 msgid "The URL for the CRL is undefined or empty"
 msgstr "A URL para o CRL não está definida ou vazia"
-#: src/ssl/linux/getcrl.c:118
+#: src/ssl/linux/getcrl.c:131
 msgid "The URL scheme is unknown"
 msgstr "O tipo de URL é desconhecido"
@@ -1600,7 +1602,7 @@ msgstr &quot;A transferência de arquivos terminou com sucesso.&quot;
 msgid "The height %d is less than model %d rows (%d)"
 msgstr "A altura %d é menor que o número de linhas do modelo %d (%d)"
-#: src/ssl/crl.c:166
+#: src/ssl/crl.c:168
 msgid "The host certificate doesn't have CRL distribution points"
 msgstr ""
 "O certificado apresentado pelo servidor não tem pontos de distribuição de CRL"
@@ -1680,7 +1682,7 @@ msgstr &quot;&quot;
 "O Certificado raiz não está marcado como confiável para os fins "
 "especificados."
-#: src/ssl/negotiate.c:393
+#: src/ssl/negotiate.c:407
 msgid ""
 "The security certificate presented by this host was not issued by a trusted "
 "certificate authority."
@@ -1780,6 +1782,10 @@ msgstr &quot;Transferência falhou&quot;
 msgid "Transmission error"
 msgstr "Erro de transmissão"
+#: src/core/connect.c:90
+msgid "Try again"
+msgstr "Tentar novamente"
+
 #: src/core/properties/string.c:144
 msgid "URL for the certificate revocation list"
 msgstr "URL para a lista de certificados revogados"
@@ -1853,11 +1859,15 @@ msgstr &quot;Sublinhados&quot;
 msgid "Unexpected error"
 msgstr "Erro inesperado"
-#: src/ssl/linux/getcrl.c:115
+#: src/ssl/negotiate.c:518
+msgid "Unexpected error on SSL initialization"
+msgstr "Erro inesperado na inicialização do sistema de segurança"
+
+#: src/ssl/linux/getcrl.c:128
 msgid "Unexpected or invalid CRL URL"
 msgstr "URL do CRL é inesperada ou inválida"
-#: src/ssl/negotiate.c:371
+#: src/ssl/negotiate.c:380
 msgid "Unexpected or invalid TLS/SSL verify result"
 msgstr "O resultado da verificação TLS/SSL foi inesperado"
@@ -1870,7 +1880,7 @@ msgstr &quot;Estado de segurança inesperado ou desconhecido.&quot;
 msgid "Unexpected type %d in typeahead queue"
 msgstr "Tipo inesperado %d na fila de teclado"
-#: src/core/ctlr.c:675
+#: src/core/ctlr.c:676
 #, c-format
 msgid "Unknown 3270 Data Stream command: 0x%X"
 msgstr "Unknown 3270 Data Stream command: 0x%X"
@@ -1929,7 +1939,11 @@ msgstr &quot;Aguardando resposta do pedido de download&quot;
 msgid "Waiting for PUT response"
 msgstr "Aguardando resposta do pedido de upload"
-#: src/ssl/notify.c:108
+#: src/core/telnet.c:864
+msgid "Warning"
+msgstr "Alerta"
+
+#: src/ssl/notify.c:77
 #, c-format
 msgid "Windows error was \"%s\" (%u)"
 msgstr "Erro windows foi \"%s\" (%u)"
@@ -2021,11 +2035,11 @@ msgstr &quot;_Desconectar&quot;
 msgid "_Reconnect"
 msgstr "_Reconectar"
-#: src/core/toggles/init.c:89 src/core/linux/connect.c:229
+#: src/core/toggles/init.c:89 src/core/linux/connect.c:209
 msgid "disable"
 msgstr "desabilitar"
-#: src/core/toggles/init.c:89 src/core/linux/connect.c:229
+#: src/core/toggles/init.c:89 src/core/linux/connect.c:209
 msgid "enable"
 msgstr "habilitar"
@@ -2049,16 +2063,13 @@ msgstr &quot;Versão da lib3270&quot;
 msgid "numeric lock"
 msgstr "numeric lock"
-#: src/core/linux/connect.c:216
+#: src/core/linux/connect.c:196
 msgid "setsockopt(SO_OOBINLINE) has failed"
 msgstr "setsockopt(SO_OOBINLINE) has failed"
 #~ msgid " and <b>%s</b> for %s."
 #~ msgstr " e <b>%s</b> para %s."
-#~ msgid "%s (rc=%d)"
-#~ msgstr "%s (rc=%d)"
-
 #~ msgid "%s - Disconnected"
 #~ msgstr "%s - Desconectado"
@@ -2092,9 +2103,15 @@ msgstr &quot;setsockopt(SO_OOBINLINE) has failed&quot;
 #~ msgid "16 colors"
 #~ msgstr "16 cores"
+#~ msgid "3270 Error"
+#~ msgstr "Erro 3270"
+
 #~ msgid "3270 File transfer"
 #~ msgstr "Transferência de arquivos 3270"
+#~ msgid "3270 Warning"
+#~ msgstr "Alerta 3270"
+
 #~ msgid "3270 screen"
 #~ msgstr "Tela 3270"
@@ -2293,6 +2310,9 @@ msgstr &quot;setsockopt(SO_OOBINLINE) has failed&quot;
 #~ msgid "Can't add activity"
 #~ msgstr "Não é possível adicionar atividade"
+#~ msgid "Can't connect to %s"
+#~ msgstr "Não foi possível conectar a %s"
+
 #~ msgid "Can't connect to HTTP server."
 #~ msgstr "Não foi possível conectar ao servidor HTTP"
@@ -2521,9 +2541,6 @@ msgstr &quot;setsockopt(SO_OOBINLINE) has failed&quot;
 #~ msgid "Configure host"
 #~ msgstr "Configurar host"
-#~ msgid "Continue"
-#~ msgstr "Continuar"
-
 #~ msgid "Copiar tudo"
 #~ msgstr "Copiar tudo"
@@ -2835,9 +2852,6 @@ msgstr &quot;setsockopt(SO_OOBINLINE) has failed&quot;
 #~ msgid "Intensified/Unprotected"
 #~ msgstr "Intensificado/Desprotegido"
-#~ msgid "Interface"
-#~ msgstr "Interface"
-
 #~ msgid "Invalid CGCSGID '%s', ignoring"
 #~ msgstr "Invalid CGCSGID '%s', ignoring"
@@ -2969,9 +2983,6 @@ msgstr &quot;setsockopt(SO_OOBINLINE) has failed&quot;
 #~ msgid "Not the same terminal type"
 #~ msgstr "O tipo de terminal é diferente"
-#~ msgid "OIA Warning"
-#~ msgstr "Alerta na OIA"
-
 #~ msgid "OIA background"
 #~ msgstr "Fundo da OIA"
@@ -3456,6 +3467,9 @@ msgstr &quot;setsockopt(SO_OOBINLINE) has failed&quot;
 #~ msgid "Secondary space"
 #~ msgstr "Secondary space"
+#~ msgid "Security warning"
+#~ msgstr "Alerta de segurança"
+
 #~ msgid "Select destination file"
 #~ msgstr "Selecionar arquivo destino"
@@ -86,13 +86,15 @@
 		.title = _( "Connection failed" ),
 		.type = LIB3270_NOTIFY_INFO,
 		.summary = summary,
-		.body = message
+		.body = message,
+		.label = _("Try again")
 	};
-	if(hSession->cbk.popup_show(hSession,&popup,lib3270_get_toggle(hSession,LIB3270_TOGGLE_RECONNECT) && !hSession->auto_reconnect_inprogress) == 0) {
+//	if(hSession->cbk.popup_show(hSession,&popup,lib3270_get_toggle(hSession,LIB3270_TOGGLE_RECONNECT) && !hSession->auto_reconnect_inprogress) == 0) {
+	if(hSession->cbk.popup_show(hSession,&popup,!hSession->auto_reconnect_inprogress) == 0) {
 		// Schedule an automatic reconnection.
 		hSession->auto_reconnect_inprogress = 1;
-		(void) AddTimer(RECONNECT_ERR_MS, hSession, lib3270_check_for_auto_reconnect);
+		(void) AddTimer(1000, hSession, lib3270_check_for_auto_reconnect);
 	}
  }
@@ -66,20 +66,13 @@
  */
 int lib3270_check_for_auto_reconnect(H3270 *hSession)
 {
-	/*
-	if(hSession->popups)
-	{
-		lib3270_write_log(hSession,"3270","Delaying auto-reconnect. There's %u pending popup(s)",(unsigned int) hSession->popups);
-		return 1;
-	}
-	*/
 	if(hSession->auto_reconnect_inprogress)
 	{
 		lib3270_write_log(hSession,"3270","Starting auto-reconnect on %s",lib3270_get_url(hSession));
+		hSession->auto_reconnect_inprogress = 0; // Reset "in-progress" to allow reconnection.
 		if(lib3270_reconnect(hSession,0))
 			lib3270_write_log(hSession,"3270","Auto-reconnect fails: %s",strerror(errno));
-		hSession->auto_reconnect_inprogress = 0; // Reset "in-progress" to allow reconnection.
 	}
 	return 0;