Delete src/tools/tools/tcl_bmake. We don't have tcl in the source so the
[dragonfly.git] / usr.bin / mktemp / mktemp.c
bloba7d0bb2ea647a7462f3d556bcd9a9af92aa63ac2
1 /*-
2 * Copyright (c) 1994, 1995, 1996, 1998 Peter Wemm <peter@netplex.com.au>
3 * All rights reserved.
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.
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.
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 $
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.
39 #include <err.h>
40 #include <paths.h>
41 #include <stdio.h>
42 #include <stdlib.h>
43 #include <string.h>
44 #include <unistd.h>
46 static void usage(void);
48 int
49 main(int argc, char **argv)
51 int c, fd, ret;
52 const char *tmpdir, *prefix;
53 char *name;
54 int dflag, qflag, tflag, uflag;
56 ret = dflag = qflag = tflag = uflag = 0;
57 prefix = "mktemp";
58 name = NULL;
60 while ((c = getopt(argc, argv, "dqt:u")) != -1)
61 switch (c) {
62 case 'd':
63 dflag++;
64 break;
66 case 'q':
67 qflag++;
68 break;
70 case 't':
71 prefix = optarg;
72 tflag++;
73 break;
75 case 'u':
76 uflag++;
77 break;
79 default:
80 usage();
83 argc -= optind;
84 argv += optind;
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");
99 } else if (argc < 1) {
100 usage();
103 /* generate all requested files */
104 while (name != NULL || argc > 0) {
105 if (name == NULL) {
106 name = strdup(argv[0]);
107 argv++;
108 argc--;
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);
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);
134 if (name)
135 free(name);
136 name = NULL;
138 return (ret);
141 static void
142 usage(void)
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);