+struct xrm_string {
+ char *key;
+ char *value;
+};
+
+static tree234 *xrmtree = NULL;
+
+int xrmcmp(void *av, void *bv)
+{
+ struct xrm_string *a = (struct xrm_string *)av;
+ struct xrm_string *b = (struct xrm_string *)bv;
+ return strcmp(a->key, b->key);
+}
+
+void provide_xrm_string(char *string)
+{
+ char *p, *q;
+ struct xrm_string *xrms, *ret;
+
+ p = q = strchr(string, ':');
+ if (!q) {
+ fprintf(stderr, "pterm: expected a colon in resource string"
+ " \"%s\"\n", string);
+ return;
+ }
+ q++;
+ while (p > string && p[-1] != '.' && p[-1] != '*')
+ p--;
+ xrms = smalloc(sizeof(struct xrm_string));
+ xrms->key = smalloc(q-p);
+ memcpy(xrms->key, p, q-p);
+ xrms->key[q-p-1] = '\0';
+ while (*q && isspace(*q))
+ q++;
+ xrms->value = dupstr(q);
+
+ if (!xrmtree)
+ xrmtree = newtree234(xrmcmp);
+
+ ret = add234(xrmtree, xrms);
+ if (ret) {
+ /* Override an existing string. */
+ del234(xrmtree, ret);
+ add234(xrmtree, xrms);
+ }
+}
+
+char *get_setting(char *key)
+{
+ struct xrm_string tmp, *ret;
+ tmp.key = key;
+ if (xrmtree) {
+ ret = find234(xrmtree, &tmp, NULL);
+ if (ret)
+ return ret->value;
+ }
+ return XGetDefault(display, app_name, key);
+}
+