head	1.2;
access;
symbols
	PETIDOMO_4_0b6:1.2
	PETIDOMO_4_0b5:1.2
	PETIDOMO_4_0b4:1.2
	PETIDOMO_4_0b3:1.2
	BEFORETHL:1.2
	petidomo-2-2:1.1.1.1
	petidomo:1.1.1;
locks; strict;
comment	@ * @;


1.2
date	2000.12.16.13.06.12;	author simons;	state Exp;
branches;
next	1.1;

1.1
date	2000.12.16.12.38.21;	author simons;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2000.12.16.12.38.21;	author simons;	state Exp;
branches;
next	;


desc
@@


1.2
log
@- Added GNU GPL copyright headers.
- Cleaned build process up.
@
text
@/*
   $Source: /d1/e/petidomo/cvs/petidomo/source/Attic/main.c,v $
   $Revision: 1.2 $

   Copyright (C) 2000 by CyberSolutions GmbH, Germany.

   This file is part of OpenPetidomo.

   OpenPetidomo is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   OpenPetidomo is distributed in the hope that it will be useful, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
   General Public License for more details.
*/

%{
#ifdef DEBUG_DMALLOC
#  include <dmalloc.h>
#endif

#include "rfc822.h"
#include "address_scan.h"
#define yylval rfc822_lval

extern int     yylval;

char *         rfc822_address_buffer;
int            rfc822_address_buffer_pos;

#define YY_INPUT(buf,result,max_size) { \
    buf[0] = rfc822_address_buffer[rfc822_address_buffer_pos++]; \
    result = ((buf[0] != '\0') ? 1 : YY_NULL); \
}
%}
%x quoted escaped escaped2
%%
([^@@\.\(\) \t<>\":,\\]*\\)/(.[@@\.:])	{ BEGIN(escaped2); yymore(); }
([^@@\.\(\) \t<>\":,\\]*\\)/(.)		{ BEGIN(escaped2); yymore(); }
([^@@\.\(\) \t<>\":,\\]*\\)/(.[^@@\.:])	{ BEGIN(escaped); yymore(); }
([^@@\.\(\) \t<>\":,\\]*\\)		{ return TOK_ILLEGAL; }
[^@@\.\(\) \t<>\":,\\]+		        { return TOK_ATOM; }

[ \t]+				/* eat up whitespace */
[@@\.:]				{ yylval = yytext[0]; return yylval; }
[<>\(\),:]			{ return TOK_ILLEGAL; }

<escaped>.			{ BEGIN(INITIAL); yymore(); }
<escaped2>.			{ BEGIN(INITIAL); return TOK_ATOM; }

\"				{ BEGIN(quoted); yymore(); }
<quoted>[^\"\\]+		{ yymore(); }
<quoted>\\\"			{ yymore(); }
<quoted>\"			{ BEGIN(INITIAL); return TOK_ATOM; }
<quoted><<EOF>>			{ BEGIN(INITIAL); return TOK_ILLEGAL; }
%%
/* Internal routines. */

int
yywrap(void)
{
    return 1;
}
@


1.1
log
@Initial revision
@
text
@d2 17
a18 7
 *      $Source: /usr/local/libdata/cvs/c-lib/librfc822/address_scan.l,v $
 *      $Revision: 1.12 $
 *      $Date: 1997/10/14 12:30:34 $
 *
 *      Copyright (C) 1997 by CyberSolutions GmbH.
 *      All rights reserved.
 */
@


1.1.1.1
log
@Imported Petidomo 2.2 as found on www.petidomo.com.
@
text
@@