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