DiskFile.cpp

Go to the documentation of this file.

/* ES40 emulator.
 * Copyright (C) 2007-2008 by the ES40 Emulator Project
 *
 * WWW    : http://sourceforge.net/projects/es40
 * E-mail : camiel@camicom.com
 * 
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 * 
 * Although this is not required, the author would appreciate being notified of, 
 * and receiving any modifications you may make to the source code that might serve
 * the general public.
 */

#include "StdAfx.h"
#include "DiskFile.h"

CDiskFile::CDiskFile(CConfigurator*  cfg, CSystem*  sys, CDiskController*  c,
                     int idebus, int idedev) : CDisk(cfg, sys, c, idebus, idedev)
{
  filename = myCfg->get_text_value("file");
  if(!filename)
  {
    FAILURE_1(Configuration, "%s: Disk has no file attached!\n", devid_string);
  }

  if(read_only)
    handle = fopen(filename, "rb");
  else
    handle = fopen_large(filename, "rb+");
  if(!handle)
  {
    printf("%s: Could not open file %s!\n", devid_string, filename);

    int sz = myCfg->get_num_value("autocreate_size", false, 0) / 1024 / 1024;
    if(!sz)
      FAILURE_1(Runtime, "%s: File does not exist and no autocreate_size set",
                devid_string);

    void*   crt_buf;
    handle = fopen_large(filename, "wb");
    if(!handle)
      FAILURE_1(Runtime, "%s: File does not exist and could not be created",
                devid_string);
    crt_buf = calloc(1024, 1024);
    printf("%s: writing %d 1kB blocks:   0%%\b\b\b\b", devid_string, sz);

    int lastpc = 0;
    for(int a = 0; a < sz; a++)
    {
      fwrite(crt_buf, 1024, 1024, handle);

      int pc = a * 100 / sz;
      if(pc != lastpc)
      {
        printf("%3d\b\b\b", pc);
        lastpc = pc;
      }

      fflush(stdout);
    }

    printf("100%%\n");
    fclose(handle);
    free(crt_buf);
    if(read_only)
      handle = fopen_large(filename, "rb");
    else
      handle = fopen_large(filename, "rb+");
    if(!handle)
    {
      FAILURE_1(Runtime, "%s: File created could not be opened", devid_string);
    }

    printf("%s: %d MB file %s created.\n", devid_string, sz, filename);
  }

  // determine size...
  fseek_large(handle, 0, SEEK_END);
  byte_size = ftell_large(handle);
  fseek_large(handle, 0, SEEK_SET);
  state.byte_pos = ftell_large(handle);

  sectors = 32;
  heads = 8;

  //calc_cylinders();
  determine_layout();

  model_number = myCfg->get_text_value("model_number", filename);

  // skip to the filename portion of the path.
  char*   p = model_number;
#if defined(_WIN32)
  char    x = '\\';
#elif defined(__VMS)
  char    x = ']';
#else
  char    x = '/';
#endif
  while(*p)
  {
    if(*p == x)
      model_number = p + 1;
    p++;
  }

  printf("%s: Mounted file %s, %"LL "d %d-byte blocks, %"LL "d/%d/%d.\n",
         devid_string, filename, byte_size / state.block_size, state.block_size,
         cylinders, heads, sectors);
}

CDiskFile::~CDiskFile(void)
{
  printf("%s: Closing file.\n", devid_string);
  fclose(handle);
}

bool CDiskFile::seek_byte(off_t_large byte)
{
  if(byte >= byte_size)
  {
    FAILURE_1(InvalidArgument, "%s: Seek beyond end of file!\n", devid_string);
  }

  fseek_large(handle, byte, SEEK_SET);
  state.byte_pos = ftell_large(handle);

  return true;
}

size_t CDiskFile::read_bytes(void* dest, size_t bytes)
{
  size_t  r;
  r = fread(dest, 1, bytes, handle);
  state.byte_pos = ftell_large(handle);
  return r;
}

size_t CDiskFile::write_bytes(void* src, size_t bytes)
{
  if(read_only)
    return 0;

  size_t  r;
  r = fwrite(src, 1, bytes, handle);
  state.byte_pos = ftell_large(handle);
  return r;
}

Project space on SourceForge.net