util/geticonset.c

   1 /* geticonset.c - outputs icon configuration from WindowMaker to stdout
   2  *
   3  *  Window Maker window manager
   4  *
   5  *  Copyright (c) 1997, 1998, 1999 Alfredo K. Kojima
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation; either version 2 of the License, or
  10  *  (at your option) any later version.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program; if not, write to the Free Software
  19  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
  20  *  USA.
  21  */
  22
  23 #define PROG_VERSION "geticonset (Window Maker) 0.1"
  24
  25
  26 #include <stdlib.h>
  27 #include <stdio.h>
  28 #include <proplist.h>
  29 #include <string.h>
  30
  31 #include "../src/wconfig.h"
  32
  33
  34
  35 char *ProgName;
  36
  37
  38 char*
  39 defaultsPathForDomain(char *domain)
  40 {
  41     static char path[1024];
  42     char *gspath;
  43
  44     gspath = getenv("GNUSTEP_USER_ROOT");
  45     if (gspath) {
  46         strcpy(path, gspath);
  47         strcat(path, "/");
  48     } else {
  49         char *home;
  50
  51         home = getenv("HOME");
  52         if (!home) {
  53             printf("%s:could not get HOME environment variable!\n", ProgName);
  54             exit(0);
  55         }
  56         strcpy(path, home);
  57         strcat(path, "/GNUstep/");
  58     }
  59     strcat(path, DEFAULTS_DIR);
  60     strcat(path, "/");
  61     strcat(path, domain);
  62
  63     return path;
  64 }
  65
  66 void
  67 print_help()
  68 {
  69     printf("Usage: %s [OPTIONS] [FILE]\n", ProgName);
  70     puts("Retrieves program icon configuration and output to FILE or to stdout");
  71     puts("");
  72     puts("  --help      display this help and exit");
  73     puts("  --version   output version information and exit");
  74 }
  75
  76
  77 int
  78 main(int argc, char **argv)
  79 {
  80     proplist_t window_name, icon_key, window_attrs, icon_value;
  81     proplist_t all_windows, iconset;
  82     proplist_t keylist;
  83     char *path;
  84     int i;
  85
  86
  87     ProgName = argv[0];
  88
  89     for (i = 1; i < argc; i++) {
  90         if (strcmp(argv[i], "-h")==0
  91             || strcmp(argv[i], "--help")==0) {
  92             print_help();
  93             exit(0);
  94         } else if (strcmp(argv[i], "--version")==0) {
  95             puts(PROG_VERSION);
  96             exit(0);
  97         }
  98     }
  99
 100     path = defaultsPathForDomain("WMWindowAttributes");
 101
 102     all_windows = PLGetProplistWithPath(path);
 103     if (!all_windows) {
 104         printf("%s:could not load WindowMaker configuration file \"%s\".\n",
 105                ProgName, path);
 106         exit(1);
 107     }
 108
 109     iconset = PLMakeDictionaryFromEntries(NULL, NULL, NULL);
 110
 111     keylist = PLGetAllDictionaryKeys(all_windows);
 112     icon_key = PLMakeString("Icon");
 113
 114     for (i=0; i<PLGetNumberOfElements(keylist); i++) {
 115         proplist_t icondic;
 116
 117         window_name = PLGetArrayElement(keylist, i);
 118         if (!PLIsString(window_name))
 119             continue;
 120
 121         window_attrs = PLGetDictionaryEntry(all_windows, window_name);
 122         if (window_attrs && PLIsDictionary(window_attrs)) {
 123             icon_value = PLGetDictionaryEntry(window_attrs, icon_key);
 124             if (icon_value) {
 125
 126                 icondic = PLMakeDictionaryFromEntries(icon_key, icon_value,
 127                                                       NULL);
 128
 129                 PLInsertDictionaryEntry(iconset, window_name, icondic);
 130             }
 131         }
 132     }
 133
 134
 135     if (argc==2) {
 136         proplist_t val;
 137         val = PLMakeString(argv[1]);
 138         PLSetFilename(iconset, val);
 139         PLSave(iconset, NO);
 140     } else {
 141         puts(PLGetDescriptionIndent(iconset, 0));
 142     }
 143     exit(0);
 144 }
 145
 146