qregex.o: \

compile qregex.c qregex.h

	./compile qregex.c

qmail provides the ability to make a copy of each email that flows through the system.

This is done using the QUEUE_EXTRA code. See qmail FAQ #8.2

The qmail tap patch adds additional functionality:

1) Specify which email addresses to tap using a regex style control file. With the

   regex function, you can specify full domains or individual email addresses.

2) Specify which email address to send the emails to.

3) Qmail does not need to be restated to when the taps control file is changed.

The regex match is applied to both the to and from email addresses. So email

sent to or from the addresses will be copied. Matching is case insensitive.

If there are multiple matches, the first match is used.

The queue tap patch adds a new control file:

/var/qmail/control/taps

Contains a regex style list of addresses to tap and the email

address of where you want the copy sent to.

Examples:

a) To tap a whole domain add a line like:

.*@domain.com:joe@example.com

b) To tap an individual email address add a line like:

user@domain.com:other@example.com

qregex.o

.I taps	\fR(none)	\fRqmail-queue

qmail-queue(8),

.SH "CONTROL FILES"

.TP 5

.I taps

Should contain regex syntax of email addresses to tap and

the associated email address to send the copy to. The two

fields should be separated by a colon.

#include "stralloc.h"

#include "constmap.h"

int tapok = 0;

stralloc tap = {0};

struct constmap maptap;

stralloc chkaddr = {0};

int tapped;

stralloc tapaddr = {0};

stralloc controlfile = {0};

 stralloc_copys( &controlfile, auto_qmail);

 stralloc_cats( &controlfile, "/control/taps");

 stralloc_0( &controlfile);

 tapok = control_readfile(&tap,controlfile.s,0);

 if (tapok == -1) die(65);

 if (!constmap_init(&maptap,tap.s,tap.len,0)) die(65);

 stralloc_0(&chkaddr);

   if ( len == 1 ) stralloc_copyb(&chkaddr, &ch,1);

   else if ( len > 1 ) stralloc_catb(&chkaddr, &ch,1);

  /* check the from address */

  stralloc_0(&chkaddr);

  if (tapped == 0 && tapcheck()==1 ) {

    tapped = 1;

    if ( tapaddr.len > 0 ) {

      if (substdio_bput(&ssout,"T",1) == -1) die_write();

      if (substdio_bput(&ssout,tapaddr.s,tapaddr.len) == -1) die_write();

      if (substdio_bput(&ssout,"",1) == -1) die_write();

    }

  }

     if ( len == 1 ) stralloc_copyb(&chkaddr, &ch,1);

     else if ( len > 1 ) stralloc_catb(&chkaddr, &ch,1);

    /* check the to address */

    stralloc_0(&chkaddr);

    if (tapped == 0 && tapcheck()==1 ) {

      tapped = 1;

      if ( tapaddr.len > 0 ) {

        if (substdio_bput(&ssout,"T",1) == -1) die_write();

        if (substdio_bput(&ssout,tapaddr.s,tapaddr.len) == -1) die_write();

        if (substdio_bput(&ssout,"",1) == -1) die_write();

       }

     }

int tapcheck()

{

  int i = 0;

  int j = 0;

  int x = 0;

  int negate = 0;

  stralloc curregex = {0};

  char tmpbuf[200];

  while (j < tap.len) {

    i = j;

    while ((tap.s[i] != ':') && (i < tap.len)) i++;

    if (tap.s[j] == '!') {

      negate = 1;

      j++;

    }

    stralloc_copys(&tapaddr, &tap.s[i+1]);

    stralloc_copyb(&curregex,tap.s + j,(i - j));

    stralloc_0(&curregex);

    x = matchregex(chkaddr.s, curregex.s, tmpbuf);

    while ((tap.s[i] != '\0') && (i < tap.len)) i++;

    if ((negate) && (x == 0)) {

      return 1;

    }

    if (!(negate) && (x > 0)) {

      return 1;

    }

    j = i + 1;

    negate = 0;

  }

  return 0;

}

/*

 * qregex (v2)

 * $Id: qregex.c,v 2.1 2001/12/28 07:05:21 evan Exp $

 *

 * Author  : Evan Borgstrom (evan at unixpimps dot org)

 * Created : 2001/12/14 23:08:16

 * Modified: $Date: 2001/12/28 07:05:21 $

 * Revision: $Revision: 2.1 $

 *

 * Do POSIX regex matching on addresses for anti-relay / spam control.

 * It logs to the maillog

 * See the qregex-readme file included with this tarball.

 * If you didn't get this file in a tarball please see the following URL:

 *  http://www.unixpimps.org/software/qregex

 *

 * qregex.c is released under a BSD style copyright.

 * See http://www.unixpimps.org/software/qregex/copyright.html

 *

 * Note: this revision follows the coding guidelines set forth by the rest of

 *       the qmail code and that described at the following URL.

 *       http://cr.yp.to/qmail/guarantee.html

 * 

 */

#include <sys/types.h>

#include <regex.h>

#include "qregex.h"

#define REGCOMP(X,Y)    regcomp(&X, Y, REG_EXTENDED|REG_ICASE)

#define REGEXEC(X,Y)    regexec(&X, Y, (size_t)0, (regmatch_t *)0, (int)0)

int matchregex(char *text, char *regex) {

  regex_t qreg;

  int retval = 0;

  /* build the regex */

  if ((retval = REGCOMP(qreg, regex)) != 0) {

    regfree(&qreg);

    return(-retval);

  }

  /* execute the regex */

  if ((retval = REGEXEC(qreg, text)) != 0) {

    /* did we just not match anything? */

    if (retval == REG_NOMATCH) {

      regfree(&qreg);

      return(0);

    }

    regfree(&qreg);

    return(-retval);

  }

  /* signal the match */

  regfree(&qreg);

  return(1);

}

/* simple header file for the matchregex prototype */

#ifndef _QREGEX_H_

#define _QREGEX_H_

int matchregex(char *text, char *regex);

#endif