subset.c

Go to the documentation of this file.

 
#include "config.h"
#include <limits.h>
#include <stdint.h>
#include <stdio.h>
#include "mutt/lib.h"
#include "subset.h"
#include "set.h"
 
struct Notify;
 
static const struct Mapping ConfigEventNames[] = {
  // clang-format off
  { "NT_CONFIG_SET",     NT_CONFIG_SET     },
  { "NT_CONFIG_RESET",   NT_CONFIG_RESET   },
  { "NT_CONFIG_DELETED", NT_CONFIG_DELETED },
  { NULL, 0 },
  // clang-format on
};
 
int elem_list_sort(const void *a, const void *b, void *sdata)
{
  if (!a || !b)
    return 0;
 
  const struct HashElem *hea = *(struct HashElem const *const *) a;
  const struct HashElem *heb = *(struct HashElem const *const *) b;
 
  return mutt_istr_cmp(hea->key.strkey, heb->key.strkey);
}
 
struct HashElem **get_elem_list(struct ConfigSet *cs)
{
  if (!cs)
    return NULL;
 
  struct HashElem **he_list = MUTT_MEM_CALLOC(1024, struct HashElem *);
  size_t index = 0;
 
  struct HashWalkState walk = { 0 };
  struct HashElem *he = NULL;
 
  while ((he = mutt_hash_walk(cs->hash, &walk)))
  {
    he_list[index++] = he;
    if (index == 1022)
      break; /* LCOV_EXCL_LINE */
  }
 
  mutt_qsort_r(he_list, index, sizeof(struct HashElem *), elem_list_sort, NULL);
 
  return he_list;
}
 
void cs_subset_free(struct ConfigSubset **ptr)
{
  if (!ptr || !*ptr)
    return;
 
  struct ConfigSubset *sub = *ptr;
 
  struct EventConfig ev_c = { sub, NULL, NULL };
  mutt_debug(LL_NOTIFY, "NT_CONFIG_DELETED: ALL\n");
  notify_send(sub->notify, NT_CONFIG, NT_CONFIG_DELETED, &ev_c);
 
  if (sub->cs && sub->name)
  {
    char scope[256] = { 0 };
    snprintf(scope, sizeof(scope), "%s:", sub->name);
 
    // We don't know if any config items have been set,
    // so search for anything with a matching scope.
    struct HashElem **he_list = get_elem_list(sub->cs);
    for (size_t i = 0; he_list[i]; i++)
    {
      const char *item = he_list[i]->key.strkey;
      if (mutt_str_startswith(item, scope) != 0)
      {
        cs_uninherit_variable(sub->cs, item);
      }
    }
    FREE(&he_list);
  }
 
  notify_free(&sub->notify);
  FREE(&sub->name);
  FREE(ptr);
}
 
struct ConfigSubset *cs_subset_new(const char *name, struct ConfigSubset *sub_parent,
                                   struct Notify *not_parent)
{
  struct ConfigSubset *sub = MUTT_MEM_CALLOC(1, struct ConfigSubset);
 
  if (sub_parent)
  {
    sub->parent = sub_parent;
    sub->cs = sub_parent->cs;
  }
 
  if (name)
  {
    char scope[256] = { 0 };
 
    if (sub_parent && sub_parent->name)
      snprintf(scope, sizeof(scope), "%s:%s", sub_parent->name, name);
    else
      mutt_str_copy(scope, name, sizeof(scope));
 
    sub->name = mutt_str_dup(scope);
  }
 
  sub->notify = notify_new();
  notify_set_parent(sub->notify, not_parent);
 
  return sub;
}
 
struct HashElem *cs_subset_lookup(const struct ConfigSubset *sub, const char *name)
{
  if (!sub || !name)
    return NULL;
 
  char scope[256] = { 0 };
  if (sub->name)
    snprintf(scope, sizeof(scope), "%s:%s", sub->name, name);
  else
    mutt_str_copy(scope, name, sizeof(scope));
 
  return cs_get_elem(sub->cs, scope);
}
 
struct HashElem *cs_subset_create_inheritance(const struct ConfigSubset *sub, const char *name)
{
  if (!sub)
    return NULL;
 
  struct HashElem *he = cs_subset_lookup(sub, name);
  if (he)
    return he;
 
  if (sub->parent)
  {
    // Create parent before creating name
    he = cs_subset_create_inheritance(sub->parent, name);
  }
 
  if (!he)
    return NULL;
 
  char scope[256] = { 0 };
  snprintf(scope, sizeof(scope), "%s:%s", sub->name, name);
  return cs_inherit_variable(sub->cs, he, scope);
}
 
void cs_subset_notify_observers(const struct ConfigSubset *sub,
                                struct HashElem *he, enum NotifyConfig ev)
{
  if (!sub || !he)
    return;
 
  struct HashElem *he_base = cs_get_base(he);
  struct EventConfig ev_c = { sub, he_base->key.strkey, he };
  mutt_debug(LL_NOTIFY, "%s: %s\n",
             NONULL(mutt_map_get_name(ev, ConfigEventNames)), he_base->key.strkey);
  notify_send(sub->notify, NT_CONFIG, ev, &ev_c);
}
 
intptr_t cs_subset_he_native_get(const struct ConfigSubset *sub,
                                 struct HashElem *he, struct Buffer *err)
{
  if (!sub)
    return INT_MIN;
 
  return cs_he_native_get(sub->cs, he, err);
}
 
int cs_subset_he_native_set(const struct ConfigSubset *sub, struct HashElem *he,
                            intptr_t value, struct Buffer *err)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  int rc = cs_he_native_set(sub->cs, he, value, err);
 
  if ((CSR_RESULT(rc) == CSR_SUCCESS) && !(rc & CSR_SUC_NO_CHANGE))
    cs_subset_notify_observers(sub, he, NT_CONFIG_SET);
 
  return rc;
}
 
int cs_subset_str_native_set(const struct ConfigSubset *sub, const char *name,
                             intptr_t value, struct Buffer *err)
{
  struct HashElem *he = cs_subset_create_inheritance(sub, name);
 
  return cs_subset_he_native_set(sub, he, value, err);
}
 
int cs_subset_he_reset(const struct ConfigSubset *sub, struct HashElem *he, struct Buffer *err)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  int rc = cs_he_reset(sub->cs, he, err);
 
  if ((CSR_RESULT(rc) == CSR_SUCCESS) && !(rc & CSR_SUC_NO_CHANGE))
    cs_subset_notify_observers(sub, he, NT_CONFIG_RESET);
 
  return rc;
}
 
int cs_subset_he_string_get(const struct ConfigSubset *sub, struct HashElem *he,
                            struct Buffer *result)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  return cs_he_string_get(sub->cs, he, result);
}
 
int cs_subset_str_string_get(const struct ConfigSubset *sub, const char *name,
                             struct Buffer *result)
{
  struct HashElem *he = cs_subset_create_inheritance(sub, name);
 
  return cs_subset_he_string_get(sub, he, result);
}
 
int cs_subset_he_string_set(const struct ConfigSubset *sub, struct HashElem *he,
                            const char *value, struct Buffer *err)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  int rc = cs_he_string_set(sub->cs, he, value, err);
 
  if ((CSR_RESULT(rc) == CSR_SUCCESS) && !(rc & CSR_SUC_NO_CHANGE))
    cs_subset_notify_observers(sub, he, NT_CONFIG_SET);
 
  return rc;
}
 
int cs_subset_str_string_set(const struct ConfigSubset *sub, const char *name,
                             const char *value, struct Buffer *err)
{
  struct HashElem *he = cs_subset_create_inheritance(sub, name);
 
  return cs_subset_he_string_set(sub, he, value, err);
}
 
int cs_subset_he_string_plus_equals(const struct ConfigSubset *sub, struct HashElem *he,
                                    const char *value, struct Buffer *err)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  int rc = cs_he_string_plus_equals(sub->cs, he, value, err);
 
  if ((CSR_RESULT(rc) == CSR_SUCCESS) && !(rc & CSR_SUC_NO_CHANGE))
    cs_subset_notify_observers(sub, he, NT_CONFIG_SET);
 
  return rc;
}
 
int cs_subset_he_string_minus_equals(const struct ConfigSubset *sub, struct HashElem *he,
                                     const char *value, struct Buffer *err)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  int rc = cs_he_string_minus_equals(sub->cs, he, value, err);
 
  if ((CSR_RESULT(rc) == CSR_SUCCESS) && !(rc & CSR_SUC_NO_CHANGE))
    cs_subset_notify_observers(sub, he, NT_CONFIG_SET);
 
  return rc;
}
 
int cs_subset_he_delete(const struct ConfigSubset *sub, struct HashElem *he, struct Buffer *err)
{
  if (!sub)
    return CSR_ERR_CODE;
 
  const char *name = mutt_str_dup(he->key.strkey);
  int rc = cs_he_delete(sub->cs, he, err);
 
  if (CSR_RESULT(rc) == CSR_SUCCESS)
  {
    struct EventConfig ev_c = { sub, name, NULL };
    mutt_debug(LL_NOTIFY, "NT_CONFIG_DELETED: %s\n", name);
    notify_send(sub->notify, NT_CONFIG, NT_CONFIG_DELETED, &ev_c);
  }
 
  FREE(&name);
  return rc;
}