err.no Git - sope/blob - sope-xml/XmlRpc/XmlRpcRequestEncoder.m

   1 /*
   2   Copyright (C) 2000-2003 SKYRIX Software AG
   3
   4   This file is part of OGo
   5
   6   OGo is free software; you can redistribute it and/or modify it under
   7   the terms of the GNU Lesser General Public License as published by the
   8   Free Software Foundation; either version 2, or (at your option) any
   9   later version.
  10
  11   OGo is distributed in the hope that it will be useful, but WITHOUT ANY
  12   WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13   FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  14   License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with OGo; see the file COPYING.  If not, write to the
  18   Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
  19   02111-1307, USA.
  20 */
  21 // $Id$
  22
  23 #include "XmlRpcCoder.h"
  24 #include "XmlRpcMethodCall.h"
  25 #include "common.h"
  26
  27 @interface XmlRpcEncoder(PrivateMethodes)
  28 - (void)_encodeObject:(id)_object;
  29 - (void)_reset;
  30 @end
  31
  32 @implementation XmlRpcRequestEncoder
  33
  34 - (void)encodeRootObject:(XmlRpcMethodCall *)_methodCall {
  35   NSEnumerator *paramEnum;
  36   id           param;
  37
  38   if (_methodCall == nil) return;
  39
  40   if (![_methodCall isKindOfClass:[XmlRpcMethodCall class]]) {
  41     NSLog(@"%s: Warning: rootObject MUST be a XmlRpcMethodCall\n "
  42           @"(rootObject=%@)",
  43           __PRETTY_FUNCTION__,
  44           _methodCall);
  45     return;
  46   }
  47
  48   [self _reset];
  49
  50   paramEnum = [[_methodCall parameters] objectEnumerator];
  51
  52   [self->string appendString:@"<?xml version='1.0'?>\n"];
  53   [self->string appendString:@"<methodCall>\n"];
  54
  55   [self->string appendString:@"<methodName>"];
  56   [self->string appendString:[_methodCall methodName]];
  57   [self->string appendString:@"</methodName>\n"];
  58
  59   [self->string appendString:@"<params>\n"];
  60
  61   while ((param = [paramEnum nextObject])) {
  62     [self->string appendString:@"<param>\n"];
  63     [self->string appendString:@"<value>\n"];
  64
  65     [self _encodeObject:param];
  66
  67     [self->string appendString:@"</value>\n"];
  68     [self->string appendString:@"</param>\n"];
  69   }
  70
  71   [self->string appendString:@"</params>\n"];
  72
  73   [self->string appendString:@"</methodCall>\n"];
  74 }
  75
  76 @end /* XmlRpcRequestEncoder */