1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
2 *@ Handling of attachments.
4 * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
5 * Copyright (c) 2012 - 2015 Steffen (Daode) Nurpmeso <sdaoden@users.sf.net>.
8 * Copyright (c) 1980, 1993
9 * The Regents of the University of California. All rights reserved.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 #define n_FILE attachments
38 #ifndef HAVE_AMALGAMATION
42 /* We use calloc() for struct attachment */
45 /* Fill in some attachment fields; don't be interactive if number==0 */
46 static struct attachment
* _fill_in(struct attachment
*ap
,
47 char const *file
, ui32_t number
);
49 /* Ask the user to edit file names and other data for the given attachment */
50 static struct attachment
* _read_attachment_data(struct attachment
*ap
,
53 /* Try to create temporary charset converted version */
55 static int _attach_iconv(struct attachment
*ap
);
58 static struct attachment
*
59 _fill_in(struct attachment
*ap
, char const *file
, ui32_t number
)
61 /* XXX The "attachment-ask-content-*" variables are left undocumented
62 * since "they are for RFC connoisseurs only" ;) */
66 ap
->a_input_charset
= ap
->a_charset
= NULL
;
69 if ((file
= strrchr(file
, '/')) != NULL
)
74 ap
->a_content_type
= mime_type_by_filename(file
);
75 if (number
> 0 && ok_blook(attachment_ask_content_type
)) {
76 snprintf(prefix
, sizeof prefix
, "#%u\tContent-Type: ", number
);
77 ap
->a_content_type
= readstr_input(prefix
, ap
->a_content_type
);
80 if (number
> 0 && ok_blook(attachment_ask_content_disposition
)) {
81 snprintf(prefix
, sizeof prefix
, "#%u\tContent-Disposition: ", number
);
82 if ((ap
->a_content_disposition
= readstr_input(prefix
,
83 ap
->a_content_disposition
)) == NULL
)
87 ap
->a_content_disposition
= "attachment";
89 if (number
> 0 && ok_blook(attachment_ask_content_id
)) {
90 snprintf(prefix
, sizeof prefix
, "#%u\tContent-ID: ", number
);
91 ap
->a_content_id
= readstr_input(prefix
, ap
->a_content_id
);
93 ap
->a_content_id
= NULL
;
95 if (number
> 0 && ok_blook(attachment_ask_content_description
)) {
96 snprintf(prefix
, sizeof prefix
, "#%u\tContent-Description: ", number
);
97 ap
->a_content_description
= readstr_input(prefix
,
98 ap
->a_content_description
);
104 static sigjmp_buf __atticonv_jmp
; /* TODO oneday, we won't need it no more */
105 static int volatile __atticonv_sig
; /* TODO oneday, we won't need it no more */
107 __atticonv_onsig(int sig
) /* TODO someday, we won't need it no more */
109 NYD_X
; /* Signal handler */
110 __atticonv_sig
= sig
;
111 siglongjmp(__atticonv_jmp
, 1);
114 static struct attachment
*
115 _read_attachment_data(struct attachment
* volatile ap
, ui32_t number
)
117 sighandler_type
volatile ohdl
;
119 char const *cslc
= NULL
/*cc uninit?*/, *cp
, *defcs
;
122 hold_sigs(); /* TODO until we have signal manager (see TODO) */
123 ohdl
= safe_signal(SIGINT
, SIG_IGN
);
125 if (sigsetjmp(__atticonv_jmp
, 1)) {
129 safe_signal(SIGINT
, &__atticonv_onsig
);
132 ap
= csalloc(1, sizeof *ap
);
133 else if (ap
->a_msgno
) {
134 char *ecp
= salloc(24);
135 snprintf(ecp
, 24, "#%" PRIu32
, (ui32_t
)ap
->a_msgno
);
137 ap
->a_content_description
= NULL
;
139 } else if (ap
->a_conv
== AC_TMPFILE
) {
141 DBG( ap
->a_tmpf
= NULL
; )
142 ap
->a_conv
= AC_DEFAULT
;
145 rele_sigs(); /* TODO until we have signal manager (see TODO) */
146 snprintf(prefix
, sizeof prefix
, _("#%" PRIu32
"\tfilename: "), number
);
148 if ((cp
= ap
->a_name
) != NULL
)
149 cp
= fexpand_nshell_quote(cp
);
150 if ((cp
= readstr_input(prefix
, cp
)) == NULL
) {
156 /* May be a message number (XXX add "AC_MSG", use that not .a_msgno) */
159 int msgno
= (int)strtol(cp
+ 1, &ecp
, 10);
161 if (msgno
> 0 && msgno
<= msgCount
&& *ecp
== '\0') {
164 ap
->a_content_type
= ap
->a_content_disposition
=
165 ap
->a_content_id
= NULL
;
166 ap
->a_content_description
= _("Attached message content");
167 if (options
& OPT_INTERACTIVE
)
168 printf(_("~@: added message #%" PRIu32
"\n"), (ui32_t
)msgno
);
173 if ((cp
= fexpand(cp
, FEXP_LOCAL
| FEXP_NSHELL
)) != NULL
&&
181 ap
= _fill_in(ap
, cp
, number
);
184 * Character set of attachments: enum attach_conv
186 cslc
= charset_get_lc();
188 if (!(options
& OPT_INTERACTIVE
))
190 if ((cp
= ap
->a_content_type
) != NULL
&& ascncasecmp(cp
, "text/", 5) != 0 &&
191 !getapproval(_("Filename doesn't indicate text content - "
192 "edit charsets nonetheless? "), TRU1
)) {
193 ap
->a_conv
= AC_DEFAULT
;
198 charset_iter_reset(NULL
);
201 snprintf(prefix
, sizeof prefix
, _("#%" PRIu32
"\tinput charset: "),
203 if ((defcs
= ap
->a_input_charset
) == NULL
)
205 cp
= ap
->a_input_charset
= readstr_input(prefix
, defcs
);
207 if (!(options
& OPT_INTERACTIVE
)) {
209 ap
->a_conv
= (cp
!= NULL
) ? AC_FIX_INCS
: AC_DEFAULT
;
214 snprintf(prefix
, sizeof prefix
,
215 _("#%" PRIu32
"\toutput (send) charset: "), number
);
216 if ((defcs
= ap
->a_charset
) == NULL
)
217 defcs
= charset_iter();
218 defcs
= ap
->a_charset
= readstr_input(prefix
, defcs
);
220 /* Input, no output -> input=as given, output=no conversion at all */
221 if (cp
!= NULL
&& defcs
== NULL
) {
222 ap
->a_conv
= AC_FIX_INCS
;
226 /* No input, no output -> input=*ttycharset*, output=iterator */
227 if (cp
== NULL
&& defcs
== NULL
) {
228 ap
->a_conv
= AC_DEFAULT
;
229 ap
->a_input_charset
= cslc
;
230 ap
->a_charset
= charset_iter();
231 assert(charset_iter_is_valid());
234 /* No input, output -> input=*ttycharset*, output=as given */
235 else if (cp
== NULL
&& defcs
!= NULL
) {
236 ap
->a_conv
= AC_FIX_OUTCS
;
237 ap
->a_input_charset
= cslc
;
239 /* Input, output -> try conversion from input=as given to output=as given */
241 printf(_("Trying conversion from %s to %s\n"), ap
->a_input_charset
,
243 if (_attach_iconv(ap
))
244 ap
->a_conv
= AC_TMPFILE
;
246 ap
->a_conv
= AC_DEFAULT
;
247 ap
->a_input_charset
= cp
;
248 ap
->a_charset
= defcs
;
249 if (!charset_iter_is_valid()) {
250 printf(_("*sendcharsets* and *charset-8bit* iteration "
251 "exhausted, restarting\n"));
258 if (options
& OPT_INTERACTIVE
)
259 printf(_("~@: added attachment \"%s\"\n"), ap
->a_name
);
261 safe_signal(SIGINT
, ohdl
);/* TODO until we have signal manager (see TODO) */
262 if (__atticonv_sig
!= 0) {
265 sigaddset(&nset
, SIGINT
);
266 sigprocmask(SIG_UNBLOCK
, &nset
, NULL
);
275 _attach_iconv(struct attachment
*ap
)
277 struct str oul
= {NULL
, 0}, inl
= {NULL
, 0};
278 FILE *fo
= NULL
, *fi
= NULL
;
283 hold_sigs(); /* TODO until we have signal manager (see TODO) */
285 icp
= n_iconv_open(ap
->a_charset
, ap
->a_input_charset
);
286 if (icp
== (iconv_t
)-1) {
290 n_perr(_("iconv_open"), 0);
294 if ((fi
= Fopen(ap
->a_name
, "r")) == NULL
) {
295 n_perr(ap
->a_name
, 0);
300 if ((fo
= Ftmp(NULL
, "atic", OF_RDWR
| OF_UNLINK
| OF_REGISTER
, 0600)) ==
302 n_perr(_("temporary mail file"), 0);
307 if (fgetline(&inl
.s
, &lbsize
, &cnt
, &inl
.l
, fi
, 0) == NULL
) {
310 n_perr(_("I/O read error occurred"), 0);
314 if (n_iconv_str(icp
, &oul
, &inl
, NULL
, FAL0
) != 0)
316 if ((inl
.l
= fwrite(oul
.s
, sizeof *oul
.s
, oul
.l
, fo
)) != oul
.l
) {
317 n_perr(_("I/O write error occurred"), 0);
331 if (icp
!= (iconv_t
)-1)
334 rele_sigs(); /* TODO until we have signal manager (see TODO) */
339 n_err(_("Cannot convert from %s to %s\n"),
340 ap
->a_input_charset
, ap
->a_charset
);
347 #endif /* HAVE_ICONV */
349 /* TODO add_attachment(): also work with **aphead, not *aphead ... */
350 FL
struct attachment
*
351 add_attachment(struct attachment
*aphead
, char *file
, struct attachment
**newap
)
353 struct attachment
*nap
= NULL
, *ap
;
356 if ((file
= fexpand(file
, FEXP_LOCAL
| FEXP_NSHELL
)) == NULL
)
358 if (access(file
, R_OK
) != 0)
361 nap
= _fill_in(csalloc(1, sizeof *nap
), file
, 0);
364 if (aphead
!= NULL
) {
365 for (ap
= aphead
; ap
->a_flink
!= NULL
; ap
= ap
->a_flink
)
380 append_attachments(struct attachment
**aphead
, char *names
)
383 struct attachment
*xaph
, *nap
;
386 while ((cp
= n_strsep(&names
, ',', 1)) != NULL
) {
387 xaph
= add_attachment(*aphead
, fexpand_nshell_quote(cp
), &nap
);
390 if (options
& OPT_INTERACTIVE
)
391 printf(_("~@: added attachment \"%s\"\n"), nap
->a_name
);
399 edit_attachments(struct attachment
**aphead
)
401 struct attachment
*ap
, *fap
, *bap
;
405 printf(_("# Be aware that \"\\\" must be escaped: \"\\\\\", \"\\$HOME\"\n"));
407 /* Modify already present ones? */
408 for (ap
= *aphead
; ap
!= NULL
; ap
= fap
) {
409 if (_read_attachment_data(ap
, attno
) != NULL
) {
415 if ((bap
= ap
->a_blink
) != NULL
)
421 /*else*//* TODO until we have signal manager (see TODO) */
422 if (__atticonv_sig
!= 0)
429 if ((bap
= *aphead
) != NULL
)
430 while (bap
->a_flink
!= NULL
)
432 while ((fap
= _read_attachment_data(NULL
, attno
)) != NULL
) {
442 if (__atticonv_sig
!= 0) /* TODO until we have signal manager (see TODO) */