r6014: rather large change set....

pulling back all recent rpc changes from trunk into
3.0.  I've tested a compile and so don't think I've missed
any files.  But if so, just mail me and I'll clean backup
in a couple of hours.

Changes include \winreg, \eventlog, \svcctl, and
general parse_misc.c updates.

I am planning on bracketing the event code with an
#ifdef ENABLE_EVENTLOG until I finish merging Marcin's
changes (very soon).
(This used to be commit 4e0ac63c36527cd8c52ef720cae17e84f67e7221)

1 files changed, 923 insertions, 0 deletions

diff --git a/source3/rpc_server/srv_eventlog_nt.c b/source3/rpc_server/srv_eventlog_nt.c
new file mode 100644
index 0000000000..7501434a13
--- /dev/null
+++ b/source3/rpc_server/srv_eventlog_nt.c
@@ -0,0 +1,923 @@
+/* 
+ *  Unix SMB/CIFS implementation.
+ *  RPC Pipe client / server routines
+ *  Copyright (C) Marcin Krzysztof Porwit    2005.
+ *  
+ *  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 of the License, 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., 675 Mass Ave, Cambridge, MA 02139, USA.
+ */
+ 
+#include "includes.h"
+
+#undef DBGC_CLASS
+#define DBGC_CLASS DBGC_RPC_SRV
+
+typedef struct eventlog_info
+{
+    /* for use by the \PIPE\eventlog policy */
+    fstring source_log_file_name;
+    fstring source_server_name;
+    fstring handle_string;
+    uint32 num_records;
+    uint32 oldest_entry;
+} Eventlog_info;
+
+static void free_eventlog_info(void *ptr)
+{
+    struct eventlog_info *info = (struct eventlog_info *)ptr;
+    memset(info->source_log_file_name, '0', sizeof(*(info->source_log_file_name)));
+    memset(info->source_server_name, '0', sizeof(*(info->source_server_name)));
+    memset(info->handle_string, '0', sizeof(*(info->handle_string)));
+    memset(info, 0, sizeof(*(info)));
+    SAFE_FREE(info);
+}
+
+static Eventlog_info *find_eventlog_info_by_hnd(pipes_struct *p,
+						POLICY_HND *handle)
+{
+    Eventlog_info *info = NULL;
+    
+    if(!(find_policy_by_hnd(p,handle,(void **)&info)))
+    {
+	DEBUG(2,("find_eventlog_info_by_hnd: eventlog not found.\n"));
+    }
+
+    return info;
+}
+
+void policy_handle_to_string(POLICY_HND *handle, fstring *dest)
+{
+    memset(dest, 0, sizeof(*dest));
+    snprintf((char *)dest, sizeof(*dest), "%08X-%08X-%04X-%04X-%02X%02X%02X%02X%02X",
+	     handle->data1,
+	     handle->data2,
+	     handle->data3,
+	     handle->data4,
+	     handle->data5[0],
+	     handle->data5[1],
+	     handle->data5[2],
+	     handle->data5[3],
+	     handle->data5[4]);
+}
+
+/**
+ * Callout to open the specified event log
+ * 
+ *   smbrun calling convention --
+ *     INPUT: <open_cmd> <log name> <policy handle>
+ *     OUTPUT: the string "SUCCESS" if the command succeeded
+ *             no such string if there was a failure.
+ */
+static BOOL _eventlog_open_eventlog_hook(Eventlog_info *info)
+{
+    char *cmd = lp_eventlog_open_cmd();
+    char **qlines;
+    pstring command;
+    int numlines = 0;
+    int ret;
+    int fd = -1;
+
+    if(cmd == NULL || strlen(cmd) == 0)
+    {
+	DEBUG(0, ("Must define an \"eventlog open command\" entry in the config.\n"));
+	return False;
+    }
+
+    memset(command, 0, sizeof(command));
+    slprintf(command, sizeof(command)-1, "%s \"%s\" \"%s\"",
+	     cmd,
+	     info->source_log_file_name,
+	     info->handle_string);
+
+    DEBUG(10, ("Running [%s]\n", command));
+    ret = smbrun(command, &fd);
+    DEBUGADD(10, ("returned [%d]\n", ret));
+
+    if(ret != 0)
+    {
+	if(fd != -1)
+	    close(fd);
+	return False;
+    }
+
+    qlines = fd_lines_load(fd, &numlines);
+    DEBUGADD(10, ("Lines returned = [%d]\n", numlines));
+    close(fd);
+
+    if(numlines)
+    {
+	DEBUGADD(10, ("Line[0] = [%s]\n", qlines[0]));
+	if(0 == strncmp(qlines[0], "SUCCESS", strlen("SUCCESS")))
+	{
+	    DEBUGADD(10, ("Able to open [%s].\n", info->source_log_file_name));
+	    file_lines_free(qlines);
+	    return True;
+	}
+    }
+
+    file_lines_free(qlines);
+    return False;
+}
+
+WERROR _eventlog_open_eventlog(pipes_struct *p,
+			       EVENTLOG_Q_OPEN_EVENTLOG *q_u,
+			       EVENTLOG_R_OPEN_EVENTLOG *r_u)
+{
+    Eventlog_info *info = NULL;
+    
+    if(!q_u || !r_u)
+	return WERR_NOMEM;
+    
+    if((info = SMB_MALLOC_P(Eventlog_info)) == NULL)
+	return WERR_NOMEM;
+    
+    ZERO_STRUCTP(info);
+
+    if(q_u->servername_ptr != 0)
+    {
+	unistr2_to_ascii(info->source_server_name, &(q_u->servername), sizeof(info->source_server_name));
+    }
+    else
+    {
+	/* if servername == NULL, use the local computer */
+	fstrcpy(info->source_server_name, global_myname());
+    }
+    DEBUG(10, ("_eventlog_open_eventlog: Using [%s] as the server name.\n", info->source_server_name));
+
+    if(q_u->sourcename_ptr != 0)
+    {
+	unistr2_to_ascii(info->source_log_file_name, &(q_u->sourcename), sizeof(info->source_log_file_name));
+    }
+    else
+    {
+        /* if sourcename == NULL, default to "Application" log */
+	fstrcpy(info->source_log_file_name, "Application");
+    }
+    DEBUG(10, ("_eventlog_open_eventlog: Using [%s] as the source log file.\n", info->source_log_file_name));
+
+    if(!create_policy_hnd(p, &(r_u->handle), free_eventlog_info, (void *)info))
+	return WERR_NOMEM;
+
+    policy_handle_to_string(&r_u->handle, &info->handle_string);
+
+    if(!(_eventlog_open_eventlog_hook(info)))
+	return WERR_BADFILE;
+
+    return WERR_OK;
+}
+/**
+ * Callout to get the number of records in the specified event log
+ * 
+ *   smbrun calling convention --
+ *     INPUT: <get_num_records_cmd> <log name> <policy handle>
+ *     OUTPUT: A single line with a single integer containing the number of
+ *             entries in the log. If there are no entries in the log, return 0.
+ */
+static BOOL _eventlog_get_num_records_hook(Eventlog_info *info)
+{
+    char *cmd = lp_eventlog_num_records_cmd();
+    char **qlines;
+    pstring command;
+    int numlines = 0;
+    int ret;
+    int fd = -1;
+
+    if(cmd == NULL || strlen(cmd) == 0)
+    {
+	DEBUG(0, ("Must define an \"eventlog num records command\" entry in the config.\n"));
+	return False;
+    }
+
+    memset(command, 0, sizeof(command));
+    slprintf(command, sizeof(command)-1, "%s \"%s\" \"%s\"", 
+	     cmd,
+	     info->source_log_file_name,
+	     info->handle_string);
+
+    DEBUG(10, ("Running [%s]\n", command));
+    ret = smbrun(command, &fd);
+    DEBUGADD(10, ("returned [%d]\n", ret));
+
+    if(ret != 0)
+    {
+	if(fd != -1)
+	    close(fd);
+	return False;
+    }
+
+    qlines = fd_lines_load(fd, &numlines);
+    DEBUGADD(10, ("Lines returned = [%d]\n", numlines));
+    close(fd);
+
+    if(numlines)
+    {
+	DEBUGADD(10, ("Line[0] = [%s]\n", qlines[0]));
+	sscanf(qlines[0], "%d", &(info->num_records));
+	file_lines_free(qlines);
+	return True;
+    }
+
+    file_lines_free(qlines);
+    return False;
+}
+
+WERROR _eventlog_get_num_records(pipes_struct *p,
+				 EVENTLOG_Q_GET_NUM_RECORDS *q_u,
+				 EVENTLOG_R_GET_NUM_RECORDS *r_u)
+{
+    Eventlog_info *info = NULL;
+    POLICY_HND *handle = NULL;
+
+    if(!q_u || !r_u)
+	return WERR_NOMEM;
+
+    handle = &(q_u->handle);
+    info = find_eventlog_info_by_hnd(p, handle);
+
+    if(!(_eventlog_get_num_records_hook(info)))
+	return WERR_BADFILE;
+
+    r_u->num_records = info->num_records;
+
+    return WERR_OK;
+}
+/**
+ * Callout to find the oldest record in the log
+ * 
+ *   smbrun calling convention --
+ *     INPUT: <oldest_entry_cmd> <log name> <policy handle>
+ *     OUTPUT: If there are entries in the event log, the index of the
+ *             oldest entry. Must be 1 or greater.
+ *             If there are no entries in the log, returns a 0
+ */
+static BOOL _eventlog_get_oldest_entry_hook(Eventlog_info *info)
+{
+    char *cmd = lp_eventlog_oldest_record_cmd();
+    char **qlines;
+    pstring command;
+    int numlines = 0;
+    int ret;
+    int fd = -1;
+
+    if(cmd == NULL || strlen(cmd) == 0)
+    {
+	DEBUG(0, ("Must define an \"eventlog oldest record command\" entry in the config.\n"));
+	return False;
+    }
+
+    memset(command, 0, sizeof(command));
+    slprintf(command, sizeof(command)-1, "%s \"%s\" \"%s\"", 
+	     cmd,
+	     info->source_log_file_name,
+	     info->handle_string);
+
+    DEBUG(10, ("Running [%s]\n", command));
+    ret = smbrun(command, &fd);
+    DEBUGADD(10, ("returned [%d]\n", ret));
+
+    if(ret != 0)
+    {
+	if(fd != -1)
+	    close(fd);
+	return False;
+    }
+
+    qlines = fd_lines_load(fd, &numlines);
+    DEBUGADD(10, ("Lines returned = [%d]\n", numlines));
+    close(fd);
+
+    if(numlines)
+    {
+	DEBUGADD(10, ("Line[0] = [%s]\n", qlines[0]));
+	sscanf(qlines[0], "%d", &(info->oldest_entry));
+	file_lines_free(qlines);
+	return True;
+    }
+
+    file_lines_free(qlines);
+    return False;
+}
+
+WERROR _eventlog_get_oldest_entry(pipes_struct *p,
+				  EVENTLOG_Q_GET_OLDEST_ENTRY *q_u,
+				  EVENTLOG_R_GET_OLDEST_ENTRY *r_u)
+{
+    Eventlog_info *info = NULL;
+    POLICY_HND *handle = NULL;
+
+    if(!q_u || !r_u)
+	return WERR_NOMEM;
+
+    handle = &(q_u->handle);
+    info = find_eventlog_info_by_hnd(p, handle);
+
+    if(!(_eventlog_get_oldest_entry_hook(info)))
+	return WERR_BADFILE;
+
+    r_u->oldest_entry = info->oldest_entry;
+
+    return WERR_OK;
+}
+
+/**
+ * Callout to close the specified event log
+ * 
+ *   smbrun calling convention --
+ *     INPUT: <close_cmd> <log name> <policy handle>
+ *     OUTPUT: the string "SUCCESS" if the command succeeded
+ *             no such string if there was a failure.
+ */
+static BOOL _eventlog_close_eventlog_hook(Eventlog_info *info)
+{
+    char *cmd = lp_eventlog_close_cmd();
+    char **qlines;
+    pstring command;
+    int numlines = 0;
+    int ret;
+    int fd = -1;
+
+    if(cmd == NULL || strlen(cmd) == 0)
+    {
+	DEBUG(0, ("Must define an \"eventlog close command\" entry in the config.\n"));
+	return False;
+    }
+
+    memset(command, 0, sizeof(command));
+    slprintf(command, sizeof(command)-1, "%s \"%s\" \"%s\"", 
+	     cmd, 
+	     info->source_log_file_name, 
+	     info->handle_string);
+
+    DEBUG(10, ("Running [%s]\n", command));
+    ret = smbrun(command, &fd);
+    DEBUGADD(10, ("returned [%d]\n", ret));
+
+    if(ret != 0)
+    {
+	if(fd != -1)
+	    close(fd);
+	return False;
+    }
+
+    qlines = fd_lines_load(fd, &numlines);
+    DEBUGADD(10, ("Lines returned = [%d]\n", numlines));
+    close(fd);
+
+    if(numlines)
+    {
+	DEBUGADD(10, ("Line[0] = [%s]\n", qlines[0]));
+	if(0 == strncmp(qlines[0], "SUCCESS", strlen("SUCCESS")))
+	{
+	    DEBUGADD(10, ("Able to close [%s].\n", info->source_log_file_name));
+	    file_lines_free(qlines);
+	    return True;
+	}
+    }
+
+    file_lines_free(qlines);
+    return False;
+}
+
+WERROR _eventlog_close_eventlog(pipes_struct *p,
+				EVENTLOG_Q_CLOSE_EVENTLOG *q_u,
+				EVENTLOG_R_CLOSE_EVENTLOG *r_u)
+{
+    Eventlog_info *info = NULL;
+    POLICY_HND *handle;
+
+    if(!q_u || !r_u)
+	return WERR_NOMEM;
+
+    handle = &(q_u->handle);
+    
+    info = find_eventlog_info_by_hnd(p, handle);
+    if(!(_eventlog_close_eventlog_hook(info)))
+	return WERR_BADFILE;
+
+    if(!(close_policy_hnd(p, handle)))
+    {
+	/* WERR_NOMEM is probably not the correct error, but until I figure out a better
+	   one it will have to do */
+	return WERR_NOMEM;
+    }
+
+    return WERR_OK;
+}
+
+static BOOL _eventlog_read_parse_line(char *line, Eventlog_entry *entry)
+{
+    char *start = NULL, *stop = NULL;
+    pstring temp;
+    int temp_len = 0, i;
+ 
+    start = line;
+
+    if(start == NULL || strlen(start) == 0)
+	return False;
+    if(!(stop = strchr(line, ':')))
+	return False;
+    
+    DEBUG(6, ("_eventlog_read_parse_line: trying to parse [%s].\n", line));
+
+    if(0 == strncmp(start, "LEN", stop - start))
+    {
+	/* This will get recomputed later anyway -- probably not necessary */
+	entry->record.length = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "RS1", stop - start))
+    {
+	/* For now all these reserved entries seem to have the same value,
+	   which can be hardcoded to int(1699505740) for now */
+	entry->record.reserved1 = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "RCN", stop - start))
+    {
+	entry->record.record_number = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "TMG", stop - start))
+    {
+	entry->record.time_generated = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "TMW", stop - start))
+    {
+	entry->record.time_written = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "EID", stop - start))
+    {
+	entry->record.event_id = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "ETP", stop - start))
+    {
+	if(strstr(start, "ERROR"))
+	{
+	    entry->record.event_type = EVENTLOG_ERROR_TYPE;
+	}
+	else if(strstr(start, "WARNING"))
+	{
+	    entry->record.event_type = EVENTLOG_WARNING_TYPE;
+	}
+	else if(strstr(start, "INFO"))
+	{
+	    entry->record.event_type = EVENTLOG_INFORMATION_TYPE;
+	}
+	else if(strstr(start, "AUDIT_SUCCESS"))
+	{
+	    entry->record.event_type = EVENTLOG_AUDIT_SUCCESS;
+	}
+	else if(strstr(start, "AUDIT_FAILURE"))
+	{
+	    entry->record.event_type = EVENTLOG_AUDIT_FAILURE;
+	}
+	else if(strstr(start, "SUCCESS"))
+	{
+	    entry->record.event_type = EVENTLOG_SUCCESS;
+	}
+	else
+	{
+	    /* some other eventlog type -- currently not defined in MSDN docs, so error out */
+	    return False;
+	}
+    }
+/*
+    else if(0 == strncmp(start, "NST", stop - start))
+    {
+	entry->record.num_strings = atoi(stop + 1);
+    }
+*/
+    else if(0 == strncmp(start, "ECT", stop - start))
+    {
+	entry->record.event_category = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "RS2", stop - start))
+    {
+	entry->record.reserved2 = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "CRN", stop - start))
+    {
+	entry->record.closing_record_number = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "USL", stop - start))
+    {
+	entry->record.user_sid_length = atoi(stop + 1);
+    }
+    else if(0 == strncmp(start, "SRC", stop - start))
+    {
+	memset(temp, 0, sizeof(temp));
+	sscanf(stop+1, "%s", temp);
+	temp_len = strlen(temp);
+	rpcstr_push((void *)(entry->data_record.source_name), temp, 
+		    sizeof(entry->data_record.source_name), STR_TERMINATE);
+	entry->data_record.source_name_len = (strlen_w(entry->data_record.source_name)* 2) + 2;
+    }
+    else if(0 == strncmp(start, "SRN", stop - start))
+    {
+	memset(temp, 0, sizeof(temp));
+	sscanf(stop+1, "%s", temp);
+	temp_len = strlen(temp);
+	rpcstr_push((void *)(entry->data_record.computer_name), temp,
+		    sizeof(entry->data_record.computer_name), STR_TERMINATE);
+	entry->data_record.computer_name_len = (strlen_w(entry->data_record.computer_name)* 2) + 2;
+    }
+    else if(0 == strncmp(start, "SID", stop - start))
+    {
+	memset(temp, 0, sizeof(temp));
+	sscanf(stop+1, "%s", temp);
+	temp_len = strlen(temp);
+	rpcstr_push((void *)(entry->data_record.sid), temp,
+		    sizeof(entry->data_record.sid), STR_TERMINATE);
+	entry->record.user_sid_length = (strlen_w(entry->data_record.sid) * 2) + 2;
+    }
+    else if(0 == strncmp(start, "STR", stop - start))
+    {
+	/* skip past initial ":" */
+	stop++;
+	/* now skip any other leading whitespace */
+	while(isspace(stop[0]))
+	    stop++;
+	temp_len = strlen(stop);
+	memset(temp, 0, sizeof(temp));
+	strncpy(temp, stop, temp_len);
+	rpcstr_push((void *)(entry->data_record.strings + entry->data_record.strings_len),
+		    temp,
+		    sizeof(entry->data_record.strings) - entry->data_record.strings_len, 
+		    STR_TERMINATE);
+	entry->data_record.strings_len += temp_len + 1;
+	fprintf(stderr, "Dumping strings:\n");
+	for(i = 0; i < entry->data_record.strings_len; i++)
+	{
+	    fputc((char)entry->data_record.strings[i], stderr);
+	}
+	fprintf(stderr, "\nDone\n");
+	entry->record.num_strings++;
+    }
+    else if(0 == strncmp(start, "DAT", stop - start))
+    {
+	/* Now that we're done processing the STR data, adjust the length to account for
+	   unicode, then proceed with the DAT data. */
+	entry->data_record.strings_len *= 2;
+	/* skip past initial ":" */
+	stop++;
+	/* now skip any other leading whitespace */
+	while(isspace(stop[0]))
+	    stop++;
+	memset(temp, 0, sizeof(temp));
+	temp_len = strlen(stop);
+	strncpy(temp, stop, temp_len);
+	rpcstr_push((void *)(entry->data_record.user_data), temp,
+		    sizeof(entry->data_record.user_data), STR_TERMINATE);
+	entry->data_record.user_data_len = (strlen_w((const smb_ucs2_t *)entry->data_record.user_data) * 2) + 2;
+    }
+    else
+    {
+	/* some other eventlog entry -- not implemented, so dropping on the floor */
+	DEBUG(10, ("Unknown entry [%s]. Ignoring.\n", line));
+	/* For now return true so that we can keep on parsing this mess. Eventually
+	   we will return False here. */
+	return True;
+    }
+    return True;
+}
+/**
+ * Callout to read entries from the specified event log
+ *
+ *   smbrun calling convention --
+ *     INPUT: <read_cmd> <log name> <direction> <starting record> <buffer size> <policy handle>
+ *            where direction is either "forward" or "backward", the starting record is somewhere
+ *            between the oldest_record and oldest_record+num_records, and the buffer size is the
+ *            maximum size of the buffer that the client can accomodate.
+ *     OUTPUT: A buffer containing a set of entries, one to a line, of the format:
+ *               line type:line data
+ *             These are the allowed line types:
+ *               RS1:(uint32) - reserved. All M$ entries seem to have int(1699505740) for now
+ *               RCN:(uint32) - record number of the record, however it may be calculated by the script
+ *               TMG:(uint32) - time generated, seconds since January 1, 1970, 0000 UTC
+ *               TMW:(uint32) - time written, seconds since January 1, 1970, 0000 UTC
+ *               EID:(uint32) - eventlog source defined event identifier. If there's a stringfile for the event, it is an index into that
+ *               ETP:(uint16) - eventlog type - one of ERROR, WARNING, INFO, AUDIT_SUCCESS, AUDIT_FAILURE
+ *               ECT:(uint16) - event category - depends on the eventlog generator... 
+ *               RS2:(uint16) - reserved, make it 0000
+ *               CRN:(uint32) - reserved, make it 00000000 for now
+ *               USL:(uint32) - user SID length. No sid? Make this 0. Must match SID below
+ *               SRC:[(uint8)] - Name of the source, for example ccPwdSvc, in hex bytes. Can not be multiline.
+ *               SRN:[(uint8)] - Name of the computer on which this is generated, the short hostname usually.
+ *               SID:[(uint8)] - User sid if one exists. Must be present even if there is no SID.
+ *               STR:[(uint8)] - String data. One string per line. Multiple strings can be specified using consecutive "STR" lines,
+ *                               up to a total aggregate string length of 1024 characters.
+ *               DAT:[(uint8)] - The user-defined data portion of the event log. Can not be multiple lines.
+ */
+static BOOL _eventlog_read_eventlog_hook(Eventlog_info *info, Eventlog_entry *entry, const char *direction, int starting_record, int buffer_size, BOOL *eof)
+{
+    char *cmd = lp_eventlog_read_cmd();
+    char **qlines;
+    pstring command;
+    int numlines = 0;
+    int ret;
+    int fd = -1;
+    int i;
+
+    if(info == NULL)
+	return False;
+
+    if(cmd == NULL || strlen(cmd) == 0)
+    {
+	DEBUG(0, ("Must define an \"eventlog read command\" entry in the config.\n"));
+	return False;
+    }
+
+    slprintf(command, sizeof(command)-1, "%s \"%s\" %s %d %d \"%s\"",
+	     cmd,
+	     info->source_log_file_name,
+	     direction,
+	     starting_record,
+	     buffer_size,
+	     info->handle_string);
+
+    DEBUG(10, ("Running [%s]\n", command));
+    ret = smbrun(command, &fd);
+    DEBUGADD(10, ("returned [%d]\n", ret));
+
+    if(ret != 0)
+    {
+	if(fd != -1)
+	    close(fd);
+	return False;
+    }
+
+    qlines = fd_lines_load(fd, &numlines);
+    DEBUGADD(10, ("Lines returned = [%d]\n", numlines));
+    close(fd);
+    
+    if(numlines)
+    {
+	for(i = 0; i < numlines; i++)
+	{
+	    DEBUGADD(10, ("Line[%d] = %s\n", i, qlines[i]));
+	    _eventlog_read_parse_line(qlines[i], entry);
+	}
+	file_lines_free(qlines);
+	return True;
+    }
+    else
+	*eof = True;
+
+    file_lines_free(qlines);
+    return False;
+}
+	
+static BOOL _eventlog_read_prepare_data_buffer(prs_struct *ps,
+					       EVENTLOG_Q_READ_EVENTLOG *q_u,
+					       EVENTLOG_R_READ_EVENTLOG *r_u,
+					       Eventlog_entry *entry)
+{
+    uint8 *offset;
+    Eventlog_entry *new = NULL, *insert_point = NULL;
+
+    new = PRS_ALLOC_MEM(ps, Eventlog_entry, 1);
+    if(new == NULL)
+	return False;
+
+    entry->data_record.sid_padding = ((4 - ((entry->data_record.source_name_len 
+				      + entry->data_record.computer_name_len) % 4)) %4);
+    entry->data_record.data_padding = (4 - ((entry->data_record.strings_len 
+					   + entry->data_record.user_data_len) % 4)) % 4;
+    entry->record.length = sizeof(Eventlog_record);
+    entry->record.length += entry->data_record.source_name_len;
+    entry->record.length += entry->data_record.computer_name_len;
+    if(entry->record.user_sid_length == 0)
+    {
+	/* Should not pad to a DWORD boundary for writing out the sid if there is
+	   no SID, so just propagate the padding to pad the data */
+	entry->data_record.data_padding += entry->data_record.sid_padding;
+	entry->data_record.sid_padding = 0;
+    }
+    DEBUG(10, ("sid_padding is [%d].\n", entry->data_record.sid_padding));
+    DEBUG(10, ("data_padding is [%d].\n", entry->data_record.data_padding));
+
+    entry->record.length += entry->data_record.sid_padding;
+    entry->record.length += entry->record.user_sid_length;
+    entry->record.length += entry->data_record.strings_len;
+    entry->record.length += entry->data_record.user_data_len;
+    entry->record.length += entry->data_record.data_padding;
+    /* need another copy of length at the end of the data */
+    entry->record.length += sizeof(entry->record.length);
+    DEBUG(10, ("entry->record.length is [%d].\n", entry->record.length));
+    entry->data = PRS_ALLOC_MEM(ps, uint8, entry->record.length - sizeof(Eventlog_record) - sizeof(entry->record.length));
+    if(entry->data == NULL)
+	return False;
+    offset = entry->data;
+    memcpy(offset, &(entry->data_record.source_name), entry->data_record.source_name_len);
+    offset += entry->data_record.source_name_len;
+    memcpy(offset, &(entry->data_record.computer_name), entry->data_record.computer_name_len);
+    offset += entry->data_record.computer_name_len;
+    /* SID needs to be DWORD-aligned */
+    offset += entry->data_record.sid_padding;
+    entry->record.user_sid_offset = sizeof(Eventlog_record) + (offset - entry->data);
+    memcpy(offset, &(entry->data_record.sid), entry->record.user_sid_length);
+    offset += entry->record.user_sid_length;
+    /* Now do the strings */
+    entry->record.string_offset = sizeof(Eventlog_record) + (offset - entry->data);
+    memcpy(offset, &(entry->data_record.strings), entry->data_record.strings_len);
+    offset += entry->data_record.strings_len;
+    /* Now do the data */
+    entry->record.data_length = entry->data_record.user_data_len;
+    entry->record.data_offset = sizeof(Eventlog_record) + (offset - entry->data);
+    memcpy(offset, &(entry->data_record.user_data), entry->data_record.user_data_len);
+    offset += entry->data_record.user_data_len;
+    /* Now that we've massaged the current entry, copy it into the new entry and add it
+       to end of the list */
+    insert_point=r_u->entry;
+
+    if (NULL == insert_point) 
+    {
+	r_u->entry = new;
+	new->next = NULL;
+    } 
+    else
+    {
+	while ((NULL != insert_point->next)) 
+	{
+	    insert_point=insert_point->next;
+	}
+	new->next = NULL;
+	insert_point->next = new;
+    }
+
+    memcpy(&(new->record), &entry->record, sizeof(Eventlog_record));
+    memcpy(&(new->data_record), &entry->data_record, sizeof(Eventlog_data_record));
+    new->data = entry->data;
+
+    r_u->num_records++; 
+    r_u->num_bytes_in_resp += entry->record.length;
+
+    return True;
+}
+
+WERROR _eventlog_read_eventlog(pipes_struct *p,
+			       EVENTLOG_Q_READ_EVENTLOG *q_u,
+			       EVENTLOG_R_READ_EVENTLOG *r_u)
+{
+    Eventlog_info *info = NULL;
+    POLICY_HND *handle;
+    Eventlog_entry entry;
+    BOOL eof = False;
+    const char *direction = "";
+    int starting_record;
+    prs_struct *ps;
+
+    if(!q_u || !r_u)
+	return WERR_NOMEM;
+
+    handle = &(q_u->handle);
+    info = find_eventlog_info_by_hnd(p, handle);
+    ps = &p->out_data.rdata;
+    /* Rather than checking the EVENTLOG_SEQUENTIAL_READ/EVENTLOG_SEEK_READ flags,
+       we'll just go to the offset specified in the request, or the oldest entry
+       if no offset is specified */
+    if(q_u->offset > 0)
+	starting_record = q_u->offset;
+    else
+	starting_record = info->oldest_entry;
+    if(q_u->flags & EVENTLOG_FORWARDS_READ)
+	direction = "forward";
+    else if(q_u->flags & EVENTLOG_BACKWARDS_READ)
+	direction = "backward";
+
+    do
+    {
+	ZERO_STRUCT(entry);
+	if(!(_eventlog_read_eventlog_hook(info, &entry, direction, starting_record, q_u->max_read_size, &eof)))
+	{
+	    if(eof == False)
+		return WERR_NOMEM;
+	}
+	if(eof == False)
+	{
+	    /* only if the read hook returned data */
+	    if(!(_eventlog_read_prepare_data_buffer(ps, q_u, r_u, &entry)))
+		return WERR_NOMEM;
+	    DEBUG(10, ("_eventlog_read_eventlog: read [%d] bytes out of a max of [%d].\n",
+		       r_u->num_bytes_in_resp,
+		       q_u->max_read_size));
+	}
+    } while((r_u->num_bytes_in_resp <= q_u->max_read_size) && (eof != True));
+
+    return WERR_OK;
+}
+/**
+ * Callout to clear (and optionally backup) a specified event log
+ *
+ *   smbrun calling convention --
+ *     INPUT:  <clear_eventlog_cmd> <log name> <policy handle>
+ *     OUTPUT: A single line with the string "SUCCESS" if the command succeeded.
+ *             Otherwise it is assumed to have failed
+ *
+ *     INPUT:  <clear_eventlog_cmd> <log name> <backup file> <policy handle>
+ *     OUTPUT: A single line with the string "SUCCESS" if the command succeeded.
+ *             Otherwise it is assumed to have failed
+ *             The given log is copied to that location on the server. See comments for
+ *               eventlog_io_q_clear_eventlog for info about odd file name behavior
+ */
+static BOOL _eventlog_clear_eventlog_hook(Eventlog_info *info,
+					  pstring backup_file_name)
+{
+    char *cmd = lp_eventlog_clear_cmd();
+    char **qlines;
+    pstring command;
+    int numlines = 0;
+    int ret;
+    int fd = -1;
+
+    if(cmd == NULL || strlen(cmd) == 0)
+    {
+	DEBUG(0, ("Must define an \"eventlog clear command\" entry in the config.\n"));
+	return False;
+    }
+
+    memset(command, 0, sizeof(command));
+    if(strlen(backup_file_name) > 0)
+	slprintf(command, sizeof(command)-1, "%s \"%s\" \"%s\" \"%s\"",
+		 cmd,
+		 info->source_log_file_name,
+		 backup_file_name,
+		 info->handle_string);
+    else
+	slprintf(command, sizeof(command)-1, "%s \"%s\" \"%s\"", 
+		 cmd, 
+		 info->source_log_file_name, 
+		 info->handle_string);
+
+    DEBUG(10, ("Running [%s]\n", command));
+    ret = smbrun(command, &fd);
+    DEBUGADD(10, ("returned [%d]\n", ret));
+
+    if(ret != 0)
+    {
+	if(fd != -1)
+	    close(fd);
+	return False;
+    }
+
+    qlines = fd_lines_load(fd, &numlines);
+    DEBUGADD(10, ("Lines returned = [%d]\n", numlines));
+    close(fd);
+
+    if(numlines)
+    {
+	DEBUGADD(10, ("Line[0] = [%s]\n", qlines[0]));
+	if(0 == strncmp(qlines[0], "SUCCESS", strlen("SUCCESS")))
+	{
+	    DEBUGADD(10, ("Able to clear [%s].\n", info->source_log_file_name));
+	    file_lines_free(qlines);
+	    return True;
+	}
+    }
+
+    file_lines_free(qlines);
+    return False;
+}
+
+WERROR _eventlog_clear_eventlog(pipes_struct *p,
+				EVENTLOG_Q_CLEAR_EVENTLOG *q_u,
+				EVENTLOG_R_CLEAR_EVENTLOG *r_u)
+{
+    Eventlog_info *info = NULL;
+    pstring backup_file_name;
+    POLICY_HND *handle = NULL;
+
+    if(!q_u || !r_u)
+	return WERR_NOMEM;
+
+    handle = &(q_u->handle);
+    info = find_eventlog_info_by_hnd(p, handle);
+    memset(backup_file_name, 0, sizeof(backup_file_name));
+
+    if(q_u->backup_file_ptr != 0)
+    {
+	unistr2_to_ascii(backup_file_name, &(q_u->backup_file), sizeof(backup_file_name));
+	DEBUG(10, ("_eventlog_clear_eventlog: Using [%s] as the backup file name for log [%s].",
+		   backup_file_name,
+		   info->source_log_file_name));
+    }
+    else
+    {
+	/* if backup_file == NULL, do not back up the log before clearing it */
+	DEBUG(10, ("_eventlog_clear_eventlog: clearing [%s] log without making a backup.",
+		   info->source_log_file_name));
+    }
+
+    if(!(_eventlog_clear_eventlog_hook(info, backup_file_name)))
+	return WERR_BADFILE;
+
+    return WERR_OK;
+}