1/*
2 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. Please obtain a copy of the License at
10 * http://www.opensource.apple.com/apsl/ and read it before using this
11 * file.
12 *
13 * The Original Code and all software distributed under the License are
14 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
15 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
16 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
18 * Please see the License for the specific language governing rights and
19 * limitations under the License.
20 *
21 * @APPLE_LICENSE_HEADER_END@
22 */
23/*	$OpenBSD: move.c,v 1.2 1996/06/26 05:31:21 deraadt Exp $	*/
24/*	$NetBSD: move.c,v 1.5 1995/03/26 03:27:57 glass Exp $	*/
25
26/*-
27 * Copyright (c) 1990, 1993, 1994
28 *	The Regents of the University of California.  All rights reserved.
29 *
30 * This code is derived from software contributed to Berkeley by
31 * Hugh Smith at The University of Guelph.
32 *
33 * Redistribution and use in source and binary forms, with or without
34 * modification, are permitted provided that the following conditions
35 * are met:
36 * 1. Redistributions of source code must retain the above copyright
37 *    notice, this list of conditions and the following disclaimer.
38 * 2. Redistributions in binary form must reproduce the above copyright
39 *    notice, this list of conditions and the following disclaimer in the
40 *    documentation and/or other materials provided with the distribution.
41 * 3. All advertising materials mentioning features or use of this software
42 *    must display the following acknowledgement:
43 *	This product includes software developed by the University of
44 *	California, Berkeley and its contributors.
45 * 4. Neither the name of the University nor the names of its contributors
46 *    may be used to endorse or promote products derived from this software
47 *    without specific prior written permission.
48 *
49 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
50 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
51 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
52 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
53 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
54 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
55 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
56 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
57 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
58 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
59 * SUCH DAMAGE.
60 */
61
62#ifndef lint
63#if 0
64static char sccsid[] = "@(#)move.c	8.3 (Berkeley) 4/2/94";
65static char rcsid[] = "$OpenBSD: move.c,v 1.2 1996/06/26 05:31:21 deraadt Exp $";
66#endif
67#endif /* not lint */
68
69#include <sys/param.h>
70#include <sys/stat.h>
71
72#include <ar.h>
73#include <dirent.h>
74#include <err.h>
75#include <fcntl.h>
76#include <stdio.h>
77#include <unistd.h>
78
79#include "archive.h"
80#include "extern.h"
81#include "pathnames.h"
82
83/*
84 * move --
85 *	Change location of named members in archive - if 'b' or 'i' option
86 *	selected then named members are placed before 'posname'.  If 'a'
87 *	option selected members go after 'posname'.  If no options, members
88 *	are moved to end of archive.
89 */
90int
91move(argv)
92	char **argv;
93{
94	CF cf;
95	off_t size, tsize;
96	int afd, curfd, mods, tfd1, tfd2, tfd3;
97	char *file;
98
99	afd = open_archive(O_RDWR);
100	mods = options & (AR_A|AR_B);
101
102	tfd1 = tmp();			/* Files before key file. */
103	tfd2 = tmp();			/* Files selected by user. */
104	tfd3 = tmp();			/* Files after key file. */
105
106	/*
107	 * Break archive into three parts -- selected entries and entries
108	 * before and after the key entry.  If positioning before the key,
109	 * place the key at the beginning of the after key entries and if
110	 * positioning after the key, place the key at the end of the before
111	 * key entries.  Put it all back together at the end.
112	 */
113
114	/* Read and write to an archive; pad on both. */
115	SETCF(afd, archive, 0, tname, RPAD|WPAD);
116	for (curfd = tfd1; get_arobj(afd);) {
117		if (*argv && (file = files(argv))) {
118			if (options & AR_V)
119				(void)printf("m - %s\n", file);
120			cf.wfd = tfd2;
121			put_arobj(&cf, (struct stat *)NULL);
122			continue;
123		}
124		if (mods && compare(posname)) {
125			mods = 0;
126			if (options & AR_B)
127				curfd = tfd3;
128			cf.wfd = curfd;
129			put_arobj(&cf, (struct stat *)NULL);
130			if (options & AR_A)
131				curfd = tfd3;
132		} else {
133			cf.wfd = curfd;
134			put_arobj(&cf, (struct stat *)NULL);
135		}
136	}
137
138	if (mods) {
139		warnx("%s: archive member not found", posarg);
140		close_archive(afd);
141		return (1);
142	}
143	(void)lseek(afd, (off_t)SARMAG, SEEK_SET);
144
145	SETCF(tfd1, tname, afd, archive, NOPAD);
146	tsize = size = lseek(tfd1, (off_t)0, SEEK_CUR);
147	(void)lseek(tfd1, (off_t)0, SEEK_SET);
148	copy_ar(&cf, size);
149
150	tsize += size = lseek(tfd2, (off_t)0, SEEK_CUR);
151	(void)lseek(tfd2, (off_t)0, SEEK_SET);
152	cf.rfd = tfd2;
153	copy_ar(&cf, size);
154
155	tsize += size = lseek(tfd3, (off_t)0, SEEK_CUR);
156	(void)lseek(tfd3, (off_t)0, SEEK_SET);
157	cf.rfd = tfd3;
158	copy_ar(&cf, size);
159
160	(void)ftruncate(afd, tsize + SARMAG);
161	close_archive(afd);
162
163	if (*argv) {
164		orphans(argv);
165		return (1);
166	}
167	return (0);
168}
169