cleanup_rewrite.c

[詳解]

/*++
/* NAME
/*  cleanup_rewrite 3
/* SUMMARY
/*  address canonicalization
/* SYNOPSIS
/*  #include <cleanup.h>
/*
/*  int cleanup_rewrite_external(context_name, result, addr)
/*  const char *context;
/*  VSTRING *result;
/*  const char *addr;
/*
/*  int cleanup_rewrite_internal(context_name, result, addr)
/*  const char *context;
/*  VSTRING *result;
/*  const char *addr;
/*
/*  int cleanup_rewrite_tree(context_name, tree)
/*  const char *context;
/*  TOK822  *tree;
/* DESCRIPTION
/*  This module rewrites addresses to canonical form, adding missing
/*  domains and stripping source routes etc., and performs
/*  \fIcanonical\fR map lookups to map addresses to official form.
/*  These functions return non-zero when the address was changed.
/*
/*  cleanup_rewrite_init() performs one-time initialization.
/*
/*  cleanup_rewrite_external() rewrites the external (quoted) string
/*  form of an address.
/*
/*  cleanup_rewrite_internal() is a wrapper around the
/*  cleanup_rewrite_external() routine that transforms from
/*  internal (quoted) string form to external form and back.
/*
/*  cleanup_rewrite_tree() is a wrapper around the
/*  cleanup_rewrite_external() routine that transforms from
/*  internal parse tree form to external form and back.
/*
/*  Arguments:
/* .IP context_name
/*  The name of an address rewriting context that supplies
/*  the equivalents of myorigin and mydomain.
/* .IP result
/*  Result buffer.
/* .IP addr
/*  Input buffer.
/* DIAGNOSTICS
/* 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 <msg.h>
#include <vstring.h>

/* Global library. */

#include <tok822.h>
#include <rewrite_clnt.h>
#include <quote_822_local.h>

/* Application-specific. */

#include "cleanup.h"

#define STR     vstring_str

/* cleanup_rewrite_external - rewrite address external form */

int     cleanup_rewrite_external(const char *context_name, VSTRING *result,
                         const char *addr)
{
    rewrite_clnt(context_name, addr, result);
    return (strcmp(STR(result), addr) != 0);
}

/* cleanup_rewrite_tree - rewrite address node */

int    cleanup_rewrite_tree(const char *context_name, TOK822 *tree)
{
    VSTRING *dst = vstring_alloc(100);
    VSTRING *src = vstring_alloc(100);
    int     did_rewrite;

    tok822_externalize(src, tree->head, TOK822_STR_DEFL);
    did_rewrite = cleanup_rewrite_external(context_name, dst, STR(src));
    tok822_free_tree(tree->head);
    tree->head = tok822_scan(STR(dst), &tree->tail);
    vstring_free(dst);
    vstring_free(src);
    return (did_rewrite);
}

/* cleanup_rewrite_internal - rewrite address internal form */

int     cleanup_rewrite_internal(const char *context_name,
                         VSTRING *result, const char *addr)
{
    VSTRING *dst = vstring_alloc(100);
    VSTRING *src = vstring_alloc(100);
    int     did_rewrite;

    quote_822_local(src, addr);
    did_rewrite = cleanup_rewrite_external(context_name, dst, STR(src));
    unquote_822_local(result, STR(dst));
    vstring_free(dst);
    vstring_free(src);
    return (did_rewrite);
}