GuilleSQL :: Microsoft SQL Server, SSIS, y más !!

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();
}

[Fecha del Artículo (UTC): 26/02/2008]
[Autor: GuilleSQL]



Escribir un Comentario

Para poder escribir un comentario, debe Iniciar Sesión con un usuario.

Si no dispone de un usuario, puede Registrarse y hacerse miembro.

Si dispone de un usuario, pero no recuerda sus credenciales de acceso, puede Restablecer su Contraseña.

Miembros de
Miembros de GITCA (Global IT Community Association)

Menu de Usuario
  Iniciar Sesión
  Registrarse
  Restablecer Contraseña
  Ventajas de Registrarse

Acerca de
  Contigo desde Oct 2007
  771 usuarios registrados
  86146 pageloads/mes
  Ranking Alexa 498160

Social Networks
Sigue a Portal GuilleSQL en Linkedin !!
Sigue a Portal GuilleSQL en Twitter !!



Archivo

Diciembre de 2017 (15)
Noviembre de 2017 (7)
Junio de 2017 (3)
Mayo de 2017 (1)
Marzo de 2017 (3)
Enero de 2017 (4)
Junio de 2016 (1)
Mayo de 2016 (2)
Abril de 2016 (2)
Septiembre de 2015 (2)
Agosto de 2015 (2)
Junio de 2015 (10)
Mayo de 2015 (4)
Abril de 2015 (8)
Marzo de 2015 (11)
Octubre de 2014 (3)
Septiembre de 2014 (7)
Agosto de 2014 (5)
Julio de 2014 (2)
Mayo de 2014 (4)
Abril de 2014 (4)
Marzo de 2014 (4)
Febrero de 2014 (1)
Enero de 2014 (5)
Diciembre de 2013 (8)
Noviembre de 2013 (2)
Octubre de 2013 (7)
Septiembre de 2013 (6)
Agosto de 2013 (1)
Julio de 2013 (6)
Junio de 2013 (11)
Mayo de 2013 (7)
Abril de 2013 (6)
Febrero de 2013 (5)
Enero de 2013 (7)
Diciembre de 2012 (12)
Noviembre de 2012 (13)
Octubre de 2012 (5)
Septiembre de 2012 (3)
Agosto de 2012 (6)
Julio de 2012 (4)
Junio de 2012 (1)
Mayo de 2012 (2)
Abril de 2012 (7)
Marzo de 2012 (16)
Febrero de 2012 (9)
Enero de 2012 (5)
Diciembre de 2011 (10)
Noviembre de 2011 (10)
Octubre de 2011 (4)
Septiembre de 2011 (5)
Agosto de 2011 (2)
Julio de 2011 (2)
Junio de 2011 (4)
Mayo de 2011 (2)
Abril de 2011 (6)
Marzo de 2011 (4)
Febrero de 2011 (10)
Enero de 2011 (5)
Diciembre de 2010 (6)
Noviembre de 2010 (4)
Octubre de 2010 (8)
Septiembre de 2010 (4)
Agosto de 2010 (1)
Julio de 2010 (3)
Mayo de 2010 (5)
Abril de 2010 (6)
Marzo de 2010 (8)
Febrero de 2010 (3)
Enero de 2010 (1)
Diciembre de 2009 (9)
Noviembre de 2009 (14)
Octubre de 2009 (2)
Septiembre de 2009 (8)
Agosto de 2009 (2)
Julio de 2009 (10)
Junio de 2009 (9)
Mayo de 2009 (10)
Abril de 2009 (9)
Marzo de 2009 (3)
Febrero de 2009 (2)
Enero de 2009 (3)
Noviembre de 2008 (2)
Octubre de 2008 (2)
Septiembre de 2008 (2)
Agosto de 2008 (5)
Julio de 2008 (5)
Junio de 2008 (1)
Mayo de 2008 (3)
Abril de 2008 (2)
Marzo de 2008 (2)
Febrero de 2008 (2)
Enero de 2008 (5)
Noviembre de 2007 (2)
Octubre de 2007 (2)






Esta información se proporciona "como está" sin garantías de ninguna clase, y no otorga ningún derecho.
This information is provided "AS IS" with no warranties, and confers no rights.

Copyright © 2007 GuilleSQL, todos los derechos reservados.
GuilleSQL.com y GuilleSQL.net son también parte de Portal GuilleSQL.

Visitas recibidas (Page Loads) en GuilleSQL (fuente: StatCounter):

screen resolution stats
Visitas