Foro - Perl en Español

Añado cosas

1 - partimage es un programa que dada una determinada partición te hace una copia de la partición en forma de archivo (enorme normalmente), por tanto hablamos de crear un backup de una partición, en bruto y por entero y llevarla a un archivo. Funciona bastante bien.

Estoy seguro de que Perl sabe hacer eso, aunque no sé cómo (¿dump?), y como la idea es en caso de desastre recuperar ese archivo binario y comprimido (que sería ilegible sin partimage) yo no metería programas externos y recomendaría hacerlo desde terminal a pelo. Lo digo porque si Perl modifica mínimamente el archivo por el camino (no tiene por qué ocurrir, pero... y si...) pensaremos que estamos cubiertos y en caso de emergencia nos podemos llevar una sorpresa.

2 - además lo de la rotación no tiene sentido si estudiamos un poco las opciones que estamos mandando.

-od significa que no se crea una imagen nueva sino que se sobreescribe la vieja sin pedir un nuevo nombre, si no hay nuevos archivos no tiene sentido rotarlos.


y 3 -... Ese sistema no funcionará mucho tiempo, por un fallo de diseño.

De entrada en sistemas correctamente administrados la partición raíz es muy pequeña en realidad, /img no cabe, y si te cabe es que no has particionado, y eso es un fallo de seguridad.

Pero es que además es que aunque si cupiese el comando puede tener un problema mayor.

Me explico:

Partición digamos, de 50 gigas, con 5G usados.
Se usa partimage

Si copias una partición cualquiera que NO sea la raíz puede funcionar.

Pero si no tienes la raíz aparte del resto, copias la raíz... y tu partición raíz ahora pesa 8 G, 5 de la partición y 3 G de la imagen (comprimida).
Se actualiza partimage.
Tu partición raíz ahora pesa, digamos, 15 G.
Y en la siguiente vuelta, digamos, 20 o 25G (15 + 15 - la tasa de compresión)... etc.

En pocas vueltas tu partición raíz se verá superada y 5 gigas iniciales de información se han convertido en una masa intratable de basura repetida.

Y el programa acaba fallando, claro...

Si tu idea es copiar la raíz el archivo no puede llamarse /img DEBE de ser una partición aparte montada en un directorio propio.


Seguramente sería interesante incorporar alternativas al debate.

Hola, amigo. Buena tu observación ¿Dónde lo copiarías vos? En este caso tenemos un HD de 160 con particiones; la E y F están vacías. Mira:

pvaldes escribiste:1 - partimage es un programa que dada una determinada partición te hace una copia de la partición en forma de archivo (enorme normalmente), por tanto hablamos de crear un backup de una partición, en bruto y por entero y llevarla a un archivo. Funciona bastante bien.

La opción -z sirve para comprimirla en gzip, y una partición suele tener mucho espacio "vacío". Pero sí, hay que tener cuidado de que en el sitio donde vas a crear las imágenes tengas sitio para guardar "n" imágenes.

pvaldes escribiste:Estoy seguro de que Perl sabe hacer eso, aunque no sé cómo (¿dump?), y como la idea es en caso de desastre recuperar ese archivo binario y comprimido (que sería ilegible sin partimage) yo no metería programas externos y recomendaría hacerlo desde terminal a pelo. Lo digo porque si Perl modifica mínimamente el archivo por el camino (no tiene por qué ocurrir, pero... y si...) pensaremos que estamos cubiertos y en caso de emergencia nos podemos llevar una sorpresa.

En el programa que he puesto, Perl no va a "meter mano" en el proceso. Solo va a borrar y renombrar imágenes, y llamar partimage para crear una nueva.

pvaldes escribiste:2 - además lo de la rotación no tiene sentido si estudiamos un poco las opciones que estamos mandando.

-od significa que no se crea una imagen nueva sino que se sobreescribe la vieja sin pedir un nuevo nombre, si no hay nuevos archivos no tiene sentido rotarlos.

Sí tiene sentido si el diseño obliga a guardar el estado de la partición en distintos momentos (por ejemplo, una vez a la semana). Y la opción -od no va a tener efecto porque el programa Perl va a rotar los nombres de las imágenes, así que la nueva imagen siempre se realizará en un nuevo fichero.

pvaldes escribiste:y 3 -... Ese sistema no funcionará mucho tiempo, por un fallo de diseño.

De entrada en sistemas correctamente administrados la partición raíz es muy pequeña en realidad, /img no cabe, y si te cabe es que no has particionado, y eso es un fallo de seguridad.

El sistema funcionará porque buscaremos una partición donde quepan las tres imágenes. Si el usuario que ejecuta el programa no entiende eso, merece que le pase lo que le va a pasar.

pvaldes escribiste:Pero es que además es que aunque si cupiese el comando puede tener un problema mayor.

Me explico:

Partición digamos, de 50 gigas, con 5G usados.
Se usa partimage

Si copias una partición cualquiera que NO sea la raíz puede funcionar.

Pero si no tienes la raíz aparte del resto, copias la raíz... y tu partición raíz ahora pesa 8 G, 5 de la partición y 3 G de la imagen (comprimida).
Se actualiza partimage.
Tu partición raíz ahora pesa, digamos, 15 G.
Y en la siguiente vuelta, digamos, 20 o 25G (15 + 15 - la tasa de compresión)... etc.

En pocas vueltas tu partición raíz se verá superada y 5 gigas iniciales de información se han convertido en una masa intratable de basura repetida.

Y el programa acaba fallando, claro...

No fallará si en la partición raíz hay suficiente espacio. Pero la indicación de usar la partición raíz es de aficionado, que ha dicho que quiere hacerla ahí. Así que si se ha equivocado, tendrá que resolverlo

pvaldes escribiste:Si tu idea es copiar la raíz el archivo no puede llamarse /img DEBE de ser una partición aparte montada en un directorio propio.

Los argumentos que se pasan a partimage, los dos últimos, son: nombre de la partición que se va a leer, y nombre del fichero imagen que se va a crear. Si los dos están en el mismo sitio, el problema no está en el programa, sino en el usuario.

"Sí tiene sentido si el diseño obliga a guardar el estado de la partición en distintos momentos (por ejemplo, una vez a la semana). Y la opción -od no va a tener efecto porque el programa Perl va a rotar los nombres de las imágenes, así que la nueva imagen siempre se realizará en un nuevo fichero."

En ese caso yo sugeriría un backup incremental mejor (y puesto a buen recaudo), mucho más rápido y eficiente. Partimage es lento, y si tenemos un problema mientras estamos en medio de una copia podemos olvidarnos de esa imagen (y de los cambios en las últimas horas o días).

"Y la opción -od no va a tener efecto porque el programa Perl va a rotar los nombres de las imágenes, así que la nueva imagen siempre se realizará en un nuevo fichero."

A eso voy, no debería activar una opción que nunca va a ser necesaria, va a ralentizar el comando y supone un desperdicio de recursos.

Y ya para acabar, a lo que me refería con lo de buscar alternativas al debate. He estado mirando (someramente) en CPAN pero no veo ningún módulo de Perl específico para copiar byte a byte una partición a un archivo ¿alguien ha usado alguno?

Estoy de acuerdo contigo, pero...

* aficionado dice que tiene que ser con partimage. Sus razones tendrá

* No se puede hacer incremental (palabra que aún no está registrada en el diccionario) ya que las premisas del problema dicen que se han de mantener las tres últimas imágenes, despreciando la cuarta más antigua

* No ha dicho nada de si tenemos un problema a mitad de la copia. Se supone que si quiere un nivel de seguridad más alta, tendrá que ampliar el programa para hacer una comprobación del estado de la imagen creada. Y si está mal, reintentarlo (y aquí entonces tiene sentido la opción de sobreescritura)

* No creo que llegue a 1ms el coste de haber puesto una opción demás en la línea de argumentos Partimage solo tendrá que abrir el fichero imagen destino en modo escritura, y listo... todo es labor del sistema operativo.

* En cuanto a copiar una partición byte a byte se puede hacer con un bloque while() simple, haciendo un read() de la partición, en bloques (mejor que en bytes sueltos), y escribiendo hacia la imagen destino (incluso comprimiendo en tiempo real, usando un 'pipe' en el open() de la imagen). En CPAN hay módulos para hacer backup de ficheros y directorios (incluso con rotaciones, como File::Rotate::Backup), pero no conozco ninguno para particiones.

Hola, amigos explorer y pvaldes. ¡¡¡¡En primer lugar quiero agradecer su ayuda desmesurada!!!! :p Bueno, les comento lo del script: es una tarea de investigación, no es un capricho mio si no de un profesor... les comento que, obviamente, le mostré lo que en gran mayoría ayudo a hacer explorer a lo que el me respondió muy bueno pero yo lo que pretendo es algo más simple que ahora lo estoy desarrollando y se los mostraré a la brevedad para que me ayuden si es posible. Esto que voy a hacer es a modo de práctica de investigación así que ya lo verán y para ustedes como se dice acá ¿será una papa?

aficionado: no escribas en mayúsculas (tercera regla de la netetiqueta)

No sé qué solución más simple puedes encontrar, con las premisas del problema que has dado...

Veremos.

Hola, explorer. Bueno, después de pensar y pensar qué es lo que puedo hacer más fácil es esto. Solo me estaría faltando el comando rm para borrar lo más viejo en tiempo según el date que coloque para que me coloque hora día... y segundos a ver si lo podes revisar. Le coloco el print() para que simule por consola sino voy a romper la PC

El proceso de borrado de un fichero (lo que tu llamas rm) lo puedes hacer ejecutando el comando rm (con system(), por ejemplo). En mi versión, yo uso la función unlink(), del Perl, que sirve para lo mismo.

Y si vas a resolver el problema con comandos como 'ls' o 'rm', entonces te da lo mismo decir que lo quieres resolver con Perl que con el Shell del sistema...

Tu solución tiene un problema: siempre borra un fichero, existan tres, dos o un fichero imagen.

Ok, explorer. Ya lo entiendo, pero... ¿me dirías dónde poner el rm para que borre el más viejo de esta lista que sería? En teoría para el Profesor que me enseña esto el tamaño-1 que está vinculado con el ls. Te juro que ya no entiendo lo que el señor éste pretende... Desde ya, muchaaassss gracias. No sabes cuánto valoro tu ayuda.