source3/utils/net_registry_util.c

   1 /*
   2  * Samba Unix/Linux SMB client library
   3  * Distributed SMB/CIFS Server Management Utility
   4  * registry utility functions
   5  *
   6  * Copyright (C) Michael Adam 2008
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 3 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20  */
  21
  22 #include "includes.h"
  23 #include "registry.h"
  24 #include "utils/net_registry_util.h"
  25 #include "utils/net.h"
  26 #include "../libcli/registry/util_reg.h"
  27
  28 void print_registry_key(const char *keyname, NTTIME *modtime)
  29 {
  30         const char *ts = _("None");
  31         char *freeme = NULL;
  32
  33         if (modtime != 0) {
  34                 freeme = http_timestring(talloc_tos(),
  35                                          nt_time_to_unix(*modtime));
  36                 ts = freeme;
  37         }
  38
  39         d_printf(_("Keyname   = %s\n"), keyname);
  40         d_printf(_("Modtime   = %s\n"), ts);
  41         d_printf("\n");
  42
  43         TALLOC_FREE(freeme);
  44 }
  45
  46 void print_registry_value(const struct registry_value *valvalue, bool raw)
  47 {
  48         if (!raw) {
  49                 d_printf(_("Type       = %s\n"),
  50                          str_regtype(valvalue->type));
  51         }
  52         switch(valvalue->type) {
  53         case REG_DWORD: {
  54                 uint32_t v = 0;
  55                 if (valvalue->data.length >= 4) {
  56                         v = IVAL(valvalue->data.data, 0);
  57                 }
  58                 if (!raw) {
  59                         d_printf(_("Value      = "));
  60                 }
  61                 d_printf("%u\n", v);
  62                 break;
  63         }
  64         case REG_SZ:
  65         case REG_EXPAND_SZ: {
  66                 const char *s;
  67
  68                 if (!pull_reg_sz(talloc_tos(), &valvalue->data, &s)) {
  69                         break;
  70                 }
  71                 if (!raw) {
  72                         d_printf(_("Value      = \""));
  73                 }
  74                 d_printf("%s", s);
  75                 if (!raw) {
  76                         d_printf("\"");
  77                 }
  78                 d_printf("\n");
  79                 break;
  80         }
  81         case REG_MULTI_SZ: {
  82                 uint32_t j;
  83                 const char **a;
  84
  85                 if (!pull_reg_multi_sz(talloc_tos(), &valvalue->data, &a)) {
  86                         break;
  87                 }
  88                 for (j = 0; a[j] != NULL; j++) {
  89                         if (!raw) {
  90                                 d_printf(_("Value[%3.3d] = \""), j);
  91                         }
  92                         d_printf("%s", a[j]);
  93                         if (!raw) {
  94                                 d_printf("\"");
  95                         }
  96                         d_printf("\n");
  97                 }
  98                 break;
  99         }
 100         case REG_BINARY:
 101                 if (!raw) {
 102                         d_printf(_("Value      = "));
 103                 }
 104                 d_printf(_("%d bytes\n"), (int)valvalue->data.length);
 105                 break;
 106         default:
 107                 if (!raw) {
 108                         d_printf(_("Value      = "));
 109                 }
 110                 d_printf(_("<unprintable>\n"));
 111                 break;
 112         }
 113 }
 114
 115 void print_registry_value_with_name(const char *valname,
 116                                     const struct registry_value *valvalue)
 117 {
 118         d_printf(_("Valuename  = %s\n"), valname);
 119         print_registry_value(valvalue, false);
 120         d_printf("\n");
 121 }
 122
 123 /**
 124  * Split path into hive name and subkeyname
 125  * normalizations performed:
 126  *  - if the path contains no '\\' characters,
 127  *    assume that the legacy format of using '/'
 128  *    as a separator is used and  convert '/' to '\\'
 129  *  - strip trailing '\\' chars
 130  */
 131 WERROR split_hive_key(TALLOC_CTX *ctx, const char *path, char **hivename,
 132                       char **subkeyname)
 133 {
 134         char *p;
 135         const char *tmp_subkeyname;
 136
 137         if ((path == NULL) || (hivename == NULL) || (subkeyname == NULL)) {
 138                 return WERR_INVALID_PARAM;
 139         }
 140
 141         if (strlen(path) == 0) {
 142                 return WERR_INVALID_PARAM;
 143         }
 144
 145         if (strchr(path, '\\') == NULL) {
 146                 *hivename = talloc_string_sub(ctx, path, "/", "\\");
 147         } else {
 148                 *hivename = talloc_strdup(ctx, path);
 149         }
 150
 151         if (*hivename == NULL) {
 152                 return WERR_NOMEM;
 153         }
 154
 155         /* strip trailing '\\' chars */
 156         p = strrchr(*hivename, '\\');
 157         while ((p != NULL) && (p[1] == '\0')) {
 158                 *p = '\0';
 159                 p = strrchr(*hivename, '\\');
 160         }
 161
 162         p = strchr(*hivename, '\\');
 163
 164         if ((p == NULL) || (*p == '\0')) {
 165                 /* just the hive - no subkey given */
 166                 tmp_subkeyname = "";
 167         } else {
 168                 *p = '\0';
 169                 tmp_subkeyname = p+1;
 170         }
 171         *subkeyname = talloc_strdup(ctx, tmp_subkeyname);
 172         if (*subkeyname == NULL) {
 173                 return WERR_NOMEM;
 174         }
 175
 176         return WERR_OK;
 177 }