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_classify_filename(file
);
75 if (number
> 0 && ok_blook(attachment_ask_content_type
)) {
76 snprintf(prefix
, sizeof prefix
, "#%-5" PRIu32
" Content-Type: ", number
);
77 ap
->a_content_type
= n_lex_input_cp_addhist(prefix
, ap
->a_content_type
,
81 if (number
> 0 && ok_blook(attachment_ask_content_disposition
)) {
82 snprintf(prefix
, sizeof prefix
, "#%-5" PRIu32
" Content-Disposition: ",
84 if ((ap
->a_content_disposition
= n_lex_input_cp_addhist(prefix
,
85 ap
->a_content_disposition
, TRU1
)) == NULL
)
89 ap
->a_content_disposition
= "attachment";
91 if (number
> 0 && ok_blook(attachment_ask_content_id
)) {
92 snprintf(prefix
, sizeof prefix
, "#%-5" PRIu32
" Content-ID: ", number
);
93 ap
->a_content_id
= n_lex_input_cp_addhist(prefix
, ap
->a_content_id
, TRU1
);
95 ap
->a_content_id
= NULL
;
97 if (number
> 0 && ok_blook(attachment_ask_content_description
)) {
98 snprintf(prefix
, sizeof prefix
, "#%-5" PRIu32
" Content-Description: ",
100 ap
->a_content_description
= n_lex_input_cp_addhist(prefix
,
101 ap
->a_content_description
, TRU1
);
107 static sigjmp_buf __atticonv_jmp
; /* TODO oneday, we won't need it no more */
108 static int volatile __atticonv_sig
; /* TODO oneday, we won't need it no more */
110 __atticonv_onsig(int sig
) /* TODO someday, we won't need it no more */
112 NYD_X
; /* Signal handler */
113 __atticonv_sig
= sig
;
114 siglongjmp(__atticonv_jmp
, 1);
117 static struct attachment
*
118 _read_attachment_data(struct attachment
* volatile ap
, ui32_t number
)
120 sighandler_type
volatile ohdl
;
123 struct n_string shou
, *shoup
;
124 char const *cslc
, *cp
, *defcs
;
128 shoup
= n_string_creat(&shou
);
130 hold_sigs(); /* TODO until we have signal manager (see TODO) */
131 ohdl
= safe_signal(SIGINT
, SIG_IGN
);
133 if (sigsetjmp(__atticonv_jmp
, 1)) {
137 safe_signal(SIGINT
, &__atticonv_onsig
);
140 ap
= csalloc(1, sizeof *ap
);
141 else if (ap
->a_msgno
) {
142 char *ecp
= salloc(24);
143 snprintf(ecp
, 24, "#%" PRIu32
, (ui32_t
)ap
->a_msgno
);
145 ap
->a_content_description
= NULL
;
147 } else if (ap
->a_conv
== AC_TMPFILE
) {
149 DBG( ap
->a_tmpf
= NULL
; )
150 ap
->a_conv
= AC_DEFAULT
;
153 rele_sigs(); /* TODO until we have signal manager (see TODO) */
154 snprintf(prefix
, sizeof prefix
, _("#%-5" PRIu32
" filename: "), number
);
156 if ((cp
= ap
->a_name
) != NULL
)
157 cp
= n_shell_quote_cp(cp
, FAL0
);
158 if ((cp
= n_lex_input_cp_addhist(prefix
, cp
, TRU1
)) == NULL
) {
164 shin
.s
= UNCONST(cp
);
166 if((n_shell_parse_token(shoup
, &shin
, n_SHEXP_PARSE_TRUNC
|
167 n_SHEXP_PARSE_TRIMSPACE
| n_SHEXP_PARSE_LOG
|
168 n_SHEXP_PARSE_IGNORE_EMPTY
) &
169 (n_SHEXP_STATE_OUTPUT
| n_SHEXP_STATE_ERR_MASK
)) !=
170 n_SHEXP_STATE_OUTPUT
)
174 cp
= n_string_cp(shoup
);
176 /* May be a message number (XXX add "AC_MSG", use that not .a_msgno) */
179 int msgno
= (int)strtol(cp
+ 1, &ecp
, 10);
181 if (msgno
> 0 && msgno
<= msgCount
&& *ecp
== '\0') {
184 ap
->a_content_type
= ap
->a_content_disposition
=
185 ap
->a_content_id
= NULL
;
186 ap
->a_content_description
= _("Attached message content");
187 if (options
& OPT_INTERACTIVE
)
188 printf(_("~@: added message #%" PRIu32
"\n"), (ui32_t
)msgno
);
193 if ((cp
= fexpand(cp
, FEXP_LOCAL
| FEXP_NVAR
)) != NULL
&&
201 ap
= _fill_in(ap
, cp
, number
);
204 * Character set of attachments: enum attach_conv
206 cslc
= charset_get_lc();
208 if (!(options
& OPT_INTERACTIVE
))
210 if ((cp
= ap
->a_content_type
) != NULL
&& ascncasecmp(cp
, "text/", 5) != 0 &&
211 !getapproval(_("File doesn't indicate text content, "
212 "edit character sets"), TRU1
)) {
213 ap
->a_conv
= AC_DEFAULT
;
218 charset_iter_reset(NULL
);
221 snprintf(prefix
, sizeof prefix
, _("#%-5" PRIu32
" input charset: "),
223 if ((defcs
= ap
->a_input_charset
) == NULL
)
225 cp
= ap
->a_input_charset
= n_lex_input_cp_addhist(prefix
, defcs
, TRU1
);
227 if (!(options
& OPT_INTERACTIVE
)) {
229 ap
->a_conv
= (cp
!= NULL
) ? AC_FIX_INCS
: AC_DEFAULT
;
234 snprintf(prefix
, sizeof prefix
,
235 _("#%-5" PRIu32
" output (send) charset: "), number
);
236 if ((defcs
= ap
->a_charset
) == NULL
)
237 defcs
= charset_iter();
238 defcs
= ap
->a_charset
= n_lex_input_cp_addhist(prefix
, defcs
, TRU1
);
240 /* Input, no output -> input=as given, output=no conversion at all */
241 if (cp
!= NULL
&& defcs
== NULL
) {
242 ap
->a_conv
= AC_FIX_INCS
;
246 /* No input, no output -> input=*ttycharset*, output=iterator */
247 if (cp
== NULL
&& defcs
== NULL
) {
248 ap
->a_conv
= AC_DEFAULT
;
249 ap
->a_input_charset
= cslc
;
250 ap
->a_charset
= charset_iter();
251 assert(charset_iter_is_valid());
254 /* No input, output -> input=*ttycharset*, output=as given */
255 else if (cp
== NULL
&& defcs
!= NULL
) {
256 ap
->a_conv
= AC_FIX_OUTCS
;
257 ap
->a_input_charset
= cslc
;
259 /* Input, output -> try conversion from input=as given to output=as given */
261 printf(_("Trying conversion from %s to %s\n"), ap
->a_input_charset
,
263 if (_attach_iconv(ap
))
264 ap
->a_conv
= AC_TMPFILE
;
266 ap
->a_conv
= AC_DEFAULT
;
267 ap
->a_input_charset
= cp
;
268 ap
->a_charset
= defcs
;
269 if (!charset_iter_is_valid()) {
270 printf(_("*sendcharsets* and *charset-8bit* iteration "
271 "exhausted, restarting\n"));
278 if (options
& OPT_INTERACTIVE
)
279 printf(_("Added attachment %s\n"), n_shell_quote_cp(ap
->a_name
, FAL0
));
283 safe_signal(SIGINT
, ohdl
);/* TODO until we have signal manager (see TODO) */
284 if (__atticonv_sig
!= 0) {
287 sigaddset(&nset
, SIGINT
);
288 sigprocmask(SIG_UNBLOCK
, &nset
, NULL
);
297 _attach_iconv(struct attachment
*ap
)
299 struct str oul
= {NULL
, 0}, inl
= {NULL
, 0};
300 FILE *fo
= NULL
, *fi
= NULL
;
305 hold_sigs(); /* TODO until we have signal manager (see TODO) */
307 icp
= n_iconv_open(ap
->a_charset
, ap
->a_input_charset
);
308 if (icp
== (iconv_t
)-1) {
312 n_perr(_("iconv_open"), 0);
316 if ((fi
= Fopen(ap
->a_name
, "r")) == NULL
) {
317 n_perr(ap
->a_name
, 0);
322 if ((fo
= Ftmp(NULL
, "aticonv", OF_RDWR
| OF_UNLINK
| OF_REGISTER
)) ==
324 n_perr(_("temporary mail file"), 0);
329 if (fgetline(&inl
.s
, &lbsize
, &cnt
, &inl
.l
, fi
, 0) == NULL
) {
332 n_perr(_("I/O read error occurred"), 0);
336 if (n_iconv_str(icp
, &oul
, &inl
, NULL
, FAL0
) != 0)
338 if ((inl
.l
= fwrite(oul
.s
, sizeof *oul
.s
, oul
.l
, fo
)) != oul
.l
) {
339 n_perr(_("I/O write error occurred"), 0);
353 if (icp
!= (iconv_t
)-1)
356 rele_sigs(); /* TODO until we have signal manager (see TODO) */
361 n_err(_("Cannot convert from %s to %s\n"),
362 ap
->a_input_charset
, ap
->a_charset
);
369 #endif /* HAVE_ICONV */
371 /* TODO add_attachment(): also work with **aphead, not *aphead ... */
372 FL
struct attachment
*
373 add_attachment(struct attachment
*aphead
, char *file
, struct attachment
**newap
)
375 struct attachment
*nap
= NULL
, *ap
;
378 if ((file
= fexpand(file
, FEXP_LOCAL
| FEXP_NVAR
)) == NULL
)
380 if (access(file
, R_OK
) != 0)
383 nap
= _fill_in(csalloc(1, sizeof *nap
), file
, 0);
386 if (aphead
!= NULL
) {
387 for (ap
= aphead
; ap
->a_flink
!= NULL
; ap
= ap
->a_flink
)
402 append_attachments(struct attachment
**aphead
, char *names
){
404 struct n_string shou
, *shoup
;
407 shoup
= n_string_creat_auto(&shou
);
409 for(shin
.s
= names
, shin
.l
= UIZ_MAX
;;){
410 struct attachment
*xaph
, *nap
;
411 enum n_shexp_state shs
;
413 shs
= n_shell_parse_token(shoup
, &shin
, n_SHEXP_PARSE_TRUNC
|
414 n_SHEXP_PARSE_TRIMSPACE
| n_SHEXP_PARSE_LOG
|
415 n_SHEXP_PARSE_IFS_ADD_COMMA
| n_SHEXP_PARSE_IGNORE_EMPTY
);
416 if(shs
& n_SHEXP_STATE_ERR_MASK
)
419 if(shs
& n_SHEXP_STATE_OUTPUT
){
420 if((xaph
= add_attachment(*aphead
, n_string_cp(shoup
), &nap
)) != NULL
){
422 if(options
& OPT_INTERACTIVE
)
423 printf(_("Added attachment %s\n"),
424 n_shell_quote_cp(nap
->a_name
, FAL0
));
426 n_perr(n_string_cp(shoup
), 0);
429 if(shs
& n_SHEXP_STATE_STOP
)
437 edit_attachments(struct attachment
**aphead
)
439 struct attachment
*ap
, *fap
, *bap
;
444 static bool_t note_given
; /* v15-compat: DROP */
448 printf(_("# Only supports sh(1)ell-style quoting for file names\n"));
452 /* Modify already present ones? */
453 for (ap
= *aphead
; ap
!= NULL
; ap
= fap
) {
454 if (_read_attachment_data(ap
, attno
) != NULL
) {
460 if ((bap
= ap
->a_blink
) != NULL
)
466 /*else*//* TODO until we have signal manager (see TODO) */
467 if (__atticonv_sig
!= 0)
474 if ((bap
= *aphead
) != NULL
)
475 while (bap
->a_flink
!= NULL
)
477 while ((fap
= _read_attachment_data(NULL
, attno
)) != NULL
) {
487 if (__atticonv_sig
!= 0) /* TODO until we have signal manager (see TODO) */