Ver Mensaje Individual
  #1  
Antiguo 26-03-2021
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Reputación: 19
Angel.Matilla Va por buen camino
Evitar que un usuario se conecte dos veces

En un BB.DD. con FB 2.5.6 quiero implementar un sistema para qu el mismo usuario no pueda conectarse desde dos puestos diferentes de forma simultánea. He estado dando vueltas por ahí y en el blog Firebird SQL encontré este código que usa una tabla y dos triggers:
Código SQL [-]
CREATE TABLE CONEXION (
  CON_IDENTI INTEGER NOT NULL,
  CON_IDECON INTEGER NOT NULL,
  CON_NOMBRE VARCHAR(15) CHARACTER SET ISO8859_1 NOT NULL COLLATE ES_ES_CI_AI,
  CON_TIMEST TIMESTAMP);

ALTER TABLE CONEXION ADD CONSTRAINT PK_CONEXION PRIMARY KEY (CON_IDENTI);

ALTER TABLE CONEXION ADD CONSTRAINT UQ_CONEXION UNIQUE (CON_NOMBRE);
Al conectarse a la BB.DD.:
Código SQL [-]
CREATE TRIGGER CONECTADO
ACTIVE ON 
  CONNECT
POSITION 2
AS
BEGIN

   -- Primero, se borran las filas de los usuarios que no estan conectados
   -- pero aparecen como conectados
    DELETE FROM Conexion
     WHERE CON_IDECON NOT IN (SELECT MON$ATTACHMENT_ID FROM MON$ATTACHMENTS);

   -- Segundo, se trata de insertar una fila a la tabla CONEXION.
   -- Como la tabla CONEXION tiene una restriccion UNIQUE KEY, un usuario
   -- no se podra conectar mas de una vez al mismo tiempo
    INSERT INTO Conexion (CON_IDENTI, CON_IDECON, CON_NOMBRE, CON_TIMEST)
                  VALUES (0, CURRENT_CONNECTION, CURRENT_USER, CURRENT_TIMESTAMP);
END
Al desconectarse
Código SQL [-]
CREATE TRIGGER DESCONECTADO
ACTIVE ON 
  DISCONNECT
POSITION 1
AS
BEGIN
   DELETE FROM Conexion WHERE Con_Nombre = CURRENT_USER;
END
Si entro una primera vez con un usuario, al tabla CONEXION queda así:


Si ahora accedo con un segundo usuario, sin cerrar la sesión anterior, la tabla queda así:


Sin embargo, si sin cerrar ninguna de las dos sesiones hago un SELECT sobre la tabla MON$ATTACHMENTS se muestra esto:

Como se puede ver ambos usaurios están activos pero en la tabla CONEXION sólo se muestra el que ha entrado último. ¿Alguien me puede explicar la razón? No acabo de entender que puede estar pasando.
Responder Con Cita