|
|
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.