+static struct dc_fnetpeerdatum *finddatum(struct dc_fnetnode *fn, wchar_t *id)
+{
+ struct dc_fnetpeerdatum *datum;
+
+ for(datum = fn->peerdata; datum != NULL; datum = datum->next)
+ {
+ if(!wcscmp(datum->id, id))
+ break;
+ }
+ return(datum);
+}
+
+static struct dc_fnetpeerdatum *adddatum(struct dc_fnetnode *fn, wchar_t *id, int dt)
+{
+ struct dc_fnetpeerdatum *datum;
+
+ datum = smalloc(sizeof(*datum));
+ memset(datum, 0, sizeof(*datum));
+ datum->refcount = 0;
+ datum->dt = dt;
+ datum->id = swcsdup(id);
+ datum->prev = NULL;
+ datum->next = fn->peerdata;
+ if(fn->peerdata != NULL)
+ fn->peerdata->prev = datum;
+ fn->peerdata = datum;
+ return(datum);
+}
+
+static struct dc_fnetpeerdi *difindoradd(struct dc_fnetpeer *peer, struct dc_fnetpeerdatum *datum)
+{
+ int i;
+
+ for(i = 0; i < peer->dinum; i++)
+ {
+ if(peer->di[i].datum == datum)
+ return(&peer->di[i]);
+ }
+ peer->di = srealloc(peer->di, sizeof(struct dc_fnetpeerdi) * ++(peer->dinum));
+ memset(&peer->di[i], 0, sizeof(struct dc_fnetpeerdi));
+ peer->di[i].datum = datum;
+ datum->refcount++;
+ return(&peer->di[i]);
+}
+
+static void putdatum(struct dc_fnetnode *fn, struct dc_fnetpeerdatum *datum)
+{
+ if(--datum->refcount > 0)
+ return;
+ if(datum->next != NULL)
+ datum->next->prev = datum->prev;
+ if(datum->prev != NULL)
+ datum->prev->next = datum->next;
+ if(fn->peerdata == datum)
+ fn->peerdata = datum->next;
+ free(datum->id);
+ free(datum);
+}
+
+static void peersetnum(struct dc_fnetpeer *peer, wchar_t *id, int value)
+{
+ struct dc_fnetpeerdatum *datum;
+ struct dc_fnetpeerdi *di;
+
+ if((datum = finddatum(peer->fn, id)) == NULL)
+ datum = adddatum(peer->fn, id, DC_FNPD_INT);
+ di = difindoradd(peer, datum);
+ di->d.num = value;
+}
+
+static void peersetlnum(struct dc_fnetpeer *peer, wchar_t *id, long long value)
+{
+ struct dc_fnetpeerdatum *datum;
+ struct dc_fnetpeerdi *di;
+
+ if((datum = finddatum(peer->fn, id)) == NULL)
+ datum = adddatum(peer->fn, id, DC_FNPD_INT);
+ di = difindoradd(peer, datum);
+ di->d.lnum = value;
+}
+
+static void peersetstr(struct dc_fnetpeer *peer, wchar_t *id, wchar_t *value)
+{
+ struct dc_fnetpeerdatum *datum;
+ struct dc_fnetpeerdi *di;
+
+ if((datum = finddatum(peer->fn, id)) == NULL)
+ datum = adddatum(peer->fn, id, DC_FNPD_INT);
+ di = difindoradd(peer, datum);
+ if(di->d.str != NULL)
+ free(di->d.str);
+ di->d.str = swcsdup(value);
+}
+
+struct dc_fnetpeer *dc_fnetfindpeer(struct dc_fnetnode *fn, wchar_t *id)
+{
+ struct dc_fnetpeer *peer;
+
+ for(peer = fn->peers; peer != NULL; peer = peer->next)
+ {
+ if(!wcscmp(peer->id, id))
+ break;
+ }
+ return(peer);
+}
+
+static struct dc_fnetpeer *addpeer(struct dc_fnetnode *fn, wchar_t *id, wchar_t *nick)
+{
+ struct dc_fnetpeer *peer;
+
+ peer = smalloc(sizeof(*peer));
+ memset(peer, 0, sizeof(*peer));
+ peer->fn = fn;
+ peer->id = swcsdup(id);
+ peer->nick = swcsdup(nick);
+ peer->next = fn->peers;
+ peer->prev = NULL;
+ if(fn->peers != NULL)
+ fn->peers->prev = peer;
+ fn->peers = peer;
+ return(peer);
+}
+
+static void delpeer(struct dc_fnetpeer *peer)
+{
+ int i;
+
+ if(peer->next != NULL)
+ peer->next->prev = peer->prev;
+ if(peer->prev != NULL)
+ peer->prev->next = peer->next;
+ if(peer->fn->peers == peer)
+ peer->fn->peers = peer->next;
+ free(peer->id);
+ free(peer->nick);
+ for(i = 0; i < peer->dinum; i++)
+ {
+ if((peer->di[i].datum->dt == DC_FNPD_STR) && (peer->di[i].d.str != NULL))
+ free(peer->di[i].d.str);
+ putdatum(peer->fn, peer->di[i].datum);
+ }
+ free(peer);
+}
+