diff options
| author | russell <russell@f38db490-d61c-443f-a65b-d21fe96a405b> | 2007-04-10 16:05:55 +0000 |
|---|---|---|
| committer | russell <russell@f38db490-d61c-443f-a65b-d21fe96a405b> | 2007-04-10 16:05:55 +0000 |
| commit | 7f89fab3b95dd7fb10f504ec9c960dc8a874097d (patch) | |
| tree | 3b07db47939b9fa9e9573581f744bafa7693bc5f /main | |
| parent | 23e8a06f9f9140c07dce58df4f12a577bd6fce88 (diff) | |
File upload support was added to solve some needs for the Asterisk GUI.
However, after much discussion, it has been decided that adding this to 1.4 is
not in the best interests of the project. It has been removed here, but will
remain in trunk.
git-svn-id: http://svn.digium.com/svn/asterisk/branches/1.4@61220 f38db490-d61c-443f-a65b-d21fe96a405b
Diffstat (limited to 'main')
43 files changed, 2 insertions, 13322 deletions
diff --git a/main/Makefile b/main/Makefile index 59eb2bc8d..34c85b2d6 100644 --- a/main/Makefile +++ b/main/Makefile @@ -127,10 +127,7 @@ else H323LDLIBS= endif -minimime/libmmime.a: - @cd minimime && $(MAKE) libmmime.a - -asterisk: $(OBJS) editline/libedit.a db1-ast/libdb1.a minimime/libmmime.a $(AST_EMBED_LDSCRIPTS) +asterisk: $(OBJS) editline/libedit.a db1-ast/libdb1.a $(AST_EMBED_LDSCRIPTS) @$(ASTTOPDIR)/build_tools/make_build_h > $(ASTTOPDIR)/include/asterisk/build.h.tmp @if cmp -s $(ASTTOPDIR)/include/asterisk/build.h.tmp $(ASTTOPDIR)/include/asterisk/build.h ; then echo ; else \ mv $(ASTTOPDIR)/include/asterisk/build.h.tmp $(ASTTOPDIR)/include/asterisk/build.h ; \ @@ -147,6 +144,3 @@ clean:: @if [ -f editline/Makefile ]; then $(MAKE) -C editline distclean ; fi @$(MAKE) -C db1-ast clean @$(MAKE) -C stdtime clean - @$(MAKE) -C minimime clean - -.PHONY: minimime/libmmime.a diff --git a/main/http.c b/main/http.c index a448d4180..99aae15ed 100644 --- a/main/http.c +++ b/main/http.c @@ -48,8 +48,6 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$") #include <fcntl.h> #include <pthread.h> -#include "minimime/mm.h" - #include "asterisk/cli.h" #include "asterisk/http.h" #include "asterisk/utils.h" @@ -72,14 +70,6 @@ struct ast_http_server_instance { AST_RWLOCK_DEFINE_STATIC(uris_lock); static struct ast_http_uri *uris; -struct ast_http_post_mapping { - AST_RWLIST_ENTRY(ast_http_post_mapping) entry; - char *from; - char *to; -}; - -static AST_RWLIST_HEAD_STATIC(post_mappings, ast_http_post_mapping); - static int httpfd = -1; static pthread_t master = AST_PTHREADT_NULL; static char prefix[MAX_PREFIX]; @@ -299,225 +289,6 @@ void ast_http_uri_unlink(struct ast_http_uri *urih) ast_rwlock_unlock(&uris_lock); } -/*! \note This assumes that the post_mappings list is locked */ -static struct ast_http_post_mapping *find_post_mapping(const char *uri) -{ - struct ast_http_post_mapping *post_map; - - if (!ast_strlen_zero(prefix) && strncmp(prefix, uri, strlen(prefix))) { - ast_log(LOG_DEBUG, "URI %s does not have prefix %s\n", uri, prefix); - return NULL; - } - - uri += strlen(prefix); - if (*uri == '/') - uri++; - - AST_RWLIST_TRAVERSE(&post_mappings, post_map, entry) { - if (!strcmp(uri, post_map->from)) - return post_map; - } - - return NULL; -} - -static int get_filename(struct mm_mimepart *part, char *fn, size_t fn_len) -{ - const char *filename; - - filename = mm_content_getdispositionparambyname(part->type, "filename"); - - if (ast_strlen_zero(filename)) - return -1; - - ast_copy_string(fn, filename, fn_len); - - return 0; -} - -static void post_raw(struct mm_mimepart *part, const char *post_dir, const char *fn) -{ - char filename[PATH_MAX]; - FILE *f; - const char *body; - size_t body_len; - - snprintf(filename, sizeof(filename), "%s/%s", post_dir, fn); - - if (option_debug) - ast_log(LOG_DEBUG, "Posting raw data to %s\n", filename); - - if (!(f = fopen(filename, "w"))) { - ast_log(LOG_WARNING, "Unable to open %s for writing file from a POST!\n", filename); - return; - } - - if (!(body = mm_mimepart_getbody(part, 0))) { - if (option_debug) - ast_log(LOG_DEBUG, "Couldn't get the mimepart body\n"); - fclose(f); - return; - } - body_len = mm_mimepart_getlength(part); - - if (option_debug) - ast_log(LOG_DEBUG, "Body length is %ld\n", (long int)body_len); - - fwrite(body, 1, body_len, f); - - fclose(f); -} - -static char *handle_post(struct ast_http_server_instance *ser, char *uri, - int *status, char **title, int *contentlength, struct ast_variable *headers, - struct ast_variable *cookies) -{ - char buf; - FILE *f; - size_t res; - struct ast_variable *var; - int content_len = 0; - MM_CTX *ctx; - int mm_res, i; - struct ast_http_post_mapping *post_map; - const char *post_dir; - unsigned long ident = 0; - - for (var = cookies; var; var = var->next) { - if (strcasecmp(var->name, "mansession_id")) - continue; - - if (sscanf(var->value, "%lx", &ident) != 1) { - *status = 400; - *title = ast_strdup("Bad Request"); - return ast_http_error(400, "Bad Request", NULL, "The was an error parsing the request."); - } - - if (!astman_verify_session_writepermissions(ident, EVENT_FLAG_CONFIG)) { - *status = 401; - *title = ast_strdup("Unauthorized"); - return ast_http_error(401, "Unauthorized", NULL, "You are not authorized to make this request."); - } - - break; - } - if (!var) { - *status = 401; - *title = ast_strdup("Unauthorized"); - return ast_http_error(401, "Unauthorized", NULL, "You are not authorized to make this request."); - } - - if (!(f = tmpfile())) - return NULL; - - for (var = headers; var; var = var->next) { - if (!strcasecmp(var->name, "Content-Length")) { - if ((sscanf(var->value, "%u", &content_len)) != 1) { - ast_log(LOG_ERROR, "Invalid Content-Length in POST request!\n"); - fclose(f); - return NULL; - } - if (option_debug) - ast_log(LOG_DEBUG, "Got a Content-Length of %d\n", content_len); - } else if (!strcasecmp(var->name, "Content-Type")) - fprintf(f, "Content-Type: %s\r\n\r\n", var->value); - } - - while ((res = fread(&buf, 1, 1, ser->f))) { - fwrite(&buf, 1, 1, f); - content_len--; - if (!content_len) - break; - } - - if (fseek(f, SEEK_SET, 0)) { - if (option_debug) - ast_log(LOG_DEBUG, "Failed to seek temp file back to beginning.\n"); - fclose(f); - return NULL; - } - - AST_RWLIST_RDLOCK(&post_mappings); - if (!(post_map = find_post_mapping(uri))) { - if (option_debug) - ast_log(LOG_DEBUG, "%s is not a valid URI for POST\n", uri); - AST_RWLIST_UNLOCK(&post_mappings); - fclose(f); - *status = 404; - *title = ast_strdup("Not Found"); - return ast_http_error(404, "Not Found", NULL, "The requested URL was not found on this server."); - } - post_dir = ast_strdupa(post_map->to); - post_map = NULL; - AST_RWLIST_UNLOCK(&post_mappings); - - if (option_debug) - ast_log(LOG_DEBUG, "Going to post files to dir %s\n", post_dir); - - if (!(ctx = mm_context_new())) { - fclose(f); - return NULL; - } - - mm_res = mm_parse_fileptr(ctx, f, MM_PARSE_LOOSE, 0); - fclose(f); - if (mm_res == -1) { - ast_log(LOG_ERROR, "Error parsing MIME data\n"); - mm_context_free(ctx); - *status = 400; - *title = ast_strdup("Bad Request"); - return ast_http_error(400, "Bad Request", NULL, "The was an error parsing the request."); - } - - mm_res = mm_context_countparts(ctx); - if (!mm_res) { - ast_log(LOG_ERROR, "Invalid MIME data, found no parts!\n"); - mm_context_free(ctx); - *status = 400; - *title = ast_strdup("Bad Request"); - return ast_http_error(400, "Bad Request", NULL, "The was an error parsing the request."); - } - - if (option_debug) { - if (mm_context_iscomposite(ctx)) - ast_log(LOG_DEBUG, "Found %d MIME parts\n", mm_res - 1); - else - ast_log(LOG_DEBUG, "We have a flat (not multi-part) message\n"); - } - - for (i = 1; i < mm_res; i++) { - struct mm_mimepart *part; - char fn[PATH_MAX]; - - if (!(part = mm_context_getpart(ctx, i))) { - if (option_debug) - ast_log(LOG_DEBUG, "Failed to get mime part num %d\n", i); - continue; - } - - if (get_filename(part, fn, sizeof(fn))) { - if (option_debug) - ast_log(LOG_DEBUG, "Failed to retrieve a filename for part num %d\n", i); - continue; - } - - if (!part->type) { - if (option_debug) - ast_log(LOG_DEBUG, "This part has no content struct?\n"); - continue; - } - - /* XXX This assumes the MIME part body is not encoded! */ - post_raw(part, post_dir, fn); - } - - mm_context_free(ctx); - - *status = 200; - *title = ast_strdup("OK"); - return ast_strdup(""); -} - static char *handle_uri(struct sockaddr_in *sin, char *uri, int *status, char **title, int *contentlength, struct ast_variable **cookies) { char *c; @@ -607,7 +378,7 @@ static void *ast_httpd_helper_thread(void *data) char cookie[4096]; char timebuf[256]; struct ast_http_server_instance *ser = data; - struct ast_variable *var, *prev=NULL, *vars=NULL, *headers = NULL; + struct ast_variable *var, *prev=NULL, *vars=NULL; char *uri, *c, *title=NULL; char *vname, *vval; int status = 200, contentlength = 0; @@ -690,29 +461,12 @@ static void *ast_httpd_helper_thread(void *data) } } } - } else { - char *name, *value; - - value = ast_strdupa(cookie); - name = strsep(&value, ":"); - if (!value) - continue; - value = ast_skip_blanks(value); - if (ast_strlen_zero(value)) - continue; - var = ast_variable_new(name, value); - if (!var) - continue; - var->next = headers; - headers = var; } } if (*uri) { if (!strcasecmp(buf, "get")) c = handle_uri(&ser->requestor, uri, &status, &title, &contentlength, &vars); - else if (!strcasecmp(buf, "post")) - c = handle_post(ser, uri, &status, &title, &contentlength, headers, vars); else c = ast_http_error(501, "Not Implemented", NULL, "Attempt to use unimplemented / unsupported method");\ } else @@ -872,47 +626,6 @@ static void http_server_start(struct sockaddr_in *sin) } } -static void destroy_post_mapping(struct ast_http_post_mapping *post_map) -{ - if (post_map->from) - free(post_map->from); - if (post_map->to) - free(post_map->to); - free(post_map); -} - -static void destroy_post_mappings(void) -{ - struct ast_http_post_mapping *post_map; - - AST_RWLIST_WRLOCK(&post_mappings); - while ((post_map = AST_RWLIST_REMOVE_HEAD(&post_mappings, entry))) - destroy_post_mapping(post_map); - AST_RWLIST_UNLOCK(&post_mappings); -} - -static void add_post_mapping(const char *from, const char *to) -{ - struct ast_http_post_mapping *post_map; - - if (!(post_map = ast_calloc(1, sizeof(*post_map)))) - return; - - if (!(post_map->from = ast_strdup(from))) { - destroy_post_mapping(post_map); - return; - } - - if (!(post_map->to = ast_strdup(to))) { - destroy_post_mapping(post_map); - return; - } - - AST_RWLIST_WRLOCK(&post_mappings); - AST_RWLIST_INSERT_TAIL(&post_mappings, post_map, entry); - AST_RWLIST_UNLOCK(&post_mappings); -} - static int __ast_http_load(int reload) { struct ast_config *cfg; @@ -929,8 +642,6 @@ static int __ast_http_load(int reload) strcpy(newprefix, DEFAULT_PREFIX); - destroy_post_mappings(); - cfg = ast_config_load("http.conf"); if (cfg) { v = ast_variable_browse(cfg, "general"); @@ -958,10 +669,6 @@ static int __ast_http_load(int reload) } v = v->next; } - - for (v = ast_variable_browse(cfg, "post_mappings"); v; v = v->next) - add_post_mapping(v->name, v->value); - ast_config_destroy(cfg); } if (enabled) @@ -981,7 +688,6 @@ static int __ast_http_load(int reload) static int handle_show_http(int fd, int argc, char *argv[]) { struct ast_http_uri *urih; - struct ast_http_post_mapping *post_map; if (argc != 3) return RESULT_SHOWUSAGE; @@ -1005,13 +711,6 @@ static int handle_show_http(int fd, int argc, char *argv[]) ast_cli(fd, "None.\n"); ast_rwlock_unlock(&uris_lock); - ast_cli(fd, "\nPOST mappings:\n"); - AST_RWLIST_RDLOCK(&post_mappings); - AST_LIST_TRAVERSE(&post_mappings, post_map, entry) - ast_cli(fd, "%s/%s => %s\n", prefix, post_map->from, post_map->to); - ast_cli(fd, "%s\n", AST_LIST_EMPTY(&post_mappings) ? "None.\n" : ""); - AST_RWLIST_UNLOCK(&post_mappings); - return RESULT_SUCCESS; } @@ -1032,9 +731,6 @@ static struct ast_cli_entry cli_http[] = { int ast_http_init(void) { - mm_library_init(); - mm_codec_registerdefaultcodecs(); - ast_http_uri_link(&statusuri); ast_http_uri_link(&staticuri); ast_cli_register_multiple(cli_http, sizeof(cli_http) / sizeof(struct ast_cli_entry)); diff --git a/main/minimime/Makefile b/main/minimime/Makefile deleted file mode 100644 index 4351afd2f..000000000 --- a/main/minimime/Makefile +++ /dev/null @@ -1,60 +0,0 @@ -# -# Asterisk -- A telephony toolkit for Linux. -# -# Makefile for resource modules -# -# Copyright (C) 2007, Digium, Inc. -# -# This program is free software, distributed under the terms of -# the GNU General Public License -# - --include $(ASTTOPDIR)/menuselect.makeopts $(ASTTOPDIR)/menuselect.makedeps - -include $(ASTTOPDIR)/Makefile.moddir_rules - -LIBMMIME:=libmmime.a -MM_SRCS= \ - mimeparser.tab.c \ - mimeparser.yy.c \ - mm_init.c \ - mm_base64.c \ - mm_codecs.c \ - mm_contenttype.c \ - mm_context.c \ - mm_envelope.c \ - mm_error.c \ - mm_header.c \ - mm_mem.c \ - mm_mimepart.c \ - mm_mimeutil.c \ - mm_param.c \ - mm_parse.c \ - mm_util.c - -MM_OBJS:=$(MM_SRCS:%.c=%.o) -MM_HDRS:=mm.h mm_util.h - -ASTCFLAGS:=$(filter-out -Werror -Wstrict-prototypes -Wmissing-declarations -Wmissing-prototypes,$(ASTCFLAGS)) - -all: $(LIBMMIME) - -$(LIBMMIME): $(MM_OBJS) - $(ECHO_PREFIX) echo " [AR] $^ -> $@" - $(CMD_PREFIX) $(AR) cr $@ $^ - $(CMD_PREFIX) $(RANLIB) $@ - -#mimeparser.yy.c: mimeparser.l -# flex -Pmimeparser_yy -omimeparser.yy.c mimeparser.l - -#mimeparser.tab.c: mimeparser.y -# bison -d -pmimeparser_yy -omimeparser.tab.c mimeparser.y - -clean:: - rm -f $(LIBMMIME) *.o - -.PHONY: clean all - -ifneq ($(wildcard .*.d),) - include .*.d -endif diff --git a/main/minimime/mimeparser.h b/main/minimime/mimeparser.h deleted file mode 100644 index 3d8da816f..000000000 --- a/main/minimime/mimeparser.h +++ /dev/null @@ -1,67 +0,0 @@ -#ifndef _MIMEPARSER_H_INCLUDED -#define _MIMEPARSER_H_INCLUDED - -#include "mm.h" - -struct s_position -{ - size_t opaque_start; - size_t start; - size_t end; -}; - -struct lexer_state -{ - int header_state; - int lineno; - size_t current_pos; - int condition; - - int is_envelope; - - size_t message_len; - size_t buffer_length; - - /* temporary marker variables */ - size_t body_opaque_start; - size_t body_start; - size_t body_end; - size_t preamble_start; - size_t preamble_end; - size_t postamble_start; - size_t postamble_end; - - char *boundary_string; - char *endboundary_string; - char *message_buffer; -}; - - -struct parser_state -{ - MM_CTX *ctx; - struct mm_mimepart *envelope; - struct mm_mimepart *temppart; - struct mm_mimepart *current_mimepart; - struct mm_content *ctype; - int parsemode; - int have_contenttype; - int debug; - int mime_parts; - struct lexer_state lstate; -}; - - -#include "mimeparser.tab.h" - -/** - * Prototypes for functions used by the parser routines - */ -int count_lines(char *); -int dprintf2(struct parser_state *, const char *, ...); -int mimeparser_yyparse(struct parser_state *, void *); -int mimeparser_yylex(YYSTYPE *, void *); -int mimeparser_yyerror(struct parser_state *, void *, const char *); - - -#endif /* ! _MIMEPARSER_H_INCLUDED */ diff --git a/main/minimime/mimeparser.l b/main/minimime/mimeparser.l deleted file mode 100644 index d45295f13..000000000 --- a/main/minimime/mimeparser.l +++ /dev/null @@ -1,483 +0,0 @@ -%{ -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/** - * This is a lexer file for parsing MIME compatible messages. It is intended - * to satisfy at least RFC 2045 (Format of Internet Message Bodies). It still - * has quite a few problems: - * - * - The parsing could probably be done in a more elegant way - * - I don't know what performance impact REJECT has on the parser - */ -#include <stdio.h> -#include <string.h> -#include <ctype.h> -#include <errno.h> - -#include "mimeparser.h" -#include "mimeparser.tab.h" - -#define NAMEOF(v) #v -/* BC() is a debug wrapper for lex' BEGIN() macro */ -#define BC(x) do { \ - struct lexer_state *lstate = yyget_extra(yyscanner); \ - BEGIN(x); \ - lstate->condition = x; \ -} while(0); - -#define ZERO(x) memset(x, '\0', sizeof(x)) - -#define PREALLOC_BUFFER 100000 -#undef YY_BUF_SIZE -#define YY_BUF_SIZE 65536 - -enum header_states -{ - STATE_MAIL = 0, - STATE_CTYPE, - STATE_CDISP, - STATE_CENC, - STATE_MIME -}; - - - -%} - -%option reentrant -%option yylineno -%option bison-bridge - -%s headers -%s header -%s headervalue -%s tspecialvalue -%s comment -%s body -%s postamble -%s preamble -%s boundary -%s endboundary -%s endoffile - -STRING [a-zA-Z0-9\-\.\_] -TSPECIAL [a-zA-Z0-9)(<>@,;:/\-.=_\+'? ] -TSPECIAL_LITE [a-zA-Z0-9)(<>@,-._+'?\[\]] - -%% - -<INITIAL,headers>^[a-zA-Z]+[a-zA-Z0-9\-\_]* { - yylval_param->string=strdup(yytext); - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; - BC(header); - - /* Depending on what header we are processing, we enter a different - * state and return a different value. - */ - if (!strcasecmp(yytext, "Content-Type")) { - lstate->header_state = STATE_CTYPE; - return CONTENTTYPE_HEADER; - } else if (!strcasecmp(yytext, "Content-Transfer-Encoding")) { - lstate->header_state = STATE_CENC; - return CONTENTENCODING_HEADER; - } else if (!strcasecmp(yytext, "Content-Disposition")) { - lstate->header_state = STATE_CDISP; - return CONTENTDISPOSITION_HEADER; - } else if (!strcasecmp(yytext, "MIME-Version")) { - lstate->header_state = STATE_MAIL; - return MIMEVERSION_HEADER; - } else { - lstate->header_state = STATE_MAIL; - return MAIL_HEADER; - } -} - -<INITIAL,headers>. { - struct lexer_state *lstate = yyget_extra(yyscanner); - /* dprintf2("Unknown header char: %c\n", *yytext); */ - lstate->current_pos += yyleng; - return ANY; -} - -<headers>^(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->lineno++; - - lstate->current_pos += yyleng; - - /* This marks the end of headers. Depending on whether we are in the - * envelope currently we need to parse either a body or the preamble - * now. - */ - if (lstate->is_envelope == 0 || lstate->boundary_string == NULL) { - BC(body); - lstate->body_start = lstate->current_pos; - } else { - lstate->is_envelope = 0; - lstate->preamble_start = lstate->current_pos; - BC(preamble); - } - - return ENDOFHEADERS; -} - -<header>\: { - struct lexer_state *lstate = yyget_extra(yyscanner); - BC(headervalue); - lstate->current_pos += yyleng; - return COLON; -} - -<header>(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - BC(headers); - /* dprintf2("Invalid header, returning EOL\n"); */ - lstate->current_pos += yyleng; - return EOL; -} - -<headervalue>(\n|\r\n)[\ \t]+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - -<headervalue>.+|(.+(\n|\r\n)[\ \t]+.+)+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - if (lstate->header_state != STATE_MAIL && lstate->header_state != STATE_CENC) { - REJECT; - } - lstate->current_pos += yyleng; - while (*yytext && isspace(*yytext)) yytext++; - /* Do we actually have a header value? */ - if (*yytext == '\0') { - yylval_param->string = strdup(""); - } else { - yylval_param->string=strdup(yytext); - lstate->lineno += count_lines(yytext); - } - return WORD; -} - -<headervalue,tspecialvalue>(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - /* marks the end of one header line */ - lstate->lineno++; - BC(headers); - lstate->current_pos += yyleng; - return EOL; -} - -<headervalue>;|;(\r\n|\n)[\ \t]+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->lineno += count_lines(yytext); - lstate->current_pos += yyleng; - return SEMICOLON; -} - -<headervalue>\= { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; - return EQUAL; -} - -<headervalue>\" { - struct lexer_state *lstate = yyget_extra(yyscanner); - BC(tspecialvalue); - lstate->current_pos += yyleng; - return *yytext; -} - -<headervalue>{STRING}+|{TSPECIAL_LITE}+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - yylval_param->string=strdup(yytext); - lstate->lineno += count_lines(yytext); - lstate->current_pos += yyleng; - return WORD; -} - -<headervalue>[\ |\t]+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - -<tspecialvalue>{TSPECIAL}+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->lineno += count_lines(yytext); - yylval_param->string=strdup(yytext); - lstate->current_pos += yyleng; - return TSPECIAL; -} - -<tspecialvalue>\" { - struct lexer_state *lstate = yyget_extra(yyscanner); - BC(headervalue); - lstate->current_pos += yyleng; - return *yytext; -} - -<body>^\-\-{TSPECIAL}+\-\- { - struct lexer_state *lstate = yyget_extra(yyscanner); - /** - * Make sure we only catch matching boundaries, and not other lines - * that begin and end with two dashes. If we have catched a valid - * end boundary, which actually ends a body, we save the current - * position, put the token back on the input stream and let the - * endboundary condition parse the actual token. - */ - if (lstate->endboundary_string != NULL) { - if (strcmp(lstate->endboundary_string, yytext)) { - /* dprintf2("YYTEXT != end_boundary: '%s'\n", yytext); */ - REJECT; - } else { - lstate->current_pos += yyleng; - /* dprintf2("YYTEXT == lstate->end_boundary: '%s'\n", yytext); */ - if (lstate->body_start) { - yylval_param->position.opaque_start = - lstate->body_opaque_start; - yylval_param->position.start = lstate->body_start; - yylval_param->position.end = lstate->current_pos - yyleng; - lstate->body_opaque_start = 0; - lstate->body_start = 0; - lstate->body_end = 0; - yyless(0); - BC(endboundary); - return BODY; - } - } - } else { - } - - REJECT; -} - -<body,preamble>^\-\-{TSPECIAL}+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - /** - * Make sure we only catch matching boundaries, and not other lines - * that begin with two dashes. - */ - if (lstate->boundary_string != NULL) { - if (strcmp(lstate->boundary_string, yytext)) { - /* dprintf2("YYTEXT != boundary: '%s'\n", yytext);*/ - REJECT; - } else { - /* dprintf2("YYTEXT == boundary: '%s'\n", yytext);*/ - if (lstate->body_start) { - yylval_param->position.opaque_start = lstate->body_opaque_start; - yylval_param->position.start = lstate->body_start; - yylval_param->position.end = lstate->current_pos; - lstate->body_opaque_start = 0; - lstate->body_start = 0; - lstate->body_end = 0; - yyless(0); - BC(boundary); - return BODY; - } else if (lstate->preamble_start) { - yylval_param->position.start = lstate->preamble_start; - yylval_param->position.end = lstate->current_pos; - lstate->preamble_start = lstate->preamble_end = 0; - yyless(0); - BC(boundary); - return PREAMBLE; - } else { - BC(boundary); - yylval_param->string = strdup(yytext); - lstate->current_pos += yyleng; - return(BOUNDARY); - } - } - } else { - } - - REJECT; -} - -<body>(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; - lstate->lineno++; -} - -<body>\r { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; - /* dprintf2("stray CR in body...\n"); */ -} - -<body>[^\r\n]+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - -<body><<EOF>> { - struct lexer_state *lstate = yyget_extra(yyscanner); - if (lstate->boundary_string == NULL && lstate->body_start) { - yylval_param->position.opaque_start = 0; - yylval_param->position.start = lstate->body_start; - yylval_param->position.end = lstate->current_pos; - lstate->body_start = 0; - return BODY; - } else if (lstate->body_start) { - return POSTAMBLE; - } - yyterminate(); -} - -<preamble,postamble>(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - /* dprintf2("Preamble CR/LF at line %d\n", lineno); */ - lstate->lineno++; - lstate->current_pos += yyleng; -} - -<boundary>[^\r\n]+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - yylval_param->string = strdup(yytext); - lstate->current_pos += yyleng; - return BOUNDARY; -} - -<endboundary>[^\r\n]+ { - struct lexer_state *lstate = yyget_extra(yyscanner); - yylval_param->string = strdup(yytext); - lstate->current_pos += yyleng; - return ENDBOUNDARY; -} - -<boundary>(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - BC(headers); - lstate->lineno++; - lstate->current_pos += yyleng; - lstate->body_opaque_start = lstate->current_pos; - return EOL; -} - -<endboundary>(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - BC(postamble); - lstate->lineno++; - lstate->current_pos += yyleng; -} - -<preamble>. { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - - -<postamble>. { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - -(\r\n|\n) { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->lineno++; - lstate->current_pos += yyleng; - return EOL; -} - -. { - struct lexer_state *lstate = yyget_extra(yyscanner); - lstate->current_pos += yyleng; - return((int)*yytext); -} - - -%% - -void reset_lexer_state(void *yyscanner, struct parser_state *pstate) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - struct lexer_state *lstate = &(pstate->lstate); - - yyset_extra((void*)lstate, yyscanner); - BEGIN(0); - lstate->header_state = STATE_MAIL; - lstate->lineno = 0; - lstate->current_pos = 1; - lstate->condition = 0; - - lstate->is_envelope = 1; - - lstate->message_len = 0; - lstate->buffer_length = 0; - - /* temporary marker variables */ - lstate->body_opaque_start = 0; - lstate->body_start = 0; - lstate->body_end = 0; - lstate->preamble_start = 0; - lstate->preamble_end = 0; - lstate->postamble_start = 0; - lstate->postamble_end = 0; -} - -void -PARSER_setbuffer(char *string, yyscan_t scanner) -{ - struct lexer_state *lstate = yyget_extra(scanner); - lstate->message_buffer = string; - yy_scan_string(string, scanner); -} - -void -PARSER_setfp(FILE *fp, yyscan_t yyscanner) -{ - /* looks like a bug in bison 2.2a -- the wrong code is generated for yyset_in !! */ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yyg->yyin_r = fp; - - if (0) { - /* This is just to make a compiler warning go away */ - yyunput(0, NULL, yyscanner); - } -} - -/** - * Counts how many lines a given string represents in the message (in case of - * folded header values, for example, or a message body). - */ -int -count_lines(char *txt) -{ - char *o; - int line; - - line = 0; - - for (o = txt; *o != '\0'; o++) - if (*o == '\n') - line++; - - return line; -} diff --git a/main/minimime/mimeparser.tab.c b/main/minimime/mimeparser.tab.c deleted file mode 100644 index 509fa4d2d..000000000 --- a/main/minimime/mimeparser.tab.c +++ /dev/null @@ -1,2341 +0,0 @@ -/* A Bison parser, made by GNU Bison 2.3. */ - -/* Skeleton implementation for Bison's Yacc-like parsers in C - - Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006 - Free Software Foundation, Inc. - - This program 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. - - This program 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. - - You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, - Boston, MA 02110-1301, USA. */ - -/* As a special exception, you may create a larger work that contains - part or all of the Bison parser skeleton and distribute that work - under terms of your choice, so long as that work isn't itself a - parser generator using the skeleton or a modified version thereof - as a parser skeleton. Alternatively, if you modify or redistribute - the parser skeleton itself, you may (at your option) remove this - special exception, which will cause the skeleton and the resulting - Bison output files to be licensed under the GNU General Public - License without this special exception. - - This special exception was added by the Free Software Foundation in - version 2.2 of Bison. */ - -/* C LALR(1) parser skeleton written by Richard Stallman, by - simplifying the original so-called "semantic" parser. */ - -/* All symbols defined below should begin with yy or YY, to avoid - infringing on user name space. This should be done even for local - variables, as they might otherwise be expanded by user macros. - There are some unavoidable exceptions within include files to - define necessary library symbols; they are noted "INFRINGES ON - USER NAME SPACE" below. */ - -/* Identify Bison output. */ -#define YYBISON 1 - -/* Bison version. */ -#define YYBISON_VERSION "2.3" - -/* Skeleton name. */ -#define YYSKELETON_NAME "yacc.c" - -/* Pure parsers. */ -#define YYPURE 1 - -/* Using locations. */ -#define YYLSP_NEEDED 0 - -/* Substitute the variable and function names. */ -#define yyparse mimeparser_yyparse -#define yylex mimeparser_yylex -#define yyerror mimeparser_yyerror -#define yylval mimeparser_yylval -#define yychar mimeparser_yychar -#define yydebug mimeparser_yydebug -#define yynerrs mimeparser_yynerrs - - -/* Tokens. */ -#ifndef YYTOKENTYPE -# define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - ANY = 258, - COLON = 259, - DASH = 260, - DQUOTE = 261, - ENDOFHEADERS = 262, - EOL = 263, - EOM = 264, - EQUAL = 265, - MIMEVERSION_HEADER = 266, - SEMICOLON = 267, - CONTENTDISPOSITION_HEADER = 268, - CONTENTENCODING_HEADER = 269, - CONTENTTYPE_HEADER = 270, - MAIL_HEADER = 271, - HEADERVALUE = 272, - BOUNDARY = 273, - ENDBOUNDARY = 274, - CONTENTTYPE_VALUE = 275, - TSPECIAL = 276, - WORD = 277, - BODY = 278, - PREAMBLE = 279, - POSTAMBLE = 280 - }; -#endif -/* Tokens. */ -#define ANY 258 -#define COLON 259 -#define DASH 260 -#define DQUOTE 261 -#define ENDOFHEADERS 262 -#define EOL 263 -#define EOM 264 -#define EQUAL 265 -#define MIMEVERSION_HEADER 266 -#define SEMICOLON 267 -#define CONTENTDISPOSITION_HEADER 268 -#define CONTENTENCODING_HEADER 269 -#define CONTENTTYPE_HEADER 270 -#define MAIL_HEADER 271 -#define HEADERVALUE 272 -#define BOUNDARY 273 -#define ENDBOUNDARY 274 -#define CONTENTTYPE_VALUE 275 -#define TSPECIAL 276 -#define WORD 277 -#define BODY 278 -#define PREAMBLE 279 -#define POSTAMBLE 280 - - - - -/* Copy the first part of user declarations. */ -#line 1 "mimeparser.y" - -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/** - * These are the grammatic definitions in yacc syntax to parse MIME conform - * messages. - * - * TODO: - * - honour parse flags passed to us (partly done) - * - parse Content-Disposition header (partly done) - * - parse Content-Encoding header - */ -#include <stdio.h> -#include <stdarg.h> -#include <stdlib.h> -#include <string.h> -#include <assert.h> -#include <errno.h> - -#include "mimeparser.h" -#include "mm.h" -#include "mm_internal.h" - -int set_boundary(char *,struct parser_state *); -int mimeparser_yywrap(void); -void reset_environ(struct parser_state *pstate); -int PARSER_initialize(struct parser_state *pstate, void *yyscanner); - -typedef void *yyscan_t; - -static char *PARSE_readmessagepart(size_t, size_t, size_t, size_t *,yyscan_t, struct parser_state *); -FILE *mimeparser_yyget_in (yyscan_t yyscanner ); - - - -/* Enabling traces. */ -#ifndef YYDEBUG -# define YYDEBUG 0 -#endif - -/* Enabling verbose error messages. */ -#ifdef YYERROR_VERBOSE -# undef YYERROR_VERBOSE -# define YYERROR_VERBOSE 1 -#else -# define YYERROR_VERBOSE 0 -#endif - -/* Enabling the token table. */ -#ifndef YYTOKEN_TABLE -# define YYTOKEN_TABLE 0 -#endif - -#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE -#line 69 "mimeparser.y" -{ - int number; - char *string; - struct s_position position; -} -/* Line 193 of yacc.c. */ -#line 222 "mimeparser.tab.c" - YYSTYPE; -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ -# define YYSTYPE_IS_DECLARED 1 -# define YYSTYPE_IS_TRIVIAL 1 -#endif - - - -/* Copy the second part of user declarations. */ - - -/* Line 216 of yacc.c. */ -#line 235 "mimeparser.tab.c" - -#ifdef short -# undef short -#endif - -#ifdef YYTYPE_UINT8 -typedef YYTYPE_UINT8 yytype_uint8; -#else -typedef unsigned char yytype_uint8; -#endif - -#ifdef YYTYPE_INT8 -typedef YYTYPE_INT8 yytype_int8; -#elif (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -typedef signed char yytype_int8; -#else -typedef short int yytype_int8; -#endif - -#ifdef YYTYPE_UINT16 -typedef YYTYPE_UINT16 yytype_uint16; -#else -typedef unsigned short int yytype_uint16; -#endif - -#ifdef YYTYPE_INT16 -typedef YYTYPE_INT16 yytype_int16; -#else -typedef short int yytype_int16; -#endif - -#ifndef YYSIZE_T -# ifdef __SIZE_TYPE__ -# define YYSIZE_T __SIZE_TYPE__ -# elif defined size_t -# define YYSIZE_T size_t -# elif ! defined YYSIZE_T && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -# include <stddef.h> /* INFRINGES ON USER NAME SPACE */ -# define YYSIZE_T size_t -# else -# define YYSIZE_T unsigned int -# endif -#endif - -#define YYSIZE_MAXIMUM ((YYSIZE_T) -1) - -#ifndef YY_ -# if YYENABLE_NLS -# if ENABLE_NLS -# include <libintl.h> /* INFRINGES ON USER NAME SPACE */ -# define YY_(msgid) dgettext ("bison-runtime", msgid) -# endif -# endif -# ifndef YY_ -# define YY_(msgid) msgid -# endif -#endif - -/* Suppress unused-variable warnings by "using" E. */ -#if ! defined lint || defined __GNUC__ -# define YYUSE(e) ((void) (e)) -#else -# define YYUSE(e) /* empty */ -#endif - -/* Identity function, used to suppress warnings about constant conditions. */ -#ifndef lint -# define YYID(n) (n) -#else -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static int -YYID (int i) -#else -static int -YYID (i) - int i; -#endif -{ - return i; -} -#endif - -#if ! defined yyoverflow || YYERROR_VERBOSE - -/* The parser invokes alloca or malloc; define the necessary symbols. */ - -# ifdef YYSTACK_USE_ALLOCA -# if YYSTACK_USE_ALLOCA -# ifdef __GNUC__ -# define YYSTACK_ALLOC __builtin_alloca -# elif defined __BUILTIN_VA_ARG_INCR -# include <alloca.h> /* INFRINGES ON USER NAME SPACE */ -# elif defined _AIX -# define YYSTACK_ALLOC __alloca -# elif defined _MSC_VER -# include <malloc.h> /* INFRINGES ON USER NAME SPACE */ -# define alloca _alloca -# else -# define YYSTACK_ALLOC alloca -# if ! defined _ALLOCA_H && ! defined _STDLIB_H && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */ -# ifndef _STDLIB_H -# define _STDLIB_H 1 -# endif -# endif -# endif -# endif -# endif - -# ifdef YYSTACK_ALLOC - /* Pacify GCC's `empty if-body' warning. */ -# define YYSTACK_FREE(Ptr) do { /* empty */; } while (YYID (0)) -# ifndef YYSTACK_ALLOC_MAXIMUM - /* The OS might guarantee only one guard page at the bottom of the stack, - and a page size can be as small as 4096 bytes. So we cannot safely - invoke alloca (N) if N exceeds 4096. Use a slightly smaller number - to allow for a few compiler-allocated temporary stack slots. */ -# define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */ -# endif -# else -# define YYSTACK_ALLOC YYMALLOC -# define YYSTACK_FREE YYFREE -# ifndef YYSTACK_ALLOC_MAXIMUM -# define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM -# endif -# if (defined __cplusplus && ! defined _STDLIB_H \ - && ! ((defined YYMALLOC || defined malloc) \ - && (defined YYFREE || defined free))) -# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */ -# ifndef _STDLIB_H -# define _STDLIB_H 1 -# endif -# endif -# ifndef YYMALLOC -# define YYMALLOC malloc -# if ! defined malloc && ! defined _STDLIB_H && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */ -# endif -# endif -# ifndef YYFREE -# define YYFREE free -# if ! defined free && ! defined _STDLIB_H && (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -void free (void *); /* INFRINGES ON USER NAME SPACE */ -# endif -# endif -# endif -#endif /* ! defined yyoverflow || YYERROR_VERBOSE */ - - -#if (! defined yyoverflow \ - && (! defined __cplusplus \ - || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL))) - -/* A type that is properly aligned for any stack member. */ -union yyalloc -{ - yytype_int16 yyss; - YYSTYPE yyvs; - }; - -/* The size of the maximum gap between one aligned stack and the next. */ -# define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1) - -/* The size of an array large to enough to hold all stacks, each with - N elements. */ -# define YYSTACK_BYTES(N) \ - ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE)) \ - + YYSTACK_GAP_MAXIMUM) - -/* Copy COUNT objects from FROM to TO. The source and destination do - not overlap. */ -# ifndef YYCOPY -# if defined __GNUC__ && 1 < __GNUC__ -# define YYCOPY(To, From, Count) \ - __builtin_memcpy (To, From, (Count) * sizeof (*(From))) -# else -# define YYCOPY(To, From, Count) \ - do \ - { \ - YYSIZE_T yyi; \ - for (yyi = 0; yyi < (Count); yyi++) \ - (To)[yyi] = (From)[yyi]; \ - } \ - while (YYID (0)) -# endif -# endif - -/* Relocate STACK from its old location to the new one. The - local variables YYSIZE and YYSTACKSIZE give the old and new number of - elements in the stack, and YYPTR gives the new location of the - stack. Advance YYPTR to a properly aligned location for the next - stack. */ -# define YYSTACK_RELOCATE(Stack) \ - do \ - { \ - YYSIZE_T yynewbytes; \ - YYCOPY (&yyptr->Stack, Stack, yysize); \ - Stack = &yyptr->Stack; \ - yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ - yyptr += yynewbytes / sizeof (*yyptr); \ - } \ - while (YYID (0)) - -#endif - -/* YYFINAL -- State number of the termination state. */ -#define YYFINAL 26 -/* YYLAST -- Last index in YYTABLE. */ -#define YYLAST 61 - -/* YYNTOKENS -- Number of terminals. */ -#define YYNTOKENS 28 -/* YYNNTS -- Number of nonterminals. */ -#define YYNNTS 29 -/* YYNRULES -- Number of rules. */ -#define YYNRULES 50 -/* YYNRULES -- Number of states. */ -#define YYNSTATES 83 - -/* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ -#define YYUNDEFTOK 2 -#define YYMAXUTOK 280 - -#define YYTRANSLATE(YYX) \ - ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) - -/* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ -static const yytype_uint8 yytranslate[] = -{ - 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 27, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 26, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, - 2, 2, 2, 2, 2, 2, 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 -}; - -#if YYDEBUG -/* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in - YYRHS. */ -static const yytype_uint8 yyprhs[] = -{ - 0, 0, 3, 5, 7, 8, 15, 18, 21, 23, - 25, 27, 28, 30, 31, 34, 36, 40, 42, 44, - 46, 48, 50, 52, 57, 61, 66, 72, 77, 83, - 85, 90, 95, 98, 101, 103, 107, 111, 114, 116, - 120, 123, 125, 129, 133, 135, 137, 141, 143, 146, - 148 -}; - -/* YYRHS -- A `-1'-separated list of the rules' RHS. */ -static const yytype_int8 yyrhs[] = -{ - 29, 0, -1, 30, -1, 32, -1, -1, 33, 34, - 31, 36, 55, 35, -1, 33, 56, -1, 38, 33, - -1, 53, -1, 38, -1, 24, -1, -1, 25, -1, - -1, 36, 37, -1, 37, -1, 54, 33, 56, -1, - 39, -1, 40, -1, 41, -1, 43, -1, 44, -1, - 45, -1, 16, 4, 22, 8, -1, 16, 4, 8, - -1, 15, 4, 47, 8, -1, 15, 4, 47, 48, - 8, -1, 13, 4, 42, 8, -1, 13, 4, 42, - 49, 8, -1, 22, -1, 14, 4, 22, 8, -1, - 11, 4, 22, 8, -1, 46, 8, -1, 46, 3, - -1, 3, -1, 22, 26, 22, -1, 12, 50, 48, - -1, 12, 50, -1, 12, -1, 12, 51, 49, -1, - 12, 51, -1, 12, -1, 22, 10, 52, -1, 22, - 10, 52, -1, 22, -1, 21, -1, 27, 21, 27, - -1, 7, -1, 18, 8, -1, 19, -1, 23, -1 -}; - -/* YYRLINE[YYN] -- source line where rule number YYN was defined. */ -static const yytype_uint16 yyrline[] = -{ - 0, 114, 114, 116, 121, 120, 133, 141, 143, 167, - 171, 186, 190, 193, 197, 199, 203, 218, 220, 230, - 232, 234, 236, 250, 257, 276, 284, 294, 300, 308, - 331, 338, 345, 349, 351, 355, 364, 366, 368, 382, - 384, 386, 400, 431, 445, 451, 466, 474, 481, 500, - 519 -}; -#endif - -#if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE -/* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. - First, the terminals, then, starting at YYNTOKENS, nonterminals. */ -static const char *const yytname[] = -{ - "$end", "error", "$undefined", "ANY", "COLON", "DASH", "DQUOTE", - "ENDOFHEADERS", "EOL", "EOM", "EQUAL", "MIMEVERSION_HEADER", "SEMICOLON", - "CONTENTDISPOSITION_HEADER", "CONTENTENCODING_HEADER", - "CONTENTTYPE_HEADER", "MAIL_HEADER", "HEADERVALUE", "BOUNDARY", - "ENDBOUNDARY", "CONTENTTYPE_VALUE", "TSPECIAL", "WORD", "BODY", - "PREAMBLE", "POSTAMBLE", "'/'", "'\"'", "$accept", "message", - "multipart_message", "@1", "singlepart_message", "headers", "preamble", - "postamble", "mimeparts", "mimepart", "header", "mail_header", - "contenttype_header", "contentdisposition_header", "content_disposition", - "contentencoding_header", "mimeversion_header", "invalid_header", "any", - "mimetype", "contenttype_parameters", "content_disposition_parameters", - "contenttype_parameter", "content_disposition_parameter", - "contenttype_parameter_value", "end_headers", "boundary", "endboundary", - "body", 0 -}; -#endif - -# ifdef YYPRINT -/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to - token YYLEX-NUM. */ -static const yytype_uint16 yytoknum[] = -{ - 0, 256, 257, 258, 259, 260, 261, 262, 263, 264, - 265, 266, 267, 268, 269, 270, 271, 272, 273, 274, - 275, 276, 277, 278, 279, 280, 47, 34 -}; -# endif - -/* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ -static const yytype_uint8 yyr1[] = -{ - 0, 28, 29, 29, 31, 30, 32, 33, 33, 33, - 34, 34, 35, 35, 36, 36, 37, 38, 38, 38, - 38, 38, 38, 39, 39, 40, 40, 41, 41, 42, - 43, 44, 45, 46, 46, 47, 48, 48, 48, 49, - 49, 49, 50, 51, 52, 52, 52, 53, 54, 55, - 56 -}; - -/* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */ -static const yytype_uint8 yyr2[] = -{ - 0, 2, 1, 1, 0, 6, 2, 2, 1, 1, - 1, 0, 1, 0, 2, 1, 3, 1, 1, 1, - 1, 1, 1, 4, 3, 4, 5, 4, 5, 1, - 4, 4, 2, 2, 1, 3, 3, 2, 1, 3, - 2, 1, 3, 3, 1, 1, 3, 1, 2, 1, - 1 -}; - -/* YYDEFACT[STATE-NAME] -- Default rule to reduce with in state - STATE-NUM when YYTABLE doesn't specify something else to do. Zero - means the default is an error. */ -static const yytype_uint8 yydefact[] = -{ - 0, 34, 47, 0, 0, 0, 0, 0, 0, 2, - 3, 11, 9, 17, 18, 19, 20, 21, 22, 0, - 8, 0, 0, 0, 0, 0, 1, 50, 10, 4, - 6, 7, 33, 32, 0, 29, 0, 0, 0, 0, - 24, 0, 0, 31, 27, 41, 0, 30, 0, 25, - 38, 0, 23, 0, 0, 15, 0, 0, 40, 28, - 35, 0, 37, 26, 48, 49, 14, 13, 0, 0, - 39, 0, 36, 12, 5, 16, 45, 44, 0, 43, - 42, 0, 46 -}; - -/* YYDEFGOTO[NTERM-NUM]. */ -static const yytype_int8 yydefgoto[] = -{ - -1, 8, 9, 42, 10, 11, 29, 74, 54, 55, - 12, 13, 14, 15, 36, 16, 17, 18, 19, 39, - 51, 46, 62, 58, 79, 20, 56, 67, 30 -}; - -/* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing - STATE-NUM. */ -#define YYPACT_NINF -20 -static const yytype_int8 yypact[] = -{ - 3, -20, -20, 17, 21, 22, 23, 24, 5, -20, - -20, -11, 3, -20, -20, -20, -20, -20, -20, 1, - -20, 7, 8, 9, 10, -7, -20, -20, -20, -20, - -20, -20, -20, -20, 25, -20, -1, 26, 11, 12, - -20, 27, 18, -20, -20, 16, 31, -20, 19, -20, - 20, 32, -20, 35, 4, -20, 3, 36, 33, -20, - -20, 37, 38, -20, -20, -20, -20, 28, 29, -19, - -20, -19, -20, -20, -20, -20, -20, -20, 30, -20, - -20, 34, -20 -}; - -/* YYPGOTO[NTERM-NUM]. */ -static const yytype_int8 yypgoto[] = -{ - -20, -20, -20, -20, -20, -12, -20, -20, -20, -6, - -20, -20, -20, -20, -20, -20, -20, -20, -20, -20, - -13, -4, -20, -20, -16, -20, -20, -20, -10 -}; - -/* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If - positive, shift that token. If negative, reduce the rule which - number is the opposite. If zero, do what YYDEFACT says. - If YYTABLE_NINF, syntax error. */ -#define YYTABLE_NINF -1 -static const yytype_uint8 yytable[] = -{ - 31, 40, 76, 77, 32, 26, 1, 44, 78, 33, - 2, 45, 27, 28, 3, 41, 4, 5, 6, 7, - 49, 21, 53, 65, 50, 22, 23, 24, 25, 34, - 35, 37, 38, 43, 47, 52, 53, 48, 57, 59, - 63, 60, 61, 64, 68, 45, 69, 71, 66, 72, - 50, 81, 27, 73, 70, 80, 0, 0, 75, 0, - 0, 82 -}; - -static const yytype_int8 yycheck[] = -{ - 12, 8, 21, 22, 3, 0, 3, 8, 27, 8, - 7, 12, 23, 24, 11, 22, 13, 14, 15, 16, - 8, 4, 18, 19, 12, 4, 4, 4, 4, 22, - 22, 22, 22, 8, 8, 8, 18, 26, 22, 8, - 8, 22, 22, 8, 56, 12, 10, 10, 54, 62, - 12, 21, 23, 25, 58, 71, -1, -1, 68, -1, - -1, 27 -}; - -/* YYSTOS[STATE-NUM] -- The (internal number of the) accessing - symbol of state STATE-NUM. */ -static const yytype_uint8 yystos[] = -{ - 0, 3, 7, 11, 13, 14, 15, 16, 29, 30, - 32, 33, 38, 39, 40, 41, 43, 44, 45, 46, - 53, 4, 4, 4, 4, 4, 0, 23, 24, 34, - 56, 33, 3, 8, 22, 22, 42, 22, 22, 47, - 8, 22, 31, 8, 8, 12, 49, 8, 26, 8, - 12, 48, 8, 18, 36, 37, 54, 22, 51, 8, - 22, 22, 50, 8, 8, 19, 37, 55, 33, 10, - 49, 10, 48, 25, 35, 56, 21, 22, 27, 52, - 52, 21, 27 -}; - -#define yyerrok (yyerrstatus = 0) -#define yyclearin (yychar = YYEMPTY) -#define YYEMPTY (-2) -#define YYEOF 0 - -#define YYACCEPT goto yyacceptlab -#define YYABORT goto yyabortlab -#define YYERROR goto yyerrorlab - - -/* Like YYERROR except do call yyerror. This remains here temporarily - to ease the transition to the new meaning of YYERROR, for GCC. - Once GCC version 2 has supplanted version 1, this can go. */ - -#define YYFAIL goto yyerrlab - -#define YYRECOVERING() (!!yyerrstatus) - -#define YYBACKUP(Token, Value) \ -do \ - if (yychar == YYEMPTY && yylen == 1) \ - { \ - yychar = (Token); \ - yylval = (Value); \ - yytoken = YYTRANSLATE (yychar); \ - YYPOPSTACK (1); \ - goto yybackup; \ - } \ - else \ - { \ - yyerror (pstate, yyscanner, YY_("syntax error: cannot back up")); \ - YYERROR; \ - } \ -while (YYID (0)) - - -#define YYTERROR 1 -#define YYERRCODE 256 - - -/* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N]. - If N is 0, then set CURRENT to the empty location which ends - the previous symbol: RHS[0] (always defined). */ - -#define YYRHSLOC(Rhs, K) ((Rhs)[K]) -#ifndef YYLLOC_DEFAULT -# define YYLLOC_DEFAULT(Current, Rhs, N) \ - do \ - if (YYID (N)) \ - { \ - (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ - (Current).first_column = YYRHSLOC (Rhs, 1).first_column; \ - (Current).last_line = YYRHSLOC (Rhs, N).last_line; \ - (Current).last_column = YYRHSLOC (Rhs, N).last_column; \ - } \ - else \ - { \ - (Current).first_line = (Current).last_line = \ - YYRHSLOC (Rhs, 0).last_line; \ - (Current).first_column = (Current).last_column = \ - YYRHSLOC (Rhs, 0).last_column; \ - } \ - while (YYID (0)) -#endif - - -/* YY_LOCATION_PRINT -- Print the location on the stream. - This macro was not mandated originally: define only if we know - we won't break user code: when these are the locations we know. */ - -#ifndef YY_LOCATION_PRINT -# if YYLTYPE_IS_TRIVIAL -# define YY_LOCATION_PRINT(File, Loc) \ - fprintf (File, "%d.%d-%d.%d", \ - (Loc).first_line, (Loc).first_column, \ - (Loc).last_line, (Loc).last_column) -# else -# define YY_LOCATION_PRINT(File, Loc) ((void) 0) -# endif -#endif - - -/* YYLEX -- calling `yylex' with the right arguments. */ - -#ifdef YYLEX_PARAM -# define YYLEX yylex (&yylval, YYLEX_PARAM) -#else -# define YYLEX yylex (&yylval, yyscanner) -#endif - -/* Enable debugging if requested. */ -#if YYDEBUG - -# ifndef YYFPRINTF -# include <stdio.h> /* INFRINGES ON USER NAME SPACE */ -# define YYFPRINTF fprintf -# endif - -# define YYDPRINTF(Args) \ -do { \ - if (yydebug) \ - YYFPRINTF Args; \ -} while (YYID (0)) - -# define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ -do { \ - if (yydebug) \ - { \ - YYFPRINTF (stderr, "%s ", Title); \ - yy_symbol_print (stderr, \ - Type, Value, pstate, yyscanner); \ - YYFPRINTF (stderr, "\n"); \ - } \ -} while (YYID (0)) - - -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ - -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_symbol_value_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, struct parser_state *pstate, void *yyscanner) -#else -static void -yy_symbol_value_print (yyoutput, yytype, yyvaluep, pstate, yyscanner) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; - struct parser_state *pstate; - void *yyscanner; -#endif -{ - if (!yyvaluep) - return; - YYUSE (pstate); - YYUSE (yyscanner); -# ifdef YYPRINT - if (yytype < YYNTOKENS) - YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); -# else - YYUSE (yyoutput); -# endif - switch (yytype) - { - default: - break; - } -} - - -/*--------------------------------. -| Print this symbol on YYOUTPUT. | -`--------------------------------*/ - -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_symbol_print (FILE *yyoutput, int yytype, YYSTYPE const * const yyvaluep, struct parser_state *pstate, void *yyscanner) -#else -static void -yy_symbol_print (yyoutput, yytype, yyvaluep, pstate, yyscanner) - FILE *yyoutput; - int yytype; - YYSTYPE const * const yyvaluep; - struct parser_state *pstate; - void *yyscanner; -#endif -{ - if (yytype < YYNTOKENS) - YYFPRINTF (yyoutput, "token %s (", yytname[yytype]); - else - YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]); - - yy_symbol_value_print (yyoutput, yytype, yyvaluep, pstate, yyscanner); - YYFPRINTF (yyoutput, ")"); -} - -/*------------------------------------------------------------------. -| yy_stack_print -- Print the state stack from its BOTTOM up to its | -| TOP (included). | -`------------------------------------------------------------------*/ - -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_stack_print (yytype_int16 *bottom, yytype_int16 *top) -#else -static void -yy_stack_print (bottom, top) - yytype_int16 *bottom; - yytype_int16 *top; -#endif -{ - YYFPRINTF (stderr, "Stack now"); - for (; bottom <= top; ++bottom) - YYFPRINTF (stderr, " %d", *bottom); - YYFPRINTF (stderr, "\n"); -} - -# define YY_STACK_PRINT(Bottom, Top) \ -do { \ - if (yydebug) \ - yy_stack_print ((Bottom), (Top)); \ -} while (YYID (0)) - - -/*------------------------------------------------. -| Report that the YYRULE is going to be reduced. | -`------------------------------------------------*/ - -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yy_reduce_print (YYSTYPE *yyvsp, int yyrule, struct parser_state *pstate, void *yyscanner) -#else -static void -yy_reduce_print (yyvsp, yyrule, pstate, yyscanner) - YYSTYPE *yyvsp; - int yyrule; - struct parser_state *pstate; - void *yyscanner; -#endif -{ - int yynrhs = yyr2[yyrule]; - int yyi; - unsigned long int yylno = yyrline[yyrule]; - YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n", - yyrule - 1, yylno); - /* The symbols being reduced. */ - for (yyi = 0; yyi < yynrhs; yyi++) - { - fprintf (stderr, " $%d = ", yyi + 1); - yy_symbol_print (stderr, yyrhs[yyprhs[yyrule] + yyi], - &(yyvsp[(yyi + 1) - (yynrhs)]) - , pstate, yyscanner); - fprintf (stderr, "\n"); - } -} - -# define YY_REDUCE_PRINT(Rule) \ -do { \ - if (yydebug) \ - yy_reduce_print (yyvsp, Rule, pstate, yyscanner); \ -} while (YYID (0)) - -/* Nonzero means print parse trace. It is left uninitialized so that - multiple parsers can coexist. */ -int yydebug; -#else /* !YYDEBUG */ -# define YYDPRINTF(Args) -# define YY_SYMBOL_PRINT(Title, Type, Value, Location) -# define YY_STACK_PRINT(Bottom, Top) -# define YY_REDUCE_PRINT(Rule) -#endif /* !YYDEBUG */ - - -/* YYINITDEPTH -- initial size of the parser's stacks. */ -#ifndef YYINITDEPTH -# define YYINITDEPTH 200 -#endif - -/* YYMAXDEPTH -- maximum size the stacks can grow to (effective only - if the built-in stack extension method is used). - - Do not make this value too large; the results are undefined if - YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH) - evaluated with infinite-precision integer arithmetic. */ - -#ifndef YYMAXDEPTH -# define YYMAXDEPTH 10000 -#endif - - - -#if YYERROR_VERBOSE - -# ifndef yystrlen -# if defined __GLIBC__ && defined _STRING_H -# define yystrlen strlen -# else -/* Return the length of YYSTR. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static YYSIZE_T -yystrlen (const char *yystr) -#else -static YYSIZE_T -yystrlen (yystr) - const char *yystr; -#endif -{ - YYSIZE_T yylen; - for (yylen = 0; yystr[yylen]; yylen++) - continue; - return yylen; -} -# endif -# endif - -# ifndef yystpcpy -# if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE -# define yystpcpy stpcpy -# else -/* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in - YYDEST. */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static char * -yystpcpy (char *yydest, const char *yysrc) -#else -static char * -yystpcpy (yydest, yysrc) - char *yydest; - const char *yysrc; -#endif -{ - char *yyd = yydest; - const char *yys = yysrc; - - while ((*yyd++ = *yys++) != '\0') - continue; - - return yyd - 1; -} -# endif -# endif - -# ifndef yytnamerr -/* Copy to YYRES the contents of YYSTR after stripping away unnecessary - quotes and backslashes, so that it's suitable for yyerror. The - heuristic is that double-quoting is unnecessary unless the string - contains an apostrophe, a comma, or backslash (other than - backslash-backslash). YYSTR is taken from yytname. If YYRES is - null, do not copy; instead, return the length of what the result - would have been. */ -static YYSIZE_T -yytnamerr (char *yyres, const char *yystr) -{ - if (*yystr == '"') - { - YYSIZE_T yyn = 0; - char const *yyp = yystr; - - for (;;) - switch (*++yyp) - { - case '\'': - case ',': - goto do_not_strip_quotes; - - case '\\': - if (*++yyp != '\\') - goto do_not_strip_quotes; - /* Fall through. */ - default: - if (yyres) - yyres[yyn] = *yyp; - yyn++; - break; - - case '"': - if (yyres) - yyres[yyn] = '\0'; - return yyn; - } - do_not_strip_quotes: ; - } - - if (! yyres) - return yystrlen (yystr); - - return yystpcpy (yyres, yystr) - yyres; -} -# endif - -/* Copy into YYRESULT an error message about the unexpected token - YYCHAR while in state YYSTATE. Return the number of bytes copied, - including the terminating null byte. If YYRESULT is null, do not - copy anything; just return the number of bytes that would be - copied. As a special case, return 0 if an ordinary "syntax error" - message will do. Return YYSIZE_MAXIMUM if overflow occurs during - size calculation. */ -static YYSIZE_T -yysyntax_error (char *yyresult, int yystate, int yychar) -{ - int yyn = yypact[yystate]; - - if (! (YYPACT_NINF < yyn && yyn <= YYLAST)) - return 0; - else - { - int yytype = YYTRANSLATE (yychar); - YYSIZE_T yysize0 = yytnamerr (0, yytname[yytype]); - YYSIZE_T yysize = yysize0; - YYSIZE_T yysize1; - int yysize_overflow = 0; - enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 }; - char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; - int yyx; - -# if 0 - /* This is so xgettext sees the translatable formats that are - constructed on the fly. */ - YY_("syntax error, unexpected %s"); - YY_("syntax error, unexpected %s, expecting %s"); - YY_("syntax error, unexpected %s, expecting %s or %s"); - YY_("syntax error, unexpected %s, expecting %s or %s or %s"); - YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s"); -# endif - char *yyfmt; - char const *yyf; - static char const yyunexpected[] = "syntax error, unexpected %s"; - static char const yyexpecting[] = ", expecting %s"; - static char const yyor[] = " or %s"; - char yyformat[sizeof yyunexpected - + sizeof yyexpecting - 1 - + ((YYERROR_VERBOSE_ARGS_MAXIMUM - 2) - * (sizeof yyor - 1))]; - char const *yyprefix = yyexpecting; - - /* Start YYX at -YYN if negative to avoid negative indexes in - YYCHECK. */ - int yyxbegin = yyn < 0 ? -yyn : 0; - - /* Stay within bounds of both yycheck and yytname. */ - int yychecklim = YYLAST - yyn + 1; - int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS; - int yycount = 1; - - yyarg[0] = yytname[yytype]; - yyfmt = yystpcpy (yyformat, yyunexpected); - - for (yyx = yyxbegin; yyx < yyxend; ++yyx) - if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR) - { - if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM) - { - yycount = 1; - yysize = yysize0; - yyformat[sizeof yyunexpected - 1] = '\0'; - break; - } - yyarg[yycount++] = yytname[yyx]; - yysize1 = yysize + yytnamerr (0, yytname[yyx]); - yysize_overflow |= (yysize1 < yysize); - yysize = yysize1; - yyfmt = yystpcpy (yyfmt, yyprefix); - yyprefix = yyor; - } - - yyf = YY_(yyformat); - yysize1 = yysize + yystrlen (yyf); - yysize_overflow |= (yysize1 < yysize); - yysize = yysize1; - - if (yysize_overflow) - return YYSIZE_MAXIMUM; - - if (yyresult) - { - /* Avoid sprintf, as that infringes on the user's name space. - Don't have undefined behavior even if the translation - produced a string with the wrong number of "%s"s. */ - char *yyp = yyresult; - int yyi = 0; - while ((*yyp = *yyf) != '\0') - { - if (*yyp == '%' && yyf[1] == 's' && yyi < yycount) - { - yyp += yytnamerr (yyp, yyarg[yyi++]); - yyf += 2; - } - else - { - yyp++; - yyf++; - } - } - } - return yysize; - } -} -#endif /* YYERROR_VERBOSE */ - - -/*-----------------------------------------------. -| Release the memory associated to this symbol. | -`-----------------------------------------------*/ - -/*ARGSUSED*/ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -static void -yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep, struct parser_state *pstate, void *yyscanner) -#else -static void -yydestruct (yymsg, yytype, yyvaluep, pstate, yyscanner) - const char *yymsg; - int yytype; - YYSTYPE *yyvaluep; - struct parser_state *pstate; - void *yyscanner; -#endif -{ - YYUSE (yyvaluep); - YYUSE (pstate); - YYUSE (yyscanner); - - if (!yymsg) - yymsg = "Deleting"; - YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); - - switch (yytype) - { - - default: - break; - } -} - - -/* Prevent warnings from -Wmissing-prototypes. */ - -#ifdef YYPARSE_PARAM -#if defined __STDC__ || defined __cplusplus -int yyparse (void *YYPARSE_PARAM); -#else -int yyparse (); -#endif -#else /* ! YYPARSE_PARAM */ -#if defined __STDC__ || defined __cplusplus -int yyparse (struct parser_state *pstate, void *yyscanner); -#else -int yyparse (); -#endif -#endif /* ! YYPARSE_PARAM */ - - - - - - -/*----------. -| yyparse. | -`----------*/ - -#ifdef YYPARSE_PARAM -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -int -yyparse (void *YYPARSE_PARAM) -#else -int -yyparse (YYPARSE_PARAM) - void *YYPARSE_PARAM; -#endif -#else /* ! YYPARSE_PARAM */ -#if (defined __STDC__ || defined __C99__FUNC__ \ - || defined __cplusplus || defined _MSC_VER) -int -yyparse (struct parser_state *pstate, void *yyscanner) -#else -int -yyparse (pstate, yyscanner) - struct parser_state *pstate; - void *yyscanner; -#endif -#endif -{ - /* The look-ahead symbol. */ -int yychar; - -/* The semantic value of the look-ahead symbol. */ -YYSTYPE yylval; - -/* Number of syntax errors so far. */ -int yynerrs; - - int yystate; - int yyn; - int yyresult; - /* Number of tokens to shift before error messages enabled. */ - int yyerrstatus; - /* Look-ahead token as an internal (translated) token number. */ - int yytoken = 0; -#if YYERROR_VERBOSE - /* Buffer for error messages, and its allocated size. */ - char yymsgbuf[128]; - char *yymsg = yymsgbuf; - YYSIZE_T yymsg_alloc = sizeof yymsgbuf; -#endif - - /* Three stacks and their tools: - `yyss': related to states, - `yyvs': related to semantic values, - `yyls': related to locations. - - Refer to the stacks thru separate pointers, to allow yyoverflow - to reallocate them elsewhere. */ - - /* The state stack. */ - yytype_int16 yyssa[YYINITDEPTH]; - yytype_int16 *yyss = yyssa; - yytype_int16 *yyssp; - - /* The semantic value stack. */ - YYSTYPE yyvsa[YYINITDEPTH]; - YYSTYPE *yyvs = yyvsa; - YYSTYPE *yyvsp; - - - -#define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N)) - - YYSIZE_T yystacksize = YYINITDEPTH; - - /* The variables used to return semantic value and location from the - action routines. */ - YYSTYPE yyval; - - - /* The number of symbols on the RHS of the reduced rule. - Keep to zero when no symbol should be popped. */ - int yylen = 0; - - YYDPRINTF ((stderr, "Starting parse\n")); - - yystate = 0; - yyerrstatus = 0; - yynerrs = 0; - yychar = YYEMPTY; /* Cause a token to be read. */ - - /* Initialize stack pointers. - Waste one element of value and location stack - so that they stay on the same level as the state stack. - The wasted elements are never initialized. */ - - yyssp = yyss; - yyvsp = yyvs; - - goto yysetstate; - -/*------------------------------------------------------------. -| yynewstate -- Push a new state, which is found in yystate. | -`------------------------------------------------------------*/ - yynewstate: - /* In all cases, when you get here, the value and location stacks - have just been pushed. So pushing a state here evens the stacks. */ - yyssp++; - - yysetstate: - *yyssp = yystate; - - if (yyss + yystacksize - 1 <= yyssp) - { - /* Get the current used size of the three stacks, in elements. */ - YYSIZE_T yysize = yyssp - yyss + 1; - -#ifdef yyoverflow - { - /* Give user a chance to reallocate the stack. Use copies of - these so that the &'s don't force the real ones into - memory. */ - YYSTYPE *yyvs1 = yyvs; - yytype_int16 *yyss1 = yyss; - - - /* Each stack pointer address is followed by the size of the - data in use in that stack, in bytes. This used to be a - conditional around just the two extra args, but that might - be undefined if yyoverflow is a macro. */ - yyoverflow (YY_("memory exhausted"), - &yyss1, yysize * sizeof (*yyssp), - &yyvs1, yysize * sizeof (*yyvsp), - - &yystacksize); - - yyss = yyss1; - yyvs = yyvs1; - } -#else /* no yyoverflow */ -# ifndef YYSTACK_RELOCATE - goto yyexhaustedlab; -# else - /* Extend the stack our own way. */ - if (YYMAXDEPTH <= yystacksize) - goto yyexhaustedlab; - yystacksize *= 2; - if (YYMAXDEPTH < yystacksize) - yystacksize = YYMAXDEPTH; - - { - yytype_int16 *yyss1 = yyss; - union yyalloc *yyptr = - (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); - if (! yyptr) - goto yyexhaustedlab; - YYSTACK_RELOCATE (yyss); - YYSTACK_RELOCATE (yyvs); - -# undef YYSTACK_RELOCATE - if (yyss1 != yyssa) - YYSTACK_FREE (yyss1); - } -# endif -#endif /* no yyoverflow */ - - yyssp = yyss + yysize - 1; - yyvsp = yyvs + yysize - 1; - - - YYDPRINTF ((stderr, "Stack size increased to %lu\n", - (unsigned long int) yystacksize)); - - if (yyss + yystacksize - 1 <= yyssp) - YYABORT; - } - - YYDPRINTF ((stderr, "Entering state %d\n", yystate)); - - goto yybackup; - -/*-----------. -| yybackup. | -`-----------*/ -yybackup: - - /* Do appropriate processing given the current state. Read a - look-ahead token if we need one and don't already have one. */ - - /* First try to decide what to do without reference to look-ahead token. */ - yyn = yypact[yystate]; - if (yyn == YYPACT_NINF) - goto yydefault; - - /* Not known => get a look-ahead token if don't already have one. */ - - /* YYCHAR is either YYEMPTY or YYEOF or a valid look-ahead symbol. */ - if (yychar == YYEMPTY) - { - YYDPRINTF ((stderr, "Reading a token: ")); - yychar = YYLEX; - } - - if (yychar <= YYEOF) - { - yychar = yytoken = YYEOF; - YYDPRINTF ((stderr, "Now at end of input.\n")); - } - else - { - yytoken = YYTRANSLATE (yychar); - YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc); - } - - /* If the proper action on seeing token YYTOKEN is to reduce or to - detect an error, take that action. */ - yyn += yytoken; - if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken) - goto yydefault; - yyn = yytable[yyn]; - if (yyn <= 0) - { - if (yyn == 0 || yyn == YYTABLE_NINF) - goto yyerrlab; - yyn = -yyn; - goto yyreduce; - } - - if (yyn == YYFINAL) - YYACCEPT; - - /* Count tokens shifted since error; after three, turn off error - status. */ - if (yyerrstatus) - yyerrstatus--; - - /* Shift the look-ahead token. */ - YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); - - /* Discard the shifted token unless it is eof. */ - if (yychar != YYEOF) - yychar = YYEMPTY; - - yystate = yyn; - *++yyvsp = yylval; - - goto yynewstate; - - -/*-----------------------------------------------------------. -| yydefault -- do the default action for the current state. | -`-----------------------------------------------------------*/ -yydefault: - yyn = yydefact[yystate]; - if (yyn == 0) - goto yyerrlab; - goto yyreduce; - - -/*-----------------------------. -| yyreduce -- Do a reduction. | -`-----------------------------*/ -yyreduce: - /* yyn is the number of a rule to reduce with. */ - yylen = yyr2[yyn]; - - /* If YYLEN is nonzero, implement the default value of the action: - `$$ = $1'. - - Otherwise, the following line sets YYVAL to garbage. - This behavior is undocumented and Bison - users should not rely upon it. Assigning to YYVAL - unconditionally makes the parser a bit smaller, and it avoids a - GCC warning that YYVAL may be used uninitialized. */ - yyval = yyvsp[1-yylen]; - - - YY_REDUCE_PRINT (yyn); - switch (yyn) - { - case 4: -#line 121 "mimeparser.y" - { - mm_context_attachpart(pstate->ctx, pstate->current_mimepart); - pstate->current_mimepart = mm_mimepart_new(); - pstate->have_contenttype = 0; - } - break; - - case 5: -#line 127 "mimeparser.y" - { - dprintf2(pstate,"This was a multipart message\n"); - } - break; - - case 6: -#line 134 "mimeparser.y" - { - dprintf2(pstate,"This was a single part message\n"); - mm_context_attachpart(pstate->ctx, pstate->current_mimepart); - } - break; - - case 8: -#line 144 "mimeparser.y" - { - /* If we did not find a Content-Type header for the current - * MIME part (or envelope), we create one and attach it. - * According to the RFC, a type of "text/plain" and a - * charset of "us-ascii" can be assumed. - */ - struct mm_content *ct; - struct mm_param *param; - - if (!pstate->have_contenttype) { - ct = mm_content_new(); - mm_content_settype(ct, "text/plain"); - - param = mm_param_new(); - param->name = xstrdup("charset"); - param->value = xstrdup("us-ascii"); - - mm_content_attachtypeparam(ct, param); - mm_mimepart_attachcontenttype(pstate->current_mimepart, ct); - } - pstate->have_contenttype = 0; - } - break; - - case 10: -#line 172 "mimeparser.y" - { - char *preamble; - size_t offset; - - if ((yyvsp[(1) - (1)].position).start != (yyvsp[(1) - (1)].position).end) { - preamble = PARSE_readmessagepart(0, (yyvsp[(1) - (1)].position).start, (yyvsp[(1) - (1)].position).end, - &offset,yyscanner,pstate); - if (preamble == NULL) { - return(-1); - } - pstate->ctx->preamble = preamble; - dprintf2(pstate,"PREAMBLE:\n%s\n", preamble); - } - } - break; - - case 12: -#line 191 "mimeparser.y" - { - } - break; - - case 16: -#line 204 "mimeparser.y" - { - - if (mm_context_attachpart(pstate->ctx, pstate->current_mimepart) == -1) { - mm_errno = MM_ERROR_ERRNO; - return(-1); - } - - pstate->temppart = mm_mimepart_new(); - pstate->current_mimepart = pstate->temppart; - pstate->mime_parts++; - } - break; - - case 18: -#line 221 "mimeparser.y" - { - pstate->have_contenttype = 1; - if (mm_content_iscomposite(pstate->envelope->type)) { - pstate->ctx->messagetype = MM_MSGTYPE_MULTIPART; - } else { - pstate->ctx->messagetype = MM_MSGTYPE_FLAT; - } - } - break; - - case 22: -#line 237 "mimeparser.y" - { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("invalid header encountered"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - } - break; - - case 23: -#line 251 "mimeparser.y" - { - struct mm_mimeheader *hdr; - hdr = mm_mimeheader_generate((yyvsp[(1) - (4)].string), (yyvsp[(3) - (4)].string)); - mm_mimepart_attachheader(pstate->current_mimepart, hdr); - } - break; - - case 24: -#line 258 "mimeparser.y" - { - struct mm_mimeheader *hdr; - - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid header encountered"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - - hdr = mm_mimeheader_generate((yyvsp[(1) - (3)].string), xstrdup("")); - mm_mimepart_attachheader(pstate->current_mimepart, hdr); - } - break; - - case 25: -#line 277 "mimeparser.y" - { - mm_content_settype(pstate->ctype, "%s", (yyvsp[(3) - (4)].string)); - mm_mimepart_attachcontenttype(pstate->current_mimepart, pstate->ctype); - dprintf2(pstate,"Content-Type -> %s\n", (yyvsp[(3) - (4)].string)); - pstate->ctype = mm_content_new(); - } - break; - - case 26: -#line 285 "mimeparser.y" - { - mm_content_settype(pstate->ctype, "%s", (yyvsp[(3) - (5)].string)); - mm_mimepart_attachcontenttype(pstate->current_mimepart, pstate->ctype); - dprintf2(pstate,"Content-Type (P) -> %s\n", (yyvsp[(3) - (5)].string)); - pstate->ctype = mm_content_new(); - } - break; - - case 27: -#line 295 "mimeparser.y" - { - dprintf2(pstate,"Content-Disposition -> %s\n", (yyvsp[(3) - (4)].string)); - pstate->ctype->disposition_type = xstrdup((yyvsp[(3) - (4)].string)); - } - break; - - case 28: -#line 301 "mimeparser.y" - { - dprintf2(pstate,"Content-Disposition (P) -> %s; params\n", (yyvsp[(3) - (5)].string)); - pstate->ctype->disposition_type = xstrdup((yyvsp[(3) - (5)].string)); - } - break; - - case 29: -#line 309 "mimeparser.y" - { - /* - * According to RFC 2183, the content disposition value may - * only be "inline", "attachment" or an extension token. We - * catch invalid values here if we are not in loose parsing - * mode. - */ - if (strcasecmp((yyvsp[(1) - (1)].string), "inline") && strcasecmp((yyvsp[(1) - (1)].string), "attachment") - && strncasecmp((yyvsp[(1) - (1)].string), "X-", 2)) { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid content-disposition"); - return(-1); - } - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - (yyval.string) = (yyvsp[(1) - (1)].string); - } - break; - - case 30: -#line 332 "mimeparser.y" - { - dprintf2(pstate,"Content-Transfer-Encoding -> %s\n", (yyvsp[(3) - (4)].string)); - } - break; - - case 31: -#line 339 "mimeparser.y" - { - dprintf2(pstate,"MIME-Version -> '%s'\n", (yyvsp[(3) - (4)].string)); - } - break; - - case 35: -#line 356 "mimeparser.y" - { - char type[255]; - snprintf(type, sizeof(type), "%s/%s", (yyvsp[(1) - (3)].string), (yyvsp[(3) - (3)].string)); - (yyval.string) = type; - } - break; - - case 38: -#line 369 "mimeparser.y" - { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid Content-Type header"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - } - break; - - case 41: -#line 387 "mimeparser.y" - { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid Content-Disposition header"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - } - break; - - case 42: -#line 401 "mimeparser.y" - { - struct mm_param *param; - param = mm_param_new(); - - dprintf2(pstate,"Param: '%s', Value: '%s'\n", (yyvsp[(1) - (3)].string), (yyvsp[(3) - (3)].string)); - - /* Catch an eventual boundary identifier */ - if (!strcasecmp((yyvsp[(1) - (3)].string), "boundary")) { - if (pstate->lstate.boundary_string == NULL) { - set_boundary((yyvsp[(3) - (3)].string),pstate); - } else { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("duplicate boundary " - "found"); - return -1; - } else { - /* TODO: attach MM_WARNING_DUPPARAM */ - } - } - } - - param->name = xstrdup((yyvsp[(1) - (3)].string)); - param->value = xstrdup((yyvsp[(3) - (3)].string)); - - mm_content_attachtypeparam(pstate->ctype, param); - } - break; - - case 43: -#line 432 "mimeparser.y" - { - struct mm_param *param; - param = mm_param_new(); - - param->name = xstrdup((yyvsp[(1) - (3)].string)); - param->value = xstrdup((yyvsp[(3) - (3)].string)); - - mm_content_attachdispositionparam(pstate->ctype, param); - - } - break; - - case 44: -#line 446 "mimeparser.y" - { - dprintf2(pstate,"contenttype_param_val: WORD=%s\n", (yyvsp[(1) - (1)].string)); - (yyval.string) = (yyvsp[(1) - (1)].string); - } - break; - - case 45: -#line 452 "mimeparser.y" - { - dprintf2(pstate,"contenttype_param_val: TSPECIAL\n"); - /* For broken MIME implementation */ - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("tspecial without quotes"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVAL */ - } - (yyval.string) = (yyvsp[(1) - (1)].string); - } - break; - - case 46: -#line 467 "mimeparser.y" - { - dprintf2(pstate,"contenttype_param_val: \"TSPECIAL\"\n" ); - (yyval.string) = (yyvsp[(2) - (3)].string); - } - break; - - case 47: -#line 475 "mimeparser.y" - { - dprintf2(pstate,"End of headers at line %d\n", pstate->lstate.lineno); - } - break; - - case 48: -#line 482 "mimeparser.y" - { - if (pstate->lstate.boundary_string == NULL) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - if (strcmp(pstate->lstate.boundary_string, (yyvsp[(1) - (2)].string))) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("invalid boundary: '%s' (%d)", (yyvsp[(1) - (2)].string), strlen((yyvsp[(1) - (2)].string))); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - dprintf2(pstate,"New MIME part... (%s)\n", (yyvsp[(1) - (2)].string)); - } - break; - - case 49: -#line 501 "mimeparser.y" - { - if (pstate->lstate.endboundary_string == NULL) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - if (strcmp(pstate->lstate.endboundary_string, (yyvsp[(1) - (1)].string))) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("invalid end boundary: %s", (yyvsp[(1) - (1)].string)); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - dprintf2(pstate,"End of MIME message\n"); - } - break; - - case 50: -#line 520 "mimeparser.y" - { - char *body; - size_t offset; - - dprintf2(pstate,"BODY (%d/%d), SIZE %d\n", (yyvsp[(1) - (1)].position).start, (yyvsp[(1) - (1)].position).end, (yyvsp[(1) - (1)].position).end - (yyvsp[(1) - (1)].position).start); - - body = PARSE_readmessagepart((yyvsp[(1) - (1)].position).opaque_start, (yyvsp[(1) - (1)].position).start, (yyvsp[(1) - (1)].position).end, - &offset,yyscanner,pstate); - - if (body == NULL) { - return(-1); - } - pstate->current_mimepart->opaque_body = body; - pstate->current_mimepart->body = body + offset; - pstate->current_mimepart->opaque_length = (yyvsp[(1) - (1)].position).end - (yyvsp[(1) - (1)].position).start - 2 + offset; - pstate->current_mimepart->length = pstate->current_mimepart->opaque_length - offset; - } - break; - - -/* Line 1267 of yacc.c. */ -#line 1915 "mimeparser.tab.c" - default: break; - } - YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc); - - YYPOPSTACK (yylen); - yylen = 0; - YY_STACK_PRINT (yyss, yyssp); - - *++yyvsp = yyval; - - - /* Now `shift' the result of the reduction. Determine what state - that goes to, based on the state we popped back to and the rule - number reduced by. */ - - yyn = yyr1[yyn]; - - yystate = yypgoto[yyn - YYNTOKENS] + *yyssp; - if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp) - yystate = yytable[yystate]; - else - yystate = yydefgoto[yyn - YYNTOKENS]; - - goto yynewstate; - - -/*------------------------------------. -| yyerrlab -- here on detecting error | -`------------------------------------*/ -yyerrlab: - /* If not already recovering from an error, report this error. */ - if (!yyerrstatus) - { - ++yynerrs; -#if ! YYERROR_VERBOSE - yyerror (pstate, yyscanner, YY_("syntax error")); -#else - { - YYSIZE_T yysize = yysyntax_error (0, yystate, yychar); - if (yymsg_alloc < yysize && yymsg_alloc < YYSTACK_ALLOC_MAXIMUM) - { - YYSIZE_T yyalloc = 2 * yysize; - if (! (yysize <= yyalloc && yyalloc <= YYSTACK_ALLOC_MAXIMUM)) - yyalloc = YYSTACK_ALLOC_MAXIMUM; - if (yymsg != yymsgbuf) - YYSTACK_FREE (yymsg); - yymsg = (char *) YYSTACK_ALLOC (yyalloc); - if (yymsg) - yymsg_alloc = yyalloc; - else - { - yymsg = yymsgbuf; - yymsg_alloc = sizeof yymsgbuf; - } - } - - if (0 < yysize && yysize <= yymsg_alloc) - { - (void) yysyntax_error (yymsg, yystate, yychar); - yyerror (pstate, yyscanner, yymsg); - } - else - { - yyerror (pstate, yyscanner, YY_("syntax error")); - if (yysize != 0) - goto yyexhaustedlab; - } - } -#endif - } - - - - if (yyerrstatus == 3) - { - /* If just tried and failed to reuse look-ahead token after an - error, discard it. */ - - if (yychar <= YYEOF) - { - /* Return failure if at end of input. */ - if (yychar == YYEOF) - YYABORT; - } - else - { - yydestruct ("Error: discarding", - yytoken, &yylval, pstate, yyscanner); - yychar = YYEMPTY; - } - } - - /* Else will try to reuse look-ahead token after shifting the error - token. */ - goto yyerrlab1; - - -/*---------------------------------------------------. -| yyerrorlab -- error raised explicitly by YYERROR. | -`---------------------------------------------------*/ -yyerrorlab: - - /* Pacify compilers like GCC when the user code never invokes - YYERROR and the label yyerrorlab therefore never appears in user - code. */ - if (/*CONSTCOND*/ 0) - goto yyerrorlab; - - /* Do not reclaim the symbols of the rule which action triggered - this YYERROR. */ - YYPOPSTACK (yylen); - yylen = 0; - YY_STACK_PRINT (yyss, yyssp); - yystate = *yyssp; - goto yyerrlab1; - - -/*-------------------------------------------------------------. -| yyerrlab1 -- common code for both syntax error and YYERROR. | -`-------------------------------------------------------------*/ -yyerrlab1: - yyerrstatus = 3; /* Each real token shifted decrements this. */ - - for (;;) - { - yyn = yypact[yystate]; - if (yyn != YYPACT_NINF) - { - yyn += YYTERROR; - if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) - { - yyn = yytable[yyn]; - if (0 < yyn) - break; - } - } - - /* Pop the current state because it cannot handle the error token. */ - if (yyssp == yyss) - YYABORT; - - - yydestruct ("Error: popping", - yystos[yystate], yyvsp, pstate, yyscanner); - YYPOPSTACK (1); - yystate = *yyssp; - YY_STACK_PRINT (yyss, yyssp); - } - - if (yyn == YYFINAL) - YYACCEPT; - - *++yyvsp = yylval; - - - /* Shift the error token. */ - YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp); - - yystate = yyn; - goto yynewstate; - - -/*-------------------------------------. -| yyacceptlab -- YYACCEPT comes here. | -`-------------------------------------*/ -yyacceptlab: - yyresult = 0; - goto yyreturn; - -/*-----------------------------------. -| yyabortlab -- YYABORT comes here. | -`-----------------------------------*/ -yyabortlab: - yyresult = 1; - goto yyreturn; - -#ifndef yyoverflow -/*-------------------------------------------------. -| yyexhaustedlab -- memory exhaustion comes here. | -`-------------------------------------------------*/ -yyexhaustedlab: - yyerror (pstate, yyscanner, YY_("memory exhausted")); - yyresult = 2; - /* Fall through. */ -#endif - -yyreturn: - if (yychar != YYEOF && yychar != YYEMPTY) - yydestruct ("Cleanup: discarding lookahead", - yytoken, &yylval, pstate, yyscanner); - /* Do not reclaim the symbols of the rule which action triggered - this YYABORT or YYACCEPT. */ - YYPOPSTACK (yylen); - YY_STACK_PRINT (yyss, yyssp); - while (yyssp != yyss) - { - yydestruct ("Cleanup: popping", - yystos[*yyssp], yyvsp, pstate, yyscanner); - YYPOPSTACK (1); - } -#ifndef yyoverflow - if (yyss != yyssa) - YYSTACK_FREE (yyss); -#endif -#if YYERROR_VERBOSE - if (yymsg != yymsgbuf) - YYSTACK_FREE (yymsg); -#endif - /* Make sure YYID is used. */ - return YYID (yyresult); -} - - -#line 539 "mimeparser.y" - - -/* - * This function gets the specified part from the currently parsed message. - */ -static char * -PARSE_readmessagepart(size_t opaque_start, size_t real_start, size_t end, - size_t *offset, yyscan_t yyscanner, struct parser_state *pstate) -{ - size_t body_size; - size_t current; - size_t start; - char *body; - - /* calculate start and offset markers for the opaque and - * header stripped body message. - */ - if (opaque_start > 0) { - /* Multipart message */ - if (real_start) { - if (real_start < opaque_start) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency (S:%d/O:%d)", - real_start, - opaque_start); - return(NULL); - } - start = opaque_start; - *offset = real_start - start; - /* Flat message */ - } else { - start = opaque_start; - *offset = 0; - } - } else { - start = real_start; - *offset = 0; - } - - /* The next three cases should NOT happen anytime */ - if (end <= start) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency,2"); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - if (start < *offset) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency, S:%d,O:%d,L:%d", start, offset, pstate->lstate.lineno); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - if (start < 0 || end < 0) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency,4"); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - - /* XXX: do we want to enforce a maximum body size? make it a - * parser option? */ - - /* Read in the body message */ - body_size = end - start; - - if (body_size < 1) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("size of body cannot be < 1"); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - - body = (char *)malloc(body_size + 1); - if (body == NULL) { - mm_errno = MM_ERROR_ERRNO; - return(NULL); - } - - /* Get the message body either from a stream or a memory - * buffer. - */ - if (mimeparser_yyget_in(yyscanner) != NULL) { - FILE *x = mimeparser_yyget_in(yyscanner); - current = ftell(x); - fseek(x, start - 1, SEEK_SET); - fread(body, body_size - 1, 1, x); - fseek(x, current, SEEK_SET); - } else if (pstate->lstate.message_buffer != NULL) { - strlcpy(body, pstate->lstate.message_buffer + start - 1, body_size); - } - - return(body); - -} - -int -yyerror(struct parser_state *pstate, void *yyscanner, const char *str) -{ - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("%s", str); - mm_error_setlineno(pstate->lstate.lineno); - return -1; -} - -int -mimeparser_yywrap(void) -{ - return 1; -} - -/** - * Sets the boundary value for the current message - */ -int -set_boundary(char *str, struct parser_state *pstate) -{ - size_t blen; - - blen = strlen(str); - - pstate->lstate.boundary_string = (char *)malloc(blen + 3); - pstate->lstate.endboundary_string = (char *)malloc(blen + 5); - - if (pstate->lstate.boundary_string == NULL || pstate->lstate.endboundary_string == NULL) { - if (pstate->lstate.boundary_string != NULL) { - free(pstate->lstate.boundary_string); - } - if (pstate->lstate.endboundary_string != NULL) { - free(pstate->lstate.endboundary_string); - } - return -1; - } - - pstate->ctx->boundary = xstrdup(str); - - snprintf(pstate->lstate.boundary_string, blen + 3, "--%s", str); - snprintf(pstate->lstate.endboundary_string, blen + 5, "--%s--", str); - - return 0; -} - -/** - * Debug printf() - */ -int -dprintf2(struct parser_state *pstate, const char *fmt, ...) -{ - va_list ap; - char *msg; - if (pstate->debug == 0) return 1; - - va_start(ap, fmt); - vasprintf(&msg, fmt, ap); - va_end(ap); - - fprintf(stderr, "%s", msg); - free(msg); - - return 0; - -} - -void reset_environ(struct parser_state *pstate) -{ - pstate->lstate.lineno = 0; - pstate->lstate.boundary_string = NULL; - pstate->lstate.endboundary_string = NULL; - pstate->lstate.message_buffer = NULL; - pstate->mime_parts = 0; - pstate->debug = 0; - pstate->envelope = NULL; - pstate->temppart = NULL; - pstate->ctype = NULL; - pstate->current_mimepart = NULL; - - pstate->have_contenttype = 0; -} -/** - * Initializes the parser engine. - */ -int -PARSER_initialize(struct parser_state *pstate, void *yyscanner) -{ - void reset_lexer_state(void *yyscanner, struct parser_state *); -#if 0 - if (pstate->ctx != NULL) { - xfree(pstate->ctx); - pstate->ctx = NULL; - } - if (pstate->envelope != NULL) { - xfree(pstate->envelope); - pstate->envelope = NULL; - } - if (pstate->ctype != NULL) { - xfree(pstate->ctype); - pstate->ctype = NULL; - } -#endif - /* yydebug = 1; */ - reset_environ(pstate); - reset_lexer_state(yyscanner,pstate); - - pstate->envelope = mm_mimepart_new(); - pstate->current_mimepart = pstate->envelope; - pstate->ctype = mm_content_new(); - - pstate->have_contenttype = 0; - - return 1; -} - - - diff --git a/main/minimime/mimeparser.tab.h b/main/minimime/mimeparser.tab.h deleted file mode 100644 index 6cf3f22a2..000000000 --- a/main/minimime/mimeparser.tab.h +++ /dev/null @@ -1,112 +0,0 @@ -/* A Bison parser, made by GNU Bison 2.3. */ - -/* Skeleton interface for Bison's Yacc-like parsers in C - - Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006 - Free Software Foundation, Inc. - - This program 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. - - This program 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. - - You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, - Boston, MA 02110-1301, USA. */ - -/* As a special exception, you may create a larger work that contains - part or all of the Bison parser skeleton and distribute that work - under terms of your choice, so long as that work isn't itself a - parser generator using the skeleton or a modified version thereof - as a parser skeleton. Alternatively, if you modify or redistribute - the parser skeleton itself, you may (at your option) remove this - special exception, which will cause the skeleton and the resulting - Bison output files to be licensed under the GNU General Public - License without this special exception. - - This special exception was added by the Free Software Foundation in - version 2.2 of Bison. */ - -/* Tokens. */ -#ifndef YYTOKENTYPE -# define YYTOKENTYPE - /* Put the tokens into the symbol table, so that GDB and other debuggers - know about them. */ - enum yytokentype { - ANY = 258, - COLON = 259, - DASH = 260, - DQUOTE = 261, - ENDOFHEADERS = 262, - EOL = 263, - EOM = 264, - EQUAL = 265, - MIMEVERSION_HEADER = 266, - SEMICOLON = 267, - CONTENTDISPOSITION_HEADER = 268, - CONTENTENCODING_HEADER = 269, - CONTENTTYPE_HEADER = 270, - MAIL_HEADER = 271, - HEADERVALUE = 272, - BOUNDARY = 273, - ENDBOUNDARY = 274, - CONTENTTYPE_VALUE = 275, - TSPECIAL = 276, - WORD = 277, - BODY = 278, - PREAMBLE = 279, - POSTAMBLE = 280 - }; -#endif -/* Tokens. */ -#define ANY 258 -#define COLON 259 -#define DASH 260 -#define DQUOTE 261 -#define ENDOFHEADERS 262 -#define EOL 263 -#define EOM 264 -#define EQUAL 265 -#define MIMEVERSION_HEADER 266 -#define SEMICOLON 267 -#define CONTENTDISPOSITION_HEADER 268 -#define CONTENTENCODING_HEADER 269 -#define CONTENTTYPE_HEADER 270 -#define MAIL_HEADER 271 -#define HEADERVALUE 272 -#define BOUNDARY 273 -#define ENDBOUNDARY 274 -#define CONTENTTYPE_VALUE 275 -#define TSPECIAL 276 -#define WORD 277 -#define BODY 278 -#define PREAMBLE 279 -#define POSTAMBLE 280 - - - - -#if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED -typedef union YYSTYPE -#line 69 "mimeparser.y" -{ - int number; - char *string; - struct s_position position; -} -/* Line 1529 of yacc.c. */ -#line 105 "mimeparser.tab.h" - YYSTYPE; -# define yystype YYSTYPE /* obsolescent; will be withdrawn */ -# define YYSTYPE_IS_DECLARED 1 -# define YYSTYPE_IS_TRIVIAL 1 -#endif - - - diff --git a/main/minimime/mimeparser.y b/main/minimime/mimeparser.y deleted file mode 100644 index 18f409f35..000000000 --- a/main/minimime/mimeparser.y +++ /dev/null @@ -1,750 +0,0 @@ -%{ -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/** - * These are the grammatic definitions in yacc syntax to parse MIME conform - * messages. - * - * TODO: - * - honour parse flags passed to us (partly done) - * - parse Content-Disposition header (partly done) - * - parse Content-Encoding header - */ -#include <stdio.h> -#include <stdarg.h> -#include <stdlib.h> -#include <string.h> -#include <assert.h> -#include <errno.h> - -#include "mimeparser.h" -#include "mm.h" -#include "mm_internal.h" - -int set_boundary(char *,struct parser_state *); -int mimeparser_yywrap(void); -void reset_environ(struct parser_state *pstate); -int PARSER_initialize(struct parser_state *pstate, void *yyscanner); - -typedef void *yyscan_t; - -static char *PARSE_readmessagepart(size_t, size_t, size_t, size_t *,yyscan_t, struct parser_state *); -FILE *mimeparser_yyget_in (yyscan_t yyscanner ); - -%} - -%pure-parser -%parse-param {struct parser_state *pstate} -%parse-param {void *yyscanner} -%lex-param {void *yyscanner} - -%union -{ - int number; - char *string; - struct s_position position; -} - -%token ANY -%token COLON -%token DASH -%token DQUOTE -%token ENDOFHEADERS -%token EOL -%token EOM -%token EQUAL -%token MIMEVERSION_HEADER -%token SEMICOLON - -%token <string> CONTENTDISPOSITION_HEADER -%token <string> CONTENTENCODING_HEADER -%token <string> CONTENTTYPE_HEADER -%token <string> MAIL_HEADER -%token <string> HEADERVALUE -%token <string> BOUNDARY -%token <string> ENDBOUNDARY -%token <string> CONTENTTYPE_VALUE -%token <string> TSPECIAL -%token <string> WORD - -%token <position> BODY -%token <position> PREAMBLE -%token <position> POSTAMBLE - -%type <string> content_disposition -%type <string> contenttype_parameter_value -%type <string> mimetype -%type <string> body - -%start message - -%% - -/* This is a parser for a MIME-conform message, which is in either single - * part or multi part format. - */ -message : - multipart_message - | - singlepart_message - ; - -multipart_message: - headers preamble - { - mm_context_attachpart(pstate->ctx, pstate->current_mimepart); - pstate->current_mimepart = mm_mimepart_new(); - pstate->have_contenttype = 0; - } - mimeparts endboundary postamble - { - dprintf2(pstate,"This was a multipart message\n"); - } - ; - -singlepart_message: - headers body - { - dprintf2(pstate,"This was a single part message\n"); - mm_context_attachpart(pstate->ctx, pstate->current_mimepart); - } - ; - -headers : - header headers - | - end_headers - { - /* If we did not find a Content-Type header for the current - * MIME part (or envelope), we create one and attach it. - * According to the RFC, a type of "text/plain" and a - * charset of "us-ascii" can be assumed. - */ - struct mm_content *ct; - struct mm_param *param; - - if (!pstate->have_contenttype) { - ct = mm_content_new(); - mm_content_settype(ct, "text/plain"); - - param = mm_param_new(); - param->name = xstrdup("charset"); - param->value = xstrdup("us-ascii"); - - mm_content_attachtypeparam(ct, param); - mm_mimepart_attachcontenttype(pstate->current_mimepart, ct); - } - pstate->have_contenttype = 0; - } - | - header - ; - -preamble: - PREAMBLE - { - char *preamble; - size_t offset; - - if ($1.start != $1.end) { - preamble = PARSE_readmessagepart(0, $1.start, $1.end, - &offset,yyscanner,pstate); - if (preamble == NULL) { - return(-1); - } - pstate->ctx->preamble = preamble; - dprintf2(pstate,"PREAMBLE:\n%s\n", preamble); - } - } - | - ; - -postamble: - POSTAMBLE - { - } - | - ; - -mimeparts: - mimeparts mimepart - | - mimepart - ; - -mimepart: - boundary headers body - { - - if (mm_context_attachpart(pstate->ctx, pstate->current_mimepart) == -1) { - mm_errno = MM_ERROR_ERRNO; - return(-1); - } - - pstate->temppart = mm_mimepart_new(); - pstate->current_mimepart = pstate->temppart; - pstate->mime_parts++; - } - ; - -header : - mail_header - | - contenttype_header - { - pstate->have_contenttype = 1; - if (mm_content_iscomposite(pstate->envelope->type)) { - pstate->ctx->messagetype = MM_MSGTYPE_MULTIPART; - } else { - pstate->ctx->messagetype = MM_MSGTYPE_FLAT; - } - } - | - contentdisposition_header - | - contentencoding_header - | - mimeversion_header - | - invalid_header - { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("invalid header encountered"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - } - ; - -mail_header: - MAIL_HEADER COLON WORD EOL - { - struct mm_mimeheader *hdr; - hdr = mm_mimeheader_generate($1, $3); - mm_mimepart_attachheader(pstate->current_mimepart, hdr); - } - | - MAIL_HEADER COLON EOL - { - struct mm_mimeheader *hdr; - - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid header encountered"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - - hdr = mm_mimeheader_generate($1, xstrdup("")); - mm_mimepart_attachheader(pstate->current_mimepart, hdr); - } - ; - -contenttype_header: - CONTENTTYPE_HEADER COLON mimetype EOL - { - mm_content_settype(pstate->ctype, "%s", $3); - mm_mimepart_attachcontenttype(pstate->current_mimepart, pstate->ctype); - dprintf2(pstate,"Content-Type -> %s\n", $3); - pstate->ctype = mm_content_new(); - } - | - CONTENTTYPE_HEADER COLON mimetype contenttype_parameters EOL - { - mm_content_settype(pstate->ctype, "%s", $3); - mm_mimepart_attachcontenttype(pstate->current_mimepart, pstate->ctype); - dprintf2(pstate,"Content-Type (P) -> %s\n", $3); - pstate->ctype = mm_content_new(); - } - ; - -contentdisposition_header: - CONTENTDISPOSITION_HEADER COLON content_disposition EOL - { - dprintf2(pstate,"Content-Disposition -> %s\n", $3); - pstate->ctype->disposition_type = xstrdup($3); - } - | - CONTENTDISPOSITION_HEADER COLON content_disposition content_disposition_parameters EOL - { - dprintf2(pstate,"Content-Disposition (P) -> %s; params\n", $3); - pstate->ctype->disposition_type = xstrdup($3); - } - ; - -content_disposition: - WORD - { - /* - * According to RFC 2183, the content disposition value may - * only be "inline", "attachment" or an extension token. We - * catch invalid values here if we are not in loose parsing - * mode. - */ - if (strcasecmp($1, "inline") && strcasecmp($1, "attachment") - && strncasecmp($1, "X-", 2)) { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid content-disposition"); - return(-1); - } - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - $$ = $1; - } - ; - -contentencoding_header: - CONTENTENCODING_HEADER COLON WORD EOL - { - dprintf2(pstate,"Content-Transfer-Encoding -> %s\n", $3); - } - ; - -mimeversion_header: - MIMEVERSION_HEADER COLON WORD EOL - { - dprintf2(pstate,"MIME-Version -> '%s'\n", $3); - } - ; - -invalid_header: - any EOL - ; - -any: - any ANY - | - ANY - ; - -mimetype: - WORD '/' WORD - { - char type[255]; - snprintf(type, sizeof(type), "%s/%s", $1, $3); - $$ = type; - } - ; - -contenttype_parameters: - SEMICOLON contenttype_parameter contenttype_parameters - | - SEMICOLON contenttype_parameter - | - SEMICOLON - { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid Content-Type header"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - } - ; - -content_disposition_parameters: - SEMICOLON content_disposition_parameter content_disposition_parameters - | - SEMICOLON content_disposition_parameter - | - SEMICOLON - { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("invalid Content-Disposition header"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVHDR */ - } - } - ; - -contenttype_parameter: - WORD EQUAL contenttype_parameter_value - { - struct mm_param *param; - param = mm_param_new(); - - dprintf2(pstate,"Param: '%s', Value: '%s'\n", $1, $3); - - /* Catch an eventual boundary identifier */ - if (!strcasecmp($1, "boundary")) { - if (pstate->lstate.boundary_string == NULL) { - set_boundary($3,pstate); - } else { - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("duplicate boundary " - "found"); - return -1; - } else { - /* TODO: attach MM_WARNING_DUPPARAM */ - } - } - } - - param->name = xstrdup($1); - param->value = xstrdup($3); - - mm_content_attachtypeparam(pstate->ctype, param); - } - ; - -content_disposition_parameter: - WORD EQUAL contenttype_parameter_value - { - struct mm_param *param; - param = mm_param_new(); - - param->name = xstrdup($1); - param->value = xstrdup($3); - - mm_content_attachdispositionparam(pstate->ctype, param); - - } - ; - -contenttype_parameter_value: - WORD - { - dprintf2(pstate,"contenttype_param_val: WORD=%s\n", $1); - $$ = $1; - } - | - TSPECIAL - { - dprintf2(pstate,"contenttype_param_val: TSPECIAL\n"); - /* For broken MIME implementation */ - if (pstate->parsemode != MM_PARSE_LOOSE) { - mm_errno = MM_ERROR_MIME; - mm_error_setmsg("tspecial without quotes"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } else { - /* TODO: attach MM_WARNING_INVAL */ - } - $$ = $1; - } - | - '"' TSPECIAL '"' - { - dprintf2(pstate,"contenttype_param_val: \"TSPECIAL\"\n" ); - $$ = $2; - } - ; - -end_headers : - ENDOFHEADERS - { - dprintf2(pstate,"End of headers at line %d\n", pstate->lstate.lineno); - } - ; - -boundary : - BOUNDARY EOL - { - if (pstate->lstate.boundary_string == NULL) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - if (strcmp(pstate->lstate.boundary_string, $1)) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("invalid boundary: '%s' (%d)", $1, strlen($1)); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - dprintf2(pstate,"New MIME part... (%s)\n", $1); - } - ; - -endboundary : - ENDBOUNDARY - { - if (pstate->lstate.endboundary_string == NULL) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency"); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - if (strcmp(pstate->lstate.endboundary_string, $1)) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("invalid end boundary: %s", $1); - mm_error_setlineno(pstate->lstate.lineno); - return(-1); - } - dprintf2(pstate,"End of MIME message\n"); - } - ; - -body: - BODY - { - char *body; - size_t offset; - - dprintf2(pstate,"BODY (%d/%d), SIZE %d\n", $1.start, $1.end, $1.end - $1.start); - - body = PARSE_readmessagepart($1.opaque_start, $1.start, $1.end, - &offset,yyscanner,pstate); - - if (body == NULL) { - return(-1); - } - pstate->current_mimepart->opaque_body = body; - pstate->current_mimepart->body = body + offset; - pstate->current_mimepart->opaque_length = $1.end - $1.start - 2 + offset; - pstate->current_mimepart->length = pstate->current_mimepart->opaque_length - offset; - } - ; - -%% - -/* - * This function gets the specified part from the currently parsed message. - */ -static char * -PARSE_readmessagepart(size_t opaque_start, size_t real_start, size_t end, - size_t *offset, yyscan_t yyscanner, struct parser_state *pstate) -{ - size_t body_size; - size_t current; - size_t start; - char *body; - - /* calculate start and offset markers for the opaque and - * header stripped body message. - */ - if (opaque_start > 0) { - /* Multipart message */ - if (real_start) { - if (real_start < opaque_start) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency (S:%d/O:%d)", - real_start, - opaque_start); - return(NULL); - } - start = opaque_start; - *offset = real_start - start; - /* Flat message */ - } else { - start = opaque_start; - *offset = 0; - } - } else { - start = real_start; - *offset = 0; - } - - /* The next three cases should NOT happen anytime */ - if (end <= start) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency,2"); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - if (start < *offset) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency, S:%d,O:%d,L:%d", start, offset, pstate->lstate.lineno); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - if (start < 0 || end < 0) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("internal incosistency,4"); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - - /* XXX: do we want to enforce a maximum body size? make it a - * parser option? */ - - /* Read in the body message */ - body_size = end - start; - - if (body_size < 1) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("size of body cannot be < 1"); - mm_error_setlineno(pstate->lstate.lineno); - return(NULL); - } - - body = (char *)malloc(body_size + 1); - if (body == NULL) { - mm_errno = MM_ERROR_ERRNO; - return(NULL); - } - - /* Get the message body either from a stream or a memory - * buffer. - */ - if (mimeparser_yyget_in(yyscanner) != NULL) { - FILE *x = mimeparser_yyget_in(yyscanner); - current = ftell(x); - fseek(x, start - 1, SEEK_SET); - fread(body, body_size - 1, 1, x); - fseek(x, current, SEEK_SET); - } else if (pstate->lstate.message_buffer != NULL) { - strlcpy(body, pstate->lstate.message_buffer + start - 1, body_size); - } - - return(body); - -} - -int -yyerror(struct parser_state *pstate, void *yyscanner, const char *str) -{ - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("%s", str); - mm_error_setlineno(pstate->lstate.lineno); - return -1; -} - -int -mimeparser_yywrap(void) -{ - return 1; -} - -/** - * Sets the boundary value for the current message - */ -int -set_boundary(char *str, struct parser_state *pstate) -{ - size_t blen; - - blen = strlen(str); - - pstate->lstate.boundary_string = (char *)malloc(blen + 3); - pstate->lstate.endboundary_string = (char *)malloc(blen + 5); - - if (pstate->lstate.boundary_string == NULL || pstate->lstate.endboundary_string == NULL) { - if (pstate->lstate.boundary_string != NULL) { - free(pstate->lstate.boundary_string); - } - if (pstate->lstate.endboundary_string != NULL) { - free(pstate->lstate.endboundary_string); - } - return -1; - } - - pstate->ctx->boundary = xstrdup(str); - - snprintf(pstate->lstate.boundary_string, blen + 3, "--%s", str); - snprintf(pstate->lstate.endboundary_string, blen + 5, "--%s--", str); - - return 0; -} - -/** - * Debug printf() - */ -int -dprintf2(struct parser_state *pstate, const char *fmt, ...) -{ - va_list ap; - char *msg; - if (pstate->debug == 0) return 1; - - va_start(ap, fmt); - vasprintf(&msg, fmt, ap); - va_end(ap); - - fprintf(stderr, "%s", msg); - free(msg); - - return 0; - -} - -void reset_environ(struct parser_state *pstate) -{ - pstate->lstate.lineno = 0; - pstate->lstate.boundary_string = NULL; - pstate->lstate.endboundary_string = NULL; - pstate->lstate.message_buffer = NULL; - pstate->mime_parts = 0; - pstate->debug = 0; - pstate->envelope = NULL; - pstate->temppart = NULL; - pstate->ctype = NULL; - pstate->current_mimepart = NULL; - - pstate->have_contenttype = 0; -} -/** - * Initializes the parser engine. - */ -int -PARSER_initialize(struct parser_state *pstate, void *yyscanner) -{ - void reset_lexer_state(void *yyscanner, struct parser_state *); -#if 0 - if (pstate->ctx != NULL) { - xfree(pstate->ctx); - pstate->ctx = NULL; - } - if (pstate->envelope != NULL) { - xfree(pstate->envelope); - pstate->envelope = NULL; - } - if (pstate->ctype != NULL) { - xfree(pstate->ctype); - pstate->ctype = NULL; - } -#endif - /* yydebug = 1; */ - reset_environ(pstate); - reset_lexer_state(yyscanner,pstate); - - pstate->envelope = mm_mimepart_new(); - pstate->current_mimepart = pstate->envelope; - pstate->ctype = mm_content_new(); - - pstate->have_contenttype = 0; - - return 1; -} - - diff --git a/main/minimime/mimeparser.yy.c b/main/minimime/mimeparser.yy.c deleted file mode 100644 index 40d6bd9fa..000000000 --- a/main/minimime/mimeparser.yy.c +++ /dev/null @@ -1,2622 +0,0 @@ -#line 2 "mimeparser.yy.c" - -#line 4 "mimeparser.yy.c" - -#define YY_INT_ALIGNED short int - -/* A lexical scanner generated by flex */ - -#define FLEX_SCANNER -#define YY_FLEX_MAJOR_VERSION 2 -#define YY_FLEX_MINOR_VERSION 5 -#define YY_FLEX_SUBMINOR_VERSION 33 -#if YY_FLEX_SUBMINOR_VERSION > 0 -#define FLEX_BETA -#endif - -/* First, we deal with platform-specific or compiler-specific issues. */ - -/* begin standard C headers. */ -#include <stdio.h> -#include <string.h> -#include <errno.h> -#include <stdlib.h> - -/* end standard C headers. */ - -/* flex integer type definitions */ - -#ifndef FLEXINT_H -#define FLEXINT_H - -/* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */ - -#if __STDC_VERSION__ >= 199901L - -/* C99 says to define __STDC_LIMIT_MACROS before including stdint.h, - * if you want the limit (max/min) macros for int types. - */ -#ifndef __STDC_LIMIT_MACROS -#define __STDC_LIMIT_MACROS 1 -#endif - -#include <inttypes.h> -typedef int8_t flex_int8_t; -typedef uint8_t flex_uint8_t; -typedef int16_t flex_int16_t; -typedef uint16_t flex_uint16_t; -typedef int32_t flex_int32_t; -typedef uint32_t flex_uint32_t; -#else -typedef signed char flex_int8_t; -typedef short int flex_int16_t; -typedef int flex_int32_t; -typedef unsigned char flex_uint8_t; -typedef unsigned short int flex_uint16_t; -typedef unsigned int flex_uint32_t; -#endif /* ! C99 */ - -/* Limits of integral types. */ -#ifndef INT8_MIN -#define INT8_MIN (-128) -#endif -#ifndef INT16_MIN -#define INT16_MIN (-32767-1) -#endif -#ifndef INT32_MIN -#define INT32_MIN (-2147483647-1) -#endif -#ifndef INT8_MAX -#define INT8_MAX (127) -#endif -#ifndef INT16_MAX -#define INT16_MAX (32767) -#endif -#ifndef INT32_MAX -#define INT32_MAX (2147483647) -#endif -#ifndef UINT8_MAX -#define UINT8_MAX (255U) -#endif -#ifndef UINT16_MAX -#define UINT16_MAX (65535U) -#endif -#ifndef UINT32_MAX -#define UINT32_MAX (4294967295U) -#endif - -#endif /* ! FLEXINT_H */ - -#ifdef __cplusplus - -/* The "const" storage-class-modifier is valid. */ -#define YY_USE_CONST - -#else /* ! __cplusplus */ - -#if __STDC__ - -#define YY_USE_CONST - -#endif /* __STDC__ */ -#endif /* ! __cplusplus */ - -#ifdef YY_USE_CONST -#define yyconst const -#else -#define yyconst -#endif - -/* Returned upon end-of-file. */ -#define YY_NULL 0 - -/* Promotes a possibly negative, possibly signed char to an unsigned - * integer for use as an array index. If the signed char is negative, - * we want to instead treat it as an 8-bit unsigned char, hence the - * double cast. - */ -#define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c) - -/* An opaque pointer. */ -#ifndef YY_TYPEDEF_YY_SCANNER_T -#define YY_TYPEDEF_YY_SCANNER_T -typedef void* yyscan_t; -#endif - -/* For convenience, these vars (plus the bison vars far below) - are macros in the reentrant scanner. */ -#define yyin yyg->yyin_r -#define yyout yyg->yyout_r -#define yyextra yyg->yyextra_r -#define yyleng yyg->yyleng_r -#define yytext yyg->yytext_r -#define yylineno (YY_CURRENT_BUFFER_LVALUE->yy_bs_lineno) -#define yycolumn (YY_CURRENT_BUFFER_LVALUE->yy_bs_column) -#define yy_flex_debug yyg->yy_flex_debug_r - -int mimeparser_yylex_init (yyscan_t* scanner); - -/* Enter a start condition. This macro really ought to take a parameter, - * but we do it the disgusting crufty way forced on us by the ()-less - * definition of BEGIN. - */ -#define BEGIN yyg->yy_start = 1 + 2 * - -/* Translate the current start state into a value that can be later handed - * to BEGIN to return to the state. The YYSTATE alias is for lex - * compatibility. - */ -#define YY_START ((yyg->yy_start - 1) / 2) -#define YYSTATE YY_START - -/* Action number for EOF rule of a given start state. */ -#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1) - -/* Special action meaning "start processing a new file". */ -#define YY_NEW_FILE mimeparser_yyrestart(yyin ,yyscanner ) - -#define YY_END_OF_BUFFER_CHAR 0 - -/* Size of default input buffer. */ -#ifndef YY_BUF_SIZE -#define YY_BUF_SIZE 16384 -#endif - -/* The state buf must be large enough to hold one state per character in the main buffer. - */ -#define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type)) - -#ifndef YY_TYPEDEF_YY_BUFFER_STATE -#define YY_TYPEDEF_YY_BUFFER_STATE -typedef struct yy_buffer_state *YY_BUFFER_STATE; -#endif - -#define EOB_ACT_CONTINUE_SCAN 0 -#define EOB_ACT_END_OF_FILE 1 -#define EOB_ACT_LAST_MATCH 2 - - /* Note: We specifically omit the test for yy_rule_can_match_eol because it requires - * access to the local variable yy_act. Since yyless() is a macro, it would break - * existing scanners that call yyless() from OUTSIDE mimeparser_yylex. - * One obvious solution it to make yy_act a global. I tried that, and saw - * a 5% performance hit in a non-yylineno scanner, because yy_act is - * normally declared as a register variable-- so it is not worth it. - */ - #define YY_LESS_LINENO(n) \ - do { \ - int yyl;\ - for ( yyl = n; yyl < yyleng; ++yyl )\ - if ( yytext[yyl] == '\n' )\ - --yylineno;\ - }while(0) - -/* Return all but the first "n" matched characters back to the input stream. */ -#define yyless(n) \ - do \ - { \ - /* Undo effects of setting up yytext. */ \ - int yyless_macro_arg = (n); \ - YY_LESS_LINENO(yyless_macro_arg);\ - *yy_cp = yyg->yy_hold_char; \ - YY_RESTORE_YY_MORE_OFFSET \ - yyg->yy_c_buf_p = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \ - YY_DO_BEFORE_ACTION; /* set up yytext again */ \ - } \ - while ( 0 ) - -#define unput(c) yyunput( c, yyg->yytext_ptr , yyscanner ) - -/* The following is because we cannot portably get our hands on size_t - * (without autoconf's help, which isn't available because we want - * flex-generated scanners to compile on their own). - */ - -#ifndef YY_TYPEDEF_YY_SIZE_T -#define YY_TYPEDEF_YY_SIZE_T -typedef unsigned int yy_size_t; -#endif - -#ifndef YY_STRUCT_YY_BUFFER_STATE -#define YY_STRUCT_YY_BUFFER_STATE -struct yy_buffer_state - { - FILE *yy_input_file; - - char *yy_ch_buf; /* input buffer */ - char *yy_buf_pos; /* current position in input buffer */ - - /* Size of input buffer in bytes, not including room for EOB - * characters. - */ - yy_size_t yy_buf_size; - - /* Number of characters read into yy_ch_buf, not including EOB - * characters. - */ - int yy_n_chars; - - /* Whether we "own" the buffer - i.e., we know we created it, - * and can realloc() it to grow it, and should free() it to - * delete it. - */ - int yy_is_our_buffer; - - /* Whether this is an "interactive" input source; if so, and - * if we're using stdio for input, then we want to use getc() - * instead of fread(), to make sure we stop fetching input after - * each newline. - */ - int yy_is_interactive; - - /* Whether we're considered to be at the beginning of a line. - * If so, '^' rules will be active on the next match, otherwise - * not. - */ - int yy_at_bol; - - int yy_bs_lineno; /**< The line count. */ - int yy_bs_column; /**< The column count. */ - - /* Whether to try to fill the input buffer when we reach the - * end of it. - */ - int yy_fill_buffer; - - int yy_buffer_status; - -#define YY_BUFFER_NEW 0 -#define YY_BUFFER_NORMAL 1 - /* When an EOF's been seen but there's still some text to process - * then we mark the buffer as YY_EOF_PENDING, to indicate that we - * shouldn't try reading from the input source any more. We might - * still have a bunch of tokens to match, though, because of - * possible backing-up. - * - * When we actually see the EOF, we change the status to "new" - * (via mimeparser_yyrestart()), so that the user can continue scanning by - * just pointing yyin at a new input file. - */ -#define YY_BUFFER_EOF_PENDING 2 - - }; -#endif /* !YY_STRUCT_YY_BUFFER_STATE */ - -/* We provide macros for accessing buffer states in case in the - * future we want to put the buffer states in a more general - * "scanner state". - * - * Returns the top of the stack, or NULL. - */ -#define YY_CURRENT_BUFFER ( yyg->yy_buffer_stack \ - ? yyg->yy_buffer_stack[yyg->yy_buffer_stack_top] \ - : NULL) - -/* Same as previous macro, but useful when we know that the buffer stack is not - * NULL or when we need an lvalue. For internal use only. - */ -#define YY_CURRENT_BUFFER_LVALUE yyg->yy_buffer_stack[yyg->yy_buffer_stack_top] - -void mimeparser_yyrestart (FILE *input_file ,yyscan_t yyscanner ); -void mimeparser_yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ,yyscan_t yyscanner ); -YY_BUFFER_STATE mimeparser_yy_create_buffer (FILE *file,int size ,yyscan_t yyscanner ); -void mimeparser_yy_delete_buffer (YY_BUFFER_STATE b ,yyscan_t yyscanner ); -void mimeparser_yy_flush_buffer (YY_BUFFER_STATE b ,yyscan_t yyscanner ); -void mimeparser_yypush_buffer_state (YY_BUFFER_STATE new_buffer ,yyscan_t yyscanner ); -void mimeparser_yypop_buffer_state (yyscan_t yyscanner ); - -static void mimeparser_yyensure_buffer_stack (yyscan_t yyscanner ); -static void mimeparser_yy_load_buffer_state (yyscan_t yyscanner ); -static void mimeparser_yy_init_buffer (YY_BUFFER_STATE b,FILE *file ,yyscan_t yyscanner ); - -#define YY_FLUSH_BUFFER mimeparser_yy_flush_buffer(YY_CURRENT_BUFFER ,yyscanner) - -YY_BUFFER_STATE mimeparser_yy_scan_buffer (char *base,yy_size_t size ,yyscan_t yyscanner ); -YY_BUFFER_STATE mimeparser_yy_scan_string (yyconst char *yy_str ,yyscan_t yyscanner ); -YY_BUFFER_STATE mimeparser_yy_scan_bytes (yyconst char *bytes,int len ,yyscan_t yyscanner ); - -void *mimeparser_yyalloc (yy_size_t ,yyscan_t yyscanner ); -void *mimeparser_yyrealloc (void *,yy_size_t ,yyscan_t yyscanner ); -void mimeparser_yyfree (void * ,yyscan_t yyscanner ); - -#define yy_new_buffer mimeparser_yy_create_buffer - -#define yy_set_interactive(is_interactive) \ - { \ - if ( ! YY_CURRENT_BUFFER ){ \ - mimeparser_yyensure_buffer_stack (yyscanner); \ - YY_CURRENT_BUFFER_LVALUE = \ - mimeparser_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); \ - } \ - YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \ - } - -#define yy_set_bol(at_bol) \ - { \ - if ( ! YY_CURRENT_BUFFER ){\ - mimeparser_yyensure_buffer_stack (yyscanner); \ - YY_CURRENT_BUFFER_LVALUE = \ - mimeparser_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); \ - } \ - YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \ - } - -#define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol) - -/* Begin user sect3 */ - -typedef unsigned char YY_CHAR; - -typedef int yy_state_type; - -#define yytext_ptr yytext_r - -static yy_state_type yy_get_previous_state (yyscan_t yyscanner ); -static yy_state_type yy_try_NUL_trans (yy_state_type current_state ,yyscan_t yyscanner); -static int yy_get_next_buffer (yyscan_t yyscanner ); -static void yy_fatal_error (yyconst char msg[] ,yyscan_t yyscanner ); - -/* Done after the current pattern has been matched and before the - * corresponding action - sets up yytext. - */ -#define YY_DO_BEFORE_ACTION \ - yyg->yytext_ptr = yy_bp; \ - yyleng = (size_t) (yy_cp - yy_bp); \ - yyg->yy_hold_char = *yy_cp; \ - *yy_cp = '\0'; \ - yyg->yy_c_buf_p = yy_cp; - -#define YY_NUM_RULES 30 -#define YY_END_OF_BUFFER 31 -/* This struct is not used in this scanner, - but its presence is necessary. */ -struct yy_trans_info - { - flex_int32_t yy_verify; - flex_int32_t yy_nxt; - }; -static yyconst flex_int16_t yy_acclist[179] = - { 0, - 31, 2, 29, 30, 28, 30, 2, 29, 30, 1, - 2, 29, 30, 3, 28, 30, 2, 29, 30, 29, - 30, 5, 28, 30, 29, 30, 4, 29, 30, 7, - 29, 30, 7, 13, 29, 30, 8, 28, 30, 7, - 29, 30, 7, 11, 29, 30, 7, 12, 29, 30, - 7, 12, 29, 30, 7, 9, 29, 30, 7, 10, - 29, 30, 8, 28, 30, 29, 30, 14, 29, 30, - 15, 29, 30, 29, 30, 20, 29, 30, 18, 28, - 30, 19, 29, 30, 20, 29, 30, 27, 29, 30, - 21, 28, 30, 27, 29, 30, 26, 29, 30, 26, - - 29, 30, 26, 29, 30, 22, 29, 30, 24, 28, - 30, 29, 30, 23, 29, 30, 25, 28, 30, 29, - 30, 28, 1, 1, 3, 28, 5, 28, 7, 7, - 7, 13, 6, 8, 28, 7, 12, 7, 12, 7, - 8, 28, 14, 20, 18, 28, 20, 21, 28, 22, - 24, 28, 23, 25, 28, 6, 9, 17, 20, 17, - 7, 7, 6, 7, 7, 9, 17, 20, 7, 7, - 6, 7, 7, 9, 16, 17, 20, 7 - } ; - -static yyconst flex_int16_t yy_accept[112] = - { 0, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 2, 5, 7, 10, 14, - 17, 20, 22, 25, 27, 30, 33, 37, 40, 43, - 47, 51, 55, 59, 63, 66, 68, 71, 74, 76, - 79, 82, 85, 88, 91, 94, 97, 100, 103, 106, - 109, 112, 114, 117, 120, 122, 123, 124, 125, 127, - 129, 130, 130, 131, 133, 134, 136, 138, 140, 140, - 141, 143, 144, 145, 147, 148, 150, 150, 151, 153, - 154, 156, 156, 156, 157, 158, 158, 160, 161, 162, - - 163, 165, 167, 169, 170, 171, 173, 175, 178, 179, - 179 - } ; - -static yyconst flex_int32_t yy_ec[256] = - { 0, - 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, - 1, 1, 4, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 5, 1, 6, 1, 1, 1, 1, 7, 7, - 7, 1, 7, 7, 8, 9, 10, 11, 11, 11, - 11, 11, 11, 11, 11, 11, 11, 12, 13, 7, - 14, 7, 7, 7, 15, 15, 15, 15, 15, 15, - 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, - 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, - 16, 1, 16, 1, 11, 1, 15, 15, 15, 15, - - 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, - 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, - 15, 15, 1, 17, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1 - } ; - -static yyconst flex_int32_t yy_meta[18] = - { 0, - 1, 1, 2, 3, 4, 1, 4, 5, 4, 4, - 5, 4, 4, 4, 5, 1, 1 - } ; - -static yyconst flex_int16_t yy_base[128] = - { 0, - 0, 2, 4, 15, 28, 38, 50, 0, 67, 0, - 6, 8, 10, 82, 12, 17, 19, 88, 21, 23, - 25, 30, 32, 34, 228, 253, 253, 224, 208, 253, - 219, 253, 253, 165, 253, 40, 95, 43, 43, 84, - 110, 119, 90, 98, 253, 155, 0, 253, 153, 0, - 253, 148, 131, 253, 253, 132, 253, 128, 116, 0, - 253, 119, 0, 253, 108, 253, 0, 80, 253, 253, - 100, 103, 103, 0, 118, 127, 0, 0, 131, 106, - 253, 0, 0, 253, 136, 253, 0, 0, 253, 0, - 253, 138, 139, 143, 144, 145, 153, 0, 0, 155, - - 160, 161, 81, 112, 169, 162, 173, 41, 173, 253, - 178, 183, 188, 193, 198, 203, 208, 34, 213, 215, - 220, 225, 230, 235, 237, 242, 247 - } ; - -static yyconst flex_int16_t yy_def[128] = - { 0, - 111, 111, 111, 111, 112, 112, 110, 7, 110, 9, - 112, 112, 113, 113, 114, 114, 115, 115, 116, 116, - 117, 117, 112, 112, 110, 110, 110, 110, 118, 110, - 110, 110, 110, 110, 110, 119, 119, 110, 119, 119, - 119, 41, 119, 119, 110, 110, 120, 110, 110, 121, - 110, 110, 121, 110, 110, 110, 110, 110, 110, 122, - 110, 110, 123, 110, 110, 110, 118, 118, 110, 110, - 119, 110, 119, 37, 110, 110, 41, 42, 110, 119, - 110, 120, 121, 110, 124, 110, 125, 122, 110, 123, - 110, 126, 110, 126, 126, 110, 124, 125, 127, 127, - - 127, 127, 97, 127, 127, 105, 105, 97, 127, 0, - 110, 110, 110, 110, 110, 110, 110, 110, 110, 110, - 110, 110, 110, 110, 110, 110, 110 - } ; - -static yyconst flex_int16_t yy_nxt[271] = - { 0, - 110, 110, 27, 28, 27, 28, 27, 28, 27, 49, - 27, 49, 51, 52, 55, 56, 29, 30, 31, 55, - 56, 55, 58, 61, 62, 61, 62, 64, 65, 29, - 33, 34, 64, 65, 27, 49, 27, 49, 67, 35, - 33, 34, 72, 73, 75, 76, 73, 75, 108, 35, - 36, 37, 38, 39, 37, 40, 41, 42, 42, 36, - 42, 36, 43, 44, 42, 41, 37, 32, 32, 45, - 46, 47, 48, 47, 47, 47, 47, 47, 47, 47, - 47, 47, 32, 32, 51, 52, 72, 73, 108, 53, - 55, 58, 79, 80, 68, 59, 74, 72, 73, 74, - - 72, 73, 72, 73, 92, 93, 73, 92, 96, 73, - 91, 74, 72, 73, 72, 109, 77, 77, 77, 75, - 77, 89, 75, 87, 77, 77, 78, 78, 94, 78, - 86, 94, 95, 78, 86, 95, 83, 83, 85, 100, - 92, 83, 100, 92, 101, 102, 95, 101, 102, 95, - 84, 83, 83, 83, 83, 66, 105, 81, 83, 105, - 103, 106, 107, 106, 106, 107, 106, 70, 83, 83, - 105, 72, 109, 105, 107, 93, 109, 107, 26, 26, - 26, 26, 26, 32, 32, 32, 32, 32, 50, 50, - 50, 50, 50, 54, 54, 54, 54, 54, 57, 57, - - 57, 57, 57, 60, 60, 60, 60, 60, 63, 63, - 63, 63, 63, 71, 71, 71, 71, 71, 82, 82, - 83, 69, 68, 83, 83, 88, 66, 110, 88, 88, - 90, 110, 110, 90, 90, 97, 110, 110, 97, 97, - 98, 98, 99, 110, 99, 99, 99, 104, 110, 104, - 104, 104, 25, 110, 110, 110, 110, 110, 110, 110, - 110, 110, 110, 110, 110, 110, 110, 110, 110, 110 - } ; - -static yyconst flex_int16_t yy_chk[271] = - { 0, - 0, 0, 1, 1, 2, 2, 3, 3, 11, 11, - 12, 12, 13, 13, 15, 15, 2, 4, 4, 16, - 16, 17, 17, 19, 19, 20, 20, 21, 21, 4, - 5, 5, 22, 22, 23, 23, 24, 24, 118, 5, - 6, 6, 36, 36, 38, 39, 39, 38, 108, 6, - 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, - 7, 7, 7, 7, 7, 7, 7, 9, 9, 9, - 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, - 9, 9, 9, 9, 14, 14, 40, 40, 103, 14, - 18, 18, 43, 43, 68, 18, 37, 37, 37, 37, - - 44, 44, 71, 71, 72, 73, 73, 72, 80, 80, - 65, 37, 41, 41, 104, 104, 41, 41, 41, 75, - 41, 62, 75, 59, 41, 41, 42, 42, 76, 42, - 58, 76, 79, 42, 56, 79, 85, 85, 53, 92, - 93, 85, 92, 93, 94, 95, 96, 94, 95, 96, - 52, 85, 85, 97, 97, 49, 100, 46, 97, 100, - 97, 101, 102, 106, 101, 102, 106, 34, 97, 97, - 105, 105, 105, 105, 107, 109, 109, 107, 111, 111, - 111, 111, 111, 112, 112, 112, 112, 112, 113, 113, - 113, 113, 113, 114, 114, 114, 114, 114, 115, 115, - - 115, 115, 115, 116, 116, 116, 116, 116, 117, 117, - 117, 117, 117, 119, 119, 119, 119, 119, 120, 120, - 121, 31, 29, 121, 121, 122, 28, 25, 122, 122, - 123, 0, 0, 123, 123, 124, 0, 0, 124, 124, - 125, 125, 126, 0, 126, 126, 126, 127, 0, 127, - 127, 127, 110, 110, 110, 110, 110, 110, 110, 110, - 110, 110, 110, 110, 110, 110, 110, 110, 110, 110 - } ; - -/* Table of booleans, true if rule could match eol. */ -static yyconst flex_int32_t yy_rule_can_match_eol[31] = - { 0, -0, 0, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, - 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, }; - -#define REJECT \ -{ \ -*yy_cp = yyg->yy_hold_char; /* undo effects of setting up yytext */ \ -yy_cp = yyg->yy_full_match; /* restore poss. backed-over text */ \ -++yyg->yy_lp; \ -goto find_rule; \ -} - -#define yymore() yymore_used_but_not_detected -#define YY_MORE_ADJ 0 -#define YY_RESTORE_YY_MORE_OFFSET -#line 1 "mimeparser.l" -#line 2 "mimeparser.l" -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/** - * This is a lexer file for parsing MIME compatible messages. It is intended - * to satisfy at least RFC 2045 (Format of Internet Message Bodies). It still - * has quite a few problems: - * - * - The parsing could probably be done in a more elegant way - * - I don't know what performance impact REJECT has on the parser - */ -#include <stdio.h> -#include <string.h> -#include <ctype.h> -#include <errno.h> - -#include "mimeparser.h" -#include "mimeparser.tab.h" - -#define NAMEOF(v) #v -/* BC() is a debug wrapper for lex' BEGIN() macro */ -#define BC(x) do { \ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); \ - BEGIN(x); \ - lstate->condition = x; \ -} while(0); - -#define ZERO(x) memset(x, '\0', sizeof(x)) - -#define PREALLOC_BUFFER 100000 -#undef YY_BUF_SIZE -#define YY_BUF_SIZE 65536 - -enum header_states -{ - STATE_MAIL = 0, - STATE_CTYPE, - STATE_CDISP, - STATE_CENC, - STATE_MIME -}; - - - - - - - - - - - - - - -#line 658 "mimeparser.yy.c" - -#define INITIAL 0 -#define headers 1 -#define header 2 -#define headervalue 3 -#define tspecialvalue 4 -#define comment 5 -#define body 6 -#define postamble 7 -#define preamble 8 -#define boundary 9 -#define endboundary 10 -#define endoffile 11 - -#ifndef YY_NO_UNISTD_H -/* Special case for "unistd.h", since it is non-ANSI. We include it way - * down here because we want the user's section 1 to have been scanned first. - * The user has a chance to override it with an option. - */ -#include <unistd.h> -#endif - -#ifndef YY_EXTRA_TYPE -#define YY_EXTRA_TYPE void * -#endif - -/* Holds the entire state of the reentrant scanner. */ -struct yyguts_t - { - - /* User-defined. Not touched by flex. */ - YY_EXTRA_TYPE yyextra_r; - - /* The rest are the same as the globals declared in the non-reentrant scanner. */ - FILE *yyin_r, *yyout_r; - size_t yy_buffer_stack_top; /**< index of top of stack. */ - size_t yy_buffer_stack_max; /**< capacity of stack. */ - YY_BUFFER_STATE * yy_buffer_stack; /**< Stack as an array. */ - char yy_hold_char; - int yy_n_chars; - int yyleng_r; - char *yy_c_buf_p; - int yy_init; - int yy_start; - int yy_did_buffer_switch_on_eof; - int yy_start_stack_ptr; - int yy_start_stack_depth; - int *yy_start_stack; - yy_state_type yy_last_accepting_state; - char* yy_last_accepting_cpos; - - int yylineno_r; - int yy_flex_debug_r; - - yy_state_type *yy_state_buf; - yy_state_type *yy_state_ptr; - char *yy_full_match; - int yy_lp; - - char *yytext_r; - int yy_more_flag; - int yy_more_len; - - YYSTYPE * yylval_r; - - }; /* end struct yyguts_t */ - -static int yy_init_globals (yyscan_t yyscanner ); - - /* This must go here because YYSTYPE and YYLTYPE are included - * from bison output in section 1.*/ - # define yylval yyg->yylval_r - -/* Accessor methods to globals. - These are made visible to non-reentrant scanners for convenience. */ - -int mimeparser_yylex_destroy (yyscan_t yyscanner ); - -int mimeparser_yyget_debug (yyscan_t yyscanner ); - -void mimeparser_yyset_debug (int debug_flag ,yyscan_t yyscanner ); - -YY_EXTRA_TYPE mimeparser_yyget_extra (yyscan_t yyscanner ); - -void mimeparser_yyset_extra (YY_EXTRA_TYPE user_defined ,yyscan_t yyscanner ); - -FILE *mimeparser_yyget_in (yyscan_t yyscanner ); - -void mimeparser_yyset_in (FILE * in_str ,yyscan_t yyscanner ); - -FILE *mimeparser_yyget_out (yyscan_t yyscanner ); - -void mimeparser_yyset_out (FILE * out_str ,yyscan_t yyscanner ); - -int mimeparser_yyget_leng (yyscan_t yyscanner ); - -char *mimeparser_yyget_text (yyscan_t yyscanner ); - -int mimeparser_yyget_lineno (yyscan_t yyscanner ); - -void mimeparser_yyset_lineno (int line_number ,yyscan_t yyscanner ); - -YYSTYPE * mimeparser_yyget_lval (yyscan_t yyscanner ); - -void mimeparser_yyset_lval (YYSTYPE * yylval_param ,yyscan_t yyscanner ); - -/* Macros after this point can all be overridden by user definitions in - * section 1. - */ - -#ifndef YY_SKIP_YYWRAP -#ifdef __cplusplus -extern "C" int mimeparser_yywrap (yyscan_t yyscanner ); -#else -extern int mimeparser_yywrap (yyscan_t yyscanner ); -#endif -#endif - - static void yyunput (int c,char *buf_ptr ,yyscan_t yyscanner); - -#ifndef yytext_ptr -static void yy_flex_strncpy (char *,yyconst char *,int ,yyscan_t yyscanner); -#endif - -#ifdef YY_NEED_STRLEN -static int yy_flex_strlen (yyconst char * ,yyscan_t yyscanner); -#endif - -#ifndef YY_NO_INPUT - -#ifdef __cplusplus -static int yyinput (yyscan_t yyscanner ); -#else -static int input (yyscan_t yyscanner ); -#endif - -#endif - -/* Amount of stuff to slurp up with each read. */ -#ifndef YY_READ_BUF_SIZE -#define YY_READ_BUF_SIZE 8192 -#endif - -/* Copy whatever the last rule matched to the standard output. */ -#ifndef ECHO -/* This used to be an fputs(), but since the string might contain NUL's, - * we now use fwrite(). - */ -#define ECHO (void) fwrite( yytext, yyleng, 1, yyout ) -#endif - -/* Gets input and stuffs it into "buf". number of characters read, or YY_NULL, - * is returned in "result". - */ -#ifndef YY_INPUT -#define YY_INPUT(buf,result,max_size) \ - if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \ - { \ - int c = '*'; \ - size_t n; \ - for ( n = 0; n < max_size && \ - (c = getc( yyin )) != EOF && c != '\n'; ++n ) \ - buf[n] = (char) c; \ - if ( c == '\n' ) \ - buf[n++] = (char) c; \ - if ( c == EOF && ferror( yyin ) ) \ - YY_FATAL_ERROR( "input in flex scanner failed" ); \ - result = n; \ - } \ - else \ - { \ - errno=0; \ - while ( (result = fread(buf, 1, max_size, yyin))==0 && ferror(yyin)) \ - { \ - if( errno != EINTR) \ - { \ - YY_FATAL_ERROR( "input in flex scanner failed" ); \ - break; \ - } \ - errno=0; \ - clearerr(yyin); \ - } \ - }\ -\ - -#endif - -/* No semi-colon after return; correct usage is to write "yyterminate();" - - * we don't want an extra ';' after the "return" because that will cause - * some compilers to complain about unreachable statements. - */ -#ifndef yyterminate -#define yyterminate() return YY_NULL -#endif - -/* Number of entries by which start-condition stack grows. */ -#ifndef YY_START_STACK_INCR -#define YY_START_STACK_INCR 25 -#endif - -/* Report a fatal error. */ -#ifndef YY_FATAL_ERROR -#define YY_FATAL_ERROR(msg) yy_fatal_error( msg , yyscanner) -#endif - -/* end tables serialization structures and prototypes */ - -/* Default declaration of generated scanner - a define so the user can - * easily add parameters. - */ -#ifndef YY_DECL -#define YY_DECL_IS_OURS 1 - -extern int mimeparser_yylex \ - (YYSTYPE * yylval_param ,yyscan_t yyscanner); - -#define YY_DECL int mimeparser_yylex \ - (YYSTYPE * yylval_param , yyscan_t yyscanner) -#endif /* !YY_DECL */ - -/* Code executed at the beginning of each rule, after yytext and yyleng - * have been set up. - */ -#ifndef YY_USER_ACTION -#define YY_USER_ACTION -#endif - -/* Code executed at the end of each rule. */ -#ifndef YY_BREAK -#define YY_BREAK break; -#endif - -#define YY_RULE_SETUP \ - if ( yyleng > 0 ) \ - YY_CURRENT_BUFFER_LVALUE->yy_at_bol = \ - (yytext[yyleng - 1] == '\n'); \ - YY_USER_ACTION - -/** The main scanner function which does all the work. - */ -YY_DECL -{ - register yy_state_type yy_current_state; - register char *yy_cp, *yy_bp; - register int yy_act; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - -#line 94 "mimeparser.l" - - -#line 909 "mimeparser.yy.c" - - yylval = yylval_param; - - if ( !yyg->yy_init ) - { - yyg->yy_init = 1; - -#ifdef YY_USER_INIT - YY_USER_INIT; -#endif - - /* Create the reject buffer large enough to save one state per allowed character. */ - if ( ! yyg->yy_state_buf ) - yyg->yy_state_buf = (yy_state_type *)mimeparser_yyalloc(YY_STATE_BUF_SIZE ,yyscanner); - - if ( ! yyg->yy_start ) - yyg->yy_start = 1; /* first start state */ - - if ( ! yyin ) - yyin = stdin; - - if ( ! yyout ) - yyout = stdout; - - if ( ! YY_CURRENT_BUFFER ) { - mimeparser_yyensure_buffer_stack (yyscanner); - YY_CURRENT_BUFFER_LVALUE = - mimeparser_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); - } - - mimeparser_yy_load_buffer_state(yyscanner ); - } - - while ( 1 ) /* loops until end-of-file is reached */ - { - yy_cp = yyg->yy_c_buf_p; - - /* Support of yytext. */ - *yy_cp = yyg->yy_hold_char; - - /* yy_bp points to the position in yy_ch_buf of the start of - * the current run. - */ - yy_bp = yy_cp; - - yy_current_state = yyg->yy_start; - yy_current_state += YY_AT_BOL(); - - yyg->yy_state_ptr = yyg->yy_state_buf; - *yyg->yy_state_ptr++ = yy_current_state; - -yy_match: - do - { - register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)]; - while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) - { - yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 111 ) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - *yyg->yy_state_ptr++ = yy_current_state; - ++yy_cp; - } - while ( yy_base[yy_current_state] != 253 ); - -yy_find_action: - yy_current_state = *--yyg->yy_state_ptr; - yyg->yy_lp = yy_accept[yy_current_state]; -find_rule: /* we branch to this label when backing up */ - for ( ; ; ) /* until we find what rule we matched */ - { - if ( yyg->yy_lp && yyg->yy_lp < yy_accept[yy_current_state + 1] ) - { - yy_act = yy_acclist[yyg->yy_lp]; - { - yyg->yy_full_match = yy_cp; - break; - } - } - --yy_cp; - yy_current_state = *--yyg->yy_state_ptr; - yyg->yy_lp = yy_accept[yy_current_state]; - } - - YY_DO_BEFORE_ACTION; - - if ( yy_act != YY_END_OF_BUFFER && yy_rule_can_match_eol[yy_act] ) - { - int yyl; - for ( yyl = 0; yyl < yyleng; ++yyl ) - if ( yytext[yyl] == '\n' ) - - do{ yylineno++; - yycolumn=0; - }while(0) -; - } - -do_action: /* This label is used only to access EOF actions. */ - - switch ( yy_act ) - { /* beginning of action switch */ -case 1: -YY_RULE_SETUP -#line 96 "mimeparser.l" -{ - yylval_param->string=strdup(yytext); - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; - BC(header); - - /* Depending on what header we are processing, we enter a different - * state and return a different value. - */ - if (!strcasecmp(yytext, "Content-Type")) { - lstate->header_state = STATE_CTYPE; - return CONTENTTYPE_HEADER; - } else if (!strcasecmp(yytext, "Content-Transfer-Encoding")) { - lstate->header_state = STATE_CENC; - return CONTENTENCODING_HEADER; - } else if (!strcasecmp(yytext, "Content-Disposition")) { - lstate->header_state = STATE_CDISP; - return CONTENTDISPOSITION_HEADER; - } else if (!strcasecmp(yytext, "MIME-Version")) { - lstate->header_state = STATE_MAIL; - return MIMEVERSION_HEADER; - } else { - lstate->header_state = STATE_MAIL; - return MAIL_HEADER; - } -} - YY_BREAK -case 2: -YY_RULE_SETUP -#line 123 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - /* dprintf2("Unknown header char: %c\n", *yytext); */ - lstate->current_pos += yyleng; - return ANY; -} - YY_BREAK -case 3: -/* rule 3 can match eol */ -YY_RULE_SETUP -#line 130 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->lineno++; - - lstate->current_pos += yyleng; - - /* This marks the end of headers. Depending on whether we are in the - * envelope currently we need to parse either a body or the preamble - * now. - */ - if (lstate->is_envelope == 0 || lstate->boundary_string == NULL) { - BC(body); - lstate->body_start = lstate->current_pos; - } else { - lstate->is_envelope = 0; - lstate->preamble_start = lstate->current_pos; - BC(preamble); - } - - return ENDOFHEADERS; -} - YY_BREAK -case 4: -YY_RULE_SETUP -#line 152 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - BC(headervalue); - lstate->current_pos += yyleng; - return COLON; -} - YY_BREAK -case 5: -/* rule 5 can match eol */ -YY_RULE_SETUP -#line 159 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - BC(headers); - /* dprintf2("Invalid header, returning EOL\n"); */ - lstate->current_pos += yyleng; - return EOL; -} - YY_BREAK -case 6: -/* rule 6 can match eol */ -YY_RULE_SETUP -#line 167 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - YY_BREAK -case 7: -/* rule 7 can match eol */ -YY_RULE_SETUP -#line 172 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - if (lstate->header_state != STATE_MAIL && lstate->header_state != STATE_CENC) { - REJECT; - } - lstate->current_pos += yyleng; - while (*yytext && isspace(*yytext)) yytext++; - /* Do we actually have a header value? */ - if (*yytext == '\0') { - yylval_param->string = strdup(""); - } else { - yylval_param->string=strdup(yytext); - lstate->lineno += count_lines(yytext); - } - return WORD; -} - YY_BREAK -case 8: -/* rule 8 can match eol */ -YY_RULE_SETUP -#line 189 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - /* marks the end of one header line */ - lstate->lineno++; - BC(headers); - lstate->current_pos += yyleng; - return EOL; -} - YY_BREAK -case 9: -/* rule 9 can match eol */ -YY_RULE_SETUP -#line 198 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->lineno += count_lines(yytext); - lstate->current_pos += yyleng; - return SEMICOLON; -} - YY_BREAK -case 10: -YY_RULE_SETUP -#line 205 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; - return EQUAL; -} - YY_BREAK -case 11: -YY_RULE_SETUP -#line 211 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - BC(tspecialvalue); - lstate->current_pos += yyleng; - return *yytext; -} - YY_BREAK -case 12: -YY_RULE_SETUP -#line 218 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - yylval_param->string=strdup(yytext); - lstate->lineno += count_lines(yytext); - lstate->current_pos += yyleng; - return WORD; -} - YY_BREAK -case 13: -YY_RULE_SETUP -#line 226 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - YY_BREAK -case 14: -YY_RULE_SETUP -#line 231 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->lineno += count_lines(yytext); - yylval_param->string=strdup(yytext); - lstate->current_pos += yyleng; - return TSPECIAL; -} - YY_BREAK -case 15: -YY_RULE_SETUP -#line 239 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - BC(headervalue); - lstate->current_pos += yyleng; - return *yytext; -} - YY_BREAK -case 16: -YY_RULE_SETUP -#line 246 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - /** - * Make sure we only catch matching boundaries, and not other lines - * that begin and end with two dashes. If we have catched a valid - * end boundary, which actually ends a body, we save the current - * position, put the token back on the input stream and let the - * endboundary condition parse the actual token. - */ - if (lstate->endboundary_string != NULL) { - if (strcmp(lstate->endboundary_string, yytext)) { - /* dprintf2("YYTEXT != end_boundary: '%s'\n", yytext); */ - REJECT; - } else { - lstate->current_pos += yyleng; - /* dprintf2("YYTEXT == lstate->end_boundary: '%s'\n", yytext); */ - if (lstate->body_start) { - yylval_param->position.opaque_start = - lstate->body_opaque_start; - yylval_param->position.start = lstate->body_start; - yylval_param->position.end = lstate->current_pos - yyleng; - lstate->body_opaque_start = 0; - lstate->body_start = 0; - lstate->body_end = 0; - yyless(0); - BC(endboundary); - return BODY; - } - } - } else { - } - - REJECT; -} - YY_BREAK -case 17: -YY_RULE_SETUP -#line 281 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - /** - * Make sure we only catch matching boundaries, and not other lines - * that begin with two dashes. - */ - if (lstate->boundary_string != NULL) { - if (strcmp(lstate->boundary_string, yytext)) { - /* dprintf2("YYTEXT != boundary: '%s'\n", yytext);*/ - REJECT; - } else { - /* dprintf2("YYTEXT == boundary: '%s'\n", yytext);*/ - if (lstate->body_start) { - yylval_param->position.opaque_start = lstate->body_opaque_start; - yylval_param->position.start = lstate->body_start; - yylval_param->position.end = lstate->current_pos; - lstate->body_opaque_start = 0; - lstate->body_start = 0; - lstate->body_end = 0; - yyless(0); - BC(boundary); - return BODY; - } else if (lstate->preamble_start) { - yylval_param->position.start = lstate->preamble_start; - yylval_param->position.end = lstate->current_pos; - lstate->preamble_start = lstate->preamble_end = 0; - yyless(0); - BC(boundary); - return PREAMBLE; - } else { - BC(boundary); - yylval_param->string = strdup(yytext); - lstate->current_pos += yyleng; - return(BOUNDARY); - } - } - } else { - } - - REJECT; -} - YY_BREAK -case 18: -/* rule 18 can match eol */ -YY_RULE_SETUP -#line 323 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; - lstate->lineno++; -} - YY_BREAK -case 19: -YY_RULE_SETUP -#line 329 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; - /* dprintf2("stray CR in body...\n"); */ -} - YY_BREAK -case 20: -YY_RULE_SETUP -#line 335 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - YY_BREAK -case YY_STATE_EOF(body): -#line 340 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - if (lstate->boundary_string == NULL && lstate->body_start) { - yylval_param->position.opaque_start = 0; - yylval_param->position.start = lstate->body_start; - yylval_param->position.end = lstate->current_pos; - lstate->body_start = 0; - return BODY; - } else if (lstate->body_start) { - return POSTAMBLE; - } - yyterminate(); -} - YY_BREAK -case 21: -/* rule 21 can match eol */ -YY_RULE_SETUP -#line 354 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - /* dprintf2("Preamble CR/LF at line %d\n", lineno); */ - lstate->lineno++; - lstate->current_pos += yyleng; -} - YY_BREAK -case 22: -YY_RULE_SETUP -#line 361 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - yylval_param->string = strdup(yytext); - lstate->current_pos += yyleng; - return BOUNDARY; -} - YY_BREAK -case 23: -YY_RULE_SETUP -#line 368 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - yylval_param->string = strdup(yytext); - lstate->current_pos += yyleng; - return ENDBOUNDARY; -} - YY_BREAK -case 24: -/* rule 24 can match eol */ -YY_RULE_SETUP -#line 375 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - BC(headers); - lstate->lineno++; - lstate->current_pos += yyleng; - lstate->body_opaque_start = lstate->current_pos; - return EOL; -} - YY_BREAK -case 25: -/* rule 25 can match eol */ -YY_RULE_SETUP -#line 384 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - BC(postamble); - lstate->lineno++; - lstate->current_pos += yyleng; -} - YY_BREAK -case 26: -YY_RULE_SETUP -#line 391 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - YY_BREAK -case 27: -YY_RULE_SETUP -#line 397 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; -} - YY_BREAK -case 28: -/* rule 28 can match eol */ -YY_RULE_SETUP -#line 402 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->lineno++; - lstate->current_pos += yyleng; - return EOL; -} - YY_BREAK -case 29: -YY_RULE_SETUP -#line 409 "mimeparser.l" -{ - struct lexer_state *lstate = mimeparser_yyget_extra(yyscanner); - lstate->current_pos += yyleng; - return((int)*yytext); -} - YY_BREAK -case 30: -YY_RULE_SETUP -#line 416 "mimeparser.l" -ECHO; - YY_BREAK -#line 1437 "mimeparser.yy.c" - case YY_STATE_EOF(INITIAL): - case YY_STATE_EOF(headers): - case YY_STATE_EOF(header): - case YY_STATE_EOF(headervalue): - case YY_STATE_EOF(tspecialvalue): - case YY_STATE_EOF(comment): - case YY_STATE_EOF(postamble): - case YY_STATE_EOF(preamble): - case YY_STATE_EOF(boundary): - case YY_STATE_EOF(endboundary): - case YY_STATE_EOF(endoffile): - yyterminate(); - - case YY_END_OF_BUFFER: - { - /* Amount of text matched not including the EOB char. */ - int yy_amount_of_matched_text = (int) (yy_cp - yyg->yytext_ptr) - 1; - - /* Undo the effects of YY_DO_BEFORE_ACTION. */ - *yy_cp = yyg->yy_hold_char; - YY_RESTORE_YY_MORE_OFFSET - - if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW ) - { - /* We're scanning a new file or input source. It's - * possible that this happened because the user - * just pointed yyin at a new source and called - * mimeparser_yylex(). If so, then we have to assure - * consistency between YY_CURRENT_BUFFER and our - * globals. Here is the right place to do so, because - * this is the first action (other than possibly a - * back-up) that will match for the new input source. - */ - yyg->yy_n_chars = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; - YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; - YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL; - } - - /* Note that here we test for yy_c_buf_p "<=" to the position - * of the first EOB in the buffer, since yy_c_buf_p will - * already have been incremented past the NUL character - * (since all states make transitions on EOB to the - * end-of-buffer state). Contrast this with the test - * in input(). - */ - if ( yyg->yy_c_buf_p <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] ) - { /* This was really a NUL. */ - yy_state_type yy_next_state; - - yyg->yy_c_buf_p = yyg->yytext_ptr + yy_amount_of_matched_text; - - yy_current_state = yy_get_previous_state( yyscanner ); - - /* Okay, we're now positioned to make the NUL - * transition. We couldn't have - * yy_get_previous_state() go ahead and do it - * for us because it doesn't know how to deal - * with the possibility of jamming (and we don't - * want to build jamming into it because then it - * will run more slowly). - */ - - yy_next_state = yy_try_NUL_trans( yy_current_state , yyscanner); - - yy_bp = yyg->yytext_ptr + YY_MORE_ADJ; - - if ( yy_next_state ) - { - /* Consume the NUL. */ - yy_cp = ++yyg->yy_c_buf_p; - yy_current_state = yy_next_state; - goto yy_match; - } - - else - { - yy_cp = yyg->yy_c_buf_p; - goto yy_find_action; - } - } - - else switch ( yy_get_next_buffer( yyscanner ) ) - { - case EOB_ACT_END_OF_FILE: - { - yyg->yy_did_buffer_switch_on_eof = 0; - - if ( mimeparser_yywrap(yyscanner ) ) - { - /* Note: because we've taken care in - * yy_get_next_buffer() to have set up - * yytext, we can now set up - * yy_c_buf_p so that if some total - * hoser (like flex itself) wants to - * call the scanner after we return the - * YY_NULL, it'll still work - another - * YY_NULL will get returned. - */ - yyg->yy_c_buf_p = yyg->yytext_ptr + YY_MORE_ADJ; - - yy_act = YY_STATE_EOF(YY_START); - goto do_action; - } - - else - { - if ( ! yyg->yy_did_buffer_switch_on_eof ) - YY_NEW_FILE; - } - break; - } - - case EOB_ACT_CONTINUE_SCAN: - yyg->yy_c_buf_p = - yyg->yytext_ptr + yy_amount_of_matched_text; - - yy_current_state = yy_get_previous_state( yyscanner ); - - yy_cp = yyg->yy_c_buf_p; - yy_bp = yyg->yytext_ptr + YY_MORE_ADJ; - goto yy_match; - - case EOB_ACT_LAST_MATCH: - yyg->yy_c_buf_p = - &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars]; - - yy_current_state = yy_get_previous_state( yyscanner ); - - yy_cp = yyg->yy_c_buf_p; - yy_bp = yyg->yytext_ptr + YY_MORE_ADJ; - goto yy_find_action; - } - break; - } - - default: - YY_FATAL_ERROR( - "fatal flex scanner internal error--no action found" ); - } /* end of action switch */ - } /* end of scanning one token */ -} /* end of mimeparser_yylex */ - -/* yy_get_next_buffer - try to read in a new buffer - * - * Returns a code representing an action: - * EOB_ACT_LAST_MATCH - - * EOB_ACT_CONTINUE_SCAN - continue scanning from current position - * EOB_ACT_END_OF_FILE - end of file - */ -static int yy_get_next_buffer (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; - register char *source = yyg->yytext_ptr; - register int number_to_move, i; - int ret_val; - - if ( yyg->yy_c_buf_p > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars + 1] ) - YY_FATAL_ERROR( - "fatal flex scanner internal error--end of buffer missed" ); - - if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 ) - { /* Don't try to fill the buffer, so this is an EOF. */ - if ( yyg->yy_c_buf_p - yyg->yytext_ptr - YY_MORE_ADJ == 1 ) - { - /* We matched a single character, the EOB, so - * treat this as a final EOF. - */ - return EOB_ACT_END_OF_FILE; - } - - else - { - /* We matched some text prior to the EOB, first - * process it. - */ - return EOB_ACT_LAST_MATCH; - } - } - - /* Try to read more data. */ - - /* First move last chars to start of buffer. */ - number_to_move = (int) (yyg->yy_c_buf_p - yyg->yytext_ptr) - 1; - - for ( i = 0; i < number_to_move; ++i ) - *(dest++) = *(source++); - - if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING ) - /* don't do the read, it's not guaranteed to return an EOF, - * just force an EOF - */ - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars = 0; - - else - { - int num_to_read = - YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; - - while ( num_to_read <= 0 ) - { /* Not enough room in the buffer - grow it. */ - - YY_FATAL_ERROR( -"input buffer overflow, can't enlarge buffer because scanner uses REJECT" ); - - } - - if ( num_to_read > YY_READ_BUF_SIZE ) - num_to_read = YY_READ_BUF_SIZE; - - /* Read in more data. */ - YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]), - yyg->yy_n_chars, num_to_read ); - - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars; - } - - if ( yyg->yy_n_chars == 0 ) - { - if ( number_to_move == YY_MORE_ADJ ) - { - ret_val = EOB_ACT_END_OF_FILE; - mimeparser_yyrestart(yyin ,yyscanner); - } - - else - { - ret_val = EOB_ACT_LAST_MATCH; - YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = - YY_BUFFER_EOF_PENDING; - } - } - - else - ret_val = EOB_ACT_CONTINUE_SCAN; - - yyg->yy_n_chars += number_to_move; - YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] = YY_END_OF_BUFFER_CHAR; - YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars + 1] = YY_END_OF_BUFFER_CHAR; - - yyg->yytext_ptr = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0]; - - return ret_val; -} - -/* yy_get_previous_state - get the state just before the EOB char was reached */ - - static yy_state_type yy_get_previous_state (yyscan_t yyscanner) -{ - register yy_state_type yy_current_state; - register char *yy_cp; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - yy_current_state = yyg->yy_start; - yy_current_state += YY_AT_BOL(); - - yyg->yy_state_ptr = yyg->yy_state_buf; - *yyg->yy_state_ptr++ = yy_current_state; - - for ( yy_cp = yyg->yytext_ptr + YY_MORE_ADJ; yy_cp < yyg->yy_c_buf_p; ++yy_cp ) - { - register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1); - while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) - { - yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 111 ) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - *yyg->yy_state_ptr++ = yy_current_state; - } - - return yy_current_state; -} - -/* yy_try_NUL_trans - try to make a transition on the NUL character - * - * synopsis - * next_state = yy_try_NUL_trans( current_state ); - */ - static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state , yyscan_t yyscanner) -{ - register int yy_is_jam; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; /* This var may be unused depending upon options. */ - - register YY_CHAR yy_c = 1; - while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) - { - yy_current_state = (int) yy_def[yy_current_state]; - if ( yy_current_state >= 111 ) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - yy_is_jam = (yy_current_state == 110); - if ( ! yy_is_jam ) - *yyg->yy_state_ptr++ = yy_current_state; - - return yy_is_jam ? 0 : yy_current_state; -} - - static void yyunput (int c, register char * yy_bp , yyscan_t yyscanner) -{ - register char *yy_cp; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - yy_cp = yyg->yy_c_buf_p; - - /* undo effects of setting up yytext */ - *yy_cp = yyg->yy_hold_char; - - if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) - { /* need to shift things up to make room */ - /* +2 for EOB chars. */ - register int number_to_move = yyg->yy_n_chars + 2; - register char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[ - YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2]; - register char *source = - &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]; - - while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf ) - *--dest = *--source; - - yy_cp += (int) (dest - source); - yy_bp += (int) (dest - source); - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = - yyg->yy_n_chars = YY_CURRENT_BUFFER_LVALUE->yy_buf_size; - - if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) - YY_FATAL_ERROR( "flex scanner push-back overflow" ); - } - - *--yy_cp = (char) c; - - if ( c == '\n' ){ - --yylineno; - } - - yyg->yytext_ptr = yy_bp; - yyg->yy_hold_char = *yy_cp; - yyg->yy_c_buf_p = yy_cp; -} - -#ifndef YY_NO_INPUT -#ifdef __cplusplus - static int yyinput (yyscan_t yyscanner) -#else - static int input (yyscan_t yyscanner) -#endif - -{ - int c; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - *yyg->yy_c_buf_p = yyg->yy_hold_char; - - if ( *yyg->yy_c_buf_p == YY_END_OF_BUFFER_CHAR ) - { - /* yy_c_buf_p now points to the character we want to return. - * If this occurs *before* the EOB characters, then it's a - * valid NUL; if not, then we've hit the end of the buffer. - */ - if ( yyg->yy_c_buf_p < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] ) - /* This was really a NUL. */ - *yyg->yy_c_buf_p = '\0'; - - else - { /* need more input */ - int offset = yyg->yy_c_buf_p - yyg->yytext_ptr; - ++yyg->yy_c_buf_p; - - switch ( yy_get_next_buffer( yyscanner ) ) - { - case EOB_ACT_LAST_MATCH: - /* This happens because yy_g_n_b() - * sees that we've accumulated a - * token and flags that we need to - * try matching the token before - * proceeding. But for input(), - * there's no matching to consider. - * So convert the EOB_ACT_LAST_MATCH - * to EOB_ACT_END_OF_FILE. - */ - - /* Reset buffer status. */ - mimeparser_yyrestart(yyin ,yyscanner); - - /*FALLTHROUGH*/ - - case EOB_ACT_END_OF_FILE: - { - if ( mimeparser_yywrap(yyscanner ) ) - return EOF; - - if ( ! yyg->yy_did_buffer_switch_on_eof ) - YY_NEW_FILE; -#ifdef __cplusplus - return yyinput(yyscanner); -#else - return input(yyscanner); -#endif - } - - case EOB_ACT_CONTINUE_SCAN: - yyg->yy_c_buf_p = yyg->yytext_ptr + offset; - break; - } - } - } - - c = *(unsigned char *) yyg->yy_c_buf_p; /* cast for 8-bit char's */ - *yyg->yy_c_buf_p = '\0'; /* preserve yytext */ - yyg->yy_hold_char = *++yyg->yy_c_buf_p; - - YY_CURRENT_BUFFER_LVALUE->yy_at_bol = (c == '\n'); - if ( YY_CURRENT_BUFFER_LVALUE->yy_at_bol ) - - do{ yylineno++; - yycolumn=0; - }while(0) -; - - return c; -} -#endif /* ifndef YY_NO_INPUT */ - -/** Immediately switch to a different input stream. - * @param input_file A readable stream. - * @param yyscanner The scanner object. - * @note This function does not reset the start condition to @c INITIAL . - */ - void mimeparser_yyrestart (FILE * input_file , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - if ( ! YY_CURRENT_BUFFER ){ - mimeparser_yyensure_buffer_stack (yyscanner); - YY_CURRENT_BUFFER_LVALUE = - mimeparser_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); - } - - mimeparser_yy_init_buffer(YY_CURRENT_BUFFER,input_file ,yyscanner); - mimeparser_yy_load_buffer_state(yyscanner ); -} - -/** Switch to a different input buffer. - * @param new_buffer The new input buffer. - * @param yyscanner The scanner object. - */ - void mimeparser_yy_switch_to_buffer (YY_BUFFER_STATE new_buffer , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - /* TODO. We should be able to replace this entire function body - * with - * mimeparser_yypop_buffer_state(); - * mimeparser_yypush_buffer_state(new_buffer); - */ - mimeparser_yyensure_buffer_stack (yyscanner); - if ( YY_CURRENT_BUFFER == new_buffer ) - return; - - if ( YY_CURRENT_BUFFER ) - { - /* Flush out information for old buffer. */ - *yyg->yy_c_buf_p = yyg->yy_hold_char; - YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = yyg->yy_c_buf_p; - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars; - } - - YY_CURRENT_BUFFER_LVALUE = new_buffer; - mimeparser_yy_load_buffer_state(yyscanner ); - - /* We don't actually know whether we did this switch during - * EOF (mimeparser_yywrap()) processing, but the only time this flag - * is looked at is after mimeparser_yywrap() is called, so it's safe - * to go ahead and always set it. - */ - yyg->yy_did_buffer_switch_on_eof = 1; -} - -static void mimeparser_yy_load_buffer_state (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yyg->yy_n_chars = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; - yyg->yytext_ptr = yyg->yy_c_buf_p = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos; - yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; - yyg->yy_hold_char = *yyg->yy_c_buf_p; -} - -/** Allocate and initialize an input buffer state. - * @param file A readable stream. - * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE. - * @param yyscanner The scanner object. - * @return the allocated buffer state. - */ - YY_BUFFER_STATE mimeparser_yy_create_buffer (FILE * file, int size , yyscan_t yyscanner) -{ - YY_BUFFER_STATE b; - - b = (YY_BUFFER_STATE) mimeparser_yyalloc(sizeof( struct yy_buffer_state ) ,yyscanner ); - if ( ! b ) - YY_FATAL_ERROR( "out of dynamic memory in mimeparser_yy_create_buffer()" ); - - b->yy_buf_size = size; - - /* yy_ch_buf has to be 2 characters longer than the size given because - * we need to put in 2 end-of-buffer characters. - */ - b->yy_ch_buf = (char *) mimeparser_yyalloc(b->yy_buf_size + 2 ,yyscanner ); - if ( ! b->yy_ch_buf ) - YY_FATAL_ERROR( "out of dynamic memory in mimeparser_yy_create_buffer()" ); - - b->yy_is_our_buffer = 1; - - mimeparser_yy_init_buffer(b,file ,yyscanner); - - return b; -} - -/** Destroy the buffer. - * @param b a buffer created with mimeparser_yy_create_buffer() - * @param yyscanner The scanner object. - */ - void mimeparser_yy_delete_buffer (YY_BUFFER_STATE b , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - if ( ! b ) - return; - - if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */ - YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0; - - if ( b->yy_is_our_buffer ) - mimeparser_yyfree((void *) b->yy_ch_buf ,yyscanner ); - - mimeparser_yyfree((void *) b ,yyscanner ); -} - -#ifndef __cplusplus -extern int isatty (int ); -#endif /* __cplusplus */ - -/* Initializes or reinitializes a buffer. - * This function is sometimes called more than once on the same buffer, - * such as during a mimeparser_yyrestart() or at EOF. - */ - static void mimeparser_yy_init_buffer (YY_BUFFER_STATE b, FILE * file , yyscan_t yyscanner) - -{ - int oerrno = errno; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - mimeparser_yy_flush_buffer(b ,yyscanner); - - b->yy_input_file = file; - b->yy_fill_buffer = 1; - - /* If b is the current buffer, then mimeparser_yy_init_buffer was _probably_ - * called from mimeparser_yyrestart() or through yy_get_next_buffer. - * In that case, we don't want to reset the lineno or column. - */ - if (b != YY_CURRENT_BUFFER){ - b->yy_bs_lineno = 1; - b->yy_bs_column = 0; - } - - b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0; - - errno = oerrno; -} - -/** Discard all buffered characters. On the next scan, YY_INPUT will be called. - * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER. - * @param yyscanner The scanner object. - */ - void mimeparser_yy_flush_buffer (YY_BUFFER_STATE b , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - if ( ! b ) - return; - - b->yy_n_chars = 0; - - /* We always need two end-of-buffer characters. The first causes - * a transition to the end-of-buffer state. The second causes - * a jam in that state. - */ - b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR; - b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR; - - b->yy_buf_pos = &b->yy_ch_buf[0]; - - b->yy_at_bol = 1; - b->yy_buffer_status = YY_BUFFER_NEW; - - if ( b == YY_CURRENT_BUFFER ) - mimeparser_yy_load_buffer_state(yyscanner ); -} - -/** Pushes the new state onto the stack. The new state becomes - * the current state. This function will allocate the stack - * if necessary. - * @param new_buffer The new state. - * @param yyscanner The scanner object. - */ -void mimeparser_yypush_buffer_state (YY_BUFFER_STATE new_buffer , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - if (new_buffer == NULL) - return; - - mimeparser_yyensure_buffer_stack(yyscanner); - - /* This block is copied from mimeparser_yy_switch_to_buffer. */ - if ( YY_CURRENT_BUFFER ) - { - /* Flush out information for old buffer. */ - *yyg->yy_c_buf_p = yyg->yy_hold_char; - YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = yyg->yy_c_buf_p; - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars; - } - - /* Only push if top exists. Otherwise, replace top. */ - if (YY_CURRENT_BUFFER) - yyg->yy_buffer_stack_top++; - YY_CURRENT_BUFFER_LVALUE = new_buffer; - - /* copied from mimeparser_yy_switch_to_buffer. */ - mimeparser_yy_load_buffer_state(yyscanner ); - yyg->yy_did_buffer_switch_on_eof = 1; -} - -/** Removes and deletes the top of the stack, if present. - * The next element becomes the new top. - * @param yyscanner The scanner object. - */ -void mimeparser_yypop_buffer_state (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - if (!YY_CURRENT_BUFFER) - return; - - mimeparser_yy_delete_buffer(YY_CURRENT_BUFFER ,yyscanner); - YY_CURRENT_BUFFER_LVALUE = NULL; - if (yyg->yy_buffer_stack_top > 0) - --yyg->yy_buffer_stack_top; - - if (YY_CURRENT_BUFFER) { - mimeparser_yy_load_buffer_state(yyscanner ); - yyg->yy_did_buffer_switch_on_eof = 1; - } -} - -/* Allocates the stack if it does not exist. - * Guarantees space for at least one push. - */ -static void mimeparser_yyensure_buffer_stack (yyscan_t yyscanner) -{ - int num_to_alloc; - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - if (!yyg->yy_buffer_stack) { - - /* First allocation is just for 2 elements, since we don't know if this - * scanner will even need a stack. We use 2 instead of 1 to avoid an - * immediate realloc on the next call. - */ - num_to_alloc = 1; - yyg->yy_buffer_stack = (struct yy_buffer_state**)mimeparser_yyalloc - (num_to_alloc * sizeof(struct yy_buffer_state*) - , yyscanner); - - memset(yyg->yy_buffer_stack, 0, num_to_alloc * sizeof(struct yy_buffer_state*)); - - yyg->yy_buffer_stack_max = num_to_alloc; - yyg->yy_buffer_stack_top = 0; - return; - } - - if (yyg->yy_buffer_stack_top >= (yyg->yy_buffer_stack_max) - 1){ - - /* Increase the buffer to prepare for a possible push. */ - int grow_size = 8 /* arbitrary grow size */; - - num_to_alloc = yyg->yy_buffer_stack_max + grow_size; - yyg->yy_buffer_stack = (struct yy_buffer_state**)mimeparser_yyrealloc - (yyg->yy_buffer_stack, - num_to_alloc * sizeof(struct yy_buffer_state*) - , yyscanner); - - /* zero only the new slots.*/ - memset(yyg->yy_buffer_stack + yyg->yy_buffer_stack_max, 0, grow_size * sizeof(struct yy_buffer_state*)); - yyg->yy_buffer_stack_max = num_to_alloc; - } -} - -/** Setup the input buffer state to scan directly from a user-specified character buffer. - * @param base the character buffer - * @param size the size in bytes of the character buffer - * @param yyscanner The scanner object. - * @return the newly allocated buffer state object. - */ -YY_BUFFER_STATE mimeparser_yy_scan_buffer (char * base, yy_size_t size , yyscan_t yyscanner) -{ - YY_BUFFER_STATE b; - - if ( size < 2 || - base[size-2] != YY_END_OF_BUFFER_CHAR || - base[size-1] != YY_END_OF_BUFFER_CHAR ) - /* They forgot to leave room for the EOB's. */ - return 0; - - b = (YY_BUFFER_STATE) mimeparser_yyalloc(sizeof( struct yy_buffer_state ) ,yyscanner ); - if ( ! b ) - YY_FATAL_ERROR( "out of dynamic memory in mimeparser_yy_scan_buffer()" ); - - b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */ - b->yy_buf_pos = b->yy_ch_buf = base; - b->yy_is_our_buffer = 0; - b->yy_input_file = 0; - b->yy_n_chars = b->yy_buf_size; - b->yy_is_interactive = 0; - b->yy_at_bol = 1; - b->yy_fill_buffer = 0; - b->yy_buffer_status = YY_BUFFER_NEW; - - mimeparser_yy_switch_to_buffer(b ,yyscanner ); - - return b; -} - -/** Setup the input buffer state to scan a string. The next call to mimeparser_yylex() will - * scan from a @e copy of @a str. - * @param yystr a NUL-terminated string to scan - * @param yyscanner The scanner object. - * @return the newly allocated buffer state object. - * @note If you want to scan bytes that may contain NUL values, then use - * mimeparser_yy_scan_bytes() instead. - */ -YY_BUFFER_STATE mimeparser_yy_scan_string (yyconst char * yystr , yyscan_t yyscanner) -{ - - return mimeparser_yy_scan_bytes(yystr,strlen(yystr) ,yyscanner); -} - -/** Setup the input buffer state to scan the given bytes. The next call to mimeparser_yylex() will - * scan from a @e copy of @a bytes. - * @param bytes the byte buffer to scan - * @param len the number of bytes in the buffer pointed to by @a bytes. - * @param yyscanner The scanner object. - * @return the newly allocated buffer state object. - */ -YY_BUFFER_STATE mimeparser_yy_scan_bytes (yyconst char * yybytes, int _yybytes_len , yyscan_t yyscanner) -{ - YY_BUFFER_STATE b; - char *buf; - yy_size_t n; - int i; - - /* Get memory for full buffer, including space for trailing EOB's. */ - n = _yybytes_len + 2; - buf = (char *) mimeparser_yyalloc(n ,yyscanner ); - if ( ! buf ) - YY_FATAL_ERROR( "out of dynamic memory in mimeparser_yy_scan_bytes()" ); - - for ( i = 0; i < _yybytes_len; ++i ) - buf[i] = yybytes[i]; - - buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR; - - b = mimeparser_yy_scan_buffer(buf,n ,yyscanner); - if ( ! b ) - YY_FATAL_ERROR( "bad buffer in mimeparser_yy_scan_bytes()" ); - - /* It's okay to grow etc. this buffer, and we should throw it - * away when we're done. - */ - b->yy_is_our_buffer = 1; - - return b; -} - -#ifndef YY_EXIT_FAILURE -#define YY_EXIT_FAILURE 2 -#endif - -static void yy_fatal_error (yyconst char* msg , yyscan_t yyscanner) -{ - (void) fprintf( stderr, "%s\n", msg ); - exit( YY_EXIT_FAILURE ); -} - -/* Redefine yyless() so it works in section 3 code. */ - -#undef yyless -#define yyless(n) \ - do \ - { \ - /* Undo effects of setting up yytext. */ \ - int yyless_macro_arg = (n); \ - YY_LESS_LINENO(yyless_macro_arg);\ - yytext[yyleng] = yyg->yy_hold_char; \ - yyg->yy_c_buf_p = yytext + yyless_macro_arg; \ - yyg->yy_hold_char = *yyg->yy_c_buf_p; \ - *yyg->yy_c_buf_p = '\0'; \ - yyleng = yyless_macro_arg; \ - } \ - while ( 0 ) - -/* Accessor methods (get/set functions) to struct members. */ - -/** Get the user-defined data for this scanner. - * @param yyscanner The scanner object. - */ -YY_EXTRA_TYPE mimeparser_yyget_extra (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yyextra; -} - -/** Get the current line number. - * @param yyscanner The scanner object. - */ -int mimeparser_yyget_lineno (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - if (! YY_CURRENT_BUFFER) - return 0; - - return yylineno; -} - -/** Get the current column number. - * @param yyscanner The scanner object. - */ -int mimeparser_yyget_column (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - if (! YY_CURRENT_BUFFER) - return 0; - - return yycolumn; -} - -/** Get the input stream. - * @param yyscanner The scanner object. - */ -FILE *mimeparser_yyget_in (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yyin; -} - -/** Get the output stream. - * @param yyscanner The scanner object. - */ -FILE *mimeparser_yyget_out (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yyout; -} - -/** Get the length of the current token. - * @param yyscanner The scanner object. - */ -int mimeparser_yyget_leng (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yyleng; -} - -/** Get the current token. - * @param yyscanner The scanner object. - */ - -char *mimeparser_yyget_text (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yytext; -} - -/** Set the user-defined data. This data is never touched by the scanner. - * @param user_defined The data to be associated with this scanner. - * @param yyscanner The scanner object. - */ -void mimeparser_yyset_extra (YY_EXTRA_TYPE user_defined , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yyextra = user_defined ; -} - -/** Set the current line number. - * @param line_number - * @param yyscanner The scanner object. - */ -void mimeparser_yyset_lineno (int line_number , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - /* lineno is only valid if an input buffer exists. */ - if (! YY_CURRENT_BUFFER ) - yy_fatal_error( "mimeparser_yyset_lineno called with no buffer" , yyscanner); - - yylineno = line_number; -} - -/** Set the current column. - * @param line_number - * @param yyscanner The scanner object. - */ -void mimeparser_yyset_column (int column_no , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - /* column is only valid if an input buffer exists. */ - if (! YY_CURRENT_BUFFER ) - yy_fatal_error( "mimeparser_yyset_column called with no buffer" , yyscanner); - - yycolumn = column_no; -} - -/** Set the input stream. This does not discard the current - * input buffer. - * @param in_str A readable stream. - * @param yyscanner The scanner object. - * @see mimeparser_yy_switch_to_buffer - */ -void mimeparser_yyset_in (FILE * in_str , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yyin = in_str ; -} - -void mimeparser_yyset_out (FILE * out_str , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yyout = out_str ; -} - -int mimeparser_yyget_debug (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yy_flex_debug; -} - -void mimeparser_yyset_debug (int bdebug , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yy_flex_debug = bdebug ; -} - -/* Accessor methods for yylval and yylloc */ - -YYSTYPE * mimeparser_yyget_lval (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - return yylval; -} - -void mimeparser_yyset_lval (YYSTYPE * yylval_param , yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yylval = yylval_param; -} - -/* User-visible API */ - -/* mimeparser_yylex_init is special because it creates the scanner itself, so it is - * the ONLY reentrant function that doesn't take the scanner as the last argument. - * That's why we explicitly handle the declaration, instead of using our macros. - */ - -int mimeparser_yylex_init(yyscan_t* ptr_yy_globals) - -{ - if (ptr_yy_globals == NULL){ - errno = EINVAL; - return 1; - } - - *ptr_yy_globals = (yyscan_t) mimeparser_yyalloc ( sizeof( struct yyguts_t ), NULL ); - - if (*ptr_yy_globals == NULL){ - errno = ENOMEM; - return 1; - } - - /* By setting to 0xAA, we expose bugs in yy_init_globals. Leave at 0x00 for releases. */ - memset(*ptr_yy_globals,0x00,sizeof(struct yyguts_t)); - - return yy_init_globals ( *ptr_yy_globals ); -} - -static int yy_init_globals (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - /* Initialization is the same as for the non-reentrant scanner. - * This function is called from mimeparser_yylex_destroy(), so don't allocate here. - */ - - yyg->yy_buffer_stack = 0; - yyg->yy_buffer_stack_top = 0; - yyg->yy_buffer_stack_max = 0; - yyg->yy_c_buf_p = (char *) 0; - yyg->yy_init = 0; - yyg->yy_start = 0; - - yyg->yy_start_stack_ptr = 0; - yyg->yy_start_stack_depth = 0; - yyg->yy_start_stack = NULL; - - yyg->yy_state_buf = 0; - yyg->yy_state_ptr = 0; - yyg->yy_full_match = 0; - yyg->yy_lp = 0; - -/* Defined in main.c */ -#ifdef YY_STDINIT - yyin = stdin; - yyout = stdout; -#else - yyin = (FILE *) 0; - yyout = (FILE *) 0; -#endif - - /* For future reference: Set errno on error, since we are called by - * mimeparser_yylex_init() - */ - return 0; -} - -/* mimeparser_yylex_destroy is for both reentrant and non-reentrant scanners. */ -int mimeparser_yylex_destroy (yyscan_t yyscanner) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - - /* Pop the buffer stack, destroying each element. */ - while(YY_CURRENT_BUFFER){ - mimeparser_yy_delete_buffer(YY_CURRENT_BUFFER ,yyscanner ); - YY_CURRENT_BUFFER_LVALUE = NULL; - mimeparser_yypop_buffer_state(yyscanner); - } - - /* Destroy the stack itself. */ - mimeparser_yyfree(yyg->yy_buffer_stack ,yyscanner); - yyg->yy_buffer_stack = NULL; - - /* Destroy the start condition stack. */ - mimeparser_yyfree(yyg->yy_start_stack ,yyscanner ); - yyg->yy_start_stack = NULL; - - mimeparser_yyfree ( yyg->yy_state_buf , yyscanner); - yyg->yy_state_buf = NULL; - - /* Reset the globals. This is important in a non-reentrant scanner so the next time - * mimeparser_yylex() is called, initialization will occur. */ - yy_init_globals( yyscanner); - - /* Destroy the main struct (reentrant only). */ - mimeparser_yyfree ( yyscanner , yyscanner ); - yyscanner = NULL; - return 0; -} - -/* - * Internal utility routines. - */ - -#ifndef yytext_ptr -static void yy_flex_strncpy (char* s1, yyconst char * s2, int n , yyscan_t yyscanner) -{ - register int i; - for ( i = 0; i < n; ++i ) - s1[i] = s2[i]; -} -#endif - -#ifdef YY_NEED_STRLEN -static int yy_flex_strlen (yyconst char * s , yyscan_t yyscanner) -{ - register int n; - for ( n = 0; s[n]; ++n ) - ; - - return n; -} -#endif - -void *mimeparser_yyalloc (yy_size_t size , yyscan_t yyscanner) -{ - return (void *) malloc( size ); -} - -void *mimeparser_yyrealloc (void * ptr, yy_size_t size , yyscan_t yyscanner) -{ - /* The cast to (char *) in the following accommodates both - * implementations that use char* generic pointers, and those - * that use void* generic pointers. It works with the latter - * because both ANSI C and C++ allow castless assignment from - * any pointer type to void*, and deal with argument conversions - * as though doing an assignment. - */ - return (void *) realloc( (char *) ptr, size ); -} - -void mimeparser_yyfree (void * ptr , yyscan_t yyscanner) -{ - free( (char *) ptr ); /* see mimeparser_yyrealloc() for (char *) cast */ -} - -#define YYTABLES_NAME "yytables" - -#line 416 "mimeparser.l" - - - -void reset_lexer_state(void *yyscanner, struct parser_state *pstate) -{ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - struct lexer_state *lstate = &(pstate->lstate); - - mimeparser_yyset_extra((void*)lstate,yyscanner); - BEGIN(0); - lstate->header_state = STATE_MAIL; - lstate->lineno = 0; - lstate->current_pos = 1; - lstate->condition = 0; - - lstate->is_envelope = 1; - - lstate->message_len = 0; - lstate->buffer_length = 0; - - /* temporary marker variables */ - lstate->body_opaque_start = 0; - lstate->body_start = 0; - lstate->body_end = 0; - lstate->preamble_start = 0; - lstate->preamble_end = 0; - lstate->postamble_start = 0; - lstate->postamble_end = 0; -} - -void -PARSER_setbuffer(char *string, yyscan_t scanner) -{ - struct lexer_state *lstate = mimeparser_yyget_extra(scanner); - lstate->message_buffer = string; - mimeparser_yy_scan_string(string,scanner); -} - -void -PARSER_setfp(FILE *fp, yyscan_t yyscanner) -{ - /* looks like a bug in bison 2.2a -- the wrong code is generated for mimeparser_yyset_in !! */ - struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; - yyg->yyin_r = fp; - - if (0) { - /* This is just to make a compiler warning go away */ - yyunput(0, NULL, yyscanner); - } -} - -/** - * Counts how many lines a given string represents in the message (in case of - * folded header values, for example, or a message body). - */ -int -count_lines(char *txt) -{ - char *o; - int line; - - line = 0; - - for (o = txt; *o != '\0'; o++) - if (*o == '\n') - line++; - - return line; -} - diff --git a/main/minimime/minimime.c b/main/minimime/minimime.c deleted file mode 100644 index f96b62fb1..000000000 --- a/main/minimime/minimime.c +++ /dev/null @@ -1,245 +0,0 @@ -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/* - * MiniMIME test program - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <unistd.h> -#include <fcntl.h> -#include <getopt.h> -#include <err.h> - -#include "mm.h" - -void -usage(void) -{ - fprintf(stderr, - "MiniMIME test suite\n" - "Usage: ./minimime [-m] <filename>\n\n" - " -m : use memory based scanning\n\n" - ); - exit(1); -} - -int -main(int argc, char **argv) -{ - MM_CTX *ctx; - struct mm_mimeheader *header, *lastheader; - struct mm_warning *lastwarning; - struct mm_mimepart *part; - struct mm_content *ct; - int parts, i; - struct stat st; - int fd; - char *buf; - int scan_mode = 0; - - lastheader = NULL; - - while ((i = getopt(argc, argv, "m")) != -1) { - switch(i) { - case 'm': - scan_mode = 1; - break; - default: - usage(); - } - } - - argc -= optind; - argv += optind; - - if (argc < 1) { - usage(); - } - -#ifdef __HAVE_LEAK_DETECTION - /* Initialize memory leak detection if compiled in */ - MM_leakd_init(); -#endif - - /* Initialize MiniMIME library */ - mm_library_init(); - - /* Register all default codecs (base64/qp) */ - mm_codec_registerdefaultcodecs(); - - do { - /* Create a new context */ - ctx = mm_context_new(); - - /* Parse a file into our context */ - if (scan_mode == 0) { - i = mm_parse_file(ctx, argv[0], MM_PARSE_LOOSE, 0); - } else { - if (stat(argv[0], &st) == -1) { - err(1, "stat"); - } - - if ((fd = open(argv[0], O_RDONLY)) == -1) { - err(1, "open"); - } - - buf = (char *)malloc(st.st_size); - if (buf == NULL) { - err(1, "malloc"); - } - - if (read(fd, buf, st.st_size) != st.st_size) { - err(1, "read"); - } - - close(fd); - buf[st.st_size] = '\0'; - - i = mm_parse_mem(ctx, buf, MM_PARSE_LOOSE, 0); - } - - if (i == -1 || mm_errno != MM_ERROR_NONE) { - printf("ERROR: %s at line %d\n", mm_error_string(), mm_error_lineno()); - exit(1); - } - - /* Get the number of MIME parts */ - parts = mm_context_countparts(ctx); - if (parts == 0) { - printf("ERROR: got zero MIME parts, huh\n"); - exit(1); - } else { - if (mm_context_iscomposite(ctx)) { - printf("Got %d MIME parts\n", parts - 1); - } else { - printf("Flat message (not multipart)\n"); - } - } - - /* Get the main MIME part */ - part = mm_context_getpart(ctx, 0); - if (part == NULL) { - fprintf(stderr, "Could not get envelope part\n"); - exit(1); - } - - printf("Printing envelope headers:\n"); - /* Print all headers */ - if (mm_mimepart_headers_start(part, &lastheader) == -1) { - fprintf(stderr, "No headers in envelope\n"); - exit(1); - } - while ((header = mm_mimepart_headers_next(part, &lastheader)) != NULL) { - printf("%s: %s\n", header->name, header->value); - } - - printf("%s\n", mm_content_tostring(part->type)); - printf("\n"); - - ct = part->type; - assert(ct != NULL); - - if (mm_context_iscomposite(ctx) == 0) { - printf("Printing body part for FLAT message:\n"); - part = mm_context_getpart(ctx, 0); - printf("%s", part->body); - } - - /* Loop through all MIME parts beginning with 1 */ - for (i = 1; i < mm_context_countparts(ctx); i++) { - char *decoded; - - printf("Printing headers for MIME part %d\n", i); - - /* Get the current MIME entity */ - part = mm_context_getpart(ctx, i); - if (part == NULL) { - fprintf(stderr, "Should have %d parts but " - "couldn't retrieve part %d", - mm_context_countparts(ctx), i); - exit(1); - } - - /* Print all headers */ - if (mm_mimepart_headers_start(part, &lastheader) == -1) { - printf("Ups no headers\n"); - } - while ((header = mm_mimepart_headers_next(part, &lastheader)) != NULL) { - printf("%s: %s\n", header->name, header->value); - } - - printf("Part Type: %s\n", mm_content_tostring(part->type)); - - /* Print MIME part body */ - printf("\nPrinting message BODY:\n%s\n", (char *)part->opaque_body); - decoded = mm_mimepart_decode(part); - if (decoded != NULL) { - printf("DECODED:\n%s\n", decoded); - free(decoded); - } - } - - /* Print out all warnings that we might have received */ - if (mm_context_haswarnings(ctx) > 0) { - lastwarning = NULL; - fprintf(stderr, "WARNINGS:\n"); -#if 0 - while ((warning = mm_warning_next(ctx, &lastwarning)) - != NULL) { - fprintf(stderr, " -> %s\n", warning->message); - } -#endif - } - - printf("ENVELOPE:\n"); - - do { - char *env; - size_t env_len; - - mm_context_flatten(ctx, &env, &env_len, 0); - printf("%s", env); - - } while (0); - - mm_context_free(ctx); - ctx = NULL; - -#ifdef __HAVE_LEAK_DETECTION - MM_leakd_printallocated(); -#endif - - } while (0); - - return 0; -} diff --git a/main/minimime/mm.h b/main/minimime/mm.h deleted file mode 100644 index adaf2db1d..000000000 --- a/main/minimime/mm.h +++ /dev/null @@ -1,368 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ - -#ifndef _MM_H_INCLUDED -#define _MM_H_INCLUDED - -#include <sys/types.h> -#include <assert.h> -#include "mm_queue.h" -#include "mm_mem.h" - -#define MM_MIME_LINELEN 998 -#define MM_BASE64_LINELEN 76 - -TAILQ_HEAD(mm_mimeheaders, mm_mimeheader); -TAILQ_HEAD(mm_mimeparts, mm_mimepart); -TAILQ_HEAD(mm_params, mm_param); -SLIST_HEAD(mm_codecs, mm_codec); -SLIST_HEAD(mm_warnings, mm_warning); - -/* - * Parser modes - */ -enum mm_parsemodes -{ - /** Parse loosely, accept some MIME quirks */ - MM_PARSE_LOOSE = 0, - /** Parse as strict as possible */ - MM_PARSE_STRICT -}; - -/* - * Available parser flags - */ -enum mm_parseflags -{ - MM_PARSE_NONE = (1L << 0), - MM_PARSE_STRIPCOMMENTS = (1L << 1) -}; - -/* - * Enumeration of MIME encodings - */ -enum mm_encoding -{ - MM_ENCODING_NONE = 0, - MM_ENCODING_BASE64, - MM_ENCODING_QUOTEDPRINTABLE, - MM_ENCODING_UNKNOWN -}; - -/* - * Message type - */ -enum mm_messagetype -{ - /** Flat message */ - MM_MSGTYPE_FLAT = 0, - /** Composite message */ - MM_MSGTYPE_MULTIPART -}; - -/* - * Enumeration of error categories - */ -enum mm_errors -{ - MM_ERROR_NONE = 0, - MM_ERROR_UNDEF, - MM_ERROR_ERRNO, - MM_ERROR_PARSE, - MM_ERROR_MIME, - MM_ERROR_CODEC, - MM_ERROR_PROGRAM -}; - -enum mm_warning_ids -{ - MM_WARN_NONE = 0, - MM_WARN_PARSE, - MM_WARN_MIME, - MM_WARN_CODEC -}; - -enum mm_addressfields { - MM_ADDR_TO = 0, - MM_ADDR_CC, - MM_ADDR_BCC, - MM_ADDR_FROM, - MM_ADDR_SENDER, - MM_ADDR_REPLY_TO -}; - -enum mm_flatten_flags { - MM_FLATTEN_NONE = 0, - MM_FLATTEN_SKIPENVELOPE = (1L << 1), - MM_FLATTEN_OPAQUE = (1L << 2), - MM_FLATTEN_NOPREAMBLE = (1L << 3) -}; - -/* - * More information about an error - */ -struct mm_error_data -{ - int error_id; - int error_where; - int lineno; - char error_msg[128]; -}; - -extern int mm_errno; -extern struct mm_error_data mm_error; - -enum mm_warning_code -{ - MM_WARNING_NONE = 0, - MM_WARNING_INVHDR, -}; - -/* - * A parser warning - */ -struct mm_warning -{ - enum mm_warning_code warning; - u_int32_t lineno; - SLIST_ENTRY(mm_warning) next; -}; - -/* - * Representation of a MiniMIME codec object - */ -struct mm_codec -{ - enum mm_encoding id; - char *encoding; - - char *(*encoder)(char *, u_int32_t); - char *(*decoder)(char *); - - SLIST_ENTRY(mm_codec) next; -}; - -/* - * Representation of a MIME Content-Type parameter - */ -struct mm_param -{ - char *name; - char *value; - - TAILQ_ENTRY(mm_param) next; -}; - -/* - * Representation of a mail or MIME header field - */ -struct mm_mimeheader -{ - char *name; - char *value; - - struct mm_params params; - - TAILQ_ENTRY(mm_mimeheader) next; -}; - -/* - * Representation of a MIME Content-Type object - */ -struct mm_content -{ - char *maintype; - char *subtype; - char *disposition_type; - - struct mm_params type_params; - struct mm_params disposition_params; - - char *encstring; - enum mm_encoding encoding; -}; - -/* - * Representation of a MIME part - */ -struct mm_mimepart -{ - struct mm_mimeheaders headers; - - size_t opaque_length; - char *opaque_body; - - size_t length; - char *body; - - struct mm_content *type; - - TAILQ_ENTRY(mm_mimepart) next; -}; - -/* - * Represantation of a MiniMIME context - */ -struct mm_context -{ - struct mm_mimeparts parts; - enum mm_messagetype messagetype; - struct mm_warnings warnings; - struct mm_codecs codecs; - char *boundary; - char *preamble; - size_t max_message_size; -}; - -typedef struct mm_context MM_CTX; -typedef struct mm_context mm_ctx_t; - -char *mm_unquote(const char *); -char *mm_uncomment(const char *); -char *mm_stripchars(char *, char *); -char *mm_addchars(char *, char *, u_int16_t); -int mm_gendate(char **); -void mm_striptrailing(char **, const char *); -int mm_mimeutil_genboundary(char *, size_t, char **); - -int mm_library_init(void); -int mm_library_isinitialized(void); - -int mm_parse_mem(MM_CTX *, const char *, int, int); -int mm_parse_file(MM_CTX *, const char *, int, int); -int mm_parse_fileptr(MM_CTX *, FILE *, int, int); - -MM_CTX *mm_context_new(void); -void mm_context_free(MM_CTX *); -int mm_context_attachpart(MM_CTX *, struct mm_mimepart *); -int mm_context_deletepart(MM_CTX *, int, int); -int mm_context_countparts(MM_CTX *); -struct mm_mimepart *mm_context_getpart(MM_CTX *, int); -int mm_context_iscomposite(MM_CTX *); -int mm_context_haswarnings(MM_CTX *); -int mm_context_flatten(MM_CTX *, char **, size_t *, int); - -int mm_envelope_getheaders(MM_CTX *, char **, size_t *); -int mm_envelope_setheader(MM_CTX *, const char *, const char *, ...); - -struct mm_mimeheader *mm_mimeheader_new(void); -void mm_mimeheader_free(struct mm_mimeheader *); -struct mm_mimeheader *mm_mimeheader_generate(const char *, const char *); -int mm_mimeheader_uncomment(struct mm_mimeheader *); -int mm_mimeheader_uncommentbyname(struct mm_mimepart *, const char *); -int mm_mimeheader_uncommentall(struct mm_mimepart *); -int mm_mimeheader_tostring(struct mm_mimeheader *); -char *mm_mimeheader_getparambyname(struct mm_mimeheader *hdr, const char *name); -int mm_mimeheader_attachparam(struct mm_mimeheader *hdr, struct mm_param *param); - -struct mm_mimepart *mm_mimepart_new(void); -void mm_mimepart_free(struct mm_mimepart *); -int mm_mimepart_attachheader(struct mm_mimepart *, struct mm_mimeheader *); -int mm_mimepart_countheaders(struct mm_mimepart *part); -int mm_mimepart_countheaderbyname(struct mm_mimepart *, const char *); -struct mm_mimeheader *mm_mimepart_getheaderbyname(struct mm_mimepart *, const char *, int); -const char *mm_mimepart_getheadervalue(struct mm_mimepart *, const char *, int); -int mm_mimepart_headers_start(struct mm_mimepart *, struct mm_mimeheader **); -struct mm_mimeheader *mm_mimepart_headers_next(struct mm_mimepart *, struct mm_mimeheader **); -char *mm_mimepart_decode(struct mm_mimepart *); -struct mm_content *mm_mimepart_getcontent(struct mm_mimepart *); -size_t mm_mimepart_getlength(struct mm_mimepart *); -char *mm_mimepart_getbody(struct mm_mimepart *, int); -void mm_mimepart_attachcontenttype(struct mm_mimepart *, struct mm_content *); -int mm_mimepart_setdefaultcontenttype(struct mm_mimepart *, int); -int mm_mimepart_flatten(struct mm_mimepart *, char **, size_t *, int); -struct mm_mimepart *mm_mimepart_fromfile(const char *); - -struct mm_content *mm_content_new(void); -void mm_content_free(struct mm_content *); -int mm_content_attachtypeparam(struct mm_content *, struct mm_param *); -int mm_content_attachdispositionparam(struct mm_content *, struct mm_param *); -struct mm_content *mm_content_parse(const char *, int); -char *mm_content_gettypeparambyname(struct mm_content *, const char *); -char *mm_content_getdispositionparambyname(struct mm_content *, const char *); -struct mm_param *mm_content_gettypeparamobjbyname(struct mm_content *, const char *); -struct mm_param *mm_content_getdispositionparamobjbyname(struct mm_content *, const char *); -int mm_content_setmaintype(struct mm_content *, char *, int); -int mm_content_setsubtype(struct mm_content *, char *, int); -int mm_content_settype(struct mm_content *, const char *, ...); -int mm_content_setdispositiontype(struct mm_content *ct, char *value, int copy); -char *mm_content_getmaintype(struct mm_content *); -char *mm_content_getsubtype(struct mm_content *); -char *mm_content_gettype(struct mm_content *); -char *mm_content_getdispositiontype(struct mm_content *ct); -int mm_content_iscomposite(struct mm_content *); -int mm_content_isvalidencoding(const char *); -int mm_content_setencoding(struct mm_content *, const char *); -char *mm_content_typeparamstostring(struct mm_content *); -char *mm_content_dispositionparamstostring(struct mm_content *); -char *mm_content_tostring(struct mm_content *); - -struct mm_param *mm_param_new(void); -void mm_param_free(struct mm_param *); - -char *mm_flatten_mimepart(struct mm_mimepart *); -char *mm_flatten_context(MM_CTX *); - -int mm_codec_isregistered(const char *); -int mm_codec_hasdecoder(const char *); -int mm_codec_hasencoder(const char *); -int mm_codec_register(const char *, char *(*encoder)(char *, u_int32_t), char *(*decoder)(char *)); -int mm_codec_unregister(const char *); -int mm_codec_unregisterall(void); -void mm_codec_registerdefaultcodecs(void); - -char *mm_base64_decode(char *); -char *mm_base64_encode(char *, u_int32_t); - -void mm_error_init(void); -void mm_error_setmsg(const char *, ...); -void mm_error_setlineno(int lineno); -char *mm_error_string(void); -int mm_error_lineno(void); - -void mm_warning_add(MM_CTX *, int, const char *, ...); -struct mm_warning *mm_warning_next(MM_CTX *, struct mm_warning **); - -#ifndef HAVE_STRLCPY -size_t strlcpy(char *, const char *, size_t); -#endif /* ! HAVE_STRLCPY */ -#ifndef HAVE_STRLCAT -size_t strlcat(char *, const char *, size_t); -#endif /* ! HAVE_STRLCAT */ - -#define MM_ISINIT() do { \ - assert(mm_library_isinitialized() == 1); \ -} while (0); - -#endif /* ! _MM_H_INCLUDED */ diff --git a/main/minimime/mm_base64.c b/main/minimime/mm_base64.c deleted file mode 100644 index 86d7f30c8..000000000 --- a/main/minimime/mm_base64.c +++ /dev/null @@ -1,210 +0,0 @@ -/* - * Copyright (C) 2003 Jann Fischer <jfi@openbsd.de> - * All rights reserved. - * - * XXX: This piece of software is not nearly MIME compatible as it should be. - * - * This is based on third-party code, see the copyright notice below. - * - */ - -/* $Id$ */ - -/*********************************************************** - Copyright 1998 by Carnegie Mellon University - - All Rights Reserved - -Permission to use, copy, modify, and distribute this software and its -documentation for any purpose and without fee is hereby granted, -provided that the above copyright notice appear in all copies and that -both that copyright notice and this permission notice appear in -supporting documentation, and that the name of Carnegie Mellon -University not be used in advertising or publicity pertaining to -distribution of the software without specific, written prior -permission. - -CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO -THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND -FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE FOR -ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT -OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -******************************************************************/ -#include <stdio.h> -#include <stdlib.h> -#include <assert.h> - -#include "mm_internal.h" - -#define XX 127 - -static int _mm_base64_decode(char *); -static char *_mm_base64_encode(char *, u_int32_t); - -/* - * Tables for encoding/decoding base64 - */ -static const char basis_64[] = - "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; -static const char index_64[256] = { - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,62, XX,XX,XX,63, - 52,53,54,55, 56,57,58,59, 60,61,XX,XX, XX,XX,XX,XX, - XX, 0, 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,XX, XX,XX,XX,XX, - XX,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,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, - XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, XX,XX,XX,XX, -}; -#define CHAR64(c) (index_64[(unsigned char)(c)]) - -/* - * mm_base64_decode() - * - * Decodes the data pointed to by 'data' from the BASE64 encoding to the data - * format it was encoded from. Returns a pointer to a string on success or - * NULL on error. The string returned needs to be freed by the caller at some - * later point. - * - */ -char * -mm_base64_decode(char *data) -{ - char *buf; - - assert(data != NULL); - - buf = mm_stripchars(data, "\r\n"); - assert(buf != NULL); - - _mm_base64_decode(buf); - assert(buf != NULL); - return(buf); -} - -/* - * mm_base64_encode() - * - * Encodes the data pointed to by 'data', which is of the length specified in - * 'len' to the BASE64 format. Returns a pointer to a string containing the - * BASE64 encoding, whose lines are broken at the MIME recommended linelength - * of 76 characters. If an error occured, returns NULL. The string returned - * needs to be freed by the caller at some later point. - * - */ -char * -mm_base64_encode(char *data, u_int32_t len) { - char *buf; - char *ret; - - assert(data != NULL); - - buf = _mm_base64_encode(data, len); - assert(buf != NULL); - - ret = mm_addchars(buf, "\r\n", MM_BASE64_LINELEN); - xfree(buf); - assert(ret != NULL); - return ret; -} - -/* - * Decode in-place the base64 data in 'input'. Returns the length - * of the decoded data, or -1 if there was an error. - */ -static int -_mm_base64_decode(char *input) -{ - u_int32_t len = 0; - unsigned char *output = (unsigned char *)input; - int c1, c2, c3, c4; - - while (*input) { - c1 = *input++; - if (CHAR64(c1) == XX) return -1; - c2 = *input++; - if (CHAR64(c2) == XX) return -1; - c3 = *input++; - if (c3 != '=' && CHAR64(c3) == XX) return -1; - c4 = *input++; - if (c4 != '=' && CHAR64(c4) == XX) return -1; - *output++ = (CHAR64(c1) << 2) | (CHAR64(c2) >> 4); - ++len; - if (c3 == '=') break; - *output++ = ((CHAR64(c2) << 4) & 0xf0) | (CHAR64(c3) >> 2); - ++len; - if (c4 == '=') break; - *output++ = ((CHAR64(c3) << 6) & 0xc0) | CHAR64(c4); - ++len; - } - *output = 0; - - return len; -} - -/* - * Encode the given binary string of length 'len' and return Base64 - * in a char buffer. It allocates the space for buffer. - * caller must free the space. - */ -static char * -_mm_base64_encode(char *data, u_int32_t len) -{ - char *buf; - u_int32_t buflen; - int c1; - int c2; - int c3; - u_int32_t maxbuf; - - buflen = 0; - -#ifdef RUBBISH - maxbuf = len*4/3 + 1; /* size after expantion */ -#endif - maxbuf = len*2 + 20; /* size after expantion */ - - buf = (char *)xmalloc(maxbuf); - - while (len && buflen < (maxbuf - 6)) { - - c1 = (unsigned char)*data++; - buf[buflen++] = basis_64[c1>>2]; - - if (--len == 0) c2 = 0; - else c2 = (unsigned char)*data++; - buf[buflen++] = basis_64[((c1 & 0x3)<< 4) | ((c2 & 0xF0) >> 4)]; - - if (len == 0) { - buf[buflen++] = '='; - buf[buflen++] = '='; - break; - } - - if (--len == 0) c3 = 0; - else c3 = (unsigned char)*data++; - - buf[buflen++] = basis_64[((c2 & 0xF) << 2) | ((c3 & 0xC0) >>6)]; - if (len == 0) { - buf[buflen++] = '='; - - break; - } - - --len; - buf[buflen++] = basis_64[c3 & 0x3F]; - } - - buf[buflen]=0; - return buf; -} diff --git a/main/minimime/mm_codecs.c b/main/minimime/mm_codecs.c deleted file mode 100644 index 28603e513..000000000 --- a/main/minimime/mm_codecs.c +++ /dev/null @@ -1,250 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <unistd.h> -#include <fcntl.h> -#include <string.h> -#include <assert.h> - -#include "mm_internal.h" -#include "mm_util.h" - -extern struct mm_codecs codecs; - -/** @file mm_codecs.c - * - * This module contains functions to manipulate MiniMIME codecs - * - */ - -/** @defgroup codecs Manipulating MiniMIME codecs */ - -/** @{ - * @name Codec manipulation - */ - -/** - * Looks up whether a context has an decoder installed for a given encoding - * - * @param encoding The encoding specifier to look up - * @return 1 if a decoder is installed or 0 if not - * @ingroup codecs - */ -int -mm_codec_hasdecoder(const char *encoding) -{ - struct mm_codec *codec; - - assert(encoding != NULL); - - SLIST_FOREACH(codec, &codecs, next) { - assert(codec->encoding != NULL); - if (!strcasecmp(codec->encoding, encoding)) { - if (codec->decoder != NULL) - return 1; - else - return 0; - } - } - - return 0; -} - -/** - * Looks up whether a context has an encoder installed for a given encoding - * - * @param ctx A valid MIME context - * @param encoding The encoding specifier to look up - * @return 1 if an encoder is installed or 0 if not - * @ingroup codecs - */ -int -mm_codec_hasencoder(const char *encoding) -{ - struct mm_codec *codec; - - assert(encoding != NULL); - - SLIST_FOREACH(codec, &codecs, next) { - assert(codec->encoding != NULL); - if (!strcasecmp(codec->encoding, encoding)) { - if (codec->encoder != NULL) - return 1; - else - return 0; - } - } - - return 0; -} - -/** - * Looks up whether a codec for a given encoding is installed to a context - * - * @param encoding The encoding specifier to look up - * @return 1 if a codec was found or 0 if not - * @ingroup codecs - */ -int -mm_codec_isregistered(const char *encoding) -{ - struct mm_codec *codec; - - assert(encoding != NULL); - - SLIST_FOREACH(codec, &codecs, next) { - if (!strcasecmp(codec->encoding, encoding)) { - return 1; - } - } - - return 0; -} - -/** - * Registers a codec with the MiniMIME library - * - * @param encoding The encoding specifier for which to register the codec - * @param encoder The encoder function for this encoding - * @param decoder The decoder function for this encoding - * @return 1 if successfull or 0 if not - * @ingroup codecs - * - * This function registers a codec for a given MiniMIME context. The codec - * may provide an decoder, an encoder or both (but not none). If there is - * a codec already installed for this encoding, the function will puke. - */ -int -mm_codec_register(const char *encoding, - char *(*encoder)(char *data, u_int32_t i), - char *(*decoder)(char *data)) -{ - struct mm_codec *codec; - - assert(encoding != NULL); - - assert(mm_codec_isregistered(encoding) != 1); - - codec = (struct mm_codec *)xmalloc(sizeof(struct mm_codec)); - - codec->encoding = xstrdup(encoding); - codec->encoder = encoder; - codec->decoder = decoder; - - if (SLIST_EMPTY(&codecs)) { - SLIST_INSERT_HEAD(&codecs, codec, next); - return 1; - } else { - struct mm_codec *lcodec, *tcodec; - tcodec = NULL; - SLIST_FOREACH(lcodec, &codecs, next) { - if (lcodec != NULL) - tcodec = lcodec; - } - assert(tcodec != NULL); - SLIST_INSERT_AFTER(tcodec, codec, next); - return 1; - } - - return 0; -} - -/** - * Unregisters a MiniMIME codec - * - * @param encoding The encoding specifier which to unregister - * @return 0 if unregistered successfully, or -1 if there was no such codec - * @ingroup codecs - */ -int -mm_codec_unregister(const char *encoding) -{ - struct mm_codec *codec; - - assert(encoding != NULL); - - SLIST_FOREACH(codec, &codecs, next) { - if (!strcasecmp(codec->encoding, encoding)) { - xfree(codec->encoding); - xfree(codec); - codec = NULL; - return 0; - } - } - - return -1; -} - -/** - * Unregisters all codecs within a context - * - * @param ctx A valid MiniMIME context - * @return 0 if all codecs were unregistered successfully or -1 if an error - * occured. - * @note Foobar - */ -int -mm_codec_unregisterall(void) -{ - struct mm_codec *codec; - - SLIST_FOREACH(codec, &codecs, next) { - if (mm_codec_unregister(codec->encoding) == -1) { - return -1; - } - } - - return 0; -} - -/** - * Registers the default codecs to a MiniMIME context - * - * This functions registers the codecs for the following encodings to a - * MiniMIME context: - * - * - Base64 - * - (TODO:) Quoted-Printable - */ -void -mm_codec_registerdefaultcodecs(void) -{ - mm_codec_register("base64", mm_base64_encode, mm_base64_decode); -} - - -/** @} */ diff --git a/main/minimime/mm_contenttype.c b/main/minimime/mm_contenttype.c deleted file mode 100644 index ff978df85..000000000 --- a/main/minimime/mm_contenttype.c +++ /dev/null @@ -1,757 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <string.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" -#include "mm_util.h" - -/* This file is documented using Doxygen */ - -/** - * @file mm_contenttype.c - * - * This module contains functions for manipulating Content-Type objects. - */ - -/** @defgroup contenttype Accessing and manipulating Content-Type objects */ - -struct mm_encoding_mappings { - const char *idstring; - int type; -}; - -static struct mm_encoding_mappings mm_content_enctypes[] = { - { "Base64", MM_ENCODING_BASE64 }, - { "Quoted-Printable", MM_ENCODING_QUOTEDPRINTABLE }, - { NULL, - 1}, -}; - -static const char *mm_composite_maintypes[] = { - "multipart", - "message", - NULL, -}; - -static const char *mm_composite_encodings[] = { - "7bit", - "8bit", - "binary", - NULL, -}; - -/** @{ - * @name Functions for manipulating Content objects - */ - -/** - * Creates a new object to hold a Content representation. - * The allocated memory must later be freed using mm_content_free() - * - * @return An object representing a MIME Content-Type - * @see mm_content_free - * @ingroup contenttype - */ -struct mm_content * -mm_content_new(void) -{ - struct mm_content *ct; - - ct = (struct mm_content *)xmalloc(sizeof(struct mm_content)); - - ct->maintype = NULL; - ct->subtype = NULL; - - TAILQ_INIT(&ct->type_params); - TAILQ_INIT(&ct->disposition_params); - - ct->encoding = MM_ENCODING_NONE; - ct->encstring = NULL; - - return ct; -} - -/** - * Releases all memory associated with an Content object - * - * @param ct A Content-Type object - * @return Nothing - * @ingroup contenttype - */ -void -mm_content_free(struct mm_content *ct) -{ - struct mm_param *param; - - assert(ct != NULL); - - if (ct->maintype != NULL) { - xfree(ct->maintype); - ct->maintype = NULL; - } - if (ct->subtype != NULL) { - xfree(ct->subtype); - ct->subtype = NULL; - } - if (ct->encstring != NULL) { - xfree(ct->encstring); - ct->encstring = NULL; - } - - TAILQ_FOREACH(param, &ct->type_params, next) { - TAILQ_REMOVE(&ct->type_params, param, next); - mm_param_free(param); - } - TAILQ_FOREACH(param, &ct->disposition_params, next) { - TAILQ_REMOVE(&ct->disposition_params, param, next); - mm_param_free(param); - } - - xfree(ct); -} - -/** - * Attaches a content-type parameter to a Content object - * - * @param ct The target Content object - * @param param The Content-Type parameter which to attach - * @return 0 on success and -1 on failure - * @ingroup contenttype - */ -int -mm_content_attachtypeparam(struct mm_content *ct, struct mm_param *param) -{ - assert(ct != NULL); - assert(param != NULL); - - if (TAILQ_EMPTY(&ct->type_params)) { - TAILQ_INSERT_HEAD(&ct->type_params, param, next); - } else { - TAILQ_INSERT_TAIL(&ct->type_params, param, next); - } - - return 0; -} - - -/** - * Attaches a content-disposition parameter to a Content-Disposition object - * - * @param ct The target Content object - * @param param The Content-Type parameter which to attach - * @return 0 on success and -1 on failure - * @ingroup contenttype - */ -int -mm_content_attachdispositionparam(struct mm_content *ct, struct mm_param *param) -{ - assert(ct != NULL); - assert(param != NULL); - - if (TAILQ_EMPTY(&ct->disposition_params)) { - TAILQ_INSERT_HEAD(&ct->disposition_params, param, next); - } else { - TAILQ_INSERT_TAIL(&ct->disposition_params, param, next); - } - - return 0; -} - - -/** - * Gets a Content-Type parameter value from a Content object. - * - * @param ct the Content object - * @param name the name of the parameter to retrieve - * @return The value of the parameter on success or a NULL pointer on failure - * @ingroup contenttype - */ -char * -mm_content_gettypeparambyname(struct mm_content *ct, const char *name) -{ - struct mm_param *param; - - assert(ct != NULL); - - TAILQ_FOREACH(param, &ct->type_params, next) { - if (!strcasecmp(param->name, name)) { - return param->value; - } - } - - return NULL; -} - -/** - * Gets a Content-Disposition parameter value from a Content object. - * - * @param ct the Content object - * @param name the name of the parameter to retrieve - * @return The value of the parameter on success or a NULL pointer on failure - * @ingroup contenttype - */ -char * -mm_content_getdispositionparambyname(struct mm_content *ct, const char *name) -{ - struct mm_param *param; - - assert(ct != NULL); - - TAILQ_FOREACH(param, &ct->disposition_params, next) { - if (!strcasecmp(param->name, name)) { - return param->value; - } - } - - return NULL; -} - -struct mm_param * -mm_content_gettypeparamobjbyname(struct mm_content *ct, const char *name) -{ - struct mm_param *param; - - assert(ct != NULL); - - TAILQ_FOREACH(param, &ct->type_params, next) { - if (!strcasecmp(param->name, name)) { - return param; - } - } - - return NULL; -} - -struct mm_param * -mm_content_getdispositionparamobjbyname(struct mm_content *ct, const char *name) -{ - struct mm_param *param; - - assert(ct != NULL); - - TAILQ_FOREACH(param, &ct->disposition_params, next) { - if (!strcasecmp(param->name, name)) { - return param; - } - } - - return NULL; -} - -/** - * Sets the MIME main Content-Type for a MIME Content object - * - * @param ct The MIME Content object - * @param value The value which to set the main type to - * @param copy Whether to make a copy of the value (original value must be - * freed afterwards to prevent memory leaks). - */ -int -mm_content_setmaintype(struct mm_content *ct, char *value, int copy) -{ - assert(ct != NULL); - assert(value != NULL); - - if (copy) { - /** - * @bug The xfree() call could lead to undesirable results. - * Do we really need it? - */ - if (ct->maintype != NULL) { - xfree(ct->maintype); - } - ct->maintype = xstrdup(value); - } else { - ct->maintype = value; - } - - return 0; -} - -/** - * Retrieves the main MIME Content-Type stored in a Content object - * - * @param ct A valid Content object - * @returns A pointer to the string representing the main type - * @ingroup contenttype - */ -char * -mm_content_getmaintype(struct mm_content *ct) -{ - assert(ct != NULL); - assert(ct->maintype != NULL); - - return ct->maintype; -} - -/** - * Sets the MIME Content-Disposition type for a MIME Content object - * - * @param ct The MIME Content object - * @param value The value which to set the main type to - * @param copy Whether to make a copy of the value (original value must be - * freed afterwards to prevent memory leaks). - */ -int -mm_content_setdispositiontype(struct mm_content *ct, char *value, int copy) -{ - assert(ct != NULL); - assert(value != NULL); - - if (copy) { - /** - * @bug The xfree() call could lead to undesirable results. - * Do we really need it? - */ - if (ct->disposition_type != NULL) { - xfree(ct->disposition_type); - } - ct->disposition_type = xstrdup(value); - } else { - ct->disposition_type = value; - } - - return 0; -} - -/** - * Retrieves the Content-Disposition MIME type stored in a Content object - * - * @param ct A valid Content-Type object - * @returns A pointer to the string representing the main type - * @ingroup contenttype - */ -char * -mm_content_getdispositiontype(struct mm_content *ct) -{ - assert(ct != NULL); - assert(ct->disposition_type != NULL); - - return ct->disposition_type; -} - -/** - * Retrieves the sub MIME Content-Type stored in a Content object - * - * @param ct A valid Content-Type object - * @return A pointer to the string holding the current sub MIME type - * @ingroup contenttype - */ -char * -mm_content_getsubtype(struct mm_content *ct) -{ - assert(ct != NULL); - assert(ct->subtype != NULL); - - return ct->subtype; -} - -/** - * Sets the MIME sub Content-Type for a MIME Content object - * - * @param ct The MIME Content-Type object - * @param value The value which to set the sub type to - * @param copy Whether to make a copy of the value (original value must be - * freed afterwards to prevent memory leaks). - */ -int -mm_content_setsubtype(struct mm_content *ct, char *value, int copy) -{ - assert(ct != NULL); - assert(value != NULL); - - if (copy) { - /** - * @bug The xfree() call could lead to undesirable results. - * Do we really need it? - */ - if (ct->subtype != NULL) { - xfree(ct->subtype); - } - ct->subtype = xstrdup(value); - } else { - ct->subtype = value; - } - - return 0; -} - -int -mm_content_settype(struct mm_content *ct, const char *fmt, ...) -{ - char *maint, *subt; - char buf[512], *parse; - va_list ap; - - mm_errno = MM_ERROR_NONE; - - va_start(ap, fmt); - /* Make sure no truncation occurs */ - if (vsnprintf(buf, sizeof buf, fmt, ap) > sizeof buf) { - mm_errno = MM_ERROR_ERRNO; - mm_error_setmsg("Input string too long"); - return -1; - } - va_end(ap); - - parse = buf; - maint = strsep(&parse, "/"); - if (maint == NULL) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("Invalid type specifier: %s", buf); - return -1; - } - ct->maintype = xstrdup(maint); - - subt = strsep(&parse, ""); - if (subt == NULL) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("Invalid type specifier: %s", buf); - return -1; - } - ct->subtype = xstrdup(subt); - - return 0; -} - -/** - * Checks whether the Content-Type represents a composite message or not - * - * @param ct A valid Content-Type object - * @returns 1 if the Content-Type object represents a composite message or - * 0 if not. - */ -int -mm_content_iscomposite(struct mm_content *ct) -{ - int i; - - for (i = 0; mm_composite_maintypes[i] != NULL; i++) { - if (!strcasecmp(ct->maintype, mm_composite_maintypes[i])) { - return 1; - } - } - - /* Not found */ - return 0; -} - -/** - * Verifies whether a string represents a valid encoding or not. - * - * @param encoding The string to verify - * @return 1 if the encoding string is valid or 0 if not - * - */ -int -mm_content_isvalidencoding(const char *encoding) -{ - int i; - - for (i = 0; mm_composite_encodings[i] != NULL; i++) { - if (!strcasecmp(encoding, mm_composite_encodings[i])) { - return 1; - } - } - - /* Not found */ - return 0; -} - -/** - * Set the encoding of a MIME entitity according to a mapping table - * - * @param ct A valid content type object - * @param encoding A string representing the content encoding - * @return 0 if successfull or -1 if not (i.e. unknown content encoding) - */ -int -mm_content_setencoding(struct mm_content *ct, const char *encoding) -{ - int i; - - assert(ct != NULL); - assert(encoding != NULL); - - for (i = 0; mm_content_enctypes[i].idstring != NULL; i++) { - if (!strcasecmp(mm_content_enctypes[i].idstring, encoding)) { - ct->encoding = mm_content_enctypes[i].type; - ct->encstring = xstrdup(encoding); - return 0; - } - } - - /* If we didn't find a mapping, set the encoding to unknown */ - ct->encoding = MM_ENCODING_UNKNOWN; - ct->encstring = NULL; - return 1; -} - -/** - * Gets the numerical ID of a content encoding identifier - * - * @param ct A valid Content Type object - * @param encoding A string representing the content encoding identifier - * @return The numerical ID of the content encoding - */ -int -mm_content_getencoding(struct mm_content *ct, const char *encoding) -{ - int i; - - assert(ct != NULL); - - for (i = 0; mm_content_enctypes[i].idstring != NULL; i++) { - if (!strcasecmp(mm_content_enctypes[i].idstring, encoding)) { - return mm_content_enctypes[i].type; - } - } - - /* Not found */ - return MM_ENCODING_UNKNOWN; -} - -/** - * Constructs a MIME conform string of Content-Type parameters. - * - * @param ct A valid Content Type object - * @return A pointer to a string representing the Content-Type parameters - * in MIME terminology, or NULL if either the Content-Type object - * is invalid, has no parameters or no memory could be allocated. - * - * This function constructs a MIME conform string including all the parameters - * associated with the given Content-Type object. It should NOT be used if - * you need an opaque copy of the current MIME part (e.g. for PGP purposes). - */ -char * -mm_content_typeparamstostring(struct mm_content *ct) -{ - size_t size, new_size; - struct mm_param *param; - char *param_string, *cur_param; - char *buf; - - size = 1; - param_string = NULL; - cur_param = NULL; - - param_string = (char *) xmalloc(size); - *param_string = '\0'; - - /* Concatenate all Content-Type parameters attached to the current - * Content-Type object to a single string. - */ - TAILQ_FOREACH(param, &ct->type_params, next) { - if (asprintf(&cur_param, "; %s=\"%s\"", param->name, - param->value) == -1) { - goto cleanup; - } - - new_size = size + strlen(cur_param) + 1; - - if (new_size < 0 || new_size > 1000) { - size = 0; - goto cleanup; - } - - buf = (char *) xrealloc(param_string, new_size); - if (buf == NULL) { - size = 0; - goto cleanup; - } - - param_string = buf; - size = new_size; - strlcat(param_string, cur_param, size); - - xfree(cur_param); - cur_param = NULL; - } - - return param_string; - -cleanup: - if (param_string != NULL) { - xfree(param_string); - param_string = NULL; - } - if (cur_param != NULL) { - xfree(cur_param); - cur_param = NULL; - } - return NULL; -} - -/** - * Constructs a MIME conformant string of Content-Disposition parameters. - * - * @param ct A valid Content object - * @return A pointer to a string representing the Content-Disposition parameters - * in MIME terminology, or NULL if either the Content object - * is invalid, has no Disposition parameters or no memory could be allocated. - * - * This function constructs a MIME conforming string including all the parameters - * associated with the given Content-Disposition object. It should NOT be used if - * you need an opaque copy of the current MIME part (e.g. for PGP purposes). - */ -char * -mm_content_dispositionparamstostring(struct mm_content *ct) -{ - size_t size, new_size; - struct mm_param *param; - char *param_string, *cur_param; - char *buf; - - size = 1; - param_string = NULL; - cur_param = NULL; - - param_string = (char *) xmalloc(size); - *param_string = '\0'; - - /* Concatenate all Content-Disposition parameters attached to the current - * Content object to a single string. - */ - TAILQ_FOREACH(param, &ct->disposition_params, next) { - if (asprintf(&cur_param, "; %s=\"%s\"", param->name, - param->value) == -1) { - goto cleanup; - } - - new_size = size + strlen(cur_param) + 1; - - if (new_size < 0 || new_size > 1000) { - size = 0; - goto cleanup; - } - - buf = (char *) xrealloc(param_string, new_size); - if (buf == NULL) { - size = 0; - goto cleanup; - } - - param_string = buf; - size = new_size; - strlcat(param_string, cur_param, size); - - xfree(cur_param); - cur_param = NULL; - } - - return param_string; - -cleanup: - if (param_string != NULL) { - xfree(param_string); - param_string = NULL; - } - if (cur_param != NULL) { - xfree(cur_param); - cur_param = NULL; - } - return NULL; -} - -/** - * Creates a Content-Type header according to the object given - * - * @param ct A valid Content-Type object - * - */ -char * -mm_content_tostring(struct mm_content *ct) -{ - char *paramstring; - char *buf; - char *headerstring; - size_t size; - - paramstring = NULL; - headerstring = NULL; - buf = NULL; - - if (ct == NULL) { - return NULL; - } - if (ct->maintype == NULL || ct->subtype == NULL) { - return NULL; - } - - size = strlen(ct->maintype) + strlen(ct->subtype) + 2; - headerstring = (char *)xmalloc(size); - snprintf(headerstring, size, "%s/%s", ct->maintype, ct->subtype); - - paramstring = mm_content_typeparamstostring(ct); - if (paramstring == NULL) { - goto cleanup; - } - - size += strlen(paramstring) + strlen("Content-Type: ") + 1; - buf = (char *)malloc(size); - if (buf == NULL) { - goto cleanup; - } - - snprintf(buf, size, "Content-Type: %s%s", headerstring, paramstring); - - xfree(headerstring); - xfree(paramstring); - - headerstring = NULL; - paramstring = NULL; - - return buf; - -cleanup: - if (paramstring != NULL) { - xfree(paramstring); - paramstring = NULL; - } - if (headerstring != NULL) { - xfree(headerstring); - headerstring = NULL; - } - if (buf != NULL) { - xfree(buf); - buf = NULL; - } - return NULL; -} - -/** @} */ diff --git a/main/minimime/mm_context.c b/main/minimime/mm_context.c deleted file mode 100644 index e655b925a..000000000 --- a/main/minimime/mm_context.c +++ /dev/null @@ -1,604 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <string.h> -#include <assert.h> - -#include "mm_internal.h" - -/** @file mm_context.c - * - * Modules for manipulating MiniMIME contexts - */ - -/** @defgroup context Accessing and manipulating MIME contexts - * - * Each message in MiniMIME is represented by a so called ``context''. A - * context holds all necessary information given about a MIME message, such - * as the envelope, all MIME parts etc. - */ - -/** @{ - * @name Manipulating MiniMIME contexts - */ - -/** - * Creates a new MiniMIME context object. - * - * @return a new MiniMIME context object - * @see mm_context_free - * - * This function creates a new MiniMIME context, which will hold a message. - * The memory needed is allocated dynamically and should later be free'd - * using mm_context_free(). - * - * Before a context can be created, the MiniMIME library needs to be - * initialized properly using mm_library_init(). - * - */ -MM_CTX * -mm_context_new(void) -{ - MM_CTX *ctx; - - MM_ISINIT(); - - ctx = (MM_CTX *)xmalloc(sizeof(MM_CTX)); - ctx->messagetype = MM_MSGTYPE_FLAT; /* This is the default */ - ctx->boundary = NULL; - ctx->preamble = xstrdup("This is a message in MIME format, generated " - "by MiniMIME 0.1"); - - TAILQ_INIT(&ctx->parts); - SLIST_INIT(&ctx->warnings); - - return ctx; -} - -/** - * Releases a MiniMIME context object - * - * @param ctx A valid MiniMIME context - * @see mm_context_new - * - * This function releases all memory associated with MiniMIME context object - * that was created using mm_context_new(). It will also release all memory - * used for the MIME parts attached, and their specific properties (such as - * Content-Type information, headers, and the body data). - */ -void -mm_context_free(MM_CTX *ctx) -{ - struct mm_mimepart *part; - struct mm_warning *warning, *nxt; - - assert(ctx != NULL); - - TAILQ_FOREACH(part, &ctx->parts, next) { - TAILQ_REMOVE(&ctx->parts, part, next); - mm_mimepart_free(part); - } - - if (ctx->boundary != NULL) { - xfree(ctx->boundary); - ctx->boundary = NULL; - } - - if (ctx->preamble != NULL) { - xfree(ctx->preamble); - ctx->preamble = NULL; - } - - for (warning = SLIST_FIRST(&ctx->warnings); - warning != SLIST_END(&ctx->warnings); - warning = nxt) { - nxt = SLIST_NEXT(warning, next); - SLIST_REMOVE(&ctx->warnings, warning, mm_warning, next); - xfree(warning); - warning = NULL; - } - - xfree(ctx); - ctx = NULL; -} - -/** - * Attaches a MIME part object to a MiniMIME context. - * - * @param ctx the MiniMIME context - * @param part the MIME part object to attach - * @return 0 on success or -1 on failure. Sets mm_errno on failure. - * - * This function attaches a MIME part to a context, appending it to the end - * of the message. - * - * The MIME part should be initialized before attaching it using - * mm_mimepart_new(). - */ -int -mm_context_attachpart(MM_CTX *ctx, struct mm_mimepart *part) -{ - assert(ctx != NULL); - assert(part != NULL); - - if (TAILQ_EMPTY(&ctx->parts)) { - TAILQ_INSERT_HEAD(&ctx->parts, part, next); - } else { - TAILQ_INSERT_TAIL(&ctx->parts, part, next); - } - - return 0; -} - -/** - * Attaches a MIME part object to a MiniMIME context at a given position - * - * @param ctx A valid MiniMIME context - * @param part The MIME part object to attach - * @param pos After which part to attach the object - * @return 0 on success or -1 if the given position is invalid - * @see mm_context_attachpart - * - * This function attaches a MIME part object after a given position in the - * specified context. If the position is invalid (out of range), the part - * will not get attached to the message and the function returns -1. If - * the index was in range, the MIME part will get attached after the MIME - * part at the given position, moving any possible following MIME parts one - * down the hierarchy. - */ -int -mm_context_attachpart_after(MM_CTX *ctx, struct mm_mimepart *part, int pos) -{ - struct mm_mimepart *p; - int where; - - where = 0; - p = NULL; - - TAILQ_FOREACH(part, &ctx->parts, next) { - if (where == pos) { - p = part; - } - } - - if (p == NULL) { - return(-1); - } - - TAILQ_INSERT_AFTER(&ctx->parts, p, part, next); - - return(0); -} - -/** - * Deletes a MIME part object from a MiniMIME context - * - * @param ctx A valid MiniMIME context object - * @param which The number of the MIME part object to delete - * @param freemem Whether to free the memory associated with the MIME part - * object - * @return 0 on success or -1 on failure. Sets mm_errno on failure. - * - * This function deletes a MIME part from a given context. The MIME part to - * delete is specified as numerical index by the parameter ``which''. If the - * parameter ``freemem'' is set to anything greater than 0, the memory that - * is associated will be free'd by using mm_mimepart_free(), otherwise the - * memory is left untouched (if you still have a pointer to the MIME part - * around). - */ -int -mm_context_deletepart(MM_CTX *ctx, int which, int freemem) -{ - struct mm_mimepart *part; - int cur; - - assert(ctx != NULL); - assert(which >= 0); - - cur = 0; - - TAILQ_FOREACH(part, &ctx->parts, next) { - if (cur == which) { - TAILQ_REMOVE(&ctx->parts, part, next); - if (freemem) - mm_mimepart_free(part); - return 0; - } - cur++; - } - - return -1; -} - -/** - * Counts the number of attached MIME part objects in a given MiniMIME context - * - * @param ctx The MiniMIME context - * @returns The number of attached MIME part objects - */ -int -mm_context_countparts(MM_CTX *ctx) -{ - int count; - struct mm_mimepart *part; - - assert(ctx != NULL); - - count = 0; - - if (TAILQ_EMPTY(&ctx->parts)) { - return 0; - } else { - TAILQ_FOREACH(part, &ctx->parts, next) { - count++; - } - } - - assert(count > -1); - - return count; -} - -/** - * Gets a specified MIME part object from a MimeMIME context - * - * @param ctx The MiniMIME context - * @param which The number of the MIME part object to retrieve - * @returns The requested MIME part object on success or a NULL pointer if - * there is no such part. - */ -struct mm_mimepart * -mm_context_getpart(MM_CTX *ctx, int which) -{ - struct mm_mimepart *part; - int cur; - - assert(ctx != NULL); - - cur = 0; - - TAILQ_FOREACH(part, &ctx->parts, next) { - if (cur == which) { - return part; - } - cur++; - } - - return NULL; -} - -/** - * Checks whether a given context represents a composite (multipart) message - * - * @param ctx A valid MiniMIME context object - * @return 1 if the context is a composite message or 0 if it's flat - * - */ -int -mm_context_iscomposite(MM_CTX *ctx) -{ - if (ctx->messagetype == MM_MSGTYPE_MULTIPART) { - return 1; - } else { - return 0; - } -} - -/** - * Checks whether there are any warnings associated with a given context - * - * @param ctx A valid MiniMIME context - * @return 1 if there are warnings associated with the context, otherwise 0 - */ -int -mm_context_haswarnings(MM_CTX *ctx) -{ - if (SLIST_EMPTY(&ctx->warnings)) { - return 0; - } else { - return 1; - } -} - -/** - * Generates a generic boundary string for a given context - * - * @param ctx A valid MiniMIME context - * @return 0 on success or -1 on failure - * - * This function generates a default boundary string for the given context. - * If there is already a boundary for the context, the memory will be free()'d. - */ -int -mm_context_generateboundary(MM_CTX *ctx) -{ - char *boundary; - struct mm_mimepart *part; - struct mm_param *param; - - if (mm_mimeutil_genboundary("++MiniMIME++", 20, &boundary) == -1) { - return(-1); - } - - if (ctx->boundary != NULL) { - xfree(ctx->boundary); - ctx->boundary = NULL; - } - - /* If we already have an envelope, make sure that we also justify the - * "boundary" parameter of the envelope. - */ - part = mm_context_getpart(ctx, 0); - if (part == NULL) { - return(0); - } - if (part->type != NULL) { - param = mm_content_gettypeparamobjbyname(part->type, "boundary"); - if (param == NULL) { - param = mm_param_new(); - param->name = xstrdup("boundary"); - param->value = xstrdup(boundary); - mm_content_attachtypeparam(part->type, param); - } else { - if (param->value != NULL) { - xfree(param->value); - param->value = NULL; - } - param->value = xstrdup(boundary); - } - } - - ctx->boundary = boundary; - return(0); -} - -/** - * Sets a preamble for the given MiniMIME context - * - * @param ctx A valid MiniMIME context - * @param preamble The preamble to set - * @return 0 on success or -1 on failure - * - * This function sets the MIME preamble (the text between the end of envelope - * headers and the beginning of the first MIME part) for a given context - * object. If preamble is a NULL-pointer then the preamble will be deleted, - * and the currently associated memory will be free automagically. - */ -int -mm_context_setpreamble(MM_CTX *ctx, char *preamble) -{ - if (ctx == NULL) - return(-1); - - if (preamble == NULL) { - if (ctx->preamble != NULL) { - xfree(ctx->preamble); - } - ctx->preamble = NULL; - } else { - ctx->preamble = xstrdup(preamble); - } - return(0); -} - -char * -mm_context_getpreamble(MM_CTX *ctx) -{ - if (ctx == NULL) - return(NULL); - - return(ctx->preamble); -} - -/** - * Creates an ASCII message of the specified context - * - * @param ctx A valid MiniMIME context object - * @param flat Where to store the message - * @param flags Flags that affect the flattening process - * - * This function ``flattens'' a MiniMIME context, that is, it creates an ASCII - * represantation of the message the context contains. The flags can be a - * bitwise combination of the following constants: - * - * - MM_FLATTEN_OPAQUE : use opaque MIME parts when flattening - * - MM_FLATTEN_SKIPENVELOPE : do not flatten the envelope part - * - * Great care is taken to not produce invalid MIME output. - */ -int -mm_context_flatten(MM_CTX *ctx, char **flat, size_t *length, int flags) -{ - struct mm_mimepart *part; - char *message; - char *flatpart; - char *buf; - char *envelope_headers; - size_t message_size; - size_t tmp_size; - char envelope; - - mm_errno = MM_ERROR_NONE; - envelope = 1; - - message = NULL; - message_size = 0; - - if (ctx->boundary == NULL) { - if (mm_context_iscomposite(ctx)) { - mm_context_generateboundary(ctx); - } - } - - TAILQ_FOREACH(part, &ctx->parts, next) { - if (envelope) { - if (flags & MM_FLATTEN_SKIPENVELOPE) { - envelope = 0; - if ((message = (char *) malloc(1)) == NULL) { - mm_errno = MM_ERROR_ERRNO; - goto cleanup; - } - *message = '\0'; - continue; - } - - if (part->type == NULL && mm_context_countparts(ctx) > 1) { - if (mm_mimepart_setdefaultcontenttype(part, 1) - == -1) { - goto cleanup; - } - if (mm_context_generateboundary(ctx) == -1) { - goto cleanup; - } - ctx->messagetype = MM_MSGTYPE_MULTIPART; - } - - if (mm_envelope_getheaders(ctx, &envelope_headers, - &tmp_size) == -1) { - return -1; - } - - message = envelope_headers; - message_size = tmp_size; - envelope = 0; - - if (ctx->preamble != NULL - && mm_context_iscomposite(ctx) - && !(flags & MM_FLATTEN_NOPREAMBLE)) { - tmp_size += strlen(ctx->preamble) - + (strlen("\r\n") * 2); - buf = (char *)xrealloc(message, tmp_size); - if (buf == NULL) { - goto cleanup; - } - message_size += tmp_size; - message = buf; - strlcat(message, "\r\n", message_size); - strlcat(message, ctx->preamble, message_size); - strlcat(message, "\r\n", message_size); - } - } else { - /* Enforce Content-Type if none exist */ - if (part->type == NULL) { - if (mm_mimepart_setdefaultcontenttype(part, 0) - == -1) { - goto cleanup; - } - } - - /* Append a boundary if necessary */ - if (ctx->boundary != NULL) { - tmp_size = strlen(ctx->boundary) + - (strlen("\r\n") * 2) + strlen("--"); - - if (tmp_size < 1) { - return(-1); - } - if (message_size + tmp_size < 1) { - return(-1); - } - - buf = (char *)xrealloc(message, message_size - + tmp_size); - if (buf == NULL) { - goto cleanup; - } - message_size += tmp_size; - message = buf; - strlcat(message, "\r\n", message_size); - strlcat(message, "--", message_size); - strlcat(message, ctx->boundary, message_size); - strlcat(message, "\r\n", message_size); - } - - if (mm_mimepart_flatten(part, &flatpart, &tmp_size, - (flags & MM_FLATTEN_OPAQUE)) == -1) { - goto cleanup; - } - - if (tmp_size < 1) { - goto cleanup; - } - - buf = (char *) xrealloc(message, message_size - + tmp_size); - if (buf == NULL) { - goto cleanup; - } - - message_size += tmp_size; - message = buf; - - strlcat(message, flatpart, message_size); - xfree(flatpart); - flatpart = NULL; - } - } - - /* Append end boundary */ - if (ctx->boundary != NULL && mm_context_iscomposite(ctx)) { - tmp_size = strlen(ctx->boundary) + (strlen("\r\n") * 2) - + (strlen("--") * 2); - buf = (char *)xrealloc(message, message_size + tmp_size); - if (buf == NULL) { - goto cleanup; - } - - message_size += tmp_size; - message = buf; - if (message[strlen(message)-1] != 13) - strlcat(message, "\r", message_size); - strlcat(message, "\n", message_size); - strlcat(message, "--", message_size); - strlcat(message, ctx->boundary, message_size); - strlcat(message, "--", message_size); - strlcat(message, "\r\n", message_size); - } - - *flat = message; - *length = message_size; - - return 0; - -cleanup: - if (message != NULL) { - xfree(message); - message = NULL; - } - return -1; -} - -/** @} */ diff --git a/main/minimime/mm_envelope.c b/main/minimime/mm_envelope.c deleted file mode 100644 index 564490431..000000000 --- a/main/minimime/mm_envelope.c +++ /dev/null @@ -1,269 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <string.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" -#include "mm_util.h" - -/** @file mm_envelope.c - * - * This module contains functions for accessing a message's envelope. This - * are mainly wrapper functions for easy access. - */ - -/** @defgroup envelope Accessing and manipulating a message's envelope - */ - -/** @{ - * @name Accessing and manipulating a message's envelope - */ - -/** - * Gets an ASCII representation of all envelope headers - * - * @param ctx A valid MiniMIME context - * @param result Where to store the resulting ASCII headers - * @param length Where to store the length of the result - * @returns 0 on success or -1 on failure. - * @note Sets mm_errno on failure - * - * This is mainly a convinience function. It constructs an ASCII representation - * from all of the message's envelope headers and stores the result in headers. - * Memory is allocated dynamically, and the total length of the result is - * stored in length. This function takes care that the output is MIME conform, - * and folds long lines according to the MIME standard at position 78 of the - * string. It also nicely formats all MIME related header fields, such as - * the Content-Type header. - * - * Since the memory needed to store the result is allocated dynamically, one - * should take care of freeing it again when it's not needed anymore. If an - * error occurs, *result will be set to NULL, *length will be set to zero - * and mm_errno will be set to a reasonable value. - * - */ -int -mm_envelope_getheaders(MM_CTX *ctx, char **result, size_t *length) -{ - struct mm_mimepart *part; - struct mm_mimeheader *hdr; - char *buf, *hdrbuf; - size_t headers_length, tmp_length; - - headers_length = 1; - buf = NULL; - - part = mm_context_getpart(ctx, 0); - if (part == NULL) { - return -1; - } - - /* Initialize our buffer */ - if ((buf = (char *)xmalloc(headers_length)) == NULL) { - mm_errno = MM_ERROR_ERRNO; - goto cleanup; - } - *buf = '\0'; - - /* Store each envelope header */ - TAILQ_FOREACH(hdr, &part->headers, next) { - tmp_length = strlen(hdr->name) + strlen(hdr->value) - + strlen(": \r\n"); - hdrbuf = (char *) xrealloc(buf, headers_length + tmp_length); - if (hdrbuf == NULL) { - mm_errno = MM_ERROR_ERRNO; - goto cleanup; - } - - headers_length += tmp_length; - buf = hdrbuf; - - strlcat(buf, hdr->name, headers_length); - strlcat(buf, ": ", headers_length); - strlcat(buf, hdr->value, headers_length); - strlcat(buf, "\r\n", headers_length); - } - - /* Construct and store MIME headers */ - if (part->type != NULL) { - char *typebuf; - typebuf = mm_content_tostring(part->type); - if (typebuf == NULL) { - goto cleanup; - } - tmp_length = strlen(typebuf) + strlen("\r\n"); - - hdrbuf = (char *) xrealloc(buf, headers_length + tmp_length); - if (hdrbuf == NULL) { - mm_errno = MM_ERROR_ERRNO; - goto cleanup; - } - - headers_length += tmp_length; - buf = hdrbuf; - - strlcat(buf, typebuf, headers_length); - strlcat(buf, "\r\n", headers_length); - } - - *result = buf; - *length = headers_length; - - return 0; - -cleanup: - if (buf != NULL) { - xfree(buf); - buf = NULL; - } - *result = NULL; - *length = 0; - return -1; -} - -/** - * Sets a header field in the envelope - * - * @param ctx A valid MiniMIME context - * @param name The name of the header field to set - * @param fmt A format string specifying the value of the header field - * @return 0 on success or -1 on failure - * - * This function generates a new MIME header and attaches it to the first - * MIME part (the envelope) found in the given context. If no part is - * attached already, the function will return an error. The function will - * store a copy of ``name'' as the header's name field, and dynamically - * allocate the memory needed to build the format string. - */ -int -mm_envelope_setheader(MM_CTX *ctx, const char *name, const char *fmt, ...) -{ - va_list ap; - char *buf; - struct mm_mimeheader *hdr; - struct mm_mimepart *part; - - part = mm_context_getpart(ctx, 0); - if (part == NULL) { - return(-1); - } - - hdr = mm_mimeheader_new(); - if (hdr == NULL) { - return(-1); - } - - hdr->name = xstrdup(name); - - va_start(ap, fmt); - if (vasprintf(&buf, fmt, ap) == -1) { - goto cleanup; - } - va_end(ap); - - hdr->value = buf; - - if (mm_mimepart_attachheader(part, hdr) == -1) { - goto cleanup; - } - - return(0); - -cleanup: - if (hdr != NULL) { - if (hdr->name != NULL) { - xfree(hdr->name); - hdr->name = NULL; - } - if (hdr->value != NULL) { - xfree(hdr->value); - hdr->value = NULL; - } - } - return(-1); -} - -/** - * Gets the list of recipients for a MIME message - * - * @param ctx A valid MiniMIME context - * @param result Where to store the result - * @param length Where to store the length of the result - * @returns 0 on success or -1 on error - * @note Sets mm_errno on error - * - * This functions gets the list of recipients for a given MIME message. It - * does so by concatenating the "From" and "Cc" header fields, and storing - * the results in recipients. The memory needed to store the result is - * allocated dynamically, and the total length of the result is stored in - * length. - * - * One should take care to free() the result once it's not needed anymore. - */ -int -mm_envelope_getrecipients(MM_CTX *ctx, char **result, size_t *length) -{ - struct mm_mimepart *part; - struct mm_mimeheader *to, *cc; - size_t recipients_length = 0; - - part = mm_context_getpart(ctx, 0); - if (part == NULL) { - return -1; - } - - to = mm_mimepart_getheaderbyname(part, "From", 0); - cc = mm_mimepart_getheaderbyname(part, "Cc", 0); - - if (to == NULL || cc == NULL) { - *result = NULL; - *length = 0; - return -1; - } - - if (to != NULL) { - recipients_length += strlen(to->value); - } - if (cc != NULL) { - recipients_length += strlen(cc->value); - } - - return 0; -} - -/** @} */ diff --git a/main/minimime/mm_error.c b/main/minimime/mm_error.c deleted file mode 100644 index 5b27bf724..000000000 --- a/main/minimime/mm_error.c +++ /dev/null @@ -1,123 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <string.h> -#include <assert.h> -#include <errno.h> - -#include "mm_internal.h" -#include "mm_util.h" - -/** @file mm_error.c - * - * This module contains functions for MiniMIME error information/manipulation - */ - -/** @defgroup error MiniMIME error functions */ - -/** - * Initializes the global error object - * - * @ingroup error - * - * This function initializes the global error object mm_error. This must be - * done when the library is initialized, and is automatically called from - * mm_init_library(). - */ -void -mm_error_init(void) -{ - mm_error.error_id = 0; - mm_error.error_where = 0; - mm_error.lineno = 0; - memset(&mm_error.error_msg, '\0', sizeof(mm_error.error_msg)); -} - -/** - * Sets a descriptive error message - * - * @param fmt The error message as format string - * @ingroup error - * - * This function is called from the various MiniMIME modules in case an - * error occured. Should never be called by the user. - */ -void -mm_error_setmsg(const char *fmt, ...) -{ - va_list ap; - - va_start(ap, fmt); - vsnprintf(mm_error.error_msg, sizeof(mm_error.error_msg), fmt, ap); - va_end(ap); - -} - -void -mm_error_setlineno(int lineno) -{ - mm_error.lineno = lineno; -} - -/** - * Retrieves the current error message - * - * @return The currently set error message - * @ingroup error - * - * This function can be used to retrieve a descriptive error message for the - * current error, much like strerror() function of libc. When this function - * is called without an error being set, it returns the string "No error". - * The string returned does not need to be freed, since it is not dynamically - * allocated by the library. - */ -char * -mm_error_string(void) -{ - if (mm_errno != MM_ERROR_ERRNO && mm_error.error_msg[0] == '\0') { - return "No error"; - } else if (mm_errno == MM_ERROR_ERRNO) { - return strerror(errno); - } else { - return mm_error.error_msg; - } -} - -int -mm_error_lineno(void) -{ - return mm_error.lineno; -} diff --git a/main/minimime/mm_header.c b/main/minimime/mm_header.c deleted file mode 100644 index 827c19cac..000000000 --- a/main/minimime/mm_header.c +++ /dev/null @@ -1,213 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <string.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" -#include "mm_util.h" - -/** @file mm_header.c - * - * This module contains functions for manipulating MIME headers - */ - -/** - * Creates a new MIME header object - * - * @return A new and initialized MIME header object - * @see mm_mimeheader_free - * - * This function creates and initializes a new MIME header object, which must - * later be freed using mm_mimeheader_free() - */ -struct mm_mimeheader * -mm_mimeheader_new(void) -{ - struct mm_mimeheader *header; - - header = (struct mm_mimeheader *)xmalloc(sizeof(struct mm_mimeheader)); - - header->name = NULL; - header->value = NULL; - TAILQ_INIT(&header->params); - - return header; -} - -/** - * Frees a MIME header object - * - * @param header The MIME header object which to free - */ -void -mm_mimeheader_free(struct mm_mimeheader *header) -{ - struct mm_param *param; - assert(header != NULL); - - if (header->name != NULL) { - xfree(header->name); - header->name = NULL; - } - if (header->value != NULL) { - xfree(header->value); - header->value = NULL; - } - - TAILQ_FOREACH(param, &header->params, next) { - TAILQ_REMOVE(&header->params, param, next); - mm_param_free(param); - } -xfree(header); - header = NULL; -} - -/** - * Creates a new MIME header, but does no checks whatsoever (create as-is) - */ -struct mm_mimeheader * -mm_mimeheader_generate(const char *name, const char *value) -{ - struct mm_mimeheader *header; - - header = mm_mimeheader_new(); - - header->name = xstrdup(name); - header->value = xstrdup(value); - - return header; -} - -/** - * Attaches a parameter to a MimeHeader object - * - * @param hdr The target MimeHeader object - * @param param The parameter to attach - * @return 0 on success and -1 on failure - * @ingroup mimeheader - */ -int -mm_mimeheader_attachparam(struct mm_mimeheader *hdr, struct mm_param *param) -{ - assert(hdr != NULL); - assert(param != NULL); - - if (TAILQ_EMPTY(&hdr->params)) { - TAILQ_INSERT_HEAD(&hdr->params, param, next); - } else { - TAILQ_INSERT_TAIL(&hdr->params, param, next); - } - - return 0; -} - - -/** - * Gets a parameter value from a MimeHeader object. - * - * @param hdr the MimeHeader object - * @param name the name of the parameter to retrieve - * @return The value of the parameter on success or a NULL pointer on failure - * @ingroup mimeheader - */ -char * -mm_mimeheader_getparambyname(struct mm_mimeheader *hdr, const char *name) -{ - struct mm_param *param; - - assert(hdr != NULL); - - TAILQ_FOREACH(param, &hdr->params, next) { - if (!strcasecmp(param->name, name)) { - return param->value; - } - } - - return NULL; -} - -int -mm_mimeheader_uncomment(struct mm_mimeheader *header) -{ - char *new; - - assert(header != NULL); - assert(header->name != NULL); - assert(header->value != NULL); - - new = mm_uncomment(header->value); - if (new == NULL) - return -1; - - xfree(header->value); - header->value = new; - - return 0; -} - -int -mm_mimeheader_uncommentbyname(struct mm_mimepart *part, const char *name) -{ - struct mm_mimeheader *header; - - TAILQ_FOREACH(header, &part->headers, next) { - if (!strcasecmp(header->name, name)) { - return mm_mimeheader_uncomment(header); - } - } - - /* Not found */ - return -1; -} - -int -mm_mimeheader_uncommentall(struct mm_mimepart *part) -{ - struct mm_mimeheader *header; - int ret, r; - - ret = 0; - - TAILQ_FOREACH(header, &part->headers, next) { - if ((r = mm_mimeheader_uncomment(header)) == -1) { - ret = -1; - } - } - - return ret; -} diff --git a/main/minimime/mm_init.c b/main/minimime/mm_init.c deleted file mode 100644 index 2ec37db6b..000000000 --- a/main/minimime/mm_init.c +++ /dev/null @@ -1,65 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <assert.h> - -#include "mm_internal.h" - -int mm_errno; -struct mm_error_data mm_error; -static int mm_initialized; -struct mm_codecs codecs; - -int -mm_library_init(void) -{ - assert(mm_initialized != 1); - - mm_errno = MM_ERROR_NONE; - mm_initialized = 1; - - SLIST_INIT(&codecs); - - mm_error_init(); - - return 0; -} - -int -mm_library_isinitialized(void) -{ - return mm_initialized; -} diff --git a/main/minimime/mm_internal.h b/main/minimime/mm_internal.h deleted file mode 100644 index 155591487..000000000 --- a/main/minimime/mm_internal.h +++ /dev/null @@ -1,65 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ - -/** @file mm_internal.h - * Data definitions for MiniMIME - */ -#ifndef _MM_INTERNAL_H_INCLUDED -#define _MM_INTERNAL_H_INCLUDED - -#include "mm.h" - -#define debugp(m, ...) do { \ - fprintf(stderr, "%s:%d:: ", __FILE__, __LINE__); \ - fprintf(stderr, m, ## __VA_ARGS__); \ - fprintf(stderr, "\n"); \ - fflush(stderr); \ -} while (0); - -/** - * @{ - * @name Utility functions - */ -#ifndef __HAVE_LEAK_DETECTION -void *xmalloc(size_t); -void *xrealloc(void *, size_t); -void xfree(void *); -char *xstrdup(const char *); -#endif - -char *xstrsep(char **, const char *); - -/* THIS FILE IS INTENTIONALLY LEFT BLANK */ - -#endif /* ! _MM_INTERNAL_H_INCLUDED */ diff --git a/main/minimime/mm_mem.c b/main/minimime/mm_mem.c deleted file mode 100644 index 91ad3b987..000000000 --- a/main/minimime/mm_mem.c +++ /dev/null @@ -1,171 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <sys/types.h> -#include <sys/param.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <unistd.h> -#include <err.h> -#include <assert.h> - -#include "mm_internal.h" - -#ifdef __HAVE_LEAK_DETECTION -# include "mm_mem.h" - -static struct MM_chunks chunks; - -void * -MM_malloc(size_t size, char *filename, int line) -{ - struct MM_mem_chunk *chunk; - void *pointer; - - pointer = malloc(size); - if (pointer == NULL) - err(1, "malloc"); - - chunk = (struct MM_mem_chunk *)malloc(sizeof(struct MM_mem_chunk)); - if (chunk == NULL) - err(1, "malloc"); - - chunk->address = pointer; - chunk->size = size; - chunk->filename = filename; - chunk->line = line; - - TAILQ_INSERT_TAIL(&chunks, chunk, next); - - return pointer; -} - -char * -MM_strdup(const char *s, char *filename, int line) -{ - char *r; - - r = (char *)MM_malloc(strlen(s)+1, filename, line); - strlcpy(r, s, strlen(s) + 1); - if (strlen(r) != strlen(s)) { - debugp("%d:%d", strlen(s), strlen(r)); - } - return r; - -} - -void * -MM_realloc(void *p, size_t new_size, char *filename, int line) -{ - void *r; - void *a; - struct MM_mem_chunk *chunk; - struct MM_mem_chunk *last; - - a = p; - chunk = NULL; - last = NULL; - - assert(new_size > 0); - - TAILQ_FOREACH(chunk, &chunks, next) { - if (chunk->address == p) { - last = chunk; - } - } - - if (last == NULL) { - debugp("MM_realloc: did not find chunk at %p (%s:%d) " - ", creating new", p, filename, line); - return MM_malloc(new_size, filename, line); - } - - r = realloc(p, new_size); - if (r == NULL) - return NULL; - - last->address = r; - last->size = new_size; - last->filename = filename; - last->line = line; - - return r; -} - -void -MM_free(void *pointer, char *filename, int line, char *name) -{ - struct MM_mem_chunk *chunk, *nxt; - - for (chunk = TAILQ_FIRST(&chunks); chunk != TAILQ_END(&chunks); - chunk = nxt) { - nxt = TAILQ_NEXT(&chunks, next); - if (chunk->address == pointer) { - TAILQ_REMOVE(&chunks, chunk, next); - free(chunk->address); - free(chunk); - return; - } - } - - debugp("FREE: did not find storage %s (at %p), %s:%d", name, pointer, - filename, line); -} - -void -MM_leakd_flush(void) -{ - debugp("flushing memory informations"); - while (!TAILQ_EMPTY(&chunks)) - SLIST_REMOVE_HEAD(&chunks, next); -} - -void -MM_leakd_printallocated(void) -{ - struct MM_mem_chunk *chunk; - debugp("printing dynamic memory allocations"); - TAILQ_FOREACH(chunk, &chunks, next) { - debugp(" chunk: %p (alloc'ed at %s:%d, size %d)\n", - chunk->address, chunk->filename, chunk->line, chunk->size); - } -} - -void -MM_leakd_init(void) -{ - TAILQ_INIT(&chunks); -} - -#endif /* !__HAVE_LEAK_DETECTOR */ diff --git a/main/minimime/mm_mem.h b/main/minimime/mm_mem.h deleted file mode 100644 index 5b00e4bee..000000000 --- a/main/minimime/mm_mem.h +++ /dev/null @@ -1,32 +0,0 @@ -#ifndef __MEM_H -#define __MEM_H - -#ifdef __HAVE_LEAK_DETECTION - -#define NAMEOF(v) #v -#define xmalloc(x) MM_malloc(x, __FILE__, __LINE__) -#define xfree(x) MM_free(x, __FILE__, __LINE__, NAMEOF(x)) -#define xstrdup(x) MM_strdup(x, __FILE__, __LINE__) -#define xrealloc(x, y) MM_realloc(x, y, __FILE__, __LINE__) - -TAILQ_HEAD(MM_chunks, MM_mem_chunk); - -struct MM_mem_chunk { - void *address; - const char *filename; - u_int32_t line; - size_t size; - - TAILQ_ENTRY(MM_mem_chunk) next; -}; - -void *MM_malloc(size_t, char *, int); -void *MM_realloc(void *, size_t, char *, int); -void MM_free(void *, char *, int, char *); -char *MM_strdup(const char *, char *, int); -void MM_leakd_init(void); -void MM_leakd_printallocated(void); -void MM_leakd_flush(void); - -#endif /* __HAVE_LEAK_DETECTION */ -#endif /* ! HAVE_MEM_H */ diff --git a/main/minimime/mm_mimepart.c b/main/minimime/mm_mimepart.c deleted file mode 100644 index 3d2287427..000000000 --- a/main/minimime/mm_mimepart.c +++ /dev/null @@ -1,657 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <unistd.h> -#include <fcntl.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" - -/** @file mm_mimepart.c - * - * This module contains functions for manipulating MIME header objects. - */ - -/** @defgroup mimepart Accessing and manipulating MIME parts - * - * MIME parts, also called entities, represent the structure of a MIME - * message. ``Normal'' internet messages have only a single part, and - * are called ``flat'' messages. Multipart messages have more then one - * part, and each MIME part can have it's own subset of headers. - * - * Provided here are functions to easily access all informations from - * a MIME part, including their specific headers and bodies. - */ - -/** @{ - * @name Creating and destroying MIME parts - */ - -/** - * Allocates memory for a new mm_mimepart structure and initializes it. - * - * @return A pointer to a struct of type mm_mimeheader or NULL on failure - * @see mm_mimepart_free - * @note The memory must be freed by using mm_mimepart_free() later on. - */ -struct mm_mimepart * -mm_mimepart_new(void) -{ - struct mm_mimepart *part; - - part = (struct mm_mimepart *)xmalloc(sizeof(struct mm_mimepart)); - - TAILQ_INIT(&part->headers); - - part->opaque_length = 0; - part->opaque_body = NULL; - - part->length = 0; - part->body = NULL; - - part->type = NULL; - - return part; -} - -/** - * Creates a MIME part from a file - * - * @param filename The name of the file to create the MIME part from - * @return A pointer to a new MIME part object - * - * This function creates a new MIME part object from a file. The object should - * be freed using mm_mimepart_free() later on. This function does NOT set the - * Content-Type and neither does any encoding work. - */ -struct mm_mimepart * -mm_mimepart_fromfile(const char *filename) -{ - int fd; - char *data; - size_t r; - struct stat st; - struct mm_mimepart *part; - - mm_errno = MM_ERROR_NONE; - - if ((fd = open(filename, O_RDONLY)) == -1) { - mm_errno = MM_ERROR_ERRNO; - return NULL; - } - - if ((stat(filename, &st)) == -1) { - mm_errno = MM_ERROR_ERRNO; - close(fd); - return NULL; - } - - data = xmalloc(st.st_size); - r = read(fd, data, st.st_size); - if (r != st.st_size) { - mm_errno = MM_ERROR_ERRNO; - close(fd); - return(NULL); - } - - data[r] = '\0'; - close(fd); - - part = mm_mimepart_new(); - part->length = r; - part->body = data; - - return part; -} - - -/** - * Frees all memory allocated by a mm_mimepart object. - * - * @param part A pointer to an allocated mm_mimepart object - * @see mm_mimepart_new - */ -void -mm_mimepart_free(struct mm_mimepart *part) -{ - struct mm_mimeheader *header; - - assert(part != NULL); - - TAILQ_FOREACH(header, &part->headers, next) { - mm_mimeheader_free(header); - TAILQ_REMOVE(&part->headers, header, next); - } - - if (part->opaque_body != NULL) { - xfree(part->opaque_body); - part->opaque_body = NULL; - part->body = NULL; - } else if (part->body != NULL) { - xfree(part->body); - part->body = NULL; - } - - if (part->type != NULL) { - mm_content_free(part->type); - part->type = NULL; - } - - xfree(part); - part = NULL; -} - -/** @} */ - -/** @{ - * @name Accessing the MIME part's mail header - */ - -/** - * Attaches a mm_mimeheader object to a MIME part - * - * @param part A valid MIME part object - * @param header A valid MIME header object - * @return 0 if successfull or -1 if the header could not be attached - */ -int -mm_mimepart_attachheader(struct mm_mimepart *part, struct mm_mimeheader *header) -{ - assert(part != NULL); - assert(header != NULL); - - if (TAILQ_EMPTY(&part->headers)) { - TAILQ_INSERT_HEAD(&part->headers, header, next); - } else { - TAILQ_INSERT_TAIL(&part->headers, header, next); - } - - return(0); -} - -/** - * Retrieves the number of MIME headers available in a MIME part - * - * @param part A valid MIME part object - * @return The number of MIME headers within the MIME part - */ -int -mm_mimepart_countheaders(struct mm_mimepart *part) -{ - int found; - struct mm_mimeheader *header; - - assert(part != NULL); - - found = 0; - - TAILQ_FOREACH(header, &part->headers, next) { - found++; - } - - return found; -} - -/** - * Retrieves the number of MIME headers with a given name in a MIME part - * - * @param part A valid MIME part object - * @param name The name of the MIME header which to count for - * @return The number of MIME headers within the MIME part - */ -int -mm_mimepart_countheaderbyname(struct mm_mimepart *part, const char *name) -{ - int found; - struct mm_mimeheader *header; - - assert(part != NULL); - - found = 0; - - TAILQ_FOREACH(header, &part->headers, next) { - if (strcasecmp(header->name, name) == 0) { - found++; - } - } - - return found; -} - -/** - * Get a MIME header object from a MIME part - * - * @param part A valid MIME part object - * @param name The name of the MIME header which to retrieve - * @param idx Which header field to get (in case of multiple headers of the - * same name). - * @return A pointer to the requested MIME header on success, or NULL if there - * either isn't a header with the requested name or idx is out of - * range. - */ -struct mm_mimeheader * -mm_mimepart_getheaderbyname(struct mm_mimepart *part, const char *name, int idx) -{ - struct mm_mimeheader *header; - int curidx; - - curidx = 0; - - TAILQ_FOREACH(header, &part->headers, next) { - if (!strcasecmp(header->name, name)) { - if (curidx == idx) - return header; - else - curidx++; - } - } - - /* Not found */ - return NULL; -} - -/** - * Gets the value of a MIME header object - * - * @param part A valid MIME part object - * @param name The name of the header field to get the value from - * @param idx The index of the header field to get, in case there are multiple - * headers with the same name. - * @return A pointer to the requested value on success, or NULL if there either - * isn't a header with the requested name or idx is out of range. - * - */ -const char * -mm_mimepart_getheadervalue(struct mm_mimepart *part, const char *name, int idx) -{ - struct mm_mimeheader *header; - - header = mm_mimepart_getheaderbyname(part, name, idx); - if (header == NULL) - return NULL; - else - return header->value; -} - -/** - * Initializes a header loop for a given MIME part - * - * @param part A valid MIME part object - * @param id The address of a MIME header object (to allow reentrance) - * @return 0 on success or -1 on failure - * @see mm_mimepart_headers_next - * - * Looping through headers can be done in the following way: - * - * @code - * struct mm_mimeheader *header, *lheader; - * - * mm_mimepart_headers_start(part, &lheader); - * - * while ((header = mm_mimepart_headers_next(part, &lheader)) != NULL) { - * printf("%s: %s\n", header->name, header->value); - * } - * - * @endcode - * - * For convienience, the macro mm_mimepart_headers_foreach() can be used to - * loop through headers in a one-shot manner. - */ -int -mm_mimepart_headers_start(struct mm_mimepart *part, struct mm_mimeheader **id) -{ - assert(part != NULL); - - if (TAILQ_EMPTY(&part->headers)) { - return -1; - } - *id = NULL; - return 0; -} - -/** - * Returns the next MIME header of a given MIME part object - * - * @param part A valid MIME part object - * @param id A previously initialized MIME header object - * @return A pointer to the MIME header object or NULL if end of headers was - * reached. - * @see mm_mimepart_headers_start - */ -struct mm_mimeheader * -mm_mimepart_headers_next(struct mm_mimepart *part, struct mm_mimeheader **id) -{ - struct mm_mimeheader *header; - - assert(part != NULL); - - if (*id == NULL) { - header = TAILQ_FIRST(&part->headers); - } else { - header = TAILQ_NEXT(*id, next); - } - *id = header; - - return header; -} - -/** @} */ - -/** @{ - * @name Accessing and manipulating the MIME part's body - */ - -/** - * Gets the pointer to the MIME part's body data - * - * @param part A valid MIME part object - * @param opaque Whether to get the opaque part or not - * @return A pointer to the MIME part's body - * @see mm_mimepart_setbody - * - */ -char * -mm_mimepart_getbody(struct mm_mimepart *part, int opaque) -{ - assert(part != NULL); - - if (opaque) - return part->opaque_body; - else - return part->body; -} - -/** - * Sets the MIME part's body data - * - * @param part A valid MIME part object - * @param data A pointer to the data which to set - * @see mm_mimepart_getbody - * - * This functions sets the body data for a given MIME part. The string pointed - * to by data must be NUL-terminated. The data is copied into the MIME part's - * body, and thus, the memory pointed to by data can be freed after the - * operation. - */ -void -mm_mimepart_setbody(struct mm_mimepart *part, const char *data, int opaque) -{ - assert(part != NULL); - assert(data != NULL); - - if (opaque) { - part->opaque_body = xstrdup(data); - part->body = part->opaque_body; - } else { - part->body = xstrdup(data); - } - part->length = strlen(data); -} - -/** - * Gets the length of a given MIME part object - * - * @param part A valid MIME part object - * @returns The size of the part's body in byte. - * - * This function returns the total length of the given MIME part's body. The - * length does not include the headers of the MIME parts. If the function - * returns 0, no body part is set currently. - */ -size_t -mm_mimepart_getlength(struct mm_mimepart *part) -{ - assert(part != NULL); - - return part->length; -} - - -/** - * Decodes a MIME part according to it's encoding using MiniMIME codecs - * - * @param A valid MIME part object - * @return 0 if the MIME part could be successfully decoded or -1 if not - * @note Sets mm_errno on error - * - * This function decodes the body of a MIME part with a registered decoder - * according to it's Content-Transfer-Encoding header field. - */ -char * -mm_mimepart_decode(struct mm_mimepart *part) -{ - extern struct mm_codecs codecs; - struct mm_codec *codec; - void *decoded; - - assert(part != NULL); - assert(part->type != NULL); - - decoded = NULL; - - /* No encoding associated */ - if (part->type->encstring == NULL) - return NULL; - - /* Loop through codecs and find a suitable one */ - SLIST_FOREACH(codec, &codecs, next) { - if (!strcasecmp(part->type->encstring, codec->encoding)) { - decoded = codec->decoder((char *)part->body); - break; - } - } - - return decoded; -} - -/** - * Creates an ASCII representation of the given MIME part - * - * @param part A valid MIME part object - * @param result Where to store the result - * @param length Where to store the length of the result - * @param opaque Whether to use the opaque MIME part - * @returtn 0 on success or -1 on error. - * @see mm_context_flatten - * - * This function creates an ASCII representation of a given MIME part. It will - * dynamically allocate the memory needed and stores the result in the memory - * region pointed to by result. The length of the result will be stored in - * length. If opaque is set to 1, mm_mimepart_flatten will store an opaque - * version of the MIME part in result, which means no headers will be created - * or sanitized. This is particulary useful if the part is digitally signed by - * e.g. PGP, and the signature spans the header fields of the part in question. - * - */ -int -mm_mimepart_flatten(struct mm_mimepart *part, char **result, size_t *length, - int opaque) -{ - size_t part_length; - char *buf; - char *ct_hdr; - - *result = NULL; - *length = 0; - buf = NULL; - ct_hdr = NULL; - part_length = 0; - - if (opaque && part->opaque_body != NULL) { - part_length = strlen(part->opaque_body); - *result = xstrdup(part->opaque_body); - *length = part_length; - return(0); - } else { - if (part->type == NULL) { - return(-1); - } - - ct_hdr = mm_content_tostring(part->type); - if (ct_hdr == NULL) { - return(-1); - } - - part_length += strlen(ct_hdr) + 2; - part_length += strlen("\r\n") * 2; - part_length += strlen(part->body); - - if (part_length < 0) { - goto cleanup; - } - - buf = (char *) xmalloc(part_length); - if (buf == NULL) { - goto cleanup; - } - - snprintf(buf, part_length, - "%s\r\n\r\n%s\r\n", - ct_hdr, - part->body); - - xfree(ct_hdr); - ct_hdr = NULL; - - *result = buf; - *length = part_length; - } - - return(0); - -cleanup: - if (ct_hdr != NULL) { - xfree(ct_hdr); - ct_hdr = NULL; - } - if (buf != NULL) { - xfree(buf); - buf = NULL; - } - - *result = NULL; - *length = 0; - - return -1; -} - -/** - * Sets the default Content-Type for a given MIME part - * - * @param part A valid MIME part object - * @param part Whether the Content-Type should be for composite or not - * @return 0 on success or -1 on failure - * - * This function sets a default Content-Type according to RFC 2045 with a value - * of "text/plain; charset="us-ascii"". This function should only be used if - * the MIME part in question does not have a valid Content-Type specification. - */ -int -mm_mimepart_setdefaultcontenttype(struct mm_mimepart *part, int composite) -{ - struct mm_content *type; - struct mm_param *param; - - if (part == NULL) { - return(-1); - } - - if (part->type != NULL) { - mm_content_free(part->type); - part->type = NULL; - } - - type = mm_content_new(); - if (composite) { - type->maintype = xstrdup("multipart"); - type->subtype = xstrdup("mixed"); - } else { - type->maintype = xstrdup("text"); - type->subtype = xstrdup("plain"); - param = mm_param_new(); - param->name = xstrdup("charset"); - param->value = xstrdup("us-ascii"); - mm_content_attachtypeparam(type, param); - } - - mm_mimepart_attachcontenttype(part, type); - - return (0); -} - -/** @{ - * @name Accessing the MIME part's Content-Type information - */ - -/** - * Attaches a context type object to a MIME part - * - * @param part A valid MIME part object - * @param ct The content type object to attach - * @return Nothing - * - * This function attaches a Content-Type object to a MIME part. It does not - * care whether the Content-Type suites the actual content in the MIME part, - * so the programmer should take care of that. - */ -void -mm_mimepart_attachcontenttype(struct mm_mimepart *part, struct mm_content *ct) -{ - part->type = ct; -} - -/** - * Gets the Content-Type of a given MIME part object - * - * @param part A valid MIME part object - * @return The Content-Type object of the specified MIME part - * - * This function returns a pointer to the Content-Type object of the given - * MIME part. This pointer might be set to NULL, indicating that there is - * no Content-Type object for the given MIME part currently. - */ -struct mm_content * -mm_mimepart_getcontent(struct mm_mimepart *part) -{ - assert(part != NULL); - - return part->type; -} - -/** @} */ diff --git a/main/minimime/mm_mimeutil.c b/main/minimime/mm_mimeutil.c deleted file mode 100644 index 4e52a6acf..000000000 --- a/main/minimime/mm_mimeutil.c +++ /dev/null @@ -1,136 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2004 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <sys/time.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <time.h> -#include <assert.h> - -#include "mm_internal.h" - -#define MM_DATE_LENGTH 50 - -static const char boundary_charset[] = - "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789.="; - -/** @file mm_mimeutil.c - * - * This module contains various MIME related utility functions. - */ - -/** @defgroup mimeutil MIME related utility functions */ - -/** - * Generates an RFC 2822 conform date string - * - * @param timezone Whether to include timezone information - * @returns A pointer to the actual date string - * @note The pointer returned must be freed some time - * - * This function generates an RFC 2822 conform date string to use in message - * headers. It allocates memory to hold the string and returns a pointer to - * it. The generated date is in the format (example): - * - * Thu, 25 December 2003 16:35:22 +0100 (CET) - * - * This function dynamically allocates memory and returns a pointer to it. - * This memory should be released with free() once not needed anymore. - */ -int -mm_mimeutil_gendate(char **result) -{ - time_t curtime; - struct tm *curtm; - - if (result != NULL) { - curtime = time(NULL); - curtm = localtime(&curtime); - if ((*result = (char *) malloc(MM_DATE_LENGTH)) == NULL) { - return(-1); - } - return(strftime(*result, MM_DATE_LENGTH, - "%a, %d %b %G %T %z (%Z)", curtm)); - } else { - return(-1); - } -} - - -int -mm_mimeutil_genboundary(char *prefix, size_t length, char **result) -{ - size_t total; - size_t preflen; - struct timeval curtm; - int i; - int pos; - - total = 0; - preflen = 0; - - if (result == NULL) { - return(-1); - } - *result = NULL; - - gettimeofday(&curtm, NULL); - srandom(curtm.tv_usec); - - if (prefix != NULL) { - total = strlen(prefix); - preflen = total; - } - - total += length; - - if ((*result = (char *) xmalloc(total + 1)) == NULL) { - mm_errno = MM_ERROR_ERRNO; - return(-1); - } - - *result = '\0'; - - if (prefix != NULL) { - strlcat(*result, prefix, total); - } - - for (i = 0; i < length - 1; i++) { - pos = random() % strlen(boundary_charset); - *result[i + preflen] = boundary_charset[pos]; - } - *result[total] = '\0'; - - return (0); -} diff --git a/main/minimime/mm_param.c b/main/minimime/mm_param.c deleted file mode 100644 index 8877c3e13..000000000 --- a/main/minimime/mm_param.c +++ /dev/null @@ -1,215 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <unistd.h> -#include <fcntl.h> -#include <string.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" -#include "mm_util.h" - -/** - * @file mm_param.c - * - * Functions to manipulate MIME parameters - */ - -/** @defgroup param Accessing and manipulating MIME parameters */ - -/** @{ - * - * @name Functions for manipulating MIME parameters - * - * MIME parameters are properties attached to certain MIME headers, such as - * Content-Type and Content-Disposition. MIME parameters have a textual - * representations as in <i>name=value</i>. They contain important information - * about the MIME structure of a message, such as the boundary string used, - * which charset was used to encode the message and so on. This module - * provides simple to use functions to query or set MIME parameters. - * - * Each MIME header may hold an arbitrary amount of such parameters, which - * are delimeted by each other with a semicolon. - */ - -/** - * Creates a new object to hold a MIME parameter. - * - * @return An object representing a MIME parameter - * @see mm_param_free - * @note The allocated memory must later be freed using mm_param_free() - */ -struct mm_param * -mm_param_new(void) -{ - struct mm_param *param; - - param = (struct mm_param *)xmalloc(sizeof(struct mm_param)); - - param->name = NULL; - param->value = NULL; - - return param; -} - -/** - * Releases all memory associated with a MIME parameter object. - * - * @param param A valid MIME parameter object to be freed - * @return Nothing - * @see mm_param_new - */ -void -mm_param_free(struct mm_param *param) -{ - assert(param != NULL); - - if (param->name != NULL) { - xfree(param->name); - param->name = NULL; - } - if (param->value != NULL) { - xfree(param->value); - param->value = NULL; - } - xfree(param); -} - -/** - * Generates a new Content-Type parameter with the given name and value - * - * @param name The name of the MIME parameter - * @param value The value of the MIME parameter - * @returns A new MIME parameter object - * @see mm_param_free - * @see mm_param_new - * - * This function generates a new MIME parameter, with the name - * and value given as the arguments. The needed memory for the operation - * is allocated dynamically. It stores a copy of name and value in the - * actual object, so the memory holding the arguments can safely be - * freed after successfull return of this function. - */ -struct mm_param * -mm_param_generate(const char *name, const char *value) -{ - struct mm_param *param; - - param = mm_param_new(); - - param->name = xstrdup(name); - param->value = xstrdup(value); - - return param; -} - -/** - * Sets the name of the given MIME parameter - * - * @param param A valid MIME parameter object - * @param name The new name of the parameter - * @param copy If set to > 0, copy the value stored in name - * @returns The address of the previous name for passing to free() - */ -char * -mm_param_setname(struct mm_param *param, const char *name, int copy) -{ - char *retadr; - assert(param != NULL); - - retadr = param->name; - - if (copy) - param->name = xstrdup(name); - else - param->name = (char *)name; - - return retadr; -} - -/** - * Sets the value of the given MIME parameter - * - * @param param A valid MIME parameter object - * @param name The new value for the parameter - * @param copy If set to > 0, copy the value stored in value - * @returns The address of the previous value for passing to free() - */ -char * -mm_param_setvalue(struct mm_param *param, const char *value, int copy) -{ - char *retadr; - assert(param != NULL); - - retadr = param->value; - - if (copy) - param->value = xstrdup(value); - else - param->value = (char *)value; - - return retadr; -} - -/** - * Gets the name of a MIME parameter object - * - * @param param A valid MIME parameter object - * @returns The name of the MIME parameter - */ -const char * -mm_param_getname(struct mm_param *param) -{ - assert(param != NULL); - return param->name; -} - -/** - * Gets the value of a MIME parameter object - * - * @param param A valid MIME parameter object - * @returns The value of the MIME parameter - */ -const char * -mm_param_getvalue(struct mm_param *param) -{ - assert(param != NULL); - return param->value; -} - -/** @} */ diff --git a/main/minimime/mm_parse.c b/main/minimime/mm_parse.c deleted file mode 100644 index 5080f5bc1..000000000 --- a/main/minimime/mm_parse.c +++ /dev/null @@ -1,181 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <unistd.h> -#include <fcntl.h> -#include <string.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" -#include "mm_util.h" - -#include "mimeparser.h" -#include "mimeparser.tab.h" - -int yyparse (struct parser_state *pstate, void *yyscanner); -void PARSER_initialize(struct parser_state *, void *); -void PARSER_setbuffer(const char *); -void PARSER_setfp(FILE *,void *yyscanner); - -/** @file mm_parse.c - * - * Functions to parse MIME messages - */ - -/** - * Parses a NUL-terminated string into a MiniMIME context - * - * @param ctx A valid MiniMIME context object - * @param text The NUL-terminated string to parse - * @param parsemode The parsemode - * @param flags The flags to pass to the parser - * @returns 0 on success or -1 on failure - * @note Sets mm_errno if an error occurs - * - * This function parses a MIME message, stored in the memory region pointed to - * by text (must be NUL-terminated) according to the parseflags and stores the - * results in the MiniMIME context specified by ctx. - * - * The following modes can be used to specify how the message should be - * parsed: - * - * - MM_PARSE_STRICT: Do not tolerate MIME violations - * - MM_PARSE_LOOSE: Tolerate as much MIME violations as possible - * - * The context needs to be initialized before using mm_context_new() and may - * be freed using mm_context_free(). - */ -int -mm_parse_mem(MM_CTX *ctx, const char *text, int parsemode, int flags) -{ - void *yyscanner; - int res; - struct parser_state pstate; - typedef void *yyscan_t; - int mimeparser_yylex_init (yyscan_t* scanner); - int mimeparser_yylex_destroy (yyscan_t yyscanner ); - - pstate.ctx = ctx; - pstate.parsemode = parsemode; - - mimeparser_yylex_init(&yyscanner); - PARSER_initialize(&pstate, yyscanner); - - PARSER_setbuffer(text); - PARSER_setfp(NULL,yyscanner); - - res = mimeparser_yyparse(&pstate,yyscanner); - mimeparser_yylex_destroy(yyscanner); - return res; -} - -/** - * Parses a file into a MiniMIME context - * - * @param ctx A valid MiniMIME context object - * @param filename The name of the file to parse - * @param parsemode The parsemode - * @param flags The flags to pass to the parser - * @returns 0 on success or -1 on failure - * @note Sets mm_errno if an error occurs - * - * This function parses a MIME message, stored in the filesystem according to - * the parseflags and stores the results in the MiniMIME context specified by - * ctx. - * - * The following modes can be used to specify how the message should be - * parsed: - * - * - MM_PARSE_STRICT: Do not tolerate MIME violations - * - MM_PARSE_LOOSE: Tolerate as much MIME violations as possible - * - * The context needs to be initialized before using mm_context_new() and may - * be freed using mm_context_free(). - */ -typedef void *yyscan_t; -int -mm_parse_file(MM_CTX *ctx, const char *filename, int parsemode, int flags) -{ - FILE *fp; - int res; - void *yyscanner; - struct parser_state pstate; - int mimeparser_yylex_init (yyscan_t* scanner); - int mimeparser_yylex_destroy (yyscan_t yyscanner ); - - mimeparser_yylex_init(&yyscanner); - - if ((fp = fopen(filename, "r")) == NULL) { - mm_errno = MM_ERROR_ERRNO; - return -1; - } - - PARSER_setfp(fp,yyscanner); - PARSER_initialize(&pstate, yyscanner); - - pstate.ctx = ctx; - pstate.parsemode = parsemode; - - res = mimeparser_yyparse(&pstate,yyscanner); - mimeparser_yylex_destroy(yyscanner); - fclose(fp); - return res; -} - -int -mm_parse_fileptr(MM_CTX *ctx, FILE *f, int parsemode, int flags) -{ - int res; - void *yyscanner; - struct parser_state pstate; - int mimeparser_yylex_init (yyscan_t* scanner); - int mimeparser_yylex_destroy (yyscan_t yyscanner ); - - mimeparser_yylex_init(&yyscanner); - - PARSER_setfp(f, yyscanner); - PARSER_initialize(&pstate, yyscanner); - - pstate.ctx = ctx; - pstate.parsemode = parsemode; - - res = mimeparser_yyparse(&pstate,yyscanner); - mimeparser_yylex_destroy(yyscanner); - - return res; -} diff --git a/main/minimime/mm_queue.h b/main/minimime/mm_queue.h deleted file mode 100644 index 893e2fae2..000000000 --- a/main/minimime/mm_queue.h +++ /dev/null @@ -1,508 +0,0 @@ -/* $OpenBSD: queue.h,v 1.25 2004/04/08 16:08:21 henning Exp $ */ -/* $NetBSD: queue.h,v 1.11 1996/05/16 05:17:14 mycroft Exp $ */ - -/* - * Copyright (c) 1991, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * - * @(#)queue.h 8.5 (Berkeley) 8/20/94 - */ - -#ifndef _SYS_QUEUE_H_ -#define _SYS_QUEUE_H_ - -/* - * This file defines five types of data structures: singly-linked lists, - * lists, simple queues, tail queues, and circular queues. - * - * - * A singly-linked list is headed by a single forward pointer. The elements - * are singly linked for minimum space and pointer manipulation overhead at - * the expense of O(n) removal for arbitrary elements. New elements can be - * added to the list after an existing element or at the head of the list. - * Elements being removed from the head of the list should use the explicit - * macro for this purpose for optimum efficiency. A singly-linked list may - * only be traversed in the forward direction. Singly-linked lists are ideal - * for applications with large datasets and few or no removals or for - * implementing a LIFO queue. - * - * A list is headed by a single forward pointer (or an array of forward - * pointers for a hash table header). The elements are doubly linked - * so that an arbitrary element can be removed without a need to - * traverse the list. New elements can be added to the list before - * or after an existing element or at the head of the list. A list - * may only be traversed in the forward direction. - * - * A simple queue is headed by a pair of pointers, one the head of the - * list and the other to the tail of the list. The elements are singly - * linked to save space, so elements can only be removed from the - * head of the list. New elements can be added to the list before or after - * an existing element, at the head of the list, or at the end of the - * list. A simple queue may only be traversed in the forward direction. - * - * A tail queue is headed by a pair of pointers, one to the head of the - * list and the other to the tail of the list. The elements are doubly - * linked so that an arbitrary element can be removed without a need to - * traverse the list. New elements can be added to the list before or - * after an existing element, at the head of the list, or at the end of - * the list. A tail queue may be traversed in either direction. - * - * A circle queue is headed by a pair of pointers, one to the head of the - * list and the other to the tail of the list. The elements are doubly - * linked so that an arbitrary element can be removed without a need to - * traverse the list. New elements can be added to the list before or after - * an existing element, at the head of the list, or at the end of the list. - * A circle queue may be traversed in either direction, but has a more - * complex end of list detection. - * - * For details on the use of these macros, see the queue(3) manual page. - */ - -/* - * Singly-linked List definitions. - */ -#define SLIST_HEAD(name, type) \ -struct name { \ - struct type *slh_first; /* first element */ \ -} - -#define SLIST_HEAD_INITIALIZER(head) \ - { NULL } - -#define SLIST_ENTRY(type) \ -struct { \ - struct type *sle_next; /* next element */ \ -} - -/* - * Singly-linked List access methods. - */ -#define SLIST_FIRST(head) ((head)->slh_first) -#define SLIST_END(head) NULL -#define SLIST_EMPTY(head) (SLIST_FIRST(head) == SLIST_END(head)) -#define SLIST_NEXT(elm, field) ((elm)->field.sle_next) - -#define SLIST_FOREACH(var, head, field) \ - for((var) = SLIST_FIRST(head); \ - (var) != SLIST_END(head); \ - (var) = SLIST_NEXT(var, field)) - -#define SLIST_FOREACH_PREVPTR(var, varp, head, field) \ - for ((varp) = &SLIST_FIRST((head)); \ - ((var) = *(varp)) != SLIST_END(head); \ - (varp) = &SLIST_NEXT((var), field)) - -/* - * Singly-linked List functions. - */ -#define SLIST_INIT(head) { \ - SLIST_FIRST(head) = SLIST_END(head); \ -} - -#define SLIST_INSERT_AFTER(slistelm, elm, field) do { \ - (elm)->field.sle_next = (slistelm)->field.sle_next; \ - (slistelm)->field.sle_next = (elm); \ -} while (0) - -#define SLIST_INSERT_HEAD(head, elm, field) do { \ - (elm)->field.sle_next = (head)->slh_first; \ - (head)->slh_first = (elm); \ -} while (0) - -#define SLIST_REMOVE_NEXT(head, elm, field) do { \ - (elm)->field.sle_next = (elm)->field.sle_next->field.sle_next; \ -} while (0) - -#define SLIST_REMOVE_HEAD(head, field) do { \ - (head)->slh_first = (head)->slh_first->field.sle_next; \ -} while (0) - -#define SLIST_REMOVE(head, elm, type, field) do { \ - if ((head)->slh_first == (elm)) { \ - SLIST_REMOVE_HEAD((head), field); \ - } \ - else { \ - struct type *curelm = (head)->slh_first; \ - while( curelm->field.sle_next != (elm) ) \ - curelm = curelm->field.sle_next; \ - curelm->field.sle_next = \ - curelm->field.sle_next->field.sle_next; \ - } \ -} while (0) - -/* - * List definitions. - */ -#define LIST_HEAD(name, type) \ -struct name { \ - struct type *lh_first; /* first element */ \ -} - -#define LIST_HEAD_INITIALIZER(head) \ - { NULL } - -#define LIST_ENTRY(type) \ -struct { \ - struct type *le_next; /* next element */ \ - struct type **le_prev; /* address of previous next element */ \ -} - -/* - * List access methods - */ -#define LIST_FIRST(head) ((head)->lh_first) -#define LIST_END(head) NULL -#define LIST_EMPTY(head) (LIST_FIRST(head) == LIST_END(head)) -#define LIST_NEXT(elm, field) ((elm)->field.le_next) - -#define LIST_FOREACH(var, head, field) \ - for((var) = LIST_FIRST(head); \ - (var)!= LIST_END(head); \ - (var) = LIST_NEXT(var, field)) - -/* - * List functions. - */ -#define LIST_INIT(head) do { \ - LIST_FIRST(head) = LIST_END(head); \ -} while (0) - -#define LIST_INSERT_AFTER(listelm, elm, field) do { \ - if (((elm)->field.le_next = (listelm)->field.le_next) != NULL) \ - (listelm)->field.le_next->field.le_prev = \ - &(elm)->field.le_next; \ - (listelm)->field.le_next = (elm); \ - (elm)->field.le_prev = &(listelm)->field.le_next; \ -} while (0) - -#define LIST_INSERT_BEFORE(listelm, elm, field) do { \ - (elm)->field.le_prev = (listelm)->field.le_prev; \ - (elm)->field.le_next = (listelm); \ - *(listelm)->field.le_prev = (elm); \ - (listelm)->field.le_prev = &(elm)->field.le_next; \ -} while (0) - -#define LIST_INSERT_HEAD(head, elm, field) do { \ - if (((elm)->field.le_next = (head)->lh_first) != NULL) \ - (head)->lh_first->field.le_prev = &(elm)->field.le_next;\ - (head)->lh_first = (elm); \ - (elm)->field.le_prev = &(head)->lh_first; \ -} while (0) - -#define LIST_REMOVE(elm, field) do { \ - if ((elm)->field.le_next != NULL) \ - (elm)->field.le_next->field.le_prev = \ - (elm)->field.le_prev; \ - *(elm)->field.le_prev = (elm)->field.le_next; \ -} while (0) - -#define LIST_REPLACE(elm, elm2, field) do { \ - if (((elm2)->field.le_next = (elm)->field.le_next) != NULL) \ - (elm2)->field.le_next->field.le_prev = \ - &(elm2)->field.le_next; \ - (elm2)->field.le_prev = (elm)->field.le_prev; \ - *(elm2)->field.le_prev = (elm2); \ -} while (0) - -/* - * Simple queue definitions. - */ -#define SIMPLEQ_HEAD(name, type) \ -struct name { \ - struct type *sqh_first; /* first element */ \ - struct type **sqh_last; /* addr of last next element */ \ -} - -#define SIMPLEQ_HEAD_INITIALIZER(head) \ - { NULL, &(head).sqh_first } - -#define SIMPLEQ_ENTRY(type) \ -struct { \ - struct type *sqe_next; /* next element */ \ -} - -/* - * Simple queue access methods. - */ -#define SIMPLEQ_FIRST(head) ((head)->sqh_first) -#define SIMPLEQ_END(head) NULL -#define SIMPLEQ_EMPTY(head) (SIMPLEQ_FIRST(head) == SIMPLEQ_END(head)) -#define SIMPLEQ_NEXT(elm, field) ((elm)->field.sqe_next) - -#define SIMPLEQ_FOREACH(var, head, field) \ - for((var) = SIMPLEQ_FIRST(head); \ - (var) != SIMPLEQ_END(head); \ - (var) = SIMPLEQ_NEXT(var, field)) - -/* - * Simple queue functions. - */ -#define SIMPLEQ_INIT(head) do { \ - (head)->sqh_first = NULL; \ - (head)->sqh_last = &(head)->sqh_first; \ -} while (0) - -#define SIMPLEQ_INSERT_HEAD(head, elm, field) do { \ - if (((elm)->field.sqe_next = (head)->sqh_first) == NULL) \ - (head)->sqh_last = &(elm)->field.sqe_next; \ - (head)->sqh_first = (elm); \ -} while (0) - -#define SIMPLEQ_INSERT_TAIL(head, elm, field) do { \ - (elm)->field.sqe_next = NULL; \ - *(head)->sqh_last = (elm); \ - (head)->sqh_last = &(elm)->field.sqe_next; \ -} while (0) - -#define SIMPLEQ_INSERT_AFTER(head, listelm, elm, field) do { \ - if (((elm)->field.sqe_next = (listelm)->field.sqe_next) == NULL)\ - (head)->sqh_last = &(elm)->field.sqe_next; \ - (listelm)->field.sqe_next = (elm); \ -} while (0) - -#define SIMPLEQ_REMOVE_HEAD(head, elm, field) do { \ - if (((head)->sqh_first = (elm)->field.sqe_next) == NULL) \ - (head)->sqh_last = &(head)->sqh_first; \ -} while (0) - -/* - * Tail queue definitions. - */ -#define TAILQ_HEAD(name, type) \ -struct name { \ - struct type *tqh_first; /* first element */ \ - struct type **tqh_last; /* addr of last next element */ \ -} - -#define TAILQ_HEAD_INITIALIZER(head) \ - { NULL, &(head).tqh_first } - -#define TAILQ_ENTRY(type) \ -struct { \ - struct type *tqe_next; /* next element */ \ - struct type **tqe_prev; /* address of previous next element */ \ -} - -/* - * tail queue access methods - */ -#define TAILQ_FIRST(head) ((head)->tqh_first) -#define TAILQ_END(head) NULL -#define TAILQ_NEXT(elm, field) ((elm)->field.tqe_next) -#define TAILQ_LAST(head, headname) \ - (*(((struct headname *)((head)->tqh_last))->tqh_last)) -/* XXX */ -#define TAILQ_PREV(elm, headname, field) \ - (*(((struct headname *)((elm)->field.tqe_prev))->tqh_last)) -#define TAILQ_EMPTY(head) \ - (TAILQ_FIRST(head) == TAILQ_END(head)) - -#define TAILQ_FOREACH(var, head, field) \ - for((var) = TAILQ_FIRST(head); \ - (var) != TAILQ_END(head); \ - (var) = TAILQ_NEXT(var, field)) - -#define TAILQ_FOREACH_REVERSE(var, head, headname, field) \ - for((var) = TAILQ_LAST(head, headname); \ - (var) != TAILQ_END(head); \ - (var) = TAILQ_PREV(var, headname, field)) - -/* - * Tail queue functions. - */ -#define TAILQ_INIT(head) do { \ - (head)->tqh_first = NULL; \ - (head)->tqh_last = &(head)->tqh_first; \ -} while (0) - -#define TAILQ_INSERT_HEAD(head, elm, field) do { \ - if (((elm)->field.tqe_next = (head)->tqh_first) != NULL) \ - (head)->tqh_first->field.tqe_prev = \ - &(elm)->field.tqe_next; \ - else \ - (head)->tqh_last = &(elm)->field.tqe_next; \ - (head)->tqh_first = (elm); \ - (elm)->field.tqe_prev = &(head)->tqh_first; \ -} while (0) - -#define TAILQ_INSERT_TAIL(head, elm, field) do { \ - (elm)->field.tqe_next = NULL; \ - (elm)->field.tqe_prev = (head)->tqh_last; \ - *(head)->tqh_last = (elm); \ - (head)->tqh_last = &(elm)->field.tqe_next; \ -} while (0) - -#define TAILQ_INSERT_AFTER(head, listelm, elm, field) do { \ - if (((elm)->field.tqe_next = (listelm)->field.tqe_next) != NULL)\ - (elm)->field.tqe_next->field.tqe_prev = \ - &(elm)->field.tqe_next; \ - else \ - (head)->tqh_last = &(elm)->field.tqe_next; \ - (listelm)->field.tqe_next = (elm); \ - (elm)->field.tqe_prev = &(listelm)->field.tqe_next; \ -} while (0) - -#define TAILQ_INSERT_BEFORE(listelm, elm, field) do { \ - (elm)->field.tqe_prev = (listelm)->field.tqe_prev; \ - (elm)->field.tqe_next = (listelm); \ - *(listelm)->field.tqe_prev = (elm); \ - (listelm)->field.tqe_prev = &(elm)->field.tqe_next; \ -} while (0) - -#define TAILQ_REMOVE(head, elm, field) do { \ - if (((elm)->field.tqe_next) != NULL) \ - (elm)->field.tqe_next->field.tqe_prev = \ - (elm)->field.tqe_prev; \ - else \ - (head)->tqh_last = (elm)->field.tqe_prev; \ - *(elm)->field.tqe_prev = (elm)->field.tqe_next; \ -} while (0) - -#define TAILQ_REPLACE(head, elm, elm2, field) do { \ - if (((elm2)->field.tqe_next = (elm)->field.tqe_next) != NULL) \ - (elm2)->field.tqe_next->field.tqe_prev = \ - &(elm2)->field.tqe_next; \ - else \ - (head)->tqh_last = &(elm2)->field.tqe_next; \ - (elm2)->field.tqe_prev = (elm)->field.tqe_prev; \ - *(elm2)->field.tqe_prev = (elm2); \ -} while (0) - -/* - * Circular queue definitions. - */ -#define CIRCLEQ_HEAD(name, type) \ -struct name { \ - struct type *cqh_first; /* first element */ \ - struct type *cqh_last; /* last element */ \ -} - -#define CIRCLEQ_HEAD_INITIALIZER(head) \ - { CIRCLEQ_END(&head), CIRCLEQ_END(&head) } - -#define CIRCLEQ_ENTRY(type) \ -struct { \ - struct type *cqe_next; /* next element */ \ - struct type *cqe_prev; /* previous element */ \ -} - -/* - * Circular queue access methods - */ -#define CIRCLEQ_FIRST(head) ((head)->cqh_first) -#define CIRCLEQ_LAST(head) ((head)->cqh_last) -#define CIRCLEQ_END(head) ((void *)(head)) -#define CIRCLEQ_NEXT(elm, field) ((elm)->field.cqe_next) -#define CIRCLEQ_PREV(elm, field) ((elm)->field.cqe_prev) -#define CIRCLEQ_EMPTY(head) \ - (CIRCLEQ_FIRST(head) == CIRCLEQ_END(head)) - -#define CIRCLEQ_FOREACH(var, head, field) \ - for((var) = CIRCLEQ_FIRST(head); \ - (var) != CIRCLEQ_END(head); \ - (var) = CIRCLEQ_NEXT(var, field)) - -#define CIRCLEQ_FOREACH_REVERSE(var, head, field) \ - for((var) = CIRCLEQ_LAST(head); \ - (var) != CIRCLEQ_END(head); \ - (var) = CIRCLEQ_PREV(var, field)) - -/* - * Circular queue functions. - */ -#define CIRCLEQ_INIT(head) do { \ - (head)->cqh_first = CIRCLEQ_END(head); \ - (head)->cqh_last = CIRCLEQ_END(head); \ -} while (0) - -#define CIRCLEQ_INSERT_AFTER(head, listelm, elm, field) do { \ - (elm)->field.cqe_next = (listelm)->field.cqe_next; \ - (elm)->field.cqe_prev = (listelm); \ - if ((listelm)->field.cqe_next == CIRCLEQ_END(head)) \ - (head)->cqh_last = (elm); \ - else \ - (listelm)->field.cqe_next->field.cqe_prev = (elm); \ - (listelm)->field.cqe_next = (elm); \ -} while (0) - -#define CIRCLEQ_INSERT_BEFORE(head, listelm, elm, field) do { \ - (elm)->field.cqe_next = (listelm); \ - (elm)->field.cqe_prev = (listelm)->field.cqe_prev; \ - if ((listelm)->field.cqe_prev == CIRCLEQ_END(head)) \ - (head)->cqh_first = (elm); \ - else \ - (listelm)->field.cqe_prev->field.cqe_next = (elm); \ - (listelm)->field.cqe_prev = (elm); \ -} while (0) - -#define CIRCLEQ_INSERT_HEAD(head, elm, field) do { \ - (elm)->field.cqe_next = (head)->cqh_first; \ - (elm)->field.cqe_prev = CIRCLEQ_END(head); \ - if ((head)->cqh_last == CIRCLEQ_END(head)) \ - (head)->cqh_last = (elm); \ - else \ - (head)->cqh_first->field.cqe_prev = (elm); \ - (head)->cqh_first = (elm); \ -} while (0) - -#define CIRCLEQ_INSERT_TAIL(head, elm, field) do { \ - (elm)->field.cqe_next = CIRCLEQ_END(head); \ - (elm)->field.cqe_prev = (head)->cqh_last; \ - if ((head)->cqh_first == CIRCLEQ_END(head)) \ - (head)->cqh_first = (elm); \ - else \ - (head)->cqh_last->field.cqe_next = (elm); \ - (head)->cqh_last = (elm); \ -} while (0) - -#define CIRCLEQ_REMOVE(head, elm, field) do { \ - if ((elm)->field.cqe_next == CIRCLEQ_END(head)) \ - (head)->cqh_last = (elm)->field.cqe_prev; \ - else \ - (elm)->field.cqe_next->field.cqe_prev = \ - (elm)->field.cqe_prev; \ - if ((elm)->field.cqe_prev == CIRCLEQ_END(head)) \ - (head)->cqh_first = (elm)->field.cqe_next; \ - else \ - (elm)->field.cqe_prev->field.cqe_next = \ - (elm)->field.cqe_next; \ -} while (0) - -#define CIRCLEQ_REPLACE(head, elm, elm2, field) do { \ - if (((elm2)->field.cqe_next = (elm)->field.cqe_next) == \ - CIRCLEQ_END(head)) \ - (head).cqh_last = (elm2); \ - else \ - (elm2)->field.cqe_next->field.cqe_prev = (elm2); \ - if (((elm2)->field.cqe_prev = (elm)->field.cqe_prev) == \ - CIRCLEQ_END(head)) \ - (head).cqh_first = (elm2); \ - else \ - (elm2)->field.cqe_prev->field.cqe_next = (elm2); \ -} while (0) - -#endif /* !_SYS_QUEUE_H_ */ diff --git a/main/minimime/mm_util.c b/main/minimime/mm_util.c deleted file mode 100644 index 94150d40b..000000000 --- a/main/minimime/mm_util.c +++ /dev/null @@ -1,412 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <time.h> -#include <assert.h> - -#include "mm_internal.h" - -/** @file mm_util.c - * - * This module contains utility functions for the MiniMIME library - */ - -/** @defgroup util General purpose utility functions */ - -#ifndef __HAVE_LEAK_DETECTION -/** - * Allocates a block of memory - * - * @param size The size of the memory region to allocate - * @return A pointer to the allocated memory region - * @ingroup util - * - * xmalloc() calls abort() if either the size argument is negative or the - * requested memory amount could not be allocated via an assert() call. - */ -void * -xmalloc(size_t size) -{ - void *p; - - assert(size > 0); - p = malloc(size); - assert(p != NULL); - - return p; -} - -/** - * realloc() wrapper - * - * @param p Pointer to a memory region which should be reallocated - * @param size The new size of the memory region - * @return A pointer to the reallocated memory region - * @ingroup util - * - * xrealloc() is a wrapper around realloc() which calls abort() if either the - * size argument is negative or the requested memory amount could not be - * allocated. - */ -void * -xrealloc(void *p, size_t size) -{ - void *n; - - assert(size > 0); - n = realloc(p, size); - assert(n != NULL); - - return n; -} - -char * -xstrdup(const char *str) -{ - char *p; - - assert(str != NULL); - p = strdup(str); - assert(p != NULL); - - return p; -} - -void -xfree(void *p) -{ - assert(p != NULL); - free(p); - p = NULL; - assert(p == NULL); -} -#endif /* ! __HAVE_LEAK_DETECTION */ - -/** - * Unquotes a string - * - * @param string The quoted string to unquote - * @return A pointer to the unquoted string - * @ingroup util - * - * This function unquotes a string. That is, it returns a pointer to a newly - * allocated memory region in which the unquoted string is stored. Only - * leading and trailing double-qoutes are removed. The string needs to be - * freed when it is not needed anymore. - */ -char * -mm_unquote(const char *string) -{ - char *ret; - - if (string[0] != '\"' || string[strlen(string)-1] != '\"') - return xstrdup(string); - - ret = xstrdup(string + 1); - ret[strlen(ret)-1] = '\0'; - - return ret; -} - - -/** - * Removes MIME comments from a string - * - * @param string The string to uncomment - * @return A pointer to the uncommented string or NULL on error. Sets mm_errno. - * @ingroup util - * - * This function removes MIME comments from a string (included in parantheses). - * It returns a pointer to a newly allocated memory region in which the - * uncommented string is stored. The returned string needs to be freed when - * it's not used anymore. - */ -char * -mm_uncomment(const char *string) -{ - char *buf, *new, *orig, *token; - size_t new_size; - int found; - int open; - - assert(string != NULL); - - new_size = strlen(string) + 1; - new = NULL; - buf = NULL; - orig = NULL; - found = 0; - open = 0; - mm_errno = MM_ERROR_NONE; - - buf = xstrdup(string); - orig = buf; - - while (*buf != '\0') { - if (*buf == '(') { - open++; - new_size--; - found++; - } else if (*buf == ')') { - open--; - new_size--; - } else { - if (open) - new_size--; - } - buf++; - } - - if (open != 0) { - mm_errno = MM_ERROR_PARSE; - mm_error_setmsg("Uncommenting: parantheses are unbalanced"); - goto cleanup; - } - - if (!found) { - new = orig; - return orig; - } - - new = xmalloc(new_size + 1); - *new = '\0'; - buf = orig; - token = buf; - - /* Tokenize our string by parentheses, and copy the portions which are - * not commented to our destination. - */ - open = 0; - while (*buf != '\0') { - if (*buf == '(') { - if (!open) { - *buf = '\0'; - strlcat(new, token, new_size); - token = buf+1; - } - open++; - } - if (*buf == ')') { - open--; - token = buf + 1; - } - buf++; - } - - strlcat(new, token, new_size); - -cleanup: - if (orig != NULL) { - xfree(orig); - orig = NULL; - } - - if (mm_errno != MM_ERROR_NONE) { - if (new != NULL) { - xfree(new); - new = NULL; - } - return NULL; - } else { - return new; - } -} - -/** - * separate strings - * - * @param stringp A pointer to the string being splitted - * @param delim The delimeter string - * @ingroup util - * - * This function works similar to strsep(), with the difference that delim is - * treated as a whole. - */ -char * -xstrsep(char **stringp, const char *delim) -{ - char *p; - char *s; - char *r; - - if (*stringp == NULL || *stringp == '\0') - return NULL; - - p = *stringp; - - if ((s = strstr(p, delim)) == NULL) { - r = p; - while (*p != '\0') - p++; - *stringp = NULL; - return r; - } else { - r = p; - p += strlen(p) - strlen(s); - *p = '\0'; - *stringp = p + strlen(delim); - return r; - } -} - -/** - * Strips a given character set from a string - * - * @param input The string which to strip - * @param strip The character set to strip off - * @return A copy of the original string with all chars stripped - * @ingroup util - */ -char * -mm_stripchars(char *input, char *strip) -{ - char *output, *orig; - int i, j, chars; - - assert(input != NULL); - assert(strip != '\0'); - - chars = 0; - orig = input; - - while (*orig != '\0') { - for (i = 0; i < strlen(strip); i++) { - if (*orig == strip[i]) { - chars++; - break; - } - } - orig++; - } - - /* If we have not found any char in the input, return a dup of the orig - string */ - if (chars == 0) - return(xstrdup(input)); - - output = (char *)xmalloc(strlen(input) - chars); - orig = output; - - for (i = 0; i < strlen(input); i++) { - int stripc; - stripc = 0; - for (j = 0; j < strlen(strip); j++) { - if (input[i] == strip[j]) { - stripc = 1; - break; - } - } - if (stripc == 0) { - *output = input[i]; - output++; - } - } - - *output = '\0'; - - return(orig); -} - -/** - * Adds characters to a string at given positions - * - * @param input The string to which to add characters - * @param add The character string to add - * @param linelength The position where to add the character - * @return A copy of the string with characters added - * @ingroup util - * - * This function adds the characters add at each linelength positions and - * returns this new string. - */ -char * -mm_addchars(char *input, char *add, u_int16_t linelength) -{ - u_int32_t len; - u_int32_t i; - u_int32_t l; - u_int32_t j; - u_int16_t addcrlf; - char *output; - char *orig; - - len = strlen(input); - if (len <= linelength) - return(xstrdup(input)); - - addcrlf = len / linelength; - - output = (char *)xmalloc(len + (addcrlf * strlen(add))); - orig = output; - - for (i = 0, l = 0; i < len; i++, l++) { - if (l == linelength) { - for (j = 0; j < strlen(add); j++) { - *output = add[j]; - output++; - } - l = 0; - } - *output = input[i]; - output++; - } - - *output = '\0'; - output = orig; - - return(orig); -} - -void -mm_striptrailing(char **what, const char *charset) -{ - size_t eos, i, hit; - char *str; - - str = *what; - for (eos = strlen(str)-1; eos >= 0; eos--) { - hit = 0; - for (i = 0; i < strlen(charset); i++) { - if (str[eos] == charset[i]) { - str[eos] = '\0'; - hit = 1; - break; - } - } - if (!hit) - break; - } -} diff --git a/main/minimime/mm_util.h b/main/minimime/mm_util.h deleted file mode 100644 index b7058657d..000000000 --- a/main/minimime/mm_util.h +++ /dev/null @@ -1,50 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#ifndef __MM_UTIL_H -#define __MM_UTIL_H - -#define STRIP_TRAILING(str, charset) do { \ - size_t eos, i, hit; \ - for (eos = strlen(str); eos > 0; eos--) { \ - hit = 0; \ - for (i = 0; i <= strlen(charset); i++) { \ - if (str[eos] == charset[i]) {\ - str[eos] = '\0'; \ - hit = 1; \ - break; \ - } \ - } \ - if (!hit) \ - break; \ - } \ -} while (0); - -#endif /* ! __MM_UTIL_H */ diff --git a/main/minimime/mm_warnings.c b/main/minimime/mm_warnings.c deleted file mode 100644 index c9b8a7daf..000000000 --- a/main/minimime/mm_warnings.c +++ /dev/null @@ -1,99 +0,0 @@ -/* - * $Id$ - * - * MiniMIME - a library for handling MIME messages - * - * Copyright (C) 2003 Jann Fischer <rezine@mistrust.net> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the author nor the names of the contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY JANN FISCHER AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL JANN FISCHER OR THE VOICES IN HIS HEAD - * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR - * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF - * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS - * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN - * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) - * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF - * THE POSSIBILITY OF SUCH DAMAGE. - */ -#include <stdio.h> -#include <stdlib.h> -#include <stdarg.h> -#include <string.h> -#include <ctype.h> -#include <assert.h> - -#include "mm_internal.h" - -/** - * Attaches a warning message to a context - * - * @param ctx A valid MiniMIME context object - * @param type The type of the warning - * @param fmt The warning message as format string - */ -void -mm_warning_add(MM_CTX *ctx, int type, const char *fmt, ...) -{ - struct mm_warning *warning; - char buf[1024]; - va_list ap; - - assert(ctx != NULL); - - va_start(ap, fmt); - vsnprintf(buf, sizeof buf, fmt, ap); - va_end(ap); - - warning = (struct mm_warning *)xmalloc(sizeof(struct mm_warning)); - warning->message = xstrdup(buf); - warning->type = type; - - if (SLIST_EMPTY(&ctx->warnings)) { - SLIST_INSERT_HEAD(&ctx->warnings, warning, next); - } else { - struct mm_warning *last, *after; - - after = NULL; - - SLIST_FOREACH(last, &ctx->warnings, next) { - if (last != NULL) { - after = last; - } - } - - assert(after != NULL); - - SLIST_INSERT_AFTER(after, warning, next); - } -} - -struct mm_warning * -mm_warning_next(MM_CTX *ctx, struct mm_warning **last) -{ - struct mm_warning *warning; - - if (*last == NULL) { - warning = SLIST_FIRST(&ctx->warnings); - } else { - warning = SLIST_NEXT(*last, next); - } - - *last = warning; - return warning; -} diff --git a/main/minimime/strlcat.c b/main/minimime/strlcat.c deleted file mode 100644 index 2d2da0413..000000000 --- a/main/minimime/strlcat.c +++ /dev/null @@ -1,70 +0,0 @@ -/* $OpenBSD: strlcat.c,v 1.9 2003/03/14 14:35:29 millert Exp $ */ - -/* - * Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. The name of the author may not be used to endorse or promote products - * derived from this software without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, - * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY - * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL - * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, - * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, - * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; - * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, - * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR - * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF - * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. - */ - -#if defined(LIBC_SCCS) && !defined(lint) -static char *rcsid = "$OpenBSD: strlcat.c,v 1.9 2003/03/14 14:35:29 millert Exp $"; -#endif /* LIBC_SCCS and not lint */ - -#include <sys/types.h> -#include <string.h> - -/* - * Appends src to string dst of size siz (unlike strncat, siz is the - * full size of dst, not space left). At most siz-1 characters - * will be copied. Always NUL terminates (unless siz <= strlen(dst)). - * Returns strlen(src) + MIN(siz, strlen(initial dst)). - * If retval >= siz, truncation occurred. - */ -size_t -strlcat(char *dst, const char *src, size_t siz) -{ - register char *d = dst; - register const char *s = src; - register size_t n = siz; - size_t dlen; - - /* Find the end of dst and adjust bytes left but don't go past end */ - while (n-- != 0 && *d != '\0') - d++; - dlen = d - dst; - n = siz - dlen; - - if (n == 0) - return(dlen + strlen(s)); - while (*s != '\0') { - if (n != 1) { - *d++ = *s; - n--; - } - s++; - } - *d = '\0'; - - return(dlen + (s - src)); /* count does not include NUL */ -} diff --git a/main/minimime/strlcpy.c b/main/minimime/strlcpy.c deleted file mode 100644 index 94785a309..000000000 --- a/main/minimime/strlcpy.c +++ /dev/null @@ -1,66 +0,0 @@ -/* $OpenBSD: strlcpy.c,v 1.6 2003/03/14 14:35:29 millert Exp $ */ - -/* - * Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com> - * All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. The name of the author may not be used to endorse or promote products - * derived from this software without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, - * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY - * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL - * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, - * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, - * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; - * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, - * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR - * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF - * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. - */ - -#if defined(LIBC_SCCS) && !defined(lint) -static char *rcsid = "$OpenBSD: strlcpy.c,v 1.6 2003/03/14 14:35:29 millert Exp $"; -#endif /* LIBC_SCCS and not lint */ - -#include <sys/types.h> -#include <string.h> - -/* - * Copy src to string dst of size siz. At most siz-1 characters - * will be copied. Always NUL terminates (unless siz == 0). - * Returns strlen(src); if retval >= siz, truncation occurred. - */ -size_t -strlcpy(char *dst, const char *src, size_t siz) -{ - register char *d = dst; - register const char *s = src; - register size_t n = siz; - - /* Copy as many bytes as will fit */ - if (n != 0 && --n != 0) { - do { - if ((*d++ = *s++) == 0) - break; - } while (--n != 0); - } - - /* Not enough room in dst, add NUL and traverse rest of src */ - if (n == 0) { - if (siz != 0) - *d = '\0'; /* NUL-terminate dst */ - while (*s++) - ; - } - - return(s - src - 1); /* count does not include NUL */ -} diff --git a/main/minimime/test.sh b/main/minimime/test.sh deleted file mode 100755 index 1beca0b74..000000000 --- a/main/minimime/test.sh +++ /dev/null @@ -1,54 +0,0 @@ -#!/bin/sh -# MiniMIME test cases - -[ ! -x ./tests/parse -o ! -x ./tests/create ] && { - echo "You need to compile the test suite first to accomplish tests" - exit 1 -} - -LD_LIBRARY_PATH=${PWD} -export LD_LIBRARY_PATH - -DIRECTORY=${1:-tests/messages} -FILES=${2:-"*"} - -TESTS=0 -F_ERRORS=0 -F_INVALID="" -M_ERRORS=0 -M_INVALID="" -for f in ${DIRECTORY}/${FILES}; do - if [ -f "${f}" ]; then - TESTS=$((TESTS + 2)) - echo -n "Running PARSER test for $f (file)... " - output=`./tests/parse $f 2>&1` - [ $? != 0 ] && { - echo "FAILED ($output)" - F_ERRORS=$((F_ERRORS + 1)) - F_INVALID="${F_INVALID} ${f} " - } || { - echo "PASSED" - } - echo -n "Running PARSER test for $f (memory)... " - output=`./tests/parse -m $f 2>&1` - [ $? != 0 ] && { - echo "FAILED ($output)" - M_ERRORS=$((M_ERRORS + 1)) - M_INVALID="${M_INVALID} ${f} " - } || { - echo "PASSED" - } - fi -done - -echo "Ran a total of ${TESTS} tests" - -if [ ${F_ERRORS} -gt 0 ]; then - echo "!! ${F_ERRORS} messages had errors in file based parsing" - echo "-> ${F_INVALID}" -fi -if [ ${M_ERRORS} -gt 0 ]; then - echo "!! ${F_ERRORS} messages had errors in memory based parsing" -fi - -unset LD_LIBRARY_PATH diff --git a/main/minimime/tests/Makefile b/main/minimime/tests/Makefile deleted file mode 100644 index ae460c6b2..000000000 --- a/main/minimime/tests/Makefile +++ /dev/null @@ -1,18 +0,0 @@ -BINARIES=parse create -CFLAGS=-Wall -ggdb -g3 -I.. -LDFLAGS=-L.. -LIBS=-lmmime -CC=gcc - -all: parse create - -parse: parse.o - $(CC) -o parse parse.o $(LDFLAGS) $(LIBS) - -create: create.o - $(CC) -o create create.o $(LDFLAGS) $(LIBS) - -clean: - rm -f $(BINARIES) - rm -f *.o - rm -f *.core diff --git a/main/minimime/tests/create.c b/main/minimime/tests/create.c deleted file mode 100644 index a8ca479f1..000000000 --- a/main/minimime/tests/create.c +++ /dev/null @@ -1,106 +0,0 @@ -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/* - * MiniMIME test program - create.c - * - * Creates a MIME message of the given MIME parts - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <unistd.h> -#include <fcntl.h> -#include <getopt.h> -#include <err.h> - -#include "mm.h" - -const char *progname; - -void -usage(void) -{ - fprintf(stderr, - "MiniMIME test suite\n" - "USAGE: %s <part> [<part_2>[<part_N>[...]]]\n", - progname - ); -} - -void -print_error(void) -{ - fprintf(stderr, "ERROR: %s\n", mm_error_string()); -} - -int -main(int argc, char **argv) -{ - MM_CTX *ctx; - struct mm_mimepart *part; - char *data; - size_t length; - int i; - - progname = argv[0]; - - if (argc < 2) { - usage(); - exit(1); - } - - mm_library_init(); - - ctx = mm_context_new(); - - part = mm_mimepart_new(); - mm_context_attachpart(ctx, part); - mm_envelope_setheader(ctx, "From", "foo@bar.com"); - - for (i=1; i < argc; i++) { - part = mm_mimepart_fromfile(argv[i]); - if (part == NULL) { - print_error(); - exit(1); - } - mm_context_attachpart(ctx, part); - } - - if (mm_context_flatten(ctx, &data, &length, 0) == -1) { - print_error(); - exit(1); - } - - printf("%s", data); - - exit(0); -} diff --git a/main/minimime/tests/messages/test1.txt b/main/minimime/tests/messages/test1.txt deleted file mode 100644 index 2c24b1972..000000000 --- a/main/minimime/tests/messages/test1.txt +++ /dev/null @@ -1,50 +0,0 @@ -Return-Path: <rezine@hannover.ccc.de> -X-Original-To: test@mistrust.net -Delivered-To: rezine@hannover.ccc.de -Received: from thinktank.niedersachsen.de (thinktank.niedersachsen.de [195.37.192.218]) - (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) - (Client did not present a certificate) - by gost.hannover.ccc.de (Postfix) with ESMTP id 90EDEBBF2 - for <test@mistrust.net>; Sun, 24 Aug 2003 16:05:29 +0200 (CEST) -Date: Sun, 24 Aug 2003 15:49:15 +0200 -From: Jann Fischer <rezine@hannover.ccc.de> -To: test@mistrust.net -Subject: Test -Message-Id: <20030824154915.12cb3f85.rezine@hannover.ccc.de> -Organization: Chaos Computer Club Hannover -X-Mailer: Who-Cares 5.23 -Mime-Version: 1.0 -Content-Type: multipart/encrypted; protocol="application/pgp-encrypted"; - boundary="=.2S1ZDSX8ir3lbt" - ---=.2S1ZDSX8ir3lbt -Content-Type: application/pgp-encrypted - -Version: 1 - ---=.2S1ZDSX8ir3lbt -Content-Type: application/octet-stream - ------BEGIN PGP MESSAGE----- -Version: GnuPG v1.2.2 (OpenBSD) - -hQEOA3TvLJ6KBZLBEAP/cl4DiRH5+8S7/kP2BIVdDavHJ9cwHh8awGoyddhMKPJ3 -2558r8MKT0Etjpo649O5WUvT5Z2Jcp12+dTPlAC1kvoIjNNk8+Oe3JCREz/pXYnm -5ANSCThVYSS34jppgT3NsqiV8sQK3e+Nq/NY7SoKVAV37L0fU4HHozcDZfXqOLsE -AJgfxjRjjEazPHmgTTu8Pnt5gmlxyP35Yy0pl+gJmboG3Cn5WBcD/rrQf8oiwrB6 -Vak2Hk9TNU7hDO2IRolz4wUfkId47SK31PdhDLBnNPWn6LNWHd+G4hI97e+xeqLW -dpG7Li5CdP0gfuHx2ux9Y5buWVVtqPhdDUlRaIBfM7Fu0sENAeREANAtdPHn0yTf -V4T5NvImY3gXgLST5wNm3Ft+4nIDZrcnSy04x4faTLFBOcY95W0O1omILHyN5Ste -Le5NhXhQRKyl6ebXtIvEOsJOK4NT6JaUF20l4yvgf0AnetG9Pbzc37mRqmE6Fb8O -h/De3iqw7dexaQc+LaD3XTmvPyyDK2aI4cXOdc9WOzrWR7+9iEiY32SFsQWMRMZJ -GdKkGk22K2p7MPFaU3MHQ3Af+WCN4mRW8SurFxH1379Y5e1IPfTeL6OBkj8hHilX -Y+Y7523ADiStJsONIZPBXJVhZ/VAJ+jL+T1/Xht10VsJcWAY8A9tP+jNgyg8dh+J -JgWVchQOZipdftYwR7w5GkhL2Nc5NYBJBg4DFd9g2nnwuzaAKYO5kMTzEmm9KOYq -0DC5ukok4SGDwWPUIogNHmaSnFr723hYuJC7DwSxHXVG3VxxF78u1gzEnImOWRsf -1RzGb7b8Lf7Rj98H5cNiZ55BXAmidjm7WghCLsT2GvxviqQoRIJ2h/WHM0Bl2v3F -Dpa3N01p2NIIgQLRoXXyBCZTwGOH4y9nBj5PU7vzzSrMweHHt1BwHXcqItCyWFXX -2tj4//Dyw3Lw/L5xGxYRP1Q= -=fSLd ------END PGP MESSAGE----- - ---=.2S1ZDSX8ir3lbt-- diff --git a/main/minimime/tests/messages/test2.txt b/main/minimime/tests/messages/test2.txt deleted file mode 100644 index 2c24b1972..000000000 --- a/main/minimime/tests/messages/test2.txt +++ /dev/null @@ -1,50 +0,0 @@ -Return-Path: <rezine@hannover.ccc.de> -X-Original-To: test@mistrust.net -Delivered-To: rezine@hannover.ccc.de -Received: from thinktank.niedersachsen.de (thinktank.niedersachsen.de [195.37.192.218]) - (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) - (Client did not present a certificate) - by gost.hannover.ccc.de (Postfix) with ESMTP id 90EDEBBF2 - for <test@mistrust.net>; Sun, 24 Aug 2003 16:05:29 +0200 (CEST) -Date: Sun, 24 Aug 2003 15:49:15 +0200 -From: Jann Fischer <rezine@hannover.ccc.de> -To: test@mistrust.net -Subject: Test -Message-Id: <20030824154915.12cb3f85.rezine@hannover.ccc.de> -Organization: Chaos Computer Club Hannover -X-Mailer: Who-Cares 5.23 -Mime-Version: 1.0 -Content-Type: multipart/encrypted; protocol="application/pgp-encrypted"; - boundary="=.2S1ZDSX8ir3lbt" - ---=.2S1ZDSX8ir3lbt -Content-Type: application/pgp-encrypted - -Version: 1 - ---=.2S1ZDSX8ir3lbt -Content-Type: application/octet-stream - ------BEGIN PGP MESSAGE----- -Version: GnuPG v1.2.2 (OpenBSD) - -hQEOA3TvLJ6KBZLBEAP/cl4DiRH5+8S7/kP2BIVdDavHJ9cwHh8awGoyddhMKPJ3 -2558r8MKT0Etjpo649O5WUvT5Z2Jcp12+dTPlAC1kvoIjNNk8+Oe3JCREz/pXYnm -5ANSCThVYSS34jppgT3NsqiV8sQK3e+Nq/NY7SoKVAV37L0fU4HHozcDZfXqOLsE -AJgfxjRjjEazPHmgTTu8Pnt5gmlxyP35Yy0pl+gJmboG3Cn5WBcD/rrQf8oiwrB6 -Vak2Hk9TNU7hDO2IRolz4wUfkId47SK31PdhDLBnNPWn6LNWHd+G4hI97e+xeqLW -dpG7Li5CdP0gfuHx2ux9Y5buWVVtqPhdDUlRaIBfM7Fu0sENAeREANAtdPHn0yTf -V4T5NvImY3gXgLST5wNm3Ft+4nIDZrcnSy04x4faTLFBOcY95W0O1omILHyN5Ste -Le5NhXhQRKyl6ebXtIvEOsJOK4NT6JaUF20l4yvgf0AnetG9Pbzc37mRqmE6Fb8O -h/De3iqw7dexaQc+LaD3XTmvPyyDK2aI4cXOdc9WOzrWR7+9iEiY32SFsQWMRMZJ -GdKkGk22K2p7MPFaU3MHQ3Af+WCN4mRW8SurFxH1379Y5e1IPfTeL6OBkj8hHilX -Y+Y7523ADiStJsONIZPBXJVhZ/VAJ+jL+T1/Xht10VsJcWAY8A9tP+jNgyg8dh+J -JgWVchQOZipdftYwR7w5GkhL2Nc5NYBJBg4DFd9g2nnwuzaAKYO5kMTzEmm9KOYq -0DC5ukok4SGDwWPUIogNHmaSnFr723hYuJC7DwSxHXVG3VxxF78u1gzEnImOWRsf -1RzGb7b8Lf7Rj98H5cNiZ55BXAmidjm7WghCLsT2GvxviqQoRIJ2h/WHM0Bl2v3F -Dpa3N01p2NIIgQLRoXXyBCZTwGOH4y9nBj5PU7vzzSrMweHHt1BwHXcqItCyWFXX -2tj4//Dyw3Lw/L5xGxYRP1Q= -=fSLd ------END PGP MESSAGE----- - ---=.2S1ZDSX8ir3lbt-- diff --git a/main/minimime/tests/messages/test3.txt b/main/minimime/tests/messages/test3.txt deleted file mode 100644 index 082b6fb61..000000000 --- a/main/minimime/tests/messages/test3.txt +++ /dev/null @@ -1,12 +0,0 @@ -From: Jann Fischer <rezine@criminology.de> -To: cipherlist <cipherlist@mistrust.net> -Subject: Foobar -Date: blahblah -MIME-Version: 1.0 (MiniMIME) -Content-Type: multipart/mixed; boundary="abcd" - ---abcd -Content-Type: plain/text; - -This is a test :-> ---abcd-- diff --git a/main/minimime/tests/messages/test4.txt b/main/minimime/tests/messages/test4.txt deleted file mode 100644 index a08246939..000000000 --- a/main/minimime/tests/messages/test4.txt +++ /dev/null @@ -1,168 +0,0 @@ -X-Envelope-From: <511-bounces@hannover.ccc.de> -X-Envelope-To: <rezine@criminology.de> -X-Delivery-Time: 1070263752 -Received: from gost.hannover.ccc.de (hannover.ccc.de [62.48.71.164]) - by mailin.webmailer.de (8.12.10/8.12.10) with ESMTP id hB17TAUR020052 - for <rezine@criminology.de>; Mon, 1 Dec 2003 08:29:10 +0100 (MET) -Received: from localhost.hannover.ccc.de (unknown [127.0.0.1]) - by gost.hannover.ccc.de (Postfix) with ESMTP - id 092C8BC81; Mon, 1 Dec 2003 08:29:23 +0100 (CET) -X-Original-To: 511@hannover.ccc.de -Delivered-To: 511@hannover.ccc.de -Received: from sbapp3 (unknown [211.157.36.9]) - by gost.hannover.ccc.de (Postfix) with ESMTP id 3F93ABC7C - for <511@hannover.ccc.de>; Mon, 1 Dec 2003 08:29:12 +0100 (CET) -From: "Vanessa Lintner" <reply@seekercenter.net> -To: 511@hannover.ccc.de -Date: Mon, 1 Dec 2003 15:30:57 +0800 -X-Priority: 3 -X-Library: Indy 8.0.25 -Message-Id: <20031201072912.3F93ABC7C@gost.hannover.ccc.de> -Subject: [CCC511] http://lists.hannover.ccc.de -X-BeenThere: 511@hannover.ccc.de -X-Mailman-Version: 2.1.2 -Precedence: list -Reply-To: Vanessa Lintner <vanessa@seekercenter.net>, - Oeffentliche Mailingliste des C3H <511@hannover.ccc.de> -List-Id: Oeffentliche Mailingliste des C3H <511.hannover.ccc.de> -List-Unsubscribe: <http://hannover.ccc.de/mailman/listinfo/511>, - <mailto:511-request@hannover.ccc.de?subject=unsubscribe> -List-Post: <mailto:511@hannover.ccc.de> -List-Help: <mailto:511-request@hannover.ccc.de?subject=help> -List-Subscribe: <http://hannover.ccc.de/mailman/listinfo/511>, - <mailto:511-request@hannover.ccc.de?subject=subscribe> -Content-Type: multipart/mixed; boundary="===============14807035762661644==" -Sender: 511-bounces@hannover.ccc.de -Errors-To: 511-bounces@hannover.ccc.de - ---===============14807035762661644== -Content-Type: text/html; - -<html> -<head> -<title></title> -<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> -<style type="text/css"> -.stbtm { - BACKGROUND-COLOR:#cecbde; BORDER-BOTTOM: #665b8e 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #665b8e 1px solid; BORDER-TOP: #ffffff 1px solid; COLOR: #000000; FONT-SIZE: 12pt; HEIGHT: 26px; WIDTH: 120px; clip: rect( )} -.stedit { - background-color:#484C68; white-space: nowrap; border: #000000; BORDER-BOTTOM: #ffffff 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #ffffff 1px solid; FONT-SIZE: 10pt; color: #CCCCCC; font-weight: bold} - -</style> -</head> -<BODY leftMargin=0 onload="" topMargin=0 marginheight="0" marginwidth="0" bgcolor="#FFFFFF"> - <table border="0" cellspacing="0" cellpadding="0" width="580"> - <tr> - <td width="20" rowspan="2"> </td> - <td colspan="3"> - <table border="0" cellspacing="0" cellpadding="0" align="left" width="560"> - <tr> - <td width="330" height="307"> - <table width="330" border="0" cellspacing="0" cellpadding="0" background="http://www.imagespool.com/skbmp/letter_01.gif" height="307"> - <tr> - <td> - <p> <font face=Arial size=2> </font> <font face=Arial size=2><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Hello,<br> - <br> - I have visited <a href='http://lists.hannover.ccc.de'>lists.hannover.ccc.de</a> - and noticed that your website is not listed on some search - engines. I am sure that through our service the number of - people who visit your website will definitely increase. - <a target=_blank href="http://www.seekercenter.net/index.php">SeekerCenter</a> - is a unique technology that instantly submits your website - to over 500,000 search engines and directories -- a really - low-cost and effective way to advertise your site. For more - details please go to <a target=_blank href="http://www.seekercenter.net/index.php">SeekerCenter.net</a>.<br> - <br> - Give your website maximum exposure today!<br> - Looking forward to hearing from you.<br> - <br> - </font></font> - <table border=0 width=100%> - <tr> - <td width=50%> <font face="Arial" color="#000000" size="2">Best - Regards,<br> - Vanessa Lintner<br> - Sales & Marketing <br> - <a target=_blank href="http://www.seekercenter.net/index.php">www.SeekerCenter.net</a></font> - <TD><td width=50%> - <div align="center" valign=middle> - <form target=_blank action=http://www.seekercenter.net method=POST> - <input type="submit" name="Submit" value="Signup Now!!!" class="stbtm"> - </form> - </div> - </TD> - </tr> - </table> - </td> - </tr> - </table> - </td> - <td width="250" height="64" valign="middle"> - <table width="230" border="0" cellspacing="0" cellpadding="0"> - <tr> - <td colspan="3" height="2"></td> - </tr> - <tr> - <td colspan="3"><img src="http://report.imagespool.com/report_email.php?s=1&e=511@hannover.ccc.de" border=0 width=0 height=0> - <p><img src="http://www.imagespool.com/skbmp/letter_04.gif" height="12"></p> - </td> - </tr> - <tr> - <td colspan="3"><img src="http://www.imagespool.com/skbmp/letter_05.gif" height="127"><img src="http://ww2.imagespool.com/1/9/b/0r066.jpg" width="177" height="127"><img src="http://www.imagespool.com/skbmp/letter_07.gif" width="33" height="127"></td> - </tr> - <tr> - <td colspan="3" height="92" background="http://www.imagespool.com/skbmp/letter_08.gif" valign="bottom"> - <table width="230" border="0" cellspacing="0" cellpadding="0" height="92"> - <tr> - <td width="36" height="43"> </td> - <td width="157" height="43"> </td> - <td width="134" height="43"> </td> - </tr> - <tr> - <td width="36" height="2"> </td> - <td width="157" height="2"> </td> - <td width="134" height="2"> </td> - </tr> - </table> - </td> - </tr> - <tr> </tr> - </table> - </td> - </tr> - </table> - </td> - </tr> - <tr> - <td colspan="3"> - <table width="560" border="0" cellspacing="0" cellpadding="1" bordercolor="0"> - <tr> - <td> </td> - </tr> - <tr> - <td bgcolor="#EFEFEF"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">You - are receiving this email because you opted-in to receive special - offers through a partner website. If you feel that you received - this email in error or do not wish to receive additional special - offers, please enter your email address here and click the button - of "Remove Me": <a href="http://www.seekercenter.net/remove.php?email=511@hannover.ccc.de"> - <img src="http://www.imagespool.com/skbmp/removeme.gif" width="73" height="17" border="0"></a> - </font></td> - </tr> - </table> - </td> - </tr> - </table> -</body> -</html> - ---===============14807035762661644== -Content-Type: text/plain; charset="iso-8859-1" -MIME-Version: 1.0 -Content-Transfer-Encoding: quoted-printable -Content-Disposition: inline - -_______________________________________________ -511 mailing list -511@hannover.ccc.de ---===============14807035762661644==-- diff --git a/main/minimime/tests/messages/test5.txt b/main/minimime/tests/messages/test5.txt deleted file mode 100644 index 5e4cdb17d..000000000 --- a/main/minimime/tests/messages/test5.txt +++ /dev/null @@ -1,44 +0,0 @@ -Return-Path: <rezine@criminology.de> -X-Original-To: rezine@mistrust.net -Delivered-To: rezine@hannover.ccc.de -Received: from thinktank.niedersachsen.de (thinktank.niedersachsen.de [195.37.192.218]) - (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) - (Client did not present a certificate) - by gost.hannover.ccc.de (Postfix) with ESMTP id 79E9BBC7C - for <rezine@mistrust.net>; Wed, 24 Dec 2003 13:35:36 +0100 (CET) -Received: from thinktank.niedersachsen.de (localhost [127.0.0.1]) - by thinktank.niedersachsen.de (8.12.9/8.12.2) with SMTP id hBOCZBFU029588 - for <rezine@mistrust.net>; Wed, 24 Dec 2003 13:35:11 +0100 (CET) -Date: Wed, 24 Dec 2003 13:35:11 +0100 -From: Jann Fischer <rezine@criminology.de> -To: rezine@mistrust.net -Subject: Test -Message-Id: <20031224133511.5f4b6d9b.rezine@criminology.de> -X-Mailer: Who Cares 5.23 -Mime-Version: 1.0 -Content-Type: multipart/mixed; - boundary="Multipart_Wed__24_Dec_2003_13:35:11_+0100_00148800" - -This is a multi-part message in MIME format. - ---Multipart_Wed__24_Dec_2003_13:35:11_+0100_00148800 -Content-Type: text/plain; charset=US-ASCII -Content-Transfer-Encoding: 7bit - -Test - --- -Be careful who you follow. -0x6D839821 | FA8C 3663 9906 D8C3 AC16 F7C4 66E0 F351 6D83 9821 - ---Multipart_Wed__24_Dec_2003_13:35:11_+0100_00148800 -Content-Type: application/octet-stream; - name="bar.c" -Content-Disposition: attachment; - filename="bar.c" -Content-Transfer-Encoding: base64 - -I2luY2x1ZGUgPHN0ZGlvLmg+Cgp2b2lkCm1haW4oaW50IGFyZ2MsIGNoYXIgKiphcmd2KQp7CgkJ -cHJpbnRmKCIlc1xuIiwgYXJndlswXSk7Cn0K - ---Multipart_Wed__24_Dec_2003_13:35:11_+0100_00148800-- diff --git a/main/minimime/tests/messages/test6.txt b/main/minimime/tests/messages/test6.txt deleted file mode 100644 index fb4e7a14c..000000000 --- a/main/minimime/tests/messages/test6.txt +++ /dev/null @@ -1,12 +0,0 @@ -From: Me -Date: Foobar -To: There -MIME-Version: 1.0 -Content-Type: multipart/mixed; boundary="abcde" - ---abcde -Content-Type: text/plain - -Blah blah -Blah ---abcde-- diff --git a/main/minimime/tests/messages/test7.txt b/main/minimime/tests/messages/test7.txt deleted file mode 100644 index 1cda11e3f..000000000 --- a/main/minimime/tests/messages/test7.txt +++ /dev/null @@ -1,64 +0,0 @@ -Return-Path: MAILER-DAEMON -Received: from chaos.verfassungsschutz.de (localhost [IPv6:::1]) - by chaos.verfassungsschutz.de (8.12.7/8.12.2) with ESMTP id h2EKV1oM031761 - for <jfi@chaos.verfassungsschutz.de>; Fri, 14 Mar 2003 21:31:18 +0100 (CET) -Received: from localhost (localhost) - by chaos.verfassungsschutz.de (8.12.7/8.12.2/Submit) id h2BNU1vr029177; - Wed, 12 Mar 2003 00:35:01 +0100 (CET) -Date: Wed, 12 Mar 2003 00:35:01 +0100 (CET) -From: Mail Delivery Subsystem <MAILER-DAEMON@chaos.verfassungsschutz.de> -Message-Id: <200303112335.h2BNU1vr029177@chaos.verfassungsschutz.de> -To: jfi@chaos.verfassungsschutz.de -MIME-Version: 1.0 -Content-Type: multipart/report; report-type=delivery-status; - boundary="h2BNU1vr029177.1047425701/chaos.verfassungsschutz.de" -Subject: Warning: could not send message for past 4 hours -Auto-Submitted: auto-generated (warning-timeout) - -This is a MIME-encapsulated message - ---h2BNU1vr029177.1047425701/chaos.verfassungsschutz.de - - ********************************************** - ** THIS IS A WARNING MESSAGE ONLY ** - ** YOU DO NOT NEED TO RESEND YOUR MESSAGE ** - ********************************************** - -The original message was received at Tue, 11 Mar 2003 20:18:36 +0100 (CET) -from jfi@localhost - - ----- Transcript of session follows ----- -451 4.4.1 reply: read error from localhost -rezine@kommunism.us... Deferred: Connection timed out with localhost -Warning: message still undelivered after 4 hours -Will keep trying until message is 5 days old - ---h2BNU1vr029177.1047425701/chaos.verfassungsschutz.de -Content-Type: message/delivery-status - -Reporting-MTA: dns; chaos.verfassungsschutz.de -Arrival-Date: Tue, 11 Mar 2003 20:18:36 +0100 (CET) - -Final-Recipient: RFC822; rezine@kommunism.us -Action: delayed -Status: 4.4.2 -Last-Attempt-Date: Wed, 12 Mar 2003 00:35:01 +0100 (CET) -Will-Retry-Until: Sun, 16 Mar 2003 20:18:36 +0100 (CET) - ---h2BNU1vr029177.1047425701/chaos.verfassungsschutz.de -Content-Type: message/rfc822 - -Return-Path: <jfi> -Received: (from jfi@localhost) - by chaos.verfassungsschutz.de (8.12.7/8.12.2/Submit) id h2BJIawm025679 - for rezine@kommunism.us; Tue, 11 Mar 2003 20:18:36 +0100 (CET) -Date: Tue, 11 Mar 2003 20:18:36 +0100 (CET) -From: Jann Fischer <jfi> -Message-Id: <200303111918.h2BJIawm025679@chaos.verfassungsschutz.de> -To: rezine@kommunism.us -Subject: Test - -Test - ---h2BNU1vr029177.1047425701/chaos.verfassungsschutz.de-- - diff --git a/main/minimime/tests/parse.c b/main/minimime/tests/parse.c deleted file mode 100644 index 805bd2cb1..000000000 --- a/main/minimime/tests/parse.c +++ /dev/null @@ -1,231 +0,0 @@ -/* - * Copyright (c) 2004 Jann Fischer. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -/* - * MiniMIME test program - parse.c - * - * Parses any given messages - */ -#include <sys/types.h> -#include <sys/stat.h> -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <unistd.h> -#include <fcntl.h> -#include <getopt.h> -#include <err.h> - -#include "mm.h" - -const char *progname; - -void -usage(void) -{ - fprintf(stderr, - "MiniMIME test suite\n" - "Usage: %s [-m] <filename>\n\n" - " -m : use memory based scanning\n\n", - progname - ); - exit(1); -} - -int -main(int argc, char **argv) -{ - MM_CTX *ctx; - struct mm_mimeheader *header, *lastheader = NULL; - struct mm_mimepart *part; - struct mm_content *ct; - int parts, i; - struct stat st; - int fd; - char *buf; - int scan_mode = 0; - - progname = strdup(argv[0]); - - while ((i = getopt(argc, argv, "m")) != -1) { - switch(i) { - case 'm': - scan_mode = 1; - break; - default: - usage(); - } - } - - argc -= optind; - argv += optind; - - if (argc < 1) { - usage(); - } - -#ifdef __HAVE_LEAK_DETECTION - /* Initialize memory leak detection if compiled in */ - MM_leakd_init(); -#endif - - /* Initialize MiniMIME library */ - mm_library_init(); - - /* Register all default codecs (base64/qp) */ - mm_codec_registerdefaultcodecs(); - - do { - /* Create a new context */ - ctx = mm_context_new(); - - /* Parse a file into our context */ - if (scan_mode == 0) { - i = mm_parse_file(ctx, argv[0], MM_PARSE_LOOSE, 0); - } else { - if (stat(argv[0], &st) == -1) { - err(1, "stat"); - } - - if ((fd = open(argv[0], O_RDONLY)) == -1) { - err(1, "open"); - } - - buf = (char *)malloc(st.st_size); - if (buf == NULL) { - err(1, "malloc"); - } - - if (read(fd, buf, st.st_size) != st.st_size) { - err(1, "read"); - } - - close(fd); - buf[st.st_size] = '\0'; - - i = mm_parse_mem(ctx, buf, MM_PARSE_LOOSE, 0); - } - - if (i == -1 || mm_errno != MM_ERROR_NONE) { - printf("ERROR: %s at line %d\n", mm_error_string(), mm_error_lineno()); - exit(1); - } - - /* Get the number of MIME parts */ - parts = mm_context_countparts(ctx); - if (parts == 0) { - printf("ERROR: got zero MIME parts, huh\n"); - exit(1); - } else { - if (mm_context_iscomposite(ctx)) { - printf("Got %d MIME parts\n", parts - 1); - } else { - printf("Flat message (not multipart)\n"); - } - } - - /* Get the main MIME part */ - part = mm_context_getpart(ctx, 0); - if (part == NULL) { - fprintf(stderr, "Could not get envelope part\n"); - exit(1); - } - - printf("Printing envelope headers:\n"); - /* Print all headers */ - lastheader = NULL; - while ((header = mm_mimepart_headers_next(part, &lastheader)) != NULL) - printf("%s: %s\n", header->name, header->value); - - printf("%s\n", mm_content_tostring(part->type)); - printf("\n"); - - ct = part->type; - assert(ct != NULL); - - if (mm_context_iscomposite(ctx) == 0) { - printf("Printing body part for FLAT message:\n"); - part = mm_context_getpart(ctx, 0); - printf("%s", part->body); - } - - /* Loop through all MIME parts beginning with 1 */ - for (i = 1; i < mm_context_countparts(ctx); i++) { - char *decoded; - - printf("Printing headers for MIME part %d\n", i); - - /* Get the current MIME entity */ - part = mm_context_getpart(ctx, i); - if (part == NULL) { - fprintf(stderr, "Should have %d parts but " - "couldn't retrieve part %d", - mm_context_countparts(ctx), i); - exit(1); - } - - /* Print all headers */ - lastheader = NULL; - while ((header = mm_mimepart_headers_next(part, &lastheader)) != NULL) - printf("%s: %s\n", header->name, header->value); - - printf("%s\n", mm_content_tostring(part->type)); - - /* Print MIME part body */ - printf("\nPRINTING MESSAGE BODY (%d):\n%s\n", i, part->opaque_body); - decoded = mm_mimepart_decode(part); - if (decoded != NULL) { - printf("DECODED:\n%s\n", decoded); - free(decoded); - } - } - - printf("RECONSTRUCTED MESSAGE:\n"); - - do { - char *env; - size_t env_len; - - mm_context_flatten(ctx, &env, &env_len, 0); - printf("%s", env); - free(env); - - } while (0); - - mm_context_free(ctx); - ctx = NULL; - -#ifdef __HAVE_LEAK_DETECTION - MM_leakd_printallocated(); -#endif - - } while (0); - - return 0; -} |