util/wdwrite.c

   1 /* wdwrite.c - write key/value to defaults database
   2  *
   3  *  WindowMaker window manager
   4  *
   5  *  Copyright (c) 1997-2003 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    "wdwrite (Window Maker) 0.2"
  24
  25 /*
  26  * WindowMaker defaults DB writer
  27  */
  28
  29 #include "../src/wconfig.h"
  30
  31 #include <stdlib.h>
  32 #include <string.h>
  33 #include <stdio.h>
  34 #include <unistd.h>
  35
  36 #include <WINGs/WUtil.h>
  37
  38 #include <pwd.h>
  39
  40 char *ProgName;
  41
  42 char *gethomedir()
  43 {
  44         char *home = getenv("HOME");
  45         struct passwd *user;
  46
  47         if (home)
  48                 return home;
  49
  50         user = getpwuid(getuid());
  51         if (!user) {
  52                 perror(ProgName);
  53                 return "/";
  54         }
  55         if (!user->pw_dir) {
  56                 return "/";
  57         } else {
  58                 return user->pw_dir;
  59         }
  60 }
  61
  62 void wAbort()
  63 {
  64         exit(0);
  65 }
  66
  67 void help()
  68 {
  69         printf("Syntax:\n%s [OPTIONS] <domain> <option> <value>\n", ProgName);
  70         puts("");
  71         puts("  --help          display this help message");
  72         puts("  --version               output version information and exit");
  73         exit(1);
  74 }
  75
  76 int main(int argc, char **argv)
  77 {
  78         char *path;
  79         WMPropList *dom, *key, *value, *dict;
  80         char *gsdir;
  81         int i;
  82
  83         ProgName = argv[0];
  84
  85         for (i = 1; i < argc; i++) {
  86                 if (strcmp("--help", argv[i]) == 0) {
  87                         help();
  88                         exit(0);
  89                 } else if (strcmp("--version", argv[i]) == 0) {
  90                         puts(PROG_VERSION);
  91                         exit(0);
  92                 }
  93         }
  94
  95         if (argc < 4) {
  96                 printf("%s: invalid argument format\n", ProgName);
  97                 printf("Try '%s --help' for more information\n", ProgName);
  98                 exit(1);
  99         }
 100
 101         dom = WMCreatePLString(argv[1]);
 102         key = WMCreatePLString(argv[2]);
 103         value = WMCreatePropListFromDescription(argv[3]);
 104         if (!value) {
 105                 printf("%s:syntax error in value \"%s\"", ProgName, argv[3]);
 106                 exit(1);
 107         }
 108         gsdir = getenv("GNUSTEP_USER_ROOT");
 109         if (gsdir) {
 110                 path = wstrdup(gsdir);
 111         } else {
 112                 path = wstrdup(gethomedir());
 113                 path = wstrappend(path, "/GNUstep");
 114         }
 115         path = wstrappend(path, "/");
 116         path = wstrappend(path, DEFAULTS_DIR);
 117         path = wstrappend(path, "/");
 118         path = wstrappend(path, argv[1]);
 119
 120         dict = WMReadPropListFromFile(path);
 121         if (!dict) {
 122                 dict = WMCreatePLDictionary(key, value, NULL);
 123         } else {
 124                 WMPutInPLDictionary(dict, key, value);
 125         }
 126
 127         WMWritePropListToFile(dict, path, True);
 128         wfree(path);
 129
 130         return 0;
 131 }