osm2go/src/style.c

/*
 * Copyright (C) 2008 Till Harbaum <till@harbaum.org>.
 *
 * This file is part of OSM2Go.
 *
 * OSM2Go is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * OSM2Go is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with OSM2Go.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "appdata.h"

#include <libxml/parser.h>
#include <libxml/tree.h>

#if !defined(LIBXML_TREE_ENABLED) || !defined(LIBXML_OUTPUT_ENABLED)
#error "libxml doesn't support required tree or output"
#endif

static void xml_get_prop_float(xmlNode *node, char *prop, float *value) {
  char *str = (char*)xmlGetProp(node, BAD_CAST prop);
  if(str) {
    *value = strtod(str, NULL);
    xmlFree(str);
  }
}

static int xml_get_prop_opaque(xmlNode *node, char *prop) {
  float opaque = 100;
  xml_get_prop_float(node, prop, &opaque);
  if(opaque > 255) opaque = 255;
  return(0xff & (int)(0.5 + opaque * 2.55));
}

static gboolean xml_prop_is(xmlNode *node, char *prop, char *str) {
  char *prop_str = (char*)xmlGetProp(node, BAD_CAST prop);
  if(!prop_str) return FALSE;

  gboolean match = (strcasecmp(prop_str, str) == 0);
  xmlFree(prop_str);
  return match;
}

static style_t *parse_style(xmlDocPtr doc, xmlNode *a_node) {
  xmlNode *cur_node = NULL, *sub_node = NULL;
  style_t *style = g_new0(style_t, 1);

  style->name = (char*)xmlGetProp(a_node, BAD_CAST "name");

  /* -------------- setup defaults -------------------- */
  /* (the defaults are pretty much the potlatch style) */
  style->background.color       = 0xffffff;   // white

  style->area.border_width      = 2.0;
  style->area.opaque            = 0x60;       // 37.5%
  style->area.zoom_max          = 0.1111;     // zoom factor above which an area is visible & selectable

  style->node.radius            = 4.0;
  style->node.border_radius     = 2.0;
  style->node.color             = 0x000000;   // black
  style->node.has_fill_color    = TRUE;       // is filled ...
  style->node.fill_color        = 0x008800;   // ... in dark green
  style->node.show_untagged     = FALSE;
  style->node.zoom_max          = 0.4444;     // zoom factor above which a node is visible & selectable

  style->track.width            = 6.0;
  style->track.color            = 0x0000ff40; // blue
  style->track.gps_color        = 0x000080;

  style->way.width              = 3.0;
  style->way.color              = 0x606060;   // grey
  style->way.zoom_max           = 0.2222;       // zoom above which it's visible & selectable

  style->highlight.width        = 3.0;
  style->highlight.color        = 0xffff0080;
  style->highlight.node_color   = 0xff000080;
  style->highlight.touch_color  = 0x0000ff80;
  style->highlight.arrow_color  = 0x0000ff80;
  style->highlight.arrow_limit  = 4.0;

  style->frisket.mult           = 3.0;
  style->frisket.opaque         = 0xff;
  style->frisket.border.present = TRUE;
  style->frisket.border.width   = 6.0;
  style->frisket.border.color   = 0x00000099;

  style->icon.enable            = FALSE;
  style->icon.scale             = 1.0;    // icon size (multiplier)
  style->icon.path_prefix       = g_strdup("standard");

  for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) {
    if (cur_node->type == XML_ELEMENT_NODE) {
      if(strcasecmp((char*)cur_node->name, "elemstyles") == 0) {
        style->elemstyles_filename = 
          (char*)xmlGetProp(cur_node, BAD_CAST "filename");

        /* ---------- node ------------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "node") == 0) {
        parse_color(cur_node, "color", &style->node.color);
        style->node.has_fill_color = 
          parse_color(cur_node, "fill-color", &style->node.fill_color);
        xml_get_prop_float(cur_node, "radius", &style->node.radius);
        xml_get_prop_float(cur_node, "border-radius", 
                           &style->node.border_radius);
        float scale_max = 0;
        xml_get_prop_float(cur_node, "scale-max", &scale_max);
        if (scale_max > 0)
          style->node.zoom_max = scaledn_to_zoom(scale_max);
        else
          style->node.zoom_max = 0;

        style->node.show_untagged = 
          xml_prop_is(cur_node, "show-untagged", "true");

        /* ---------- icon ------------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "icon") == 0) {
        xml_get_prop_float(cur_node, "scale", &style->icon.scale);
        style->icon.path_prefix = (char*)xmlGetProp(cur_node, BAD_CAST "path-prefix");
        style->icon.enable = xml_prop_is(cur_node, "enable", "true");

        /* ---------- way ------------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "way") == 0) {
        parse_color(cur_node, "color", &style->way.color);
        xml_get_prop_float(cur_node, "width", &style->way.width);
        float scale_max = 0;
        xml_get_prop_float(cur_node, "scale-max", &scale_max);
        if (scale_max > 0)
          style->way.zoom_max = scaledn_to_zoom(scale_max);
        else
          style->way.zoom_max = 0;

        /* ---------- frisket --------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "frisket") == 0) {
        xml_get_prop_float(cur_node, "mult", &style->frisket.mult);
        style->frisket.opaque = xml_get_prop_opaque(cur_node, "opaque");
        style->frisket.border.present = FALSE;

        for(sub_node = cur_node->children; sub_node; sub_node=sub_node->next) {
          if(sub_node->type == XML_ELEMENT_NODE) {
            if(strcasecmp((char*)sub_node->name, "border") == 0) {
              style->frisket.border.present = TRUE;
              xml_get_prop_float(sub_node, "width", 
                                 &style->frisket.border.width);

              gboolean color_set = 
                parse_color(sub_node, "color", &style->frisket.border.color);
              int opaque = xml_get_prop_opaque(sub_node, "opaque");
              if(color_set)
                style->frisket.border.color = 
                  (style->frisket.border.color<<8) | opaque;
            }
          }
        }

        /* ---------- highlight ------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "highlight") == 0) {
        gboolean color_set = 
          parse_color(cur_node, "color", &style->highlight.color);
        gboolean node_color_set = 
          parse_color(cur_node, "node-color", &style->highlight.node_color);
        gboolean touch_color_set = 
          parse_color(cur_node, "touch-color", &style->highlight.touch_color);
        gboolean arrow_color_set = 
          parse_color(cur_node, "arrow-color", &style->highlight.arrow_color);
        xml_get_prop_float(cur_node, "width", &style->highlight.width);
        xml_get_prop_float(cur_node, "arrow-limit", 
                           &style->highlight.arrow_limit);

        int op = xml_get_prop_opaque(cur_node, "opaque");
        if(color_set) 
          style->highlight.color = (style->highlight.color << 8) | op;
        if(node_color_set) 
          style->highlight.node_color =(style->highlight.node_color << 8)|op;
        if(touch_color_set) 
          style->highlight.touch_color =(style->highlight.touch_color << 8)|op;
        if(arrow_color_set)
          style->highlight.arrow_color =(style->highlight.arrow_color << 8)|op;

        /* ---------- track ------------------------------------ */
      } else if(strcasecmp((char*)cur_node->name, "track") == 0) {
        gboolean color_set = 
          parse_color(cur_node, "color", &style->track.color);
        parse_color(cur_node, "gps-color", &style->track.gps_color);
        xml_get_prop_float(cur_node, "width", &style->track.width);

        int opaque = xml_get_prop_opaque(cur_node, "opaque");
        if(color_set) style->track.color = (style->track.color<<8) | opaque;

        /* ---------- area ------------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "area") == 0) {
        style->area.has_border_color = 
          parse_color(cur_node, "border-color", &style->area.border_color);
        xml_get_prop_float(cur_node,"border-width", &style->area.border_width);
    float scale_max = 0;
        xml_get_prop_float(cur_node, "scale-max", &scale_max);
    if (scale_max > 0)
          style->area.zoom_max = scaledn_to_zoom(scale_max);
        else
      style->area.zoom_max = 0;

        style->area.opaque = xml_get_prop_opaque(cur_node, "opaque");

        /* ---------- background ------------------------------- */
      } else if(strcasecmp((char*)cur_node->name, "background") == 0) {
        parse_color(cur_node, "color", &style->background.color);

      } else
        printf("  found unhandled style/%s\n", cur_node->name);
    }
  }  
  return style;
}

static style_t *parse_doc(xmlDocPtr doc) {
  /* Get the root element node */
  xmlNode *cur_node = NULL;
  style_t *style = NULL; 

  for(cur_node = xmlDocGetRootElement(doc); 
      cur_node; cur_node = cur_node->next) {
    if (cur_node->type == XML_ELEMENT_NODE) {
      if(strcasecmp((char*)cur_node->name, "style") == 0) {
        if(!style)
          style = parse_style(doc, cur_node);
      } else 
        printf("  found unhandled %s\n", cur_node->name);
    }
  }
    
  xmlFreeDoc(doc);
  xmlCleanupParser();
  return style;
}

static style_t *style_parse(appdata_t *appdata, char *fullname) {
  style_t *style = NULL;
  
  xmlDoc *doc = NULL;
    
  LIBXML_TEST_VERSION;
    
  /* parse the file and get the DOM */
  if((doc = xmlReadFile(fullname, NULL, 0)) == NULL) {
    xmlErrorPtr errP = xmlGetLastError();
    errorf(GTK_WIDGET(appdata->window), 
           _("Style parsing failed:\n\n"
             "XML error while parsing style file\n"
             "%s"), errP->message);
    
    return NULL;
  } else {
    style = parse_doc(doc);
    style->iconP = &appdata->icon;
  }

  return style;
}

style_t *style_load(appdata_t *appdata, char *name) {
  printf("Trying to load style %s\n", name);

  char *filename = g_strdup_printf("%s.style", name);
  char *fullname = find_file(filename);
  g_free(filename);

  if (!fullname) {
    printf("style %s not found, trying %s instead\n", name, DEFAULT_STYLE);
    filename = g_strdup_printf("%s.style", DEFAULT_STYLE);
    fullname = find_file(filename);
    g_free(filename);
    if (!fullname) {
      printf("  style not found, failed to find fallback style too\n");
      return NULL;
    }
  }

  printf("  style filename: %s\n", fullname);

  style_t *style = style_parse(appdata, fullname);
  g_free(fullname);

  printf("  elemstyle filename: %s\n", style->elemstyles_filename);
  elemstyle_t *elemstyles = 
    josm_elemstyles_load(style->elemstyles_filename);
  xmlFree(style->elemstyles_filename);
  style->elemstyles = elemstyles;

  return style;
}

void style_free(style_t *style) {
  if(!style) return;

  printf("freeing style\n");

  if(style->elemstyles)
    josm_elemstyles_free(style->elemstyles);

  if(style->name) g_free(style->name);

  if (style->icon.path_prefix) g_free(style->icon.path_prefix);

  g_free(style);
}

static char *style_basename(char *name) {
  char *retval = name;

  if(strrchr(name, '/'))
    retval = strrchr(name, '/') + 1;

  /* create a local copy */
  retval = g_strdup(retval);

  /* and cut off extension */
  if(strrchr(retval, '.'))
    *strrchr(retval, '.') = 0;

  return retval;
}

void style_select(GtkWidget *parent, appdata_t *appdata) {
  file_chain_t *chain = file_scan("*.style");

  printf("select style\n");

  /* there must be at least one style, otherwise */
  /* the program wouldn't be running */
  g_assert(chain);

  /* ------------------ style dialog ---------------- */
  GtkWidget *dialog = gtk_dialog_new_with_buttons(_("Select style"),
          GTK_WINDOW(parent), GTK_DIALOG_MODAL,
          GTK_STOCK_CANCEL, GTK_RESPONSE_REJECT, 
          GTK_STOCK_OK, GTK_RESPONSE_ACCEPT,
          NULL);

  gtk_dialog_set_default_response(GTK_DIALOG(dialog), GTK_RESPONSE_ACCEPT);

  GtkWidget *hbox = gtk_hbox_new(FALSE, 8);
  gtk_box_pack_start_defaults(GTK_BOX(hbox), gtk_label_new(_("Style:")));

  GtkWidget *cbox = NULL;
  cbox = gtk_combo_box_new_text();

  /* fill combo box with presets */
  int cnt = 0, match = -1;
  file_chain_t *lchain = chain;
  while(lchain) {
    printf("  file: %s\n", lchain->name);
    
    style_t *style = style_parse(appdata, lchain->name);
    printf("    name: %s\n", style->name);
    gtk_combo_box_append_text(GTK_COMBO_BOX(cbox), style->name);

    char *basename = style_basename(lchain->name);
    if(strcmp(basename, appdata->settings->style) == 0) match = cnt;
    g_free(basename);
    
    xmlFree(style->elemstyles_filename);
    style->elemstyles_filename = NULL;
    style_free(style);
    
    lchain = lchain->next;
    cnt++;
  }

  if(match >= 0)
    gtk_combo_box_set_active(GTK_COMBO_BOX(cbox), match);
  
  gtk_box_pack_start_defaults(GTK_BOX(hbox), cbox);
  gtk_box_pack_start_defaults(GTK_BOX(GTK_DIALOG(dialog)->vbox), hbox);

  gtk_widget_show_all(dialog);

  if(GTK_RESPONSE_ACCEPT != gtk_dialog_run(GTK_DIALOG(dialog))) {
    printf("user clicked cancel\n");
    gtk_widget_destroy(dialog);
    return;
  }
  
  char *ptr = gtk_combo_box_get_active_text(GTK_COMBO_BOX(cbox));
  printf("user clicked ok on %s\n", ptr);  

  while(chain) {
    file_chain_t *next = chain->next;
    style_t *style = style_parse(appdata, chain->name);

    if(strcmp(style->name, ptr) == 0) {
      if(appdata->settings->style)
        g_free(appdata->settings->style);

      appdata->settings->style = style_basename(chain->name);
    }

    xmlFree(style->elemstyles_filename);
    style->elemstyles_filename = NULL;
    style_free(style);

    g_free(chain);
    chain = next;
  }

  gtk_widget_destroy(dialog);

  map_clear(appdata, MAP_LAYER_OBJECTS_ONLY);
  /* let gtk clean up first */
  while(gtk_events_pending()) {
    putchar('.');
    gtk_main_iteration();
  }

  style_free(appdata->map->style);
  appdata->map->style = style_load(appdata, appdata->settings->style);

  /* canvas background may have changed */
  g_object_set(G_OBJECT(appdata->map->canvas), "background-color-rgb", 
               appdata->map->style->background.color, NULL);

  map_paint(appdata);
}
1	/*
2	* Copyright (C) 2008 Till Harbaum <till@harbaum.org>.
3	*
4	* This file is part of OSM2Go.
5	*
6	* OSM2Go is free software: you can redistribute it and/or modify
7	* it under the terms of the GNU General Public License as published by
8	* the Free Software Foundation, either version 3 of the License, or
9	* (at your option) any later version.
10	*
11	* OSM2Go is distributed in the hope that it will be useful,
12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14	* GNU General Public License for more details.
15	*
16	* You should have received a copy of the GNU General Public License
17	* along with OSM2Go. If not, see <http://www.gnu.org/licenses/>.
18	*/
19
20	#include "appdata.h"
21
22	#include <libxml/parser.h>
23	#include <libxml/tree.h>
24
25	#if !defined(LIBXML_TREE_ENABLED) \|\| !defined(LIBXML_OUTPUT_ENABLED)
26	#error "libxml doesn't support required tree or output"
27	#endif
28
29	static void xml_get_prop_float(xmlNode node, char prop, float *value) {
30	char str = (char)xmlGetProp(node, BAD_CAST prop);
31	if(str) {
32	*value = strtod(str, NULL);
33	xmlFree(str);
34	}
35	}
36
37	static int xml_get_prop_opaque(xmlNode node, char prop) {
38	float opaque = 100;
39	xml_get_prop_float(node, prop, &opaque);
40	if(opaque > 255) opaque = 255;
41	return(0xff & (int)(0.5 + opaque * 2.55));
42	}
43
44	static gboolean xml_prop_is(xmlNode node, char prop, char *str) {
45	char prop_str = (char)xmlGetProp(node, BAD_CAST prop);
46	if(!prop_str) return FALSE;
47
48	gboolean match = (strcasecmp(prop_str, str) == 0);
49	xmlFree(prop_str);
50	return match;
51	}
52
53	static style_t parse_style(xmlDocPtr doc, xmlNode a_node) {
54	xmlNode cur_node = NULL, sub_node = NULL;
55	style_t *style = g_new0(style_t, 1);
56
57	style->name = (char*)xmlGetProp(a_node, BAD_CAST "name");
58
59	/* -------------- setup defaults -------------------- */
60	/* (the defaults are pretty much the potlatch style) */
61	style->background.color = 0xffffff; // white
62
63	style->area.border_width = 2.0;
64	style->area.opaque = 0x60; // 37.5%
65	style->area.zoom_max = 0.1111; // zoom factor above which an area is visible & selectable
66
67	style->node.radius = 4.0;
68	style->node.border_radius = 2.0;
69	style->node.color = 0x000000; // black
70	style->node.has_fill_color = TRUE; // is filled ...
71	style->node.fill_color = 0x008800; // ... in dark green
72	style->node.show_untagged = FALSE;
73	style->node.zoom_max = 0.4444; // zoom factor above which a node is visible & selectable
74
75	style->track.width = 6.0;
76	style->track.color = 0x0000ff40; // blue
77	style->track.gps_color = 0x000080;
78
79	style->way.width = 3.0;
80	style->way.color = 0x606060; // grey
81	style->way.zoom_max = 0.2222; // zoom above which it's visible & selectable
82
83	style->highlight.width = 3.0;
84	style->highlight.color = 0xffff0080;
85	style->highlight.node_color = 0xff000080;
86	style->highlight.touch_color = 0x0000ff80;
87	style->highlight.arrow_color = 0x0000ff80;
88	style->highlight.arrow_limit = 4.0;
89
90	style->frisket.mult = 3.0;
91	style->frisket.opaque = 0xff;
92	style->frisket.border.present = TRUE;
93	style->frisket.border.width = 6.0;
94	style->frisket.border.color = 0x00000099;
95
96	style->icon.enable = FALSE;
97	style->icon.scale = 1.0; // icon size (multiplier)
98	style->icon.path_prefix = g_strdup("standard");
99
100	for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) {
101	if (cur_node->type == XML_ELEMENT_NODE) {
102	if(strcasecmp((char*)cur_node->name, "elemstyles") == 0) {
103	style->elemstyles_filename =
104	(char*)xmlGetProp(cur_node, BAD_CAST "filename");
105
106	/* ---------- node ------------------------------------- */
107	} else if(strcasecmp((char*)cur_node->name, "node") == 0) {
108	parse_color(cur_node, "color", &style->node.color);
109	style->node.has_fill_color =
110	parse_color(cur_node, "fill-color", &style->node.fill_color);
111	xml_get_prop_float(cur_node, "radius", &style->node.radius);
112	xml_get_prop_float(cur_node, "border-radius",
113	&style->node.border_radius);
114	float scale_max = 0;
115	xml_get_prop_float(cur_node, "scale-max", &scale_max);
116	if (scale_max > 0)
117	style->node.zoom_max = scaledn_to_zoom(scale_max);
118	else
119	style->node.zoom_max = 0;
120
121	style->node.show_untagged =
122	xml_prop_is(cur_node, "show-untagged", "true");
123
124	/* ---------- icon ------------------------------------- */
125	} else if(strcasecmp((char*)cur_node->name, "icon") == 0) {
126	xml_get_prop_float(cur_node, "scale", &style->icon.scale);
127	style->icon.path_prefix = (char*)xmlGetProp(cur_node, BAD_CAST "path-prefix");
128	style->icon.enable = xml_prop_is(cur_node, "enable", "true");
129
130	/* ---------- way ------------------------------------- */
131	} else if(strcasecmp((char*)cur_node->name, "way") == 0) {
132	parse_color(cur_node, "color", &style->way.color);
133	xml_get_prop_float(cur_node, "width", &style->way.width);
134	float scale_max = 0;
135	xml_get_prop_float(cur_node, "scale-max", &scale_max);
136	if (scale_max > 0)
137	style->way.zoom_max = scaledn_to_zoom(scale_max);
138	else
139	style->way.zoom_max = 0;
140
141	/* ---------- frisket --------------------------------- */
142	} else if(strcasecmp((char*)cur_node->name, "frisket") == 0) {
143	xml_get_prop_float(cur_node, "mult", &style->frisket.mult);
144	style->frisket.opaque = xml_get_prop_opaque(cur_node, "opaque");
145	style->frisket.border.present = FALSE;
146
147	for(sub_node = cur_node->children; sub_node; sub_node=sub_node->next) {
148	if(sub_node->type == XML_ELEMENT_NODE) {
149	if(strcasecmp((char*)sub_node->name, "border") == 0) {
150	style->frisket.border.present = TRUE;
151	xml_get_prop_float(sub_node, "width",
152	&style->frisket.border.width);
153
154	gboolean color_set =
155	parse_color(sub_node, "color", &style->frisket.border.color);
156	int opaque = xml_get_prop_opaque(sub_node, "opaque");
157	if(color_set)
158	style->frisket.border.color =
159	(style->frisket.border.color<<8) \| opaque;
160	}
161	}
162	}
163
164	/* ---------- highlight ------------------------------- */
165	} else if(strcasecmp((char*)cur_node->name, "highlight") == 0) {
166	gboolean color_set =
167	parse_color(cur_node, "color", &style->highlight.color);
168	gboolean node_color_set =
169	parse_color(cur_node, "node-color", &style->highlight.node_color);
170	gboolean touch_color_set =
171	parse_color(cur_node, "touch-color", &style->highlight.touch_color);
172	gboolean arrow_color_set =
173	parse_color(cur_node, "arrow-color", &style->highlight.arrow_color);
174	xml_get_prop_float(cur_node, "width", &style->highlight.width);
175	xml_get_prop_float(cur_node, "arrow-limit",
176	&style->highlight.arrow_limit);
177
178	int op = xml_get_prop_opaque(cur_node, "opaque");
179	if(color_set)
180	style->highlight.color = (style->highlight.color << 8) \| op;
181	if(node_color_set)
182	style->highlight.node_color =(style->highlight.node_color << 8)\|op;
183	if(touch_color_set)
184	style->highlight.touch_color =(style->highlight.touch_color << 8)\|op;
185	if(arrow_color_set)
186	style->highlight.arrow_color =(style->highlight.arrow_color << 8)\|op;
187
188	/* ---------- track ------------------------------------ */
189	} else if(strcasecmp((char*)cur_node->name, "track") == 0) {
190	gboolean color_set =
191	parse_color(cur_node, "color", &style->track.color);
192	parse_color(cur_node, "gps-color", &style->track.gps_color);
193	xml_get_prop_float(cur_node, "width", &style->track.width);
194
195	int opaque = xml_get_prop_opaque(cur_node, "opaque");
196	if(color_set) style->track.color = (style->track.color<<8) \| opaque;
197
198	/* ---------- area ------------------------------------- */
199	} else if(strcasecmp((char*)cur_node->name, "area") == 0) {
200	style->area.has_border_color =
201	parse_color(cur_node, "border-color", &style->area.border_color);
202	xml_get_prop_float(cur_node,"border-width", &style->area.border_width);
203	float scale_max = 0;
204	xml_get_prop_float(cur_node, "scale-max", &scale_max);
205	if (scale_max > 0)
206	style->area.zoom_max = scaledn_to_zoom(scale_max);
207	else
208	style->area.zoom_max = 0;
209
210	style->area.opaque = xml_get_prop_opaque(cur_node, "opaque");
211
212	/* ---------- background ------------------------------- */
213	} else if(strcasecmp((char*)cur_node->name, "background") == 0) {
214	parse_color(cur_node, "color", &style->background.color);
215
216	} else
217	printf(" found unhandled style/%s\n", cur_node->name);
218	}
219	}
220	return style;
221	}
222
223	static style_t *parse_doc(xmlDocPtr doc) {
224	/* Get the root element node */
225	xmlNode *cur_node = NULL;
226	style_t *style = NULL;
227
228	for(cur_node = xmlDocGetRootElement(doc);
229	cur_node; cur_node = cur_node->next) {
230	if (cur_node->type == XML_ELEMENT_NODE) {
231	if(strcasecmp((char*)cur_node->name, "style") == 0) {
232	if(!style)
233	style = parse_style(doc, cur_node);
234	} else
235	printf(" found unhandled %s\n", cur_node->name);
236	}
237	}
238
239	xmlFreeDoc(doc);
240	xmlCleanupParser();
241	return style;
242	}
243
244	static style_t style_parse(appdata_t appdata, char *fullname) {
245	style_t *style = NULL;
246
247	xmlDoc *doc = NULL;
248
249	LIBXML_TEST_VERSION;
250
251	/* parse the file and get the DOM */
252	if((doc = xmlReadFile(fullname, NULL, 0)) == NULL) {
253	xmlErrorPtr errP = xmlGetLastError();
254	errorf(GTK_WIDGET(appdata->window),
255	_("Style parsing failed:\n\n"
256	"XML error while parsing style file\n"
257	"%s"), errP->message);
258
259	return NULL;
260	} else {
261	style = parse_doc(doc);
262	style->iconP = &appdata->icon;
263	}
264
265	return style;
266	}
267
268	style_t style_load(appdata_t appdata, char *name) {
269	printf("Trying to load style %s\n", name);
270
271	char *filename = g_strdup_printf("%s.style", name);
272	char *fullname = find_file(filename);
273	g_free(filename);
274
275	if (!fullname) {
276	printf("style %s not found, trying %s instead\n", name, DEFAULT_STYLE);
277	filename = g_strdup_printf("%s.style", DEFAULT_STYLE);
278	fullname = find_file(filename);
279	g_free(filename);
280	if (!fullname) {
281	printf(" style not found, failed to find fallback style too\n");
282	return NULL;
283	}
284	}
285
286	printf(" style filename: %s\n", fullname);
287
288	style_t *style = style_parse(appdata, fullname);
289	g_free(fullname);
290
291	printf(" elemstyle filename: %s\n", style->elemstyles_filename);
292	elemstyle_t *elemstyles =
293	josm_elemstyles_load(style->elemstyles_filename);
294	xmlFree(style->elemstyles_filename);
295	style->elemstyles = elemstyles;
296
297	return style;
298	}
299
300	void style_free(style_t *style) {
301	if(!style) return;
302
303	printf("freeing style\n");
304
305	if(style->elemstyles)
306	josm_elemstyles_free(style->elemstyles);
307
308	if(style->name) g_free(style->name);
309
310	if (style->icon.path_prefix) g_free(style->icon.path_prefix);
311
312	g_free(style);
313	}
314
315	static char style_basename(char name) {
316	char *retval = name;
317
318	if(strrchr(name, '/'))
319	retval = strrchr(name, '/') + 1;
320
321	/* create a local copy */
322	retval = g_strdup(retval);
323
324	/* and cut off extension */
325	if(strrchr(retval, '.'))
326	*strrchr(retval, '.') = 0;
327
328	return retval;
329	}
330
331	void style_select(GtkWidget parent, appdata_t appdata) {
332	file_chain_t chain = file_scan(".style");
333
334	printf("select style\n");
335
336	/* there must be at least one style, otherwise */
337	/* the program wouldn't be running */
338	g_assert(chain);
339
340	/* ------------------ style dialog ---------------- */
341	GtkWidget *dialog = gtk_dialog_new_with_buttons(_("Select style"),
342	GTK_WINDOW(parent), GTK_DIALOG_MODAL,
343	GTK_STOCK_CANCEL, GTK_RESPONSE_REJECT,
344	GTK_STOCK_OK, GTK_RESPONSE_ACCEPT,
345	NULL);
346
347	gtk_dialog_set_default_response(GTK_DIALOG(dialog), GTK_RESPONSE_ACCEPT);
348
349	GtkWidget *hbox = gtk_hbox_new(FALSE, 8);
350	gtk_box_pack_start_defaults(GTK_BOX(hbox), gtk_label_new(_("Style:")));
351
352	GtkWidget *cbox = NULL;
353	cbox = gtk_combo_box_new_text();
354
355	/* fill combo box with presets */
356	int cnt = 0, match = -1;
357	file_chain_t *lchain = chain;
358	while(lchain) {
359	printf(" file: %s\n", lchain->name);
360
361	style_t *style = style_parse(appdata, lchain->name);
362	printf(" name: %s\n", style->name);
363	gtk_combo_box_append_text(GTK_COMBO_BOX(cbox), style->name);
364
365	char *basename = style_basename(lchain->name);
366	if(strcmp(basename, appdata->settings->style) == 0) match = cnt;
367	g_free(basename);
368
369	xmlFree(style->elemstyles_filename);
370	style->elemstyles_filename = NULL;
371	style_free(style);
372
373	lchain = lchain->next;
374	cnt++;
375	}
376
377	if(match >= 0)
378	gtk_combo_box_set_active(GTK_COMBO_BOX(cbox), match);
379
380	gtk_box_pack_start_defaults(GTK_BOX(hbox), cbox);
381	gtk_box_pack_start_defaults(GTK_BOX(GTK_DIALOG(dialog)->vbox), hbox);
382
383	gtk_widget_show_all(dialog);
384
385	if(GTK_RESPONSE_ACCEPT != gtk_dialog_run(GTK_DIALOG(dialog))) {
386	printf("user clicked cancel\n");
387	gtk_widget_destroy(dialog);
388	return;
389	}
390
391	char *ptr = gtk_combo_box_get_active_text(GTK_COMBO_BOX(cbox));
392	printf("user clicked ok on %s\n", ptr);
393
394	while(chain) {
395	file_chain_t *next = chain->next;
396	style_t *style = style_parse(appdata, chain->name);
397
398	if(strcmp(style->name, ptr) == 0) {
399	if(appdata->settings->style)
400	g_free(appdata->settings->style);
401
402	appdata->settings->style = style_basename(chain->name);
403	}
404
405	xmlFree(style->elemstyles_filename);
406	style->elemstyles_filename = NULL;
407	style_free(style);
408
409	g_free(chain);
410	chain = next;
411	}
412
413	gtk_widget_destroy(dialog);
414
415	map_clear(appdata, MAP_LAYER_OBJECTS_ONLY);
416	/* let gtk clean up first */
417	while(gtk_events_pending()) {
418	putchar('.');
419	gtk_main_iteration();
420	}
421
422	style_free(appdata->map->style);
423	appdata->map->style = style_load(appdata, appdata->settings->style);
424
425	/* canvas background may have changed */
426	g_object_set(G_OBJECT(appdata->map->canvas), "background-color-rgb",
427	appdata->map->style->background.color, NULL);
428
429	map_paint(appdata);
430	}