r23792: convert Samba4 to GPLv3
[jelmer/samba4-debian.git] / source / rpc_server / echo / rpc_echo.c
index 42856737c4b074dff30f8646cd3097cfaa015ebd..f188ef0a0d7ffedbb9c547def4806264ebc93a44 100644 (file)
@@ -4,10 +4,11 @@
    endpoint server for the echo pipe
 
    Copyright (C) Andrew Tridgell 2003
+   Copyright (C) Stefan (metze) Metzmacher 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
+   the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
    
    This program is distributed in the hope that it will be useful,
    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.
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "includes.h"
+#include "system/filesys.h"
+#include "rpc_server/dcerpc_server.h"
+#include "librpc/gen_ndr/ndr_echo.h"
+#include "lib/events/events.h"
 
 
-static NTSTATUS echo_AddOne(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, struct echo_AddOne *r)
+static NTSTATUS dcesrv_echo_AddOne(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_AddOne *r)
 {
-       *r->out.v = *r->in.v + 1;
+       *r->out.out_data = r->in.in_data + 1;
        return NT_STATUS_OK;
 }
 
-static NTSTATUS echo_EchoData(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, struct echo_EchoData *r)
+static NTSTATUS dcesrv_echo_EchoData(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_EchoData *r)
 {
-       r->out.out_data = talloc(mem_ctx, r->in.len);
+       if (!r->in.len) {
+               return NT_STATUS_OK;
+       }
+
+       r->out.out_data = talloc_memdup(mem_ctx, r->in.in_data, r->in.len);
        if (!r->out.out_data) {
                return NT_STATUS_NO_MEMORY;
        }
-       memcpy(r->out.out_data, r->in.in_data, r->in.len);
 
        return NT_STATUS_OK;
 }
 
-static NTSTATUS echo_SinkData(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, struct echo_SinkData *r)
+static NTSTATUS dcesrv_echo_SinkData(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_SinkData *r)
 {
        return NT_STATUS_OK;
 }
 
-static NTSTATUS echo_SourceData(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, struct echo_SourceData *r)
+static NTSTATUS dcesrv_echo_SourceData(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_SourceData *r)
 {
        int i;
+
+       r->out.data = talloc_array(mem_ctx, uint8_t, r->in.len);
+       if (!r->out.data) {
+               return NT_STATUS_NO_MEMORY;
+       }
+       
        for (i=0;i<r->in.len;i++) {
                r->out.data[i] = i;
        }
@@ -55,23 +68,22 @@ static NTSTATUS echo_SourceData(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, s
        return NT_STATUS_OK;
 }
 
-static NTSTATUS echo_TestCall(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, struct TestCall *r)
+static NTSTATUS dcesrv_echo_TestCall(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_TestCall *r)
 {
-       r->out.s2 = "this is a test string";
-       
+       *r->out.s2 = talloc_strdup(mem_ctx, r->in.s1);
+       if (r->in.s1 && !*r->out.s2) {
+               return NT_STATUS_NO_MEMORY;
+       }
        return NT_STATUS_OK;
 }
 
-static NTSTATUS echo_TestCall2(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, struct TestCall2 *r)
+static NTSTATUS dcesrv_echo_TestCall2(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_TestCall2 *r)
 {
-       r->out.info = talloc(mem_ctx, sizeof(*r->out.info));
+       r->out.info = talloc(mem_ctx, union echo_Info);
        if (!r->out.info) {
-               r->out.result = NT_STATUS_NO_MEMORY;
-               return NT_STATUS_OK;
+               return NT_STATUS_NO_MEMORY;
        }
 
-       r->out.result = NT_STATUS_OK;
-
        switch (r->in.level) {
        case 1:
                r->out.info->info1.v = 10;
@@ -83,13 +95,11 @@ static NTSTATUS echo_TestCall2(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, st
                r->out.info->info3.v = 30;
                break;
        case 4:
-               r->out.info->info4.v.low = 40;
-               r->out.info->info4.v.high = 0;
+               r->out.info->info4.v = 40;
                break;
        case 5:
                r->out.info->info5.v1 = 50;
-               r->out.info->info5.v2.low = 60;
-               r->out.info->info5.v2.high = 0;
+               r->out.info->info5.v2 = 60;
                break;
        case 6:
                r->out.info->info6.v1 = 70;
@@ -97,85 +107,98 @@ static NTSTATUS echo_TestCall2(struct dcesrv_state *dce, TALLOC_CTX *mem_ctx, st
                break;
        case 7:
                r->out.info->info7.v1 = 80;
-               r->out.info->info7.info4.v.low = 90;
-               r->out.info->info7.info4.v.high = 0;
+               r->out.info->info7.info4.v = 90;
                break;
        default:
-               r->out.result = NT_STATUS_INVALID_LEVEL;
-               break;
+               return NT_STATUS_INVALID_LEVEL;
        }
 
        return NT_STATUS_OK;
 }
 
-
-
-
-/**************************************************************************
-  all the code below this point is boilerplate that will be auto-generated
-***************************************************************************/
-
-static const dcesrv_dispatch_fn_t dispatch_table[] = {
-       (dcesrv_dispatch_fn_t)echo_AddOne,
-       (dcesrv_dispatch_fn_t)echo_EchoData,
-       (dcesrv_dispatch_fn_t)echo_SinkData,
-       (dcesrv_dispatch_fn_t)echo_SourceData,
-       (dcesrv_dispatch_fn_t)echo_TestCall,
-       (dcesrv_dispatch_fn_t)echo_TestCall2
-};
-
-
-/*
-  return True if we want to handle the given endpoint
-*/
-static BOOL op_query_endpoint(const struct dcesrv_endpoint *ep)
+static NTSTATUS dcesrv_echo_TestEnum(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_TestEnum *r)
 {
-       return dcesrv_table_query(&dcerpc_table_rpcecho, ep);
+       r->out.foo2->e1 = ECHO_ENUM2;
+       return NT_STATUS_OK;
 }
 
-/*
-  setup for a particular rpc interface
-*/
-static BOOL op_set_interface(struct dcesrv_state *dce, const char *uuid, uint32 if_version)
+static NTSTATUS dcesrv_echo_TestSurrounding(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_TestSurrounding *r)
 {
-       if (strcasecmp(uuid, dcerpc_table_rpcecho.uuid) != 0 ||
-           if_version != dcerpc_table_rpcecho.if_version) {
-               DEBUG(2,("Attempt to use unknown interface %s/%d\n", uuid, if_version));
-               return False;
+       if (!r->in.data) {
+               r->out.data = NULL;
+               return NT_STATUS_OK;
        }
 
-       dce->ndr = &dcerpc_table_rpcecho;
-       dce->dispatch = dispatch_table;
+       r->out.data = talloc(mem_ctx, struct echo_Surrounding);
+       if (!r->out.data) {
+               return NT_STATUS_NO_MEMORY;
+       }
+       r->out.data->x = 2 * r->in.data->x;
+       r->out.data->surrounding = talloc_zero_array(mem_ctx, uint16_t, r->out.data->x);
+       if (!r->out.data->surrounding) {
+               return NT_STATUS_NO_MEMORY;
+       }
 
-       return True;
+       return NT_STATUS_OK;
 }
 
-
-/* op_connect is called when a connection is made to an endpoint */
-static NTSTATUS op_connect(struct dcesrv_state *dce)
+static uint16_t dcesrv_echo_TestDoublePointer(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_TestDoublePointer *r) 
 {
-       return NT_STATUS_OK;
+       if (!*r->in.data) 
+               return 0;
+       if (!**r->in.data)
+               return 0;
+       return ***r->in.data;
 }
 
-static void op_disconnect(struct dcesrv_state *dce)
+struct echo_TestSleep_private {
+       struct dcesrv_call_state *dce_call;
+       struct echo_TestSleep *r;
+};
+
+static void echo_TestSleep_handler(struct event_context *ev, struct timed_event *te, 
+                                  struct timeval t, void *private)
 {
-       /* nothing to do */
-}
+       struct echo_TestSleep_private *p = talloc_get_type(private, 
+                                                          struct echo_TestSleep_private);
+       struct echo_TestSleep *r = p->r;
+       NTSTATUS status;
 
+       r->out.result = r->in.seconds;
 
-static const struct dcesrv_endpoint_ops rpc_echo_ops = {
-       op_query_endpoint,
-       op_set_interface,
-       op_connect,
-       op_disconnect
-};
+       status = dcesrv_reply(p->dce_call);
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(0,("echo_TestSleep_handler: dcesrv_reply() failed - %s\n",
+                       nt_errstr(status)));
+       }
+}
 
-/*
-  register with the dcerpc server
-*/
-void rpc_echo_init(struct server_context *smb)
+static long dcesrv_echo_TestSleep(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct echo_TestSleep *r)
 {
-       if (!dcesrv_endpoint_register(smb, &rpc_echo_ops)) {
-               DEBUG(1,("Failed to register rpcecho endpoint\n"));
+       struct echo_TestSleep_private *p;
+
+       if (!(dce_call->state_flags & DCESRV_CALL_STATE_FLAG_MAY_ASYNC)) {
+               /* we're not allowed to reply async */
+               sleep(r->in.seconds);
+               return r->in.seconds;
        }
+
+       /* we're allowed to reply async */
+       p = talloc(mem_ctx, struct echo_TestSleep_private);
+       if (!p) {
+               return 0;
+       }
+
+       p->dce_call     = dce_call;
+       p->r            = r;
+
+       event_add_timed(dce_call->event_ctx, p, 
+                       timeval_add(&dce_call->time, r->in.seconds, 0),
+                       echo_TestSleep_handler, p);
+
+       dce_call->state_flags |= DCESRV_CALL_STATE_FLAG_ASYNC;
+       return 0;
 }
+
+/* include the generated boilerplate */
+#include "librpc/gen_ndr/ndr_echo_s.c"