serial.c

Go to the documentation of this file.

 
#include "config.h"
#include <limits.h>
#include <stdbool.h>
#include <stddef.h>
#include <stdint.h>
#include "mutt/lib.h"
#include "debug/lib.h"
#include "serial.h"
#include "expando.h"
#include "node.h"
#include "node_conddate.h"
#include "node_condition.h"
#include "node_padding.h"
 
static void dump_node(const struct ExpandoNode *node, struct Buffer *buf);
 
static void dump_did_uid(const struct ExpandoNode *node, struct Buffer *buf)
{
  const char *did = name_expando_domain(node->did);
  const char *uid = name_expando_uid(node->did, node->uid);
  buf_add_printf(buf, "(%s,%s)", did, uid);
}
 
static void dump_node_condition(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<COND");
 
  // dump_did_uid(node, buf);
 
  // These shouldn't happen
  if (node->text)
    buf_add_printf(buf, ",text=%s", node->text);
 
  struct ExpandoNode *node_cond = node_get_child(node, ENC_CONDITION);
  struct ExpandoNode *node_true = node_get_child(node, ENC_TRUE);
  struct ExpandoNode *node_false = node_get_child(node, ENC_FALSE);
 
  ASSERT(node_cond);
  buf_addstr(buf, ":");
  dump_node(node_cond, buf);
  buf_addstr(buf, "|");
  dump_node(node_true, buf);
  buf_addstr(buf, "|");
  dump_node(node_false, buf);
 
  const struct ExpandoFormat *fmt = node->format;
  if (fmt)
  {
    const char *just = name_format_justify(fmt->justification);
    if (fmt->max_cols == INT_MAX)
      buf_add_printf(buf, ":{%d,MAX,%s,'%c'}", fmt->min_cols, just + 8, fmt->leader);
    else
      buf_add_printf(buf, ":{%d,%d,%s,'%c'}", fmt->min_cols, fmt->max_cols,
                     just + 8, fmt->leader);
  }
 
  buf_addstr(buf, ">");
}
 
static void dump_node_condbool(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<BOOL");
  dump_did_uid(node, buf);
 
  ASSERT(node->ndata != NULL);
  ASSERT(node->ndata_free != NULL);
 
  buf_addstr(buf, ">");
}
 
static void dump_node_conddate(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<DATE:");
 
  dump_did_uid(node, buf);
 
  ASSERT(node->ndata);
  ASSERT(node->ndata_free);
  struct NodeCondDatePrivate *priv = node->ndata;
  buf_add_printf(buf, ":%d:%c", priv->count, priv->period);
 
  // These shouldn't happen
  if (node->text)
    buf_add_printf(buf, ",text=%s", node->text);
 
  buf_addstr(buf, ">");
}
 
static void dump_node_container(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<CONT:");
 
  struct ExpandoNode **np = NULL;
  ARRAY_FOREACH(np, &node->children)
  {
    if (!np || !*np)
      continue;
 
    dump_node(*np, buf);
  }
 
  buf_addstr(buf, ">");
}
 
static void dump_node_empty(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<EMPTY");
 
  // These shouldn't happen
  if (node->did != 0)
    buf_add_printf(buf, ",did=%d", node->did);
  if (node->uid != 0)
    buf_add_printf(buf, ",uid=%d", node->uid);
  if (node->text)
    buf_add_printf(buf, ",text=%s", node->text);
  if (node->ndata)
    buf_add_printf(buf, ",ndata=%p", node->ndata);
  if (node->ndata_free)
    buf_add_printf(buf, ",ndata_free=%p", (void *) (intptr_t) node->ndata_free);
 
  buf_addstr(buf, ">");
}
 
static void dump_node_expando(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<EXP:");
 
  if (node->text)
    buf_add_printf(buf, "'%s'", node->text);
 
  ASSERT(node->did != 0);
  ASSERT(node->uid != 0);
  dump_did_uid(node, buf);
 
  ASSERT(node->ndata);
  ASSERT(node->ndata_free);
 
  const struct ExpandoFormat *fmt = node->format;
  if (fmt)
  {
    const char *just = name_format_justify(fmt->justification);
    if (fmt->max_cols == INT_MAX)
      buf_add_printf(buf, ":{%d,MAX,%s,'%c'}", fmt->min_cols, just + 8, fmt->leader);
    else
      buf_add_printf(buf, ":{%d,%d,%s,'%c'}", fmt->min_cols, fmt->max_cols,
                     just + 8, fmt->leader);
  }
 
  // These shouldn't happen
  // if (node->ndata)
  //   buf_add_printf(buf, ",ndata=%p", node->ndata);
  // if (node->ndata_free)
  //   buf_add_printf(buf, ",ndata_free=%p", (void *) (intptr_t) node->ndata_free);
 
  buf_addstr(buf, ">");
}
 
static void dump_node_padding(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<PAD:");
 
  ASSERT(node->ndata);
  ASSERT(node->ndata_free);
  struct NodePaddingPrivate *priv = node->ndata;
 
  struct ExpandoNode *left = node_get_child(node, ENP_LEFT);
  struct ExpandoNode *right = node_get_child(node, ENP_RIGHT);
 
  const char *pt = name_expando_pad_type(priv->pad_type);
  pt += 4; // Skip "EPT_" prefix
  buf_add_printf(buf, "%s:", pt);
 
  ASSERT(node->text);
  buf_add_printf(buf, "'%s'", node->text);
 
  buf_addstr(buf, ":");
  dump_node(left, buf);
  buf_addstr(buf, "|");
  dump_node(right, buf);
 
  // buf_add_printf(buf, ":(%s,%zu)", priv->buffer_start, priv->buffer_len);
 
  // These shouldn't happen
  // if (node->did != 0)
  //   buf_add_printf(buf, ",did=%d", node->did);
  // if (node->uid != 0)
  //   buf_add_printf(buf, ",uid=%d", node->uid);
 
  buf_addstr(buf, ">");
}
 
static void dump_node_text(const struct ExpandoNode *node, struct Buffer *buf)
{
  buf_addstr(buf, "<TEXT:");
 
  ASSERT(node->text);
  buf_add_printf(buf, "'%s'", node->text);
 
  // These shouldn't happen
  // if (node->did != 0)
  //   buf_add_printf(buf, ",did=%d", node->did);
  // if (node->uid != 0)
  //   buf_add_printf(buf, ",uid=%d", node->uid);
  if (node->ndata)
    buf_add_printf(buf, ",ndata=%p", node->ndata);
  if (node->ndata_free)
    buf_add_printf(buf, ",ndata_free=%p", (void *) (intptr_t) node->ndata_free);
 
  buf_addstr(buf, ">");
}
 
static void dump_node(const struct ExpandoNode *node, struct Buffer *buf)
{
  if (!node || !buf)
    return;
 
  switch (node->type)
  {
    case ENT_CONDITION:
      dump_node_condition(node, buf);
      break;
    case ENT_CONDBOOL:
      dump_node_condbool(node, buf);
      break;
    case ENT_CONDDATE:
      dump_node_conddate(node, buf);
      break;
    case ENT_CONTAINER:
      dump_node_container(node, buf);
      break;
    case ENT_EMPTY:
      dump_node_empty(node, buf);
      break;
    case ENT_EXPANDO:
      dump_node_expando(node, buf);
      break;
    case ENT_PADDING:
      dump_node_padding(node, buf);
      break;
    case ENT_TEXT:
      dump_node_text(node, buf);
      break;
    default:
      ASSERT(false);
  }
}
 
void expando_serialise(const struct Expando *exp, struct Buffer *buf)
{
  if (!exp || !buf)
    return;
 
  dump_node(exp->node, buf);
}