Merge from vendor branch LESS:
[dragonfly.git] / usr.bin / mktemp / mktemp.c
1 /*-
2  * Copyright (c) 1994, 1995, 1996, 1998 Peter Wemm <peter@netplex.com.au>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/usr.bin/mktemp/mktemp.c,v 1.2.6.1 2000/10/15 11:37:43 alex Exp $
27  * $DragonFly: src/usr.bin/mktemp/mktemp.c,v 1.4 2005/01/01 21:10:43 cpressey Exp $
28  */
29
30 /*
31  * This program was originally written long ago, originally for a non
32  * BSD-like OS without mkstemp().  It's been modified over the years
33  * to use mkstemp() rather than the original O_CREAT|O_EXCL/fstat/lstat
34  * etc style hacks.
35  * A cleanup, misc options and mkdtemp() calls were added to try and work
36  * more like the OpenBSD version - which was first to publish the interface.
37  */
38
39 #include <err.h>
40 #include <paths.h>
41 #include <stdio.h>
42 #include <stdlib.h>
43 #include <string.h>
44 #include <unistd.h>
45
46 static void usage(void);
47
48 int
49 main(int argc, char **argv)
50 {
51         int c, fd, ret;
52         const char *tmpdir, *prefix;
53         char *name;
54         int dflag, qflag, tflag, uflag;
55
56         ret = dflag = qflag = tflag = uflag = 0;
57         prefix = "mktemp";
58         name = NULL;
59
60         while ((c = getopt(argc, argv, "dqt:u")) != -1)
61                 switch (c) {
62                 case 'd':
63                         dflag++;
64                         break;
65
66                 case 'q':
67                         qflag++;
68                         break;
69
70                 case 't':
71                         prefix = optarg;
72                         tflag++;
73                         break;
74
75                 case 'u':
76                         uflag++;
77                         break;
78
79                 default:
80                         usage();
81                 }
82
83         argc -= optind;
84         argv += optind;
85
86         if (tflag) {
87                 tmpdir = getenv("TMPDIR");
88                 if (tmpdir == NULL)
89                         asprintf(&name, "%s%s.XXXXXXXX", _PATH_TMP, prefix);
90                 else
91                         asprintf(&name, "%s/%s.XXXXXXXX", tmpdir, prefix);
92                 /* if this fails, the program is in big trouble already */
93                 if (name == NULL) {
94                         if (qflag)
95                                 return (1);
96                         else
97                                 errx(1, "cannot generate template");
98                 }
99         } else if (argc < 1) {
100                 usage();
101         }
102                 
103         /* generate all requested files */
104         while (name != NULL || argc > 0) {
105                 if (name == NULL) {
106                         name = strdup(argv[0]);
107                         argv++;
108                         argc--;
109                 }
110
111                 if (dflag) {
112                         if (mkdtemp(name) == NULL) {
113                                 ret = 1;
114                                 if (!qflag)
115                                         warn("mkdtemp failed on %s", name);
116                         } else {
117                                 printf("%s\n", name);
118                                 if (uflag)
119                                         rmdir(name);
120                         }
121                 } else {
122                         fd = mkstemp(name);
123                         if (fd < 0) {
124                                 ret = 1;
125                                 if (!qflag)
126                                         warn("mkstemp failed on %s", name);
127                         } else {
128                                 close(fd);
129                                 if (uflag)
130                                         unlink(name);
131                                 printf("%s\n", name);
132                         }
133                 }
134                 if (name)
135                         free(name);
136                 name = NULL;
137         }
138         return (ret);
139 }
140
141 static void
142 usage(void)
143 {
144         fprintf(stderr,
145                 "usage: mktemp [-d] [-q] [-t prefix] [-u] template ...\n");
146         fprintf(stderr,
147                 "       mktemp [-d] [-q] [-u] -t prefix \n");
148         exit (1);
149 }