oldlinux-files/study/hardware/Floppy/floppy/FMT256.CPP

#include <stdio.h>
#include <conio.h>
#include <dos.h>
#include <stdlib.h>
#include <bios.h>
#include <string.h>

typedef struct _DPT_
{
  unsigned char srt_hut;
  unsigned char dma_hlt;
  unsigned char motor_w;
  unsigned char sec_size;
  unsigned char eot;
  unsigned char gap_rw;
  unsigned char dtl;
  unsigned char gap_f;
  unsigned char fill_char;
 unsigned char hst;
 unsigned char mot_start;
} DPT;

DPT far *get_dpt(void);

// <20>®¬¥à ä®à¬ â¨à㥬®© ¤®à®¦ª¨
#define TRK 20

// Š®¤ à §¬¥à  ᥪâ®à  - 256 ¡ ©â
#define SEC_SIZE 1

union REGS inregs, outregs;
char diskbuf[512];
char diskbuf1[512];
char buf[80];

int main(void)
{
  struct diskinfo_t di;
  unsigned status;
  unsigned char old_sec_size,
    old_fill_char, old_eot;
  int i, j;
  DPT  far *dpt_ptr;

  printf("\n<EFBFBD>ணࠬ¬  ã­¨ç⮦¨â ᮤ¥à¦¨¬®¥"
    "\n20-© ¤®à®¦ª¨ ¤¨áª  €:."
    "\n†¥« ¥â¥ ¯à®¤®«¦¨âì? (Y,N)\n");
  i = getch();
  if((i != 'y') && (i != 'Y'))
    return(-1);

  // <20>®«ãç ¥¬  ¤à¥á â ¡«¨æë ¯ à ¬¥â஢ ¤¨áª¥âë
  dpt_ptr = get_dpt();

  // ‘®å࠭塞 áâ àë¥ §­ ç¥­¨ï ¨§ â ¡«¨æë ¯ à ¬¥â஢
  old_sec_size  = dpt_ptr->sec_size;
  old_fill_char = dpt_ptr->fill_char;
  old_eot       = dpt_ptr->eot;

  // “áâ ­ ¢«¨¢ ¥¬ ¢ â ¡«¨æ¥ ¯ à ¬¥â஢ ¤¨áª¥âë
  // ª®¤ à §¬¥à  ᥪâ®à , ᨬ¢®« § ¯®«­¥­¨ï ¯à¨
  // ä®à¬ â¨à®¢ ­¨¨, ª®«¨ç¥á⢮ ᥪâ®à®¢ ­  ¤®à®¦ª¥
  dpt_ptr->sec_size  = SEC_SIZE;
  dpt_ptr->fill_char = 0x77;
  dpt_ptr->eot       = 18;

  // “áâ ­ ¢«¨¢ ¥¬ ⨯ ¤¨áª 
  inregs.h.ah = 0x17;
  inregs.h.al = 3;
  inregs.h.dl = 0;
  int86(0x13, &inregs, &outregs);

  // “áâ ­ ¢«¨¢ ¥¬ á।㠤«ï ä®à¬ â¨à®¢ ­¨ï
  inregs.h.ah = 0x18;
  inregs.h.ch = TRK;
  inregs.h.cl = dpt_ptr->eot;
  inregs.h.dl = 0;
  int86(0x13, &inregs, &outregs);

  // <20>®¤£®â ¢«¨¢ ¥¬ ¯ à ¬¥âàë
  // ¤«ï ä㭪樨 ä®à¬ â¨à®¢ ­¨ï
  di.drive    = 0;
  di.head     = 0;
  di.track    = TRK;
  di.sector   = 1;
  di.nsectors = 18;
  di.buffer   = diskbuf;

  // <20>®¤£®â ¢«¨¢ ¥¬ ¡ãä¥à ä®à¬ â  ¤«ï 18 ᥪâ®à®¢
  for(i=0, j=1; j<19; i += 4, j++)
  {
    diskbuf[i]    = TRK;
    diskbuf[i+1]  = 0;
    diskbuf[i+2]  = j;
    diskbuf[i+3]  = SEC_SIZE;
  }

  // ‚ë§ë¢ ¥¬ äã­ªæ¨î ä®à¬ â¨à®¢ ­¨ï ¤®à®¦ª¨
  status = _bios_disk(_DISK_FORMAT, &di) >> 8;
  printf("\n”®à¬ â¨à®¢ ­¨¥ § ¢¥à訫®áì á ª®¤®¬: %d",
    status);

  // ‡ ¯¨á뢠¥¬ ¨­ä®à¬ æ¨î ¢ ­¥áâ ­¤ àâ­ë© ᥪâ®à
  printf("\n‚¢¥¤¨â¥ áâப㠤«ï § ¯¨á¨ "
    "¢ ­¥áâ ­¤ àâ­ë© ᥪâ®à,"
    "\n¤«¨­  áâப¨ ­¥ ¤®«¦­  ¯à¥¢ëè âì 80 ¡ ©â®¢"
    "\n->");

  gets(buf);
  strcpy(diskbuf,buf);

  di.drive    = 0;
  di.head     = 0;
  di.track    = 20;
  di.sector   = 1;
  di.nsectors = 1;
  di.buffer   = diskbuf;

  status = _bios_disk(_DISK_WRITE, &di) >> 8;

  if(status)
  {
    printf("\nŽè¨¡ª  ¯à¨ § ¯¨á¨ ¢ ­¥áâ ­¤ àâ­ë© ᥪâ®à: %d",
      status);
    return(-1);
  }

  di.drive    = 0;
  di.head     = 0;
  di.track    = 20;
  di.sector   = 1;
  di.nsectors = 1;
  di.buffer   = diskbuf1;

  for(i = 0; i < 3; i++)
  {
    status = _bios_disk(_DISK_READ, &di) >> 8;
    if(!status) break;
  }

  printf("\n<EFBFBD>à®ç¨â ­® ¨§ ­¥áâ ­¤ àâ­®£® ᥪâ®à :\n%s\n",
    diskbuf1);

  // ‚®ááâ ­ ¢«¨¢ ¥¬ áâ àë¥ §­ ç¥­¨ï ¢
  // â ¡«¨æ¥ ¯ à ¬¥â஢ ¤¨áª¥âë
  dpt_ptr->sec_size  = old_sec_size;
  dpt_ptr->fill_char = old_fill_char;
  dpt_ptr->eot       = old_eot;

  return(0);
}

/**
* get_dpt
*
* ‚ëç¨á«¨âì  ¤à¥á â ¡«¨æë ¯ à ¬¥â஢ ¤¨áª¥âë
*
* ”ã­ªæ¨ï ¢®§¢à é ¥â 㪠§ â¥«ì ­  â ¡«¨æã
* ¯ à ¬¥â஢ ¤¨áª¥âë
*
**/
DPT far *get_dpt(void)
{
  void far * far *ptr;
  ptr = (void far * far *)MK_FP(0x0, 0x78);
  return(DPT far*)(*ptr);
}