e9f8ed27fd751e5d2c6020562938bb19e08eada7
[gnupg.git] / common / miscellaneous.c
1 /* miscellaneous.c - Stuff not fitting elsewhere
2  *      Copyright (C) 2003, 2006 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
29 /* Decide whether the filename is stdout or a real filename and return
30  * an appropriate string.  */
31 const char *
32 print_fname_stdout (const char *s)
33 {
34     if( !s || (*s == '-' && !s[1]) )
35         return "[stdout]";
36     return s;
37 }
38
39
40 /* Decide whether the filename is stdin or a real filename and return
41  * an appropriate string.  */
42 const char *
43 print_fname_stdin (const char *s)
44 {
45     if( !s || (*s == '-' && !s[1]) )
46         return "[stdin]";
47     return s;
48 }
49
50 /* fixme: Globally replace it by print_sanitized_buffer. */
51 void
52 print_string( FILE *fp, const byte *p, size_t n, int delim )
53 {
54   print_sanitized_buffer (fp, p, n, delim);
55 }
56
57 void
58 print_utf8_string2 ( FILE *fp, const byte *p, size_t n, int delim )
59 {
60   print_sanitized_utf8_buffer (fp, p, n, delim);
61 }
62
63 void
64 print_utf8_string( FILE *fp, const byte *p, size_t n )
65 {
66     print_utf8_string2 (fp, p, n, 0);
67 }
68
69 char *
70 make_printable_string (const void *p, size_t n, int delim )
71 {
72   return sanitize_buffer (p, n, delim);
73 }
74
75
76 /*
77  * Check if the file is compressed.
78  */
79 int
80 is_file_compressed (const char *s, int *ret_rc)
81 {
82     iobuf_t a;
83     byte buf[4];
84     int i, rc = 0;
85     int overflow;
86
87     struct magic_compress_s {
88         size_t len;
89         byte magic[4];
90     } magic[] = {
91         { 3, { 0x42, 0x5a, 0x68, 0x00 } }, /* bzip2 */
92         { 3, { 0x1f, 0x8b, 0x08, 0x00 } }, /* gzip */
93         { 4, { 0x50, 0x4b, 0x03, 0x04 } }, /* (pk)zip */
94     };
95     
96     if ( iobuf_is_pipe_filename (s) || !ret_rc )
97         return 0; /* We can't check stdin or no file was given */
98
99     a = iobuf_open( s );
100     if ( a == NULL ) {
101         *ret_rc = gpg_error_from_errno (errno);
102         return 0;
103     }
104
105     if ( iobuf_get_filelength( a, &overflow ) < 4 && !overflow) {
106         *ret_rc = 0;
107         goto leave;
108     }
109
110     if ( iobuf_read( a, buf, 4 ) == -1 ) {
111         *ret_rc = a->error;
112         goto leave;
113     }
114
115     for ( i = 0; i < DIM( magic ); i++ ) {
116         if ( !memcmp( buf, magic[i].magic, magic[i].len ) ) {
117             *ret_rc = 0;
118             rc = 1;
119             break;
120         }
121     }
122
123 leave:    
124     iobuf_close( a );
125     return rc;
126 }
127
128
129 /* Try match against each substring of multistr, delimited by | */
130 int
131 match_multistr (const char *multistr,const char *match)
132 {
133   do
134     {
135       size_t seglen = strcspn (multistr,"|");
136       if (!seglen)
137         break;
138       /* Using the localized strncasecmp! */
139       if (strncasecmp(multistr,match,seglen)==0)
140         return 1;
141       multistr += seglen;
142       if (*multistr == '|')
143         multistr++;
144     }
145   while (*multistr);
146
147   return 0;
148 }
149
150