/* $NetBSD: move.c,v 1.5 1995/03/26 03:27:57 glass Exp $ */ /*- * Copyright (c) 1990, 1993, 1994 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * Hugh Smith at The University of Guelph. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef lint #if 0 static char sccsid[] = "@(#)move.c 8.3 (Berkeley) 4/2/94"; #else static char rcsid[] = "$NetBSD: move.c,v 1.5 1995/03/26 03:27:57 glass Exp $"; #endif #endif /* not lint */ #include <sys/param.h> #include <sys/stat.h> #include <ar.h> #include <dirent.h> #include <err.h> #include <fcntl.h> #include <stdio.h> #include <unistd.h> #include "archive.h" #include "extern.h" #include "pathnames.h" /* * move -- * Change location of named members in archive - if 'b' or 'i' option * selected then named members are placed before 'posname'. If 'a' * option selected members go after 'posname'. If no options, members * are moved to end of archive. */ int move(argv) char **argv; { CF cf; off_t size, tsize; int afd, curfd, mods, tfd1, tfd2, tfd3; char *file; afd = open_archive(O_RDWR); mods = options & (AR_A|AR_B); tfd1 = tmp(); /* Files before key file. */ tfd2 = tmp(); /* Files selected by user. */ tfd3 = tmp(); /* Files after key file. */ /* * Break archive into three parts -- selected entries and entries * before and after the key entry. If positioning before the key, * place the key at the beginning of the after key entries and if * positioning after the key, place the key at the end of the before * key entries. Put it all back together at the end. */ /* Read and write to an archive; pad on both. */ SETCF(afd, archive, 0, tname, RPAD|WPAD); for (curfd = tfd1; get_arobj(afd);) { if (*argv && (file = files(argv))) { if (options & AR_V) (void)printf("m - %s\n", file); cf.wfd = tfd2; put_arobj(&cf, (struct stat *)NULL); continue; } if (mods && compare(posname)) { mods = 0; if (options & AR_B) curfd = tfd3; cf.wfd = curfd; put_arobj(&cf, (struct stat *)NULL); if (options & AR_A) curfd = tfd3; } else { cf.wfd = curfd; put_arobj(&cf, (struct stat *)NULL); } } if (mods) { warnx("%s: archive member not found", posarg); close_archive(afd); return (1); } (void)lseek(afd, (off_t)SARMAG, SEEK_SET); SETCF(tfd1, tname, afd, archive, NOPAD); tsize = size = lseek(tfd1, (off_t)0, SEEK_CUR); (void)lseek(tfd1, (off_t)0, SEEK_SET); copy_ar(&cf, size); tsize += size = lseek(tfd2, (off_t)0, SEEK_CUR); (void)lseek(tfd2, (off_t)0, SEEK_SET); cf.rfd = tfd2; copy_ar(&cf, size); tsize += size = lseek(tfd3, (off_t)0, SEEK_CUR); (void)lseek(tfd3, (off_t)0, SEEK_SET); cf.rfd = tfd3; copy_ar(&cf, size); (void)ftruncate(afd, tsize + SARMAG); close_archive(afd); if (*argv) { orphans(argv); return (1); } return (0); }