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
60
61
62
63
64
65
66
67
68
|
/*++
/* NAME
/* tok822_rewrite 3
/* SUMMARY
/* address rewriting, client interface
/* SYNOPSIS
/* #include <tok822.h>
/*
/* TOK822 *tok822_rewrite(addr, how)
/* TOK822 *addr;
/* char *how;
/* DESCRIPTION
/* tok822_rewrite() takes an address token tree and transforms
/* it according to the rule set specified via \fIhow\fR. The
/* result is the \fIaddr\fR argument.
/* LICENSE
/* .ad
/* .fi
/* The Secure Mailer license must be distributed with this software.
/* AUTHOR(S)
/* Wietse Venema
/* IBM T.J. Watson Research
/* P.O. Box 704
/* Yorktown Heights, NY 10598, USA
/*--*/
/* System library. */
#include <sys_defs.h>
/* Utility library. */
#include <vstring.h>
#include <msg.h>
/* Global library. */
#include "rewrite_clnt.h"
#include "tok822.h"
/* tok822_rewrite - address rewriting interface */
TOK822 *tok822_rewrite(TOK822 *addr, const char *how)
{
VSTRING *input_ext_form = vstring_alloc(100);
VSTRING *canon_ext_form = vstring_alloc(100);
if (addr->type != TOK822_ADDR)
msg_panic("tok822_rewrite: non-address token type: %d", addr->type);
/*
* Externalize the token tree, ship it to the rewrite service, and parse
* the result. Shipping external form is much simpler than shipping parse
* trees.
*/
tok822_externalize(input_ext_form, addr->head, TOK822_STR_DEFL);
if (msg_verbose)
msg_info("tok822_rewrite: input: %s", vstring_str(input_ext_form));
rewrite_clnt(how, vstring_str(input_ext_form), canon_ext_form);
if (msg_verbose)
msg_info("tok822_rewrite: result: %s", vstring_str(canon_ext_form));
tok822_free_tree(addr->head);
addr->head = tok822_scan(vstring_str(canon_ext_form), &addr->tail);
vstring_free(input_ext_form);
vstring_free(canon_ext_form);
return (addr);
}
|
