* gettime.c (asctimestamp): Add a note on a non-avoidable gcc warning.
[gnupg.git] / common / miscellaneous.c
1 /* miscellaneous.c - Stuff not fitting elsewhere
2  *      Copyright (C) 2003 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 <stdlib.h>
23 #include <errno.h>
24
25 #include "util.h"
26 #include "iobuf.h"
27
28 /* Same as asprintf but return an allocated buffer suitable to be
29    freed using xfree.  This function simply dies on memory failure,
30    thus no extra check is required. */
31 char *
32 xasprintf (const char *fmt, ...)
33 {
34   va_list ap;
35   char *buf, *p;
36
37   va_start (ap, fmt);
38   if (vasprintf (&buf, fmt, ap) < 0)
39     log_fatal ("asprintf failed: %s\n", strerror (errno));
40   va_end (ap);
41   p = xstrdup (buf);
42   free (buf);
43   return p;
44 }
45
46
47
48 /* Decide whether the filename is stdout or a real filename and return
49  * an appropriate string.  */
50 const char *
51 print_fname_stdout (const char *s)
52 {
53     if( !s || (*s == '-' && !s[1]) )
54         return "[stdout]";
55     return s;
56 }
57
58
59 /* Decide whether the filename is stdin or a real filename and return
60  * an appropriate string.  */
61 const char *
62 print_fname_stdin (const char *s)
63 {
64     if( !s || (*s == '-' && !s[1]) )
65         return "[stdin]";
66     return s;
67 }
68
69 void
70 print_string( FILE *fp, const byte *p, size_t n, int delim )
71 {
72   print_sanitized_buffer (fp, p, n, delim);
73 }
74
75 void
76 print_utf8_string2 ( FILE *fp, const byte *p, size_t n, int delim )
77 {
78   print_sanitized_utf8_buffer (fp, p, n, delim);
79 }
80
81 void
82 print_utf8_string( FILE *fp, const byte *p, size_t n )
83 {
84     print_utf8_string2 (fp, p, n, 0);
85 }
86
87 char *
88 make_printable_string( const byte *p, size_t n, int delim )
89 {
90   return sanitize_buffer (p, n, delim);
91 }
92
93
94 /*
95  * Check if the file is compressed.
96  */
97 int
98 is_file_compressed (const char *s, int *ret_rc)
99 {
100     iobuf_t a;
101     byte buf[4];
102     int i, rc = 0;
103
104     struct magic_compress_s {
105         size_t len;
106         byte magic[4];
107     } magic[] = {
108         { 3, { 0x42, 0x5a, 0x68, 0x00 } }, /* bzip2 */
109         { 3, { 0x1f, 0x8b, 0x08, 0x00 } }, /* gzip */
110         { 4, { 0x50, 0x4b, 0x03, 0x04 } }, /* (pk)zip */
111     };
112     
113     if ( !s || (*s == '-' && !s[1]) || !ret_rc )
114         return 0; /* We can't check stdin or no file was given */
115
116     a = iobuf_open( s );
117     if ( a == NULL ) {
118         *ret_rc = gpg_error_from_errno (errno);
119         return 0;
120     }
121
122     if ( iobuf_get_filelength( a ) < 4 ) {
123         *ret_rc = 0;
124         goto leave;
125     }
126
127     if ( iobuf_read( a, buf, 4 ) == -1 ) {
128         *ret_rc = a->error;
129         goto leave;
130     }
131
132     for ( i = 0; i < DIM( magic ); i++ ) {
133         if ( !memcmp( buf, magic[i].magic, magic[i].len ) ) {
134             *ret_rc = 0;
135             rc = 1;
136             break;
137         }
138     }
139
140 leave:    
141     iobuf_close( a );
142     return rc;
143 }
144
145
146