bug fix release
[gnupg.git] / g10 / openfile.c
1 /* openfile.c
2  *      Copyright (C) 1998 Free Software Foundation, Inc.
3  *
4  * This file is part of GNUPG.
5  *
6  * GNUPG is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * GNUPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <assert.h>
26 #include <errno.h>
27 #include <unistd.h>
28 #include "util.h"
29 #include "memory.h"
30 #include "ttyio.h"
31 #include "options.h"
32 #include "main.h"
33 #include "status.h"
34 #include "i18n.h"
35
36
37 /****************
38  * Check whether FNAME exists and ask if it's okay to overwrite an
39  * existing one.
40  * Returns: True: it's okay to overwrite or the file does not exist
41  *          False: Do not overwrite
42  */
43 int
44 overwrite_filep( const char *fname )
45 {
46     if( !fname || (*fname == '-' && !fname[1]) )
47         return 1; /* writing to stdout is always okay */
48
49     if( access( fname, F_OK ) )
50         return 1; /* does not exist */
51
52     /* fixme: add some backup stuff in case of overwrite */
53     if( opt.answer_yes )
54         return 1;
55     if( opt.answer_no || opt.batch )
56         return 0;  /* do not overwrite */
57
58     tty_printf(_("File '%s' exists. "), fname);
59     if( cpr_get_answer_is_yes(N_("openfile.overwrite.okay"),
60                                _("Overwrite (y/N)? ")) )
61         return 1;
62     return 0;
63 }
64
65
66 /****************
67  * Make an output filename for the inputfile INAME.
68  * Returns an IOBUF and an errorcode
69  * Mode 0 = use ".gpg"
70  *      1 = use ".asc"
71  *      2 = use ".sig"
72  */
73 int
74 open_outfile( const char *iname, int mode, IOBUF *a )
75 {
76     int rc = 0;
77
78     *a = NULL;
79     if( (!iname || (*iname=='-' && !iname[1])) && !opt.outfile ) {
80         if( !(*a = iobuf_create(NULL)) ) {
81             log_error("can't open [stdout]: %s\n", strerror(errno) );
82             rc = G10ERR_CREATE_FILE;
83         }
84         else if( opt.verbose )
85             log_info("writing to stdout\n");
86     }
87     else {
88         char *buf=NULL;
89         const char *name;
90
91         if( opt.outfile )
92             name = opt.outfile;
93         else {
94             buf = m_alloc(strlen(iname)+4+1);
95             strcpy(stpcpy(buf,iname), mode==1 ? ".asc" :
96                                       mode==2 ? ".sig" : ".gpg");
97             name = buf;
98         }
99         if( overwrite_filep( name ) ) {
100             if( !(*a = iobuf_create( name )) ) {
101                 log_error("can't create %s: %s\n", name, strerror(errno) );
102                 rc = G10ERR_CREATE_FILE;
103             }
104             else if( opt.verbose )
105                 log_info("writing to '%s'\n", name );
106         }
107         else
108             rc = G10ERR_FILE_EXISTS;
109         m_free(buf);
110     }
111     return rc;
112 }
113
114
115 /****************
116  * Try to open a file without the extension ".sig" or ".asc"
117  * Return NULL if such a file is not available.
118  */
119 IOBUF
120 open_sigfile( const char *iname )
121 {
122     IOBUF a = NULL;
123     size_t len;
124
125     if( iname && !(*iname == '-' && !iname[1]) ) {
126         len = strlen(iname);
127         if( len > 4 && ( !strcmp(iname + len - 4, ".sig")
128                         || !strcmp(iname + len - 4, ".asc")) ) {
129             char *buf;
130             buf = m_strdup(iname);
131             buf[len-4] = 0 ;
132             a = iobuf_open( buf );
133             if( opt.verbose )
134                 log_info("assuming signed data in '%s'\n", buf );
135             m_free(buf);
136         }
137     }
138     return a;
139 }
140