modules/FvwmGtk/expand.c

   1 /* -*-c-*- */
   2 /* This program is free software; you can redistribute it and/or modify
   3  * it under the terms of the GNU General Public License as published by
   4  * the Free Software Foundation; either version 2 of the License, or
   5  * (at your option) any later version.
   6  *
   7  * This program is distributed in the hope that it will be useful,
   8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  * GNU General Public License for more details.
  11  *
  12  * You should have received a copy of the GNU General Public License
  13  * along with this program; if not, write to the Free Software
  14  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  15  */
  16
  17 #include "config.h"
  18
  19 #include <gtk/gtk.h>
  20
  21 #include "libs/fvwmlib.h"
  22
  23
  24 typedef struct str_struct
  25 {
  26   struct str_struct *next;
  27   char *s;
  28   int is_var;
  29 } str;
  30
  31 /* split string val into a list of str's, each containing
  32    an ordinary substring or a variable reference of the form $(bla).
  33    The list is appended to pre, the last list entry is returned.
  34 */
  35 static str *
  36 split_string (char *val, str *pre)
  37 {
  38   char *s = NULL, *t = NULL;
  39   char *v = val;
  40   str *curr = pre;
  41
  42   while (v && *v)
  43     {
  44       s = strstr (v, "$(");
  45       if (s)
  46         {
  47           t = strstr (s, ")");
  48         }
  49
  50       if (s && t)
  51         {
  52           /* append the part before $( */
  53           curr->next = (str *) safemalloc (sizeof (str));
  54           curr = curr->next;
  55           *s = '\0';
  56           curr->s = safestrdup (v);
  57           curr->is_var = 0;
  58           *s = '$';
  59
  60           /* append the variable reference, silently omit the ) */
  61           curr->next = (str *) safemalloc (sizeof (str));
  62           curr = curr->next;
  63           curr->next = NULL;
  64           *t = '\0';
  65           curr->s = safestrdup (s + 2);
  66           curr->is_var = 1;
  67           *t = ')';
  68
  69           v = t + 1;
  70         }
  71       else
  72         {
  73           /* append the part after the last variable reference */
  74           curr->next = (str *) safemalloc (sizeof (str));
  75           curr = curr->next;
  76           curr->next = NULL;
  77           curr->s = safestrdup (v);
  78           curr->is_var = 0;
  79           v = NULL;
  80         }
  81     }
  82   return curr;
  83 }
  84
  85
  86 static char *
  87 combine_string (str *p)
  88 {
  89   str *r, *next;
  90   int l;
  91   char *res;
  92
  93   for (l = 1, r = p; r != NULL; r = r->next)
  94     {
  95       l += strlen (r->s);
  96     }
  97   res = (char *) safemalloc (l * sizeof (char));
  98   *res = '\0';
  99   for (r = p; r != NULL; r = next)
 100     {
 101       strcat (res, r->s);
 102       next = r->next;
 103       free (r->s);
 104       free (r);
 105     }
 106   return res;
 107 }
 108
 109
 110 char *
 111 recursive_replace (GtkWidget *d, char *val)
 112 {
 113   str *head, *r, *tail, *next;
 114   char *nval;
 115
 116   head = (str *) safemalloc (sizeof (str));
 117   head->is_var = 0;
 118   head->s = safestrdup("");
 119   head->next = NULL;
 120
 121   split_string (val, head);
 122   for (r = head; r->next != NULL; r = r->next)
 123     {
 124       next = r->next;
 125       if (next->is_var)
 126         {
 127           nval = (char *) gtk_object_get_data (GTK_OBJECT (d), next->s);
 128           if (nval)
 129             {
 130               /* this changes r->next, thus freeing next is safe */
 131               tail = split_string (nval, r);
 132               tail->next = next->next;
 133               free (next->s);
 134               free (next);
 135             }
 136           else
 137             {
 138               next->is_var = 0;
 139             }
 140         }
 141     }
 142   return combine_string (head);
 143 }
 144
 145
 146