HD Copy: Mi Copión de Discos Duros
|
|
El otro día me vino a la cabeza aquel copión de discos duros que desarrollé en Octubre de 1995, con mis 18 añitos recién cumplidos... Aquellos maravillosos años... No llevaba mucho tiempo trabajando, aunque aún duré otros 9 años en aquella empresa. Necesitábamos un copión de discos duros, ya que en aquella época no existía el Ghost, ni otras alternativas (o al menos no se conocían). La necesidad era clara: había que montar muchas máquinas iguales para distintos clientes, y entregarlas con el software pre-instalado y configurado, pero el tiempo de instalación llevaba muchas horas (Windows NT, drivers, Software Corporativo, etc.), y como siempre, el tiempo era un bien escaso. |
Aprovechando los escasos conocimientos que tenía de programación en C y ensablador, en particular llamando a las interrupciones de la VGA, del disco, etc. emprendí este pequeño desarrollo. Reduciéndolo al absurdo, era suficiente con construir tres bucles anidados: por cabezas, sectores y cilindros. El cuerpo del bucle se limitaría a leer un sector del disco duro de origen y escribirlo en el disco duro de destino. Para simplificar, era adminisible pedir la geometría de los discos como parámetros, y el programa estaba hecho, aunque requiriese que todos los discos fuesen iguales (menos daba una piedra). Además, para acelerar el proceso, se podía modificar el código para leer de un disco duro y escribir en tres (recordar que en aquella época lo normal era tener dos canales IDE - Primario y Secundario - y en cada uno poder montar hasta dos dispositivos - Master y Esclavo).
Fué un éxito ! Funcionó perfectamente, y mientras poníamos una o varias máquinas a copiar discos con todo el software ya instalado, de forma paralela podíamos montar en nuestra humilde cadena de montaje todas las máquinas, con un coste en tiempo bastante ajustado para la época. Además, en un mes a ratos, conseguí hacerlo funcionar.
Ahora el código fuente (que me lo curré en casita, como un campeón, y fuera de horario como otras muchas cosas) no tiene valor y es muy fácil de mejorar, pero me pareció buena idea el poder colgarlo aquí, y aquellas personas que puedan encontrar alguna idea en este código, que puedan aprovecharlo.
Poco más que decir, salvo que se compilaba con Borland Turbo C 3.00, si mal no recuerdo...
#include <dos.h>
int leer_sector(char *buffer,int cilindro,int sector, int cabeza, int disco, int nsecs);
int escribir_sector(char *buffer,int cilindro,int sector, int cabeza, int disco, int nsecs);
int unidad(char drive);
int leer_sector(char *buffer,int cilindro,int sector, int cabeza, int disco, int nsecs)
/* leer_sector() -> Lee un sector de un disco/unidad. */
{
int aux;
union REGS rin, rout;
struct SREGS seg;
rin.h.ah = 2; /* Servicio de lectura de la INT 13H */
rin.h.al = nsecs; /* Leer un £nico sector */
seg.es = FP_SEG(buffer); /* Segmento del buffer destino */
rin.x.bx = FP_OFF(buffer); /* Desplazamiento del buffer destino */
rin.h.dh = cabeza; /* Primera cabeza */
rin.h.dl = disco; /* Unidad de la que se desea leer */
aux=cilindro;
aux=aux & 0x00ff;
rin.h.ch = aux; /* Primer cilindro */
aux=cilindro;
aux=aux & 0xff00;
aux=aux >> 2;
aux=aux+sector;
rin.h.cl = aux; /* Primer sector */
int86x(0x13,&rin,&rout,&seg);
if(rout.x.cflag==0) return 1;
else return 0;
}
int escribir_sector(char *buffer,int cilindro,int sector, int cabeza, int disco, int nsecs)
/* escribir_sector() -> Escribe un sector en un disco/unidad. */
{
int aux;
union REGS rin, rout;
struct SREGS seg;
rin.h.ah = 3; /* Servicio de lectura de la INT 13H */
rin.h.al = nsecs; /* Escribe un £nico sector */
seg.es = FP_SEG(buffer); /* Segmento del buffer origen */
rin.x.bx = FP_OFF(buffer); /* Desplazamiento del buffer origen */
rin.h.dh = cabeza; /* Primera cabeza */
rin.h.dl = disco; /* Unidad en la que se desea escribir */
aux=cilindro;
aux=aux & 0x00ff;
rin.h.ch = aux; /* Primer cilindro */
aux=cilindro;
aux=aux & 0xff00;
aux=aux >> 2;
aux=aux+sector;
rin.h.cl = aux; /* Primer sector */
int86x(0x13,&rin,&rout,&seg);
if(rout.x.cflag==0) return 1;
else return 0;
}
int unidad(char drive)
/* unidad() -> Devuelve el codigo de tipo de la unidad pasada como par metro */
{
union REGS in, out;
in.h.ah = 0x15;
in.h.dl = drive;
int86(0x13,&in,&out);
if(out.x.cflag==1) return 0;
else return out.h.ah;
}
void main(void)
{
int a, b, c;
int cab, sec, cil;
int origen, destino;
char cadena[80];
char sector[512];
/*** Pedir datos ***/
printf("*** Hard Disk Copy 0.1 - 1 origen, 1 destino - GuilleSQL ***");
printf("\n*** Introducir datos referentes a la geometria de los disco segun la BIOS ***");
printf("\nCabezas < 256: ");
gets(cadena);
cab=atoi(cadena);
printf("Sectores < 64: ");
gets(cadena);
sec=atoi(cadena);
printf("Cilindros < 1024 : ");
gets(cadena);
cil=atoi(cadena);
printf("*** Introducir unidades origen y destino ***");
printf("\nUnidad de origen (0-n): ");
gets(cadena);
origen=atoi(cadena);
origen += 0x80;
printf("Unidad de destino (0-n): ");
gets(cadena);
destino=atoi(cadena);
destino += 0x80;
/*** Verificar que existen dos discos duros 0x80 y 0x81 ***/
if(unidad(origen)==0x03 & unidad(destino)==0x03)
{
/*** Copiar ***/
printf("\nSe procede a copiar el disco %d sobre el disco %d. Los datos se destruiran.",origen-0x80,destino-0x80);
printf("\n¿Desea proceder con la copia? (S/N)");
if(getche()=='s')
{
for(a=0;a<cab;a++)
{
for(b=0;b<cil;b++)
{
for(c=1;c<=sec;c++)
{
leer_sector(sector,b,c,a,origen,1);
if(kbhit()!=0)
{
if(getch()==27)
{
printf("\nCopia cancelada por el usuario.");
exit(0);
}
}
escribir_sector(sector,b,c,a,destino,1);
}
}
printf("\nCabeza %d de %d procesada. Procesando la siguiente.",a,cab);
}
printf("\nCopia finalizada. Verifique los datos del disco destino.");
}
else
{
printf("\nCopia Cancelada por el usuario.");
}
}
else
{
printf("\nLas unidades especificadas no son discos duros. Se Cancela la copia.");
}
getch();
}
| |
|
|
|
