PDA

Ver la Versión Completa : Generar logfile con varios archivos


jars
01-03-2023, 14:29:16
Hola amigos.
Estoy usando en mis proyectos archivos de log que al llegar a un tamaño parametrizado se renombran y arranca uno nuevo. Es decir genero MiProyecto1.log y al llenarse, lo renombro como MiProyecto2.log y creo uno nuevo MiProyecto1.log.
Lo que estoy necesitando para un proyecto que genera muchísima información y llega al tamaño máximo muy rápido, es poder tener mas historia para poder auditar en caso de necesidad. Quisiera poder generar lo siguiente:
MiProyecto1.log, MiProyecto2.log, MiProyecto3.log, MiProyecto4.log, MiProyecto5.log, MiProyecto6.log, MiProyecto7.log, MiProyecto8.log, MiProyecto9.log, MiProyecto10.log
El problema es que a medida que se van llenando se van renombrando para que siempre el 1 es el actual, el que le sigue sea el 2 y el mas viejo el 10. Hay algo hecho así?
Gracias.

lucho6007
01-03-2023, 15:25:30
Hola!
Lo razonable es que vayas llenando siempre el último archivo, y al llegar a X tamaño, generes un nuevo archivo con el nuevo nombre.
Podés tener una función que haga el log, y en esa función verificas el nombre del archivo y el tamaño.


Suerte!

duilioisola
01-03-2023, 20:37:51
Esta es una opción.
Lo que no se es cuanto tardará cuando haya cientos de ficheros log.
Esta función te renombra los ficheros posteriores al 1.
Luego tendrías que renombrar el 1 como 2 y reiniciar el log con el nuevo fichero 1.


procedure RotarLogs(NombreFichero : string);
var
i : integer;
begin
// Empiezo en el segundo, porque el primero es en el que se está escribiendo
i := 2;

// Busco el ultimo fichero de log
while FileExists(NombreFichero+IntToStr(i)+'.log') do
inc(i);

// Recorro los ficheros log encontrados en forma inversa, renombrandolos con el numero siguiente
while (i > 2) do
begin
dec(i);
// *RenameFile* no se si existe en Delphi
RenameFile(NombreFichero+IntToStr(i)+'.log', NombreFichero+IntToStr(i+1)+'.log');
end;
end;

mamcx
01-03-2023, 21:24:02
El problema es que a medida que se van llenando se van renombrando para que siempre el 1 es el actual, el que le sigue sea el 2 y

Asi tienes un problema de contención (puedes estar escribiendo el archivo mientras lo cambias de nombre) y es errado el algoritmo.

Lo que se hace es que tienes un archivo `x.log`. Cuando se llena, se copia a `x.1.log`, te vas de nuevo al inicio del archivo y sigues escribiendo.

De esta forma, solo `x.log` es accesado para escritura y el SO puede hacer cambios atómicos en los archivos al copiar.