]> err.no Git - sope/blob - sope-appserver/NGXmlRpc/EOKeyGlobalID+XmlRpcCoding.m
bumped all dylib versions to be in sync with the gs-make process. Provided a shell...
[sope] / sope-appserver / NGXmlRpc / EOKeyGlobalID+XmlRpcCoding.m
1 /*
2   Copyright (C) 2000-2004 SKYRIX Software AG
3
4   This file is part of OpenGroupware.org.
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
22 #include <EOControl/EOKeyGlobalID.h>
23 #include "common.h"
24 #include <XmlRpc/XmlRpcCoder.h>
25
26 @implementation EOKeyGlobalID(XmlRpcCoding)
27
28 - (id)initWithXmlRpcCoder:(XmlRpcDecoder *)_coder {
29   EOKeyGlobalID *globalID;
30   NSString      *name;
31   NSArray       *keyVals;
32   int           i, cnt;
33   id            *vals;
34
35   name    = [_coder decodeStringForKey:@"entityName"];
36   keyVals = [_coder decodeArrayForKey:@"keyValues"];
37   cnt     = [keyVals count];
38
39   vals = calloc(cnt, sizeof(id));
40   
41   for (i = 0; i < cnt; i++)
42     vals[i] = [keyVals objectAtIndex:i];
43   
44   globalID = [EOKeyGlobalID globalIDWithEntityName:name
45                             keys:vals
46                             keyCount:cnt
47                             zone:[self zone]];
48
49   free(vals); vals = NULL;
50   
51   [self release];
52   return [globalID retain];
53 }
54
55 - (void)encodeWithXmlRpcCoder:(XmlRpcEncoder *)_coder {
56   [_coder encodeString:[self entityName]    forKey:@"entityName"];
57   [_coder encodeArray:[self keyValuesArray] forKey:@"keyValues"];
58 }
59
60 @end /* EOKeyGlobalID(XmlRpcCoding) */