static gboolean
meta1_dispatch_v2_SRVRELINK(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored)
{
GError *err = NULL;
gchar *replaced = NULL, *kept = NULL, **newset = NULL;
struct oio_url_s *url = NULL;
(void) ignored;
url = metautils_message_extract_url (reply->request);
kept = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_OLD);
replaced = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_NOTIN);
gboolean dryrun = metautils_message_extract_flag (reply->request, NAME_MSGKEY_DRYRUN, FALSE);
reply->subject("%s|%s", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID));
if (!url) {
reply->send_error (0, NEWERROR(CODE_BAD_REQUEST, "Missing field (%s)", "url"));
} else {
err = meta1_backend_services_relink (m1, url, kept, replaced, dryrun, &newset);
if (NULL != err) {
reply->send_error (0, err);
} else {
reply->add_body(marshall_stringv_and_clean(&newset));
reply->send_reply (CODE_FINAL_OK, "OK");
}
}
oio_url_pclean (&url);
g_free0 (kept);
g_free0 (replaced);
if (newset) g_strfreev (newset);
return TRUE;
}
static gboolean
meta1_dispatch_v2_SRV_UNLINK(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored)
{
gchar **urlv = NULL;
GError *err;
gchar *srvtype = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_TYPENAME);
struct oio_url_s *url = metautils_message_extract_url (reply->request);
reply->subject("%s|%s|%s", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID), srvtype);
(void) ignored;
if (!srvtype)
reply->send_error(CODE_BAD_REQUEST, NEWERROR(CODE_BAD_REQUEST, "Missing srvtype"));
else if (NULL != (err = metautils_message_extract_body_strv(reply->request, &urlv)))
reply->send_error(CODE_BAD_REQUEST, err);
else if (NULL != (err = meta1_backend_services_unlink(m1, url, srvtype, urlv)))
reply->send_error(0, err);
else
reply->send_reply(CODE_FINAL_OK, "OK");
if (urlv) g_strfreev (urlv);
oio_url_clean (url);
g_free0 (srvtype);
return TRUE;
}
static gboolean
meta1_dispatch_v2_SRV_UNLINK(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored UNUSED)
{
gchar *srvtype = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_TYPENAME);
struct oio_url_s *url = metautils_message_extract_url (reply->request);
reply->subject("%s|%s|%s", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID), srvtype);
if (!srvtype)
reply->send_error(CODE_BAD_REQUEST, NEWERROR(CODE_BAD_REQUEST, "Missing srvtype"));
else {
gsize length = 0;
void *body = metautils_message_get_BODY(reply->request, &length);
gchar **urlv = NULL;
GError *err = STRV_decode_buffer(body, length, &urlv);
if (NULL != err)
reply->send_error(CODE_BAD_REQUEST, err);
else {
err = meta1_backend_services_unlink(m1, url, srvtype, urlv);
if (NULL != err)
reply->send_error(0, err);
else
reply->send_reply(CODE_FINAL_OK, "OK");
g_strfreev (urlv);
}
}
oio_url_clean (url);
g_free0 (srvtype);
return TRUE;
}
static gboolean
meta1_dispatch_v2_SRV_RENEW(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored)
{
struct oio_url_s *url = metautils_message_extract_url (reply->request);
gboolean ac = metautils_message_extract_flag(reply->request, NAME_MSGKEY_AUTOCREATE, FALSE);
gboolean dryrun = metautils_message_extract_flag(reply->request, NAME_MSGKEY_DRYRUN, FALSE);
gchar *srvtype = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_TYPENAME);
reply->subject("%s|%s|%s|%d", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID), srvtype, dryrun);
(void) ignored;
gchar **result = NULL;
GError *err = meta1_backend_services_poll(m1, url, srvtype, ac, dryrun, &result);
if (NULL != err)
reply->send_error(0, err);
else {
reply->add_body(marshall_stringv_and_clean(&result));
reply->send_reply(CODE_FINAL_OK, "OK");
}
if (result) g_strfreev (result);
oio_url_clean(url);
g_free0 (srvtype);
return TRUE;
}
static GError*
_list (const char *target, GByteArray *request,
struct list_result_s *out, gchar ***out_properties)
{
GError *err = NULL;
GTree *props = NULL;
gboolean _cb(gpointer ctx, MESSAGE reply) {
(void) ctx;
/* Extract replied aliases */
GSList *l = NULL;
GError *e = metautils_message_extract_body_encoded(reply, FALSE, &l, bean_sequence_decoder);
if (e) {
GRID_DEBUG("Callback error : %s", e->message);
err = e;
return FALSE;
}
out->beans = metautils_gslist_precat (out->beans, l);
/* Extract list flags */
e = metautils_message_extract_boolean (reply,
NAME_MSGKEY_TRUNCATED, FALSE, &out->truncated);
if (e)
g_clear_error (&e);
gchar *tok = NULL;
tok = metautils_message_extract_string_copy (reply, NAME_MSGKEY_NEXTMARKER);
oio_str_reuse (&out->next_marker, tok);
/* Extract properties and merge them into the temporary TreeSet. */
if (out_properties) {
gchar **names = metautils_message_get_field_names (reply);
for (gchar **n=names ; n && *n ;++n) {
if (!g_str_has_prefix (*n, NAME_MSGKEY_PREFIX_PROPERTY))
continue;
g_tree_replace (props,
g_strdup((*n) + sizeof(NAME_MSGKEY_PREFIX_PROPERTY) - 1),
metautils_message_extract_string_copy(reply, *n));
}
if (names) g_strfreev (names);
}
return TRUE;
}
int
meta2_filter_action_create_container(struct gridd_filter_ctx_s *ctx,
struct gridd_reply_ctx_s *reply)
{
(void) reply;
struct m2v2_create_params_s params = {NULL,NULL,NULL,0};
struct meta2_backend_s *m2b = meta2_filter_ctx_get_backend(ctx);
struct hc_url_s *url = meta2_filter_ctx_get_url(ctx);
GError *err = NULL;
int retry = 2;
params.storage_policy = meta2_filter_ctx_get_param(ctx, NAME_MSGKEY_STGPOLICY);
params.version_policy = meta2_filter_ctx_get_param(ctx, NAME_MSGKEY_VERPOLICY);
params.local = (meta2_filter_ctx_get_param(ctx, NAME_MSGKEY_LOCAL) != NULL);
gchar **headers = metautils_message_get_field_names (reply->request);
GPtrArray *tmp = g_ptr_array_new ();
for (gchar **p=headers; *p ;++p) {
if (!g_str_has_prefix(*p, NAME_MSGKEY_PREFIX_PROPERTY))
continue;
g_ptr_array_add (tmp, g_strdup((*p) + sizeof(NAME_MSGKEY_PREFIX_PROPERTY) - 1));
g_ptr_array_add (tmp, metautils_message_extract_string_copy (reply->request, *p));
}
params.properties = (gchar**) metautils_gpa_to_array (tmp, TRUE);
g_strfreev (headers);
headers = NULL;
retry:
err = meta2_backend_create_container(m2b, url, ¶ms);
if (err != NULL && err->code == CODE_REDIRECT && retry-- > 0 &&
!g_strcmp0(err->message, meta2_backend_get_local_addr(m2b))) {
GRID_WARN("Redirecting on myself!?! Retrying request immediately");
g_clear_error(&err);
hc_decache_reference_service(m2b->resolver, url, NAME_SRVTYPE_META2);
goto retry;
}
g_strfreev (params.properties);
params.properties = NULL;
if (!err)
return FILTER_OK;
meta2_filter_ctx_set_error(ctx, err);
return FILTER_KO;
}
static gboolean
field_extractor(GError **e, gpointer u, gint code, MESSAGE r)
{
(void) code;
if (!r) {
GSETERROR(e, "invalid parameter");
return FALSE;
}
gchar **fields = metautils_message_get_field_names (r);
if (fields) {
for (gchar **field=fields; *field ;field++) {
gchar *str_val = NULL;
gdouble val;
if (!g_str_has_prefix(*field, MSGFIELD_STATPREFIX))
continue;
if (!(str_val = metautils_message_extract_string_copy(r, *field)))
continue;
if (strchr(str_val, '.'))
val = g_ascii_strtod (str_val, NULL);
else {
gint64 i64 = g_ascii_strtoll(str_val, NULL, 10);
val = i64;
}
g_free(str_val);
if (errno==ERANGE) {
WARN("wrong stat for '%s' : overflow/underflow", *field);
continue;
}
g_hash_table_insert(*((GHashTable**)u),
g_strdup((*field) + strlen(MSGFIELD_STATPREFIX)),
g_memdup(&val, sizeof(val)));
}
}
g_strfreev(fields);
return TRUE;
}
static gboolean
meta1_dispatch_v2_SRV_LIST(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored UNUSED)
{
struct oio_url_s *url = metautils_message_extract_url (reply->request);
gchar *srvtype = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_TYPENAME);
reply->subject("%s|%s|%s", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID), srvtype);
STRING_STACKIFY(srvtype);
gchar **result = NULL;
GError *err = meta1_backend_services_list(m1, url, srvtype, &result);
if (NULL != err)
reply->send_error(0, err);
else {
reply->add_body(encode_and_clean(STRV_encode_gba, result));
reply->send_reply(CODE_FINAL_OK, "OK");
}
oio_url_clean (url);
return TRUE;
}
static gboolean
meta1_dispatch_v2_SRV_LIST(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored)
{
GError *err;
gchar **result = NULL;
struct oio_url_s *url = metautils_message_extract_url (reply->request);
gchar *srvtype = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_TYPENAME);
reply->subject("%s|%s|%s", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID), srvtype);
(void) ignored;
if (NULL != (err = meta1_backend_services_list(m1, url, srvtype, &result)))
reply->send_error(0, err);
else {
reply->add_body(marshall_stringv_and_clean(&result));
reply->send_reply(CODE_FINAL_OK, "OK");
}
if (result) g_strfreev (result);
oio_url_clean (url);
g_free0 (srvtype);
return TRUE;
}
struct oio_url_s *
metautils_message_extract_url (MESSAGE m)
{
struct oio_url_s *url = oio_url_empty ();
for (struct map_s *p = url2msg_map; p->f ;++p) {
// TODO call really often, so make it zero-copy
gchar *s = metautils_message_extract_string_copy (m, p->f);
if (s) {
if (!p->avoid || strcmp(p->avoid, s))
oio_url_set (url, p->u, s);
g_free0 (s);
}
}
container_id_t cid;
GError *e = metautils_message_extract_cid (m, NAME_MSGKEY_CONTAINERID, &cid);
if (e)
g_clear_error (&e);
else
oio_url_set_id (url, cid);
return url;
}
static gboolean
meta1_dispatch_v2_SRV_LINK(struct gridd_reply_ctx_s *reply,
struct meta1_backend_s *m1, gpointer ignored UNUSED)
{
struct oio_url_s *url = metautils_message_extract_url (reply->request);
gchar *srvtype = metautils_message_extract_string_copy (reply->request, NAME_MSGKEY_TYPENAME);
gboolean dryrun = metautils_message_extract_flag(reply->request, NAME_MSGKEY_DRYRUN, FALSE);
gboolean autocreate = metautils_message_extract_flag(reply->request, NAME_MSGKEY_AUTOCREATE, FALSE);
reply->subject("%s|%s|%s|%d", oio_url_get(url, OIOURL_WHOLE), oio_url_get(url, OIOURL_HEXID), srvtype, dryrun);
gchar **result = NULL;
GError *err = meta1_backend_services_link (m1, url, srvtype, dryrun, autocreate, &result);
if (NULL != err)
reply->send_error(0, err);
else {
reply->add_body(encode_and_clean(STRV_encode_gba, result));
reply->send_reply(CODE_FINAL_OK, "OK");
}
oio_url_clean(url);
g_free0 (srvtype);
return TRUE;
}
