1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
/*
* Copyright (c) 1995-1994 The University of Utah and
* the Computer Systems Laboratory at the University of Utah (CSL).
* All rights reserved.
*
* Permission to use, copy, modify and distribute this software is hereby
* granted provided that (1) source code retains these copyright, permission,
* and disclaimer notices, and (2) redistributions including binaries
* reproduce the notices in supporting documentation, and (3) all advertising
* materials mentioning features or use of this software display the following
* acknowledgement: ``This product includes software developed by the
* Computer Systems Laboratory at the University of Utah.''
*
* THE UNIVERSITY OF UTAH AND CSL ALLOW FREE USE OF THIS SOFTWARE IN ITS "AS
* IS" CONDITION. THE UNIVERSITY OF UTAH AND CSL DISCLAIM ANY LIABILITY OF
* ANY KIND FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
*
* CSL requests users of this software to return to csl-dist@cs.utah.edu any
* improvements that they make and grant CSL redistribution rights.
*
* Author: Bryan Ford, University of Utah CSL
*/
#include <unistd.h>
#include <errno.h>
#include "dos_io.h"
#include "vm_param.h"
int dos_rename(const char *oldpath, const char *newpath)
{
/* This function isn't fully atomic like on Unix,
but it's as close as I know how to do under DOS. */
struct real_call_data real_call_data;
vm_offset_t dos_buf_phys = (vm_offset_t)kvtophys(dos_buf);
int err;
dos_init_rcd(&real_call_data);
/* Put the oldpath in the first half of dos_buf,
and the newpath in the second half. */
if ((strlen(oldpath)+1 > DOS_BUF_SIZE/2)
|| (strlen(newpath)+1 > DOS_BUF_SIZE/2))
{ errno = E2BIG; return -1; }
strcpy(dos_buf, oldpath);
strcpy(dos_buf+DOS_BUF_SIZE/2, newpath);
/* Try once to rename the file. */
real_call_data.eax = 0x5600;
real_call_data.ds = dos_buf_phys >> 4;
real_call_data.edx = dos_buf_phys & 15;
real_call_data.es = dos_buf_phys >> 4;
real_call_data.edi = (dos_buf_phys & 15) + DOS_BUF_SIZE/2;
real_int(0x21, &real_call_data);
/* If that failed, delete newpath and then retry the rename.
We _hope_ the failure was because newpath already existed;
the DOS error codes I'm getting back seem to be bogus. */
if (err = dos_check_err(&real_call_data))
{
real_call_data.eax = 0x4100;
real_call_data.ds = dos_buf_phys >> 4;
real_call_data.edx = (dos_buf_phys & 15) + DOS_BUF_SIZE/2;
real_int(0x21, &real_call_data);
if (err = dos_check_err(&real_call_data))
return err;
real_call_data.eax = 0x5600;
real_call_data.ds = dos_buf_phys >> 4;
real_call_data.edx = dos_buf_phys & 15;
real_call_data.es = dos_buf_phys >> 4;
real_call_data.edi = (dos_buf_phys & 15) + DOS_BUF_SIZE/2;
real_int(0x21, &real_call_data);
err = dos_check_err(&real_call_data);
}
return err;
}
|
