struct sieve_binary *sieve_tool_script_compile (struct sieve_instance *svinst, const char *filename, const char *name) { struct sieve_error_handler *ehandler; struct sieve_binary *sbin; ehandler = sieve_stderr_ehandler_create(svinst, 0); sieve_error_handler_accept_infolog(ehandler, TRUE); sieve_error_handler_accept_debuglog(ehandler, svinst->debug); if ( (sbin = sieve_compile (svinst, filename, name, ehandler, 0, NULL)) == NULL ) i_error("failed to compile sieve script '%s'", filename); sieve_error_handler_unref(&ehandler); return sbin; }
int main(int argc, char **argv) { struct sieve_instance *svinst; const char *scriptfile, *dumpfile, *tracefile; struct sieve_trace_config tr_config; struct sieve_binary *sbin; const char *sieve_dir; bool log_stdout = FALSE; int ret, c; sieve_tool = sieve_tool_init ("testsuite", &argc, &argv, "d:t:T:EDP:", TRUE); /* Parse arguments */ scriptfile = dumpfile = tracefile = NULL; memset(&tr_config, 0, sizeof(tr_config)); tr_config.level = SIEVE_TRLVL_ACTIONS; while ((c = sieve_tool_getopt(sieve_tool)) > 0) { switch (c) { case 'd': /* destination address */ dumpfile = optarg; break; case 't': /* trace file */ tracefile = optarg; break; case 'T': sieve_tool_parse_trace_option(&tr_config, optarg); break; case 'E': log_stdout = TRUE; break; default: print_help(); i_fatal_status(EX_USAGE, "Unknown argument: %c", c); break; } } if ( optind < argc ) { scriptfile = t_strdup(argv[optind++]); } else { print_help(); i_fatal_status(EX_USAGE, "Missing <scriptfile> argument"); } if (optind != argc) { print_help(); i_fatal_status(EX_USAGE, "Unknown argument: %s", argv[optind]); } /* Initialize mail user */ sieve_tool_set_homedir(sieve_tool, t_abspath("")); /* Initialize settings environment */ testsuite_settings_init(); /* Currently needed for include (FIXME) */ sieve_dir = strrchr(scriptfile, '/'); if ( sieve_dir == NULL ) sieve_dir= "./"; else { sieve_dir = t_strdup_until(scriptfile, sieve_dir+1); } testsuite_setting_set ("sieve_dir", t_strconcat(sieve_dir, "included", NULL)); testsuite_setting_set ("sieve_global_dir", t_strconcat(sieve_dir, "included-global", NULL)); /* Finish testsuite initialization */ svinst = sieve_tool_init_finish(sieve_tool, FALSE); testsuite_init(svinst, log_stdout); printf("Test case: %s:\n\n", scriptfile); /* Compile sieve script */ if ( (sbin = sieve_compile (svinst, scriptfile, NULL, testsuite_log_main_ehandler, NULL)) != NULL ) { struct ostream *tracestream = NULL; struct sieve_script_env scriptenv; /* Dump script */ sieve_tool_dump_binary_to(sbin, dumpfile, FALSE); if ( tracefile != NULL ) tracestream = sieve_tool_open_output_stream(tracefile); testsuite_mailstore_init(); testsuite_message_init(); memset(&scriptenv, 0, sizeof(scriptenv)); scriptenv.user = sieve_tool_get_mail_user(sieve_tool); scriptenv.default_mailbox = "INBOX"; scriptenv.hostname = "testsuite.example.com"; scriptenv.postmaster_address = "*****@*****.**"; scriptenv.username = sieve_tool_get_username(sieve_tool); scriptenv.smtp_open = testsuite_smtp_open; scriptenv.smtp_close = testsuite_smtp_close; scriptenv.trace_stream = tracestream; scriptenv.trace_config = tr_config; testsuite_scriptenv = &scriptenv; testsuite_result_init(); /* Run the test */ ret = testsuite_run (sbin, &testsuite_msgdata, &scriptenv, testsuite_log_main_ehandler); switch ( ret ) { case SIEVE_EXEC_OK: break; case SIEVE_EXEC_FAILURE: case SIEVE_EXEC_KEEP_FAILED: testsuite_testcase_fail("test script execution aborted due to error"); break; case SIEVE_EXEC_BIN_CORRUPT: testsuite_testcase_fail("compiled test script binary is corrupt"); break; default: testsuite_testcase_fail("unknown execution exit code"); } sieve_close(&sbin); /* De-initialize message environment */ testsuite_message_deinit(); testsuite_mailstore_deinit(); testsuite_result_deinit(); if ( tracestream != NULL ) o_stream_unref(&tracestream); } else { testsuite_testcase_fail("failed to compile testcase script"); } /* De-initialize testsuite */ testsuite_deinit(); testsuite_settings_deinit(); sieve_tool_deinit(&sieve_tool); if ( !testsuite_testcase_result() ) return EXIT_FAILURE; return EXIT_SUCCESS; }