*err = GetLastError ();
}
}
- syscall_printf ("%d (err %d) = WriteFile (%d, %d, write %d, written %d, 0)\n",
+ syscall_printf ("%d (err %d) = WriteFile (%d, %d, write %d, written %d, 0)",
ret, *err, fh, buf, to_write, *written);
return ret;
}
*err = GetLastError ();
}
}
- syscall_printf ("%d (err %d) = ReadFile (%d, %d, to_read %d, read %d, 0)\n",
+ syscall_printf ("%d (err %d) = ReadFile (%d, %d, to_read %d, read %d, 0)",
ret, *err, fh, buf, to_read, *read);
return ret;
}
eom_detected = 0;
eof_detected = 0;
lastblk_to_read = 0;
+ varblkop = 0;
unit = 0;
}
if (is_writing && devbuf && devbufend)
{
- memset (devbuf + devbufend, 0, devbufsiz - devbufend);
- DWORD to_write = ((devbufend - 1) / 512 + 1) * 512;
- ret = 0;
+ DWORD to_write;
+ int ret = 0;
- if (!write_file (get_handle (), devbuf, to_write, &written, &ret))
- {
- if (is_eom (ret))
- eom_detected = 1;
- }
+ memset (devbuf + devbufend, 0, devbufsiz - devbufend);
+ if (get_device () != FH_TAPE)
+ to_write = ((devbufend - 1) / 512 + 1) * 512;
+ else if (varblkop)
+ to_write = devbufend;
+ else
+ to_write = devbufsiz;
+ if (!write_file (get_handle (), devbuf, to_write, &written, &ret)
+ && is_eom (ret))
+ eom_detected = 1;
if (written)
has_written = 1;
devbufstart = devbufend = 0;
if (ret)
{
if (devbufsiz > 1L)
- {
- devbuf = new char[devbufsiz];
- }
+ devbuf = new char[devbufsiz];
}
else
- {
- devbufsiz = 0;
- }
+ devbufsiz = 0;
return ret;
}
if (devbufstart < devbufend)
{
bytes_to_read = min (len, devbufend - devbufstart);
- debug_printf ("read %d bytes from buffer (rest %d)\n",
+ debug_printf ("read %d bytes from buffer (rest %d)",
bytes_to_read, devbufstart - devbufend);
memcpy (ptr, devbuf + devbufstart, bytes_to_read);
len -= bytes_to_read;
}
if (len > 0)
{
- if (len >= devbufsiz)
+ if (!varblkop && len >= devbufsiz)
{
- bytes_to_read = (len / 512) * 512;
+ if (get_device () == FH_TAPE)
+ bytes_to_read = (len / devbufsiz) * devbufsiz;
+ else
+ bytes_to_read = (len / 512) * 512;
tgt = (char *) ptr;
- debug_printf ("read %d bytes direct from file\n",
- bytes_to_read);
+ debug_printf ("read %d bytes direct from file",bytes_to_read);
}
else
{
bytes_to_read = devbufsiz;
tgt = devbuf;
- debug_printf ("read %d bytes from file into buffer\n",
- bytes_to_read);
+ if (varblkop)
+ debug_printf ("read variable bytes from file into buffer");
+ else
+ debug_printf ("read %d bytes from file into buffer",
+ bytes_to_read);
}
if (!read_file (get_handle (), tgt, bytes_to_read, &read2, &ret))
{
{
while (len > 0)
{
- if ((len < devbufsiz || devbufend > 0) && devbufend < devbufsiz)
+ if (!varblkop &&
+ (len < devbufsiz || devbufend > 0) && devbufend < devbufsiz)
{
bytes_to_write = min (len, devbufsiz - devbufend);
memcpy (devbuf + devbufend, p, bytes_to_write);
}
else
{
- if (devbufend == devbufsiz)
+ if (varblkop)
+ {
+ bytes_to_write = len;
+ tgt = p;
+ }
+ else if (devbufend == devbufsiz)
{
bytes_to_write = devbufsiz;
tgt = devbuf;
fhc->eom_detected = eom_detected;
fhc->eof_detected = eof_detected;
fhc->lastblk_to_read = lastblk_to_read;
+ fhc->varblkop = varblkop;
fhc->unit = unit;
}
return ret;
struct mtpos pos;
if (! ioctl (MTIOCGET, &get))
- {
+ /* Tape drive supports and is set to variable block size. */
+ if (get.mt_dsreg == 0)
+ devbufsiz = get.mt_maxblksize;
+ else
devbufsiz = get.mt_dsreg;
- }
+ varblkop = get.mt_dsreg == 0;
if (devbufsiz > 1L)
- {
- devbuf = new char [ devbufsiz ];
- }
+ devbuf = new char [ devbufsiz ];
- /*
- * The following rewind in position 0 solves a problem which appears
+ /* The following rewind in position 0 solves a problem which appears
* in case of multi volume archives: The last ReadFile on first medium
* returns ERROR_NO_DATA_DETECTED. After media change, all subsequent
- * ReadFile calls return ERROR_NO_DATA_DETECTED, too!
- * The call to tape_set_pos seems to reset some internal flags!
- */
+ * ReadFile calls return ERROR_NO_DATA_DETECTED, too.
+ * The call to tape_set_pos seems to reset some internal flags. */
if ((! ioctl (MTIOCPOS, &pos)) && (! pos.mt_blkno))
{
op.mt_op = MTREW;
break;
case MTRETEN:
if (! tape_get_feature (TAPE_DRIVE_END_OF_DATA))
- {
- ret = ERROR_INVALID_PARAMETER;
- break;
- }
- if (! (ret = tape_set_pos (TAPE_REWIND, 0, FALSE)))
- {
- ret = tape_prepare (TAPE_TENSION);
- }
+ ret = ERROR_INVALID_PARAMETER;
+ else if (! (ret = tape_set_pos (TAPE_REWIND, 0, FALSE)))
+ ret = tape_prepare (TAPE_TENSION);
break;
case MTBSFM:
ret = tape_set_pos (TAPE_SPACE_FILEMARKS, -op->mt_count, TRUE);
break;
case MTEOM:
if (tape_get_feature (TAPE_DRIVE_END_OF_DATA))
- {
- ret = tape_set_pos (TAPE_SPACE_END_OF_DATA, 0);
- }
+ ret = tape_set_pos (TAPE_SPACE_END_OF_DATA, 0);
else
- {
- ret = tape_set_pos (TAPE_SPACE_FILEMARKS, 32767);
- }
+ ret = tape_set_pos (TAPE_SPACE_FILEMARKS, 32767);
break;
case MTERASE:
ret = tape_erase (TAPE_ERASE_SHORT);
}
ret = tape_get_blocksize (&min, NULL, &max, NULL);
if (ret)
- {
break;
- }
- if (op->mt_count < min || op->mt_count > max)
+ if (devbuf && (size_t) op->mt_count == devbufsiz && !varblkop)
{
- ret = ERROR_INVALID_PARAMETER;
+ ret = 0;
break;
}
- if (devbuf && (size_t) op->mt_count == devbufsiz)
+ if ((op->mt_count == 0
+ && !tape_get_feature (TAPE_DRIVE_VARIABLE_BLOCK))
+ || (op->mt_count > 0
+ && (op->mt_count < min || op->mt_count > max)))
{
- ret = 0;
+ ret = ERROR_INVALID_PARAMETER;
break;
}
- if (devbuf && (size_t) op->mt_count < devbufend - devbufstart)
+ if (devbuf && op->mt_count > 0
+ && (size_t) op->mt_count < devbufend - devbufstart)
{
- ret = ERROR_INVALID_PARAMETER;
+ ret = ERROR_MORE_DATA;
break;
}
if (! (ret = tape_set_blocksize (op->mt_count)))
{
- char *buf = new char [ op->mt_count ];
+ size_t size = 0;
+ if (op->mt_count == 0)
+ {
+ struct mtget get;
+ if ((ret = tape_status (&get)) != NO_ERROR)
+ break;
+ size = get.mt_maxblksize;
+ ret = NO_ERROR;
+ }
+ char *buf = new char [ size ];
+ if (!buf)
+ {
+ ret = ERROR_OUTOFMEMORY;
+ break;
+ }
if (devbuf)
{
memcpy(buf,devbuf + devbufstart, devbufend - devbufstart);
delete [] devbuf;
}
else
- {
- devbufend = 0;
- }
- devbufstart = 0;
- devbuf = buf;
- devbufsiz = op->mt_count;
+ devbufend = 0;
+ devbufstart = 0;
+ devbuf = buf;
+ devbufsiz = size;
+ varblkop = op->mt_count == 0;
}
}
break;