sym.c

   1 /*
   2  *      Hic Est Leo -- Symbols
   3  *
   4  *      (c) 2014--2015 Martin Mares <mj@ucw.cz>
   5  */
   6
   7 #include <ucw/lib.h>
   8 #include <ucw/gary.h>
   9 #include <ucw/mempool.h>
  10 #include <ucw/stkstring.h>
  11
  12 #include <stdio.h>
  13
  14 #include "leo.h"
  15 #include "osm.h"
  16 #include "style.h"
  17 #include "sym.h"
  18
  19 #undef CLAMP            // FIXME: Fix in libucw?
  20 #define CLAMP(x,min,max) ({ typeof(x) _t=x; (_t < min) ? min : (_t > max) ? max : _t; })        /** Clip a number @x to interval [@min,@max] **/
  21
  22 static struct symbolizer *symbolizers[SYMBOLIZER_MAX] = {
  23   [SYMBOLIZER_INVALID] = NULL,
  24   [SYMBOLIZER_POINT] = &symbolizer_point,
  25   [SYMBOLIZER_ICON] = &symbolizer_icon,
  26   [SYMBOLIZER_LINE] = &symbolizer_line,
  27   [SYMBOLIZER_AREA] = &symbolizer_area,
  28   [SYMBOLIZER_TEXT] = &symbolizer_text,
  29   [SYMBOLIZER_LINEIMG] = &symbolizer_lineimg,
  30   [SYMBOLIZER_SCALE] = &symbolizer_scale,
  31 };
  32
  33 struct mempool *sym_mp;
  34
  35 struct sym_planned {
  36   struct symbol *sym;
  37   z_index_t zindex;
  38 };
  39
  40 static struct sym_planned *sym_planned;
  41
  42 static inline bool sym_before(struct sym_planned *x, struct sym_planned *y)
  43 {
  44   COMPARE_LT(x->zindex, y->zindex);
  45   COMPARE_LT(x->sym->o->type, y->sym->o->type);
  46   COMPARE_LT(x->sym->o->id, y->sym->o->id);
  47   return 0;
  48 }
  49
  50 #define ASORT_PREFIX(x) sym_##x
  51 #define ASORT_KEY_TYPE struct sym_planned
  52 #define ASORT_LT(_x,_y) sym_before(&(_x), &(_y))
  53 #include <ucw/sorter/array-simple.h>
  54
  55 void sym_init(void)
  56 {
  57   sym_mp = mp_new(65536);
  58   GARY_INIT(sym_planned, 0);
  59
  60   for (uns i = SYMBOLIZER_INVALID + 1; i < SYMBOLIZER_MAX; i++)
  61     if (symbolizers[i]->init)
  62       (*symbolizers[i]->init)();
  63 }
  64
  65 void *sym_new(enum symbolizer_type type, struct osm_object *o, size_t size)
  66 {
  67   struct symbol *s = mp_alloc_zero(sym_mp, size);
  68   s->type = type;
  69   s->o = o;
  70   return s;
  71 }
  72
  73 void sym_plan(struct symbol *sym, z_index_t zindex)
  74 {
  75   struct sym_planned *p = GARY_PUSH(sym_planned);
  76   p->sym = sym;
  77   p->zindex = zindex;
  78   if (debug_dump_symbols)
  79     printf("--> planning symbol <%s> with z-index %u for %s\n",
  80       symbolizers[sym->type]->name, zindex, STK_OSM_NAME(sym->o));
  81 }
  82
  83 z_index_t sym_zindex(struct osm_object *o, struct style_info *si, double default_mzi)
  84 {
  85   double zi = 0;
  86   style_get_number(si, PROP_Z_INDEX, &zi);
  87   double zi2 = CLAMP(zi, -100, 100);
  88   if (zi2 != zi)
  89     osm_obj_warn(o, "z-index clipped from %.6g to %.6g", zi, zi2);
  90
  91 #if 0
  92   // FIXME: object-z-index not used yet
  93   double ozi = 0;
  94   style_get_number(si, PROP_OBJECT_Z_INDEX, &ozi);
  95   double ozi2 = CLAMP(ozi, -100, 100);
  96   if (ozi2 != ozi)
  97     osm_obj_warn(o, "object-z-index clipped from %.6g to %.6g", ozi, ozi2);
  98 #endif
  99
 100   double mzi = default_mzi;
 101   if (mzi == 2)
 102     {
 103       // FIXME: This is a terrible hack.
 104       style_get_number(si, PROP_CASING_MAJOR_Z_INDEX, &mzi);
 105     }
 106   else if (mzi == 4.9 || mzi == 5)
 107     {
 108       // FIXME: This is another terrible hack.
 109       style_get_number(si, PROP_TEXT_MAJOR_Z_INDEX, &mzi);
 110     }
 111   else
 112     style_get_number(si, PROP_MAJOR_Z_INDEX, &mzi);
 113   double mzi2 = CLAMP(mzi, -100, 100);
 114   if (mzi2 != mzi)
 115     osm_obj_warn(o, "major-z-index clipped from %.6g to %.6g", mzi, mzi2);
 116
 117   return (z_index_t)(10000 + (z_index_t)(zi2 * 100) + 10000*( 10000 + (z_index_t)(mzi2 * 100) ));
 118 }
 119
 120 void sym_from_style(struct osm_object *o, struct style_results *sr, struct svg *svg)
 121 {
 122   osm_val_t special = osm_obj_find_tag(o, KEY_LEO_SPECIAL);
 123   if (special)
 124     style_enable_default_layer(sr);
 125
 126   for (uns i=0; i < sr->num_active_layers; i++)
 127     {
 128       for (uns j = SYMBOLIZER_INVALID + 1; j < SYMBOLIZER_MAX; j++)
 129         {
 130           struct symbolizer *sy = symbolizers[j];
 131           // Either a generic symbolizer with a generic object,
 132           // or a special symbolizer with its special object.
 133           if (sy->special == special && sy->gen)
 134             (sy->gen)(o, sr->layers[sr->active_layers[i]], svg);
 135         }
 136     }
 137 }
 138
 139 static void sym_draw(struct symbol *sym, z_index_t zindex, struct svg *svg)
 140 {
 141   ASSERT(sym->type && sym->type < SYMBOLIZER_MAX);
 142   if (debug_dump_symbols)
 143     printf("Drawing symbol <%s> at z-index %u for %s\n", symbolizers[sym->type]->name, zindex, STK_OSM_NAME(sym->o));
 144   symbolizers[sym->type]->draw(sym, svg);
 145 }
 146
 147 void sym_draw_all(struct svg *svg)
 148 {
 149   msg(L_INFO, "Sorting %u symbols by depth", (uns) GARY_SIZE(sym_planned));
 150   sym_sort(sym_planned, GARY_SIZE(sym_planned));
 151
 152   msg(L_INFO, "Dumping icon library");
 153   svg_icon_dump_library(svg);
 154
 155   msg(L_INFO, "Drawing symbols");
 156   for (uns i = 0; i < GARY_SIZE(sym_planned); i++)
 157     sym_draw(sym_planned[i].sym, sym_planned[i].zindex, svg);
 158 }