File: refile.c

package info (click to toggle)
nmh 1.8-4
  • links: PTS
  • area: main
  • in suites: forky
  • size: 7,860 kB
  • sloc: ansic: 50,445; sh: 22,697; makefile: 1,138; lex: 740; perl: 509; yacc: 265
file content (59 lines) | stat: -rw-r--r-- 1,271 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
/* refile.c -- call the "fileproc" to refile the
 *          -- msg or draft into another folder
 *
 * This code is Copyright (c) 2002, by the authors of nmh.  See the
 * COPYRIGHT file in the root directory of the nmh distribution for
 * complete copyright information.
 */

#include "h/mh.h"
#include "pidwait.h"
#include "refile.h"
#include "getcpy.h"
#include "context_save.h"
#include "utils.h"
#include "arglist.h"
#include "error.h"
#include "globals.h"


int
refile (char **arg, char *file)
{
    pid_t pid;
    int vecp;
    char **vec;
    char *program;

    vec = argsplit(fileproc, &program, &vecp);

    vec[vecp++] = mh_xstrdup("-nolink"); /* override bad .mh_profile defaults */
    vec[vecp++] = mh_xstrdup("-nopreserve");
    vec[vecp++] = mh_xstrdup("-file");
    vec[vecp++] = getcpy(file);

    if (arg) {
	while (*arg)
	    vec[vecp++] = mh_xstrdup(*arg++);
    }
    vec[vecp] = NULL;

    context_save();	/* save the context file */
    fflush(stdout);

    switch (pid = fork()) {
	case -1: 
	    advise ("fork", "unable to");
	    return -1;

	case 0: 
	    execvp (program, vec);
	    fprintf (stderr, "unable to exec ");
	    perror (fileproc);
	    _exit(1);

	default: 
	    arglist_free(program, vec);
	    return pidwait(pid, -1);
    }
}