Remove __P macros from src/usr.bin and src/usr.sbin.
[dragonfly.git] / usr.bin / ranlib / touch.c
CommitLineData
984263bc
MD
1/*-
2 * Copyright (c) 1990, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Hugh Smith at The University of Guelph.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
1de703da
MD
35 *
36 * @(#)touch.c 8.1 (Berkeley) 6/6/93
37 * $FreeBSD: src/usr.bin/ranlib/touch.c,v 1.6 1999/08/28 01:05:04 peter Exp $
2d8a3be7 38 * $DragonFly: src/usr.bin/ranlib/Attic/touch.c,v 1.3 2003/11/03 19:31:31 eirikn Exp $
984263bc
MD
39 */
40
984263bc
MD
41#include <sys/types.h>
42#include <ar.h>
43#include <dirent.h>
44#include <err.h>
45#include <fcntl.h>
46#include <ranlib.h>
47#include <stdio.h>
48#include <string.h>
49#include <time.h>
50#include <unistd.h>
51#include "archive.h"
52
53extern CHDR chdr; /* converted header */
54extern char *archive; /* archive name */
55
2d8a3be7
EN
56extern void error( char * );
57void settime( int );
58int touch( void );
984263bc
MD
59
60int
61touch(void)
62{
63 int afd;
64
65 afd = open_archive(O_RDWR);
66
67 if (!get_arobj(afd) ||
68 strncmp(RANLIBMAG, chdr.name, sizeof(RANLIBMAG) - 1)) {
69 warnx("%s: no symbol table", archive);
70 return(1);
71 }
72 settime(afd);
73 close_archive(afd);
74 return(0);
75}
76
77void
78settime(afd)
79 int afd;
80{
81 struct ar_hdr *hdr;
82 off_t size;
83 char buf[50];
84
85 size = SARMAG + sizeof(hdr->ar_name);
86 if (lseek(afd, size, SEEK_SET) == (off_t)-1)
87 error(archive);
88 (void)sprintf(buf, "%-12ld", (long)time((time_t *)NULL) + RANLIBSKEW);
89 if (write(afd, buf, sizeof(hdr->ar_date)) != sizeof(hdr->ar_date))
90 error(archive);
91}