XMPP: add X-Macros to automated parse tokens

[citadel.git] / citadel / modules / xmpp / xmpp_xmacros.c

diff --git a/citadel/modules/xmpp/xmpp_xmacros.c b/citadel/modules/xmpp/xmpp_xmacros.c
new file mode 100644 (file)
index 0000000..3366cbc
--- /dev/null
+++ b/citadel/modules/xmpp/xmpp_xmacros.c
@@ -0,0 +1,101 @@
+#include <stdio.h>
+#include <expat.h>
+#include <libcitadel.h>
+#include "ctdl_module.h"
+#include "serv_xmpp.h"
+
+void *GetToken_iq(void)
+{
+       return &XMPP->IQ;
+}
+void *GetToken_piq(void)
+{
+       return NULL;
+}
+
+
+#define STRPROP(STRUCTNAME, NAME)                                      \
+       if (StrLength(pdata->NAME) > 0)                                 \
+       {                                                               \
+       XPut(#NAME, sizeof(#NAME) - 1);                                 \
+       XPut("=\"", 2);                                                 \
+       XPutProp(SKEY(pdata->NAME));                                    \
+       XPut("\" ", 2);                                                 \
+       }
+
+#define THENAMESPACE(STRUCTNAME, NAME)                                 \
+       XPut(#NAME, sizeof(#NAME) - 1);                                 \
+       XPut("=\"", 2);                                                 \
+       XPutProp(NAMESPACE_##STRUCTNAME,                                \
+                sizeof(NAMESPACE_##STRUCTNAME)-1);                     \
+       XPut("\" ", 2);                                                 
+
+#define TOKEN(NAME, STRUCT)                                            \
+       void serialize_##NAME(TheToken_##NAME *pdata, int Close)        \
+       {                                                               \
+       XPUT("<");                                                      \
+       XPut(#NAME, sizeof(#NAME));                                     \
+       XPUT(" ");                                                      \
+       STRUCT ;                                                        \
+       XPUT(">");                                                      \
+       if (Close)                                                      \
+       {                                                               \
+               XPut("</", 2);                                          \
+               XPut(#NAME, sizeof(#NAME));                             \
+               XPut(">", 1);                                           \
+       }                                                               \
+       }
+
+#include "token.def"
+#undef STRPROP
+#undef TOKEN
+
+
+#define STRPROP(STRUCTNAME, NAME)                                      \
+       FreeStrBuf(&pdata->NAME);
+
+#define TOKEN(NAME, STRUCT)                                            \
+       void free_buf_##NAME(TheToken_##NAME *pdata)                    \
+       {                                                               \
+               STRUCT ;                                                \
+       }
+
+#include "token.def"
+#undef STRPROP
+#undef TOKEN
+
+#define TOKEN(NAME, STRUCT)                                            \
+       void free_##NAME(TheToken_##NAME *pdata)                        \
+       {                                                               \
+               free_buf_##NAME(pdata);                                 \
+               free(pdata);                                            \
+       }
+
+#include "token.def"
+#undef STRPROP
+#undef TOKEN
+
+
+
+CTDL_MODULE_INIT(xmpp_xmacros)
+{
+       if (!threading) {
+#define STRPROP(TOKENNAME, PROPERTYNAME)                               \
+               long offset##PROPERTYNAME =                             \
+                       offsetof(TheToken_##TOKENNAME, PROPERTYNAME);   \
+               XMPP_RegisterTokenProperty(                             \
+                       NAMESPACE_##TOKENNAME,                          \
+                       sizeof(NAMESPACE_##TOKENNAME)-1,                \
+                       #TOKENNAME, sizeof(#TOKENNAME)-1,               \
+                       #PROPERTYNAME, sizeof(#PROPERTYNAME)-1,         \
+                       GetToken_##TOKENNAME,                           \
+                       offset##PROPERTYNAME);
+#define TOKEN(NAME, STRUCT) STRUCT
+#include "token.def"
+#undef STRPROP
+#undef TOKEN
+       }
+
+       /* return our module name for the log */
+       return "xmpp_xmacros";
+}