¿Está activo FB?

[Angel.Matilla]

Dicho de otra forma: Me da la impresión que si bsucamos un servicio, con ese código no se encuentra si está ejecutándose o no.

[Casimiro Notevi]

Depende de la versión, tendrás que verificar un servicio u otro:

Superserver -> fbserver
Classicserver -> fb_inet_server
Superclassic -> fb_smp_server

[ecfisa]

Hola.

Fijate si te sirve esta opción,

checkFirebird.h:

Código PHP:

#ifndef checkFirebirdH
#define checkFirebirdH

bool isFirebirdRunning( void );

#endif 


checkFirebird.cpp:

Código PHP:

#pragma hdrstop

#include "checkFirebird.h"
#include "WinSvc.hpp"

#pragma package( smart_init )

DWORD ServiceStatus( const char* &sMachine, const char* &sService )
{
  SC_HANDLE schm, schs;
  TServiceStatus ss;
  DWORD dwStat = 0;

  schm = OpenSCManager( sMachine, NULL, SC_MANAGER_CONNECT );

  if ( schm > 0 ) {
    schs = OpenService( schm, sService, SERVICE_QUERY_STATUS );

    if ( schs > 0 ) {
      if ( QueryServiceStatus ( schs, &ss ) )
        dwStat = ss.dwCurrentState;
      CloseServiceHandle( schs );
    }

    CloseServiceHandle ( schm );
  }
  return dwStat;
}

bool isFirebirdRunning( void )
{
  return ServiceStatus( "", "FirebirdServerDefaultInstance" ) == SERVICE_RUNNING;
} 


Ejemplos de uso:

Código PHP:

...

#include "checkFirebird.h"

...

void __fastcall TForm1::ButtonCheckClick( TObject *Sender )
{
  ShowMessage( (isFirebirdRunning() ? "Servicio de Firebird activo" : "Servicio de Firebird inactivo") );
  ...
  if ( isFirebirdRunning() )
  ... 


Saludos

[Angel.Matilla]

Gracias a los dos. En cuanto pueda lo probaré y os diré como ha ido.

[Angel.Matilla]

ecfisa: Gracias. Funciona a la perfección.

[Angel.Matilla]

Estuve haciendo pruebas que como os he dicho funcionan a la perfección. Sin embargo he pensado que tal vez sea más efectivo preguntar por el servicio Firebird Guardian

Código PHP:

bool isFirebirdRunning( void )
{
  return ServiceStatus( "", "FirebirdGuardianDefaultInstance" ) == SERVICE_RUNNING;
} 


ya que si se lanza este, automátciamente se arranca el servidor. No sé que os parece.

[ecfisa]

Hola.

No veo buena idea preguntar solamente por Firebird Guardian, de echo se usa cuando Firebird es ejecutado como aplicación no como servicio y era esencial en Windows 9x/MS por ejemplo.
Pero con seguridad en los S.O. mas actuales la mayoría opte por no ejecutarlo, lo que no lo haría un indicador fiable de que Firebird esté activo o no.

( What is the Firebird Guardian ? )

Saludos