Commit f18e5038c1bcbad8bf0d7e1e9bffd73a975b9ee2

Authored by paulo_borges_ccb@hotmail.com
1 parent 008fd2de
Exists in master

Alteração das chamadas de arquivos .php para url's

git-svn-id: http://svn.softwarepublico.gov.br/svn/cacic/cacic/trunk/agente-windows@1259 fecfc0c7-e812-0410-ae72-849f08638ee7
CACIC_Comm.pas
... ... @@ -131,7 +131,7 @@ Begin
131 131 objCacicCOMM.writeDailyLog('Comm: ERRO! Comunicação impossível com o endereço ' + pStrFullURL);
132 132 End;
133 133 end;
134   -
  134 + objCacicCOMM.writeDebugLog(tStringStrResponseCS.DataString); //Adicionada 10/07
135 135 Try
136 136 if (objCacicCOMM.getValueFromTags('Comm_Status', tStringStrResponseCS.DataString, '<>') <> 'OK') Then
137 137 Begin
... ...
installcacic/uInstallCACIC.pas
... ... @@ -329,7 +329,7 @@ begin
329 329 strFieldsAndValuesToRequest := strFieldsAndValuesToRequest + 'id_usuario=' + objCACIC.getValueFromTags('UserName',fetchWMIvalues('Win32_ComputerSystem',objCACIC.getLocalFolderName,'UserName'));
330 330  
331 331 Try
332   - Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'installcacic.php', strFieldsAndValuesToRequest, objCACIC.getLocalFolderName, 'Enviando informação de insucesso ao Gerente WEB');
  332 + Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'instala/cacic', strFieldsAndValuesToRequest, objCACIC.getLocalFolderName, 'Enviando informação de insucesso ao Gerente WEB');
333 333 Except
334 334 on E : Exception do
335 335 objCacic.writeExceptionLog(E.Message,E.ClassName,'ComunicaInsucesso');
... ... @@ -523,13 +523,13 @@ begin
523 523 // Busco as configurações para acesso ao ambiente FTP - Updates
524 524 strFieldsAndValuesToRequest := 'in_instalacao=OK';
525 525  
526   - objCacic.writeDebugLog('installCACIC: Preparando Chamada ao Gerente WEB: "' + objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName +'get_config.php"');
  526 + objCacic.writeDebugLog('installCACIC: Preparando Chamada ao Gerente WEB: "' + objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName +'get/config');
527 527 informaProgresso('Fazendo contato com Gerente WEB.');
528 528  
529   - strCommResponse := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'get_config.php', strFieldsAndValuesToRequest, objCACIC.getLocalFolderName);
  529 + strCommResponse := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'get/config', strFieldsAndValuesToRequest, objCACIC.getLocalFolderName);
530 530 if (strCommResponse <> '0') then
531 531 Begin
532   - { Já realizados na chamada ao get/test
  532 + { Já realizados na chamada ao get_test.php substituido por get/test
533 533 objCacic.setBoolCipher
534 534 objCacic.setMainProgramName
535 535 objCacic.setMainProgramHash
... ...
mapacacic/uAcessoMapa.pas
... ... @@ -82,7 +82,7 @@ begin
82 82 strFieldsAndValuesToRequest := strFieldsAndValuesToRequest + 'te_senha=' + objCacicCOMM.replaceInvalidHTTPChars( objCacic.enCrypt(edSenhaAcesso.Text,false)) + ',';
83 83 strFieldsAndValuesToRequest := strFieldsAndValuesToRequest + 'te_operacao=' + 'Autentication';
84 84  
85   - strCommResponseAcesso := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'mapacacic_acesso.php', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
  85 + strCommResponseAcesso := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'mapacacic/acesso', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
86 86 objCacic.setBoolCipher(not objCacic.isInDebugMode);
87 87  
88 88 if (strCommResponseAcesso <> '0') then
... ... @@ -147,7 +147,7 @@ begin
147 147 strFieldsAndValuesToRequest := 'te_operacao=' + 'CheckVersion' + ',';
148 148 strFieldsAndValuesToRequest := strFieldsAndValuesToRequest + 'MAPACACIC.EXE_HASH=' + objCacic.getFileHash(ParamStr(0));
149 149  
150   - strCommResponseVerVersao := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'mapacacic_acesso.php', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
  150 + strCommResponseVerVersao := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'mapacacic/acesso', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
151 151 objCacic.setBoolCipher(not objCacic.isInDebugMode);
152 152  
153 153 objCacic.writeDebugLog('VerificaVersao: Analisando retorno...');
... ...
mapacacic/uMainMapa.pas
... ... @@ -545,7 +545,7 @@ begin
545 545  
546 546 strFieldsAndValuesToRequest := strFieldsAndValuesToRequest + ',col_patr=' + objCacic.replaceInvalidHTTPChars(objCacic.enCrypt(strColetaAtual));
547 547  
548   - strRetorno := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName +'gercols_set_collects.php', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
  548 + strRetorno := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName +'gercols/set/collects', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
549 549 objCacic.setBoolCipher(not objCacic.isInDebugMode);
550 550  
551 551 if (strRetorno = '0') then
... ... @@ -688,7 +688,7 @@ function TfrmMapaCacic.getConfigs : String;
688 688 Begin
689 689 btCombosUpdate.Enabled := false;
690 690  
691   - Result := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'get_config.php', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
  691 + Result := Comm(objCacic.getWebManagerAddress + objCacic.getWebServicesFolderName + 'get/config', strFieldsAndValuesToRequest,objCacic.getLocalFolderName);
692 692 objCacic.setBoolCipher(not objCacic.isInDebugMode);
693 693  
694 694 objCacic.writeDebugLog('FormActivate: Retorno de getConfigs: "'+Result+'"');
... ...