Novo comando para obter informação do Servidor Web

Esta característica é outra forma de lhe proporcionar a capacidade de criar o seu próprio diálogo de administração de servidores. Seguindo a capacidade de recuperar informações para todos os processos (adicionado em 4D v16 R4), we are now oferecendo-lhe um novo comando que devolve, como um todo, todas as informações de tempo de execução sobre o servidor Web 4D.

Com 4D v16 R5, a recuperação de informação do servidor Web nunca foi tão fácil, graças a um único comando: WEB Get server info.

O … WEB Get server info tem um parâmetro de entrada opcional:

result:= WEB Get server info ( { withCacheInfo } )

Este parâmetro permite-lhe definir se pretende obter informações sobre a cache do servidor web no atributo da cache, caso contrário, este atributo será indefinido.

Nota: a informação da cache é muito detalhada, pelo que poderá ser bastante grande. É por isso que a definição por defeito do parâmetro withCacheInfo é ‘falsa’.

Exemplo de código

Se eu executar o seguinte código num cliente 4D num método com o conjunto de propriedades Executar no servidor:

C_OBJECT($obj)
$obj :=WEB Get server info

O objecto $obj devolvido pelo comando conterá a informação como se mostra abaixo. Neste exemplo, o servidor web está a funcionar há 40 segundos na porta 80, o servidor SOAP é iniciado, o TLS está activado e a sua versão mínima é 1.2,…

{
   "started": true,
   "uptime": 40,
   "SOAPServerStarted": true,
   "startMode": "manual",
   "httpRequestCount": 0,
   "options": {
      "webCharacterSet": "UTF-8",
      "webHTTPCompressionLevel": 1,
      "webHTTPCompressionThreshold": 1024,
      "webHTTPSPortID": 443,
      "webIPAddressToListen": ["192.168.xxx.xxx"],
      "webInactiveProcessTimeout": 28800,
      "webInactiveSessionTimeout": 28800,
      "webMaxConcurrentProcesses": 100,
      "webPortID": 80
   },
   "security": {
      "TLSEnabled": true,
      "cipherSuite": "ECDHE-RSA-AES128-GCM-SHA256:...:CAMELLIA128-SHA",
      "openSSLVersion": "OpenSSL 1.0.2h 3 May 2016",
      "minTLSVersion": "1.2" 
   }
}