source3/modules/vfs_cap.c

   1 /*
   2  * CAP VFS module for Samba 3.x Version 0.3
   3  *
   4  * Copyright (C) Tim Potter, 1999-2000
   5  * Copyright (C) Alexander Bokovoy, 2002-2003
   6  * Copyright (C) Stefan (metze) Metzmacher, 2003
   7  * Copyright (C) TAKAHASHI Motonobu (monyo), 2003
   8  * Copyright (C) Jeremy Allison, 2007
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 3 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, see <http://www.gnu.org/licenses/>.
  22  */
  23
  24
  25 #include "includes.h"
  26 #include "smbd/smbd.h"
  27
  28 /* cap functions */
  29 static char *capencode(TALLOC_CTX *ctx, const char *from);
  30 static char *capdecode(TALLOC_CTX *ctx, const char *from);
  31
  32 static uint64_t cap_disk_free(vfs_handle_struct *handle, const char *path,
  33         bool small_query, uint64_t *bsize,
  34         uint64_t *dfree, uint64_t *dsize)
  35 {
  36         char *cappath = capencode(talloc_tos(), path);
  37
  38         if (!cappath) {
  39                 errno = ENOMEM;
  40                 return (uint64_t)-1;
  41         }
  42         return SMB_VFS_NEXT_DISK_FREE(handle, cappath, small_query, bsize,
  43                                         dfree, dsize);
  44 }
  45
  46 static DIR *cap_opendir(vfs_handle_struct *handle, const char *fname, const char *mask, uint32 attr)
  47 {
  48         char *capname = capencode(talloc_tos(), fname);
  49
  50         if (!capname) {
  51                 errno = ENOMEM;
  52                 return NULL;
  53         }
  54         return SMB_VFS_NEXT_OPENDIR(handle, capname, mask, attr);
  55 }
  56
  57 static struct dirent *cap_readdir(vfs_handle_struct *handle,
  58                                       DIR *dirp,
  59                                       SMB_STRUCT_STAT *sbuf)
  60 {
  61         struct dirent *result;
  62         struct dirent *newdirent;
  63         char *newname;
  64         size_t newnamelen;
  65         DEBUG(3,("cap: cap_readdir\n"));
  66
  67         result = SMB_VFS_NEXT_READDIR(handle, dirp, NULL);
  68         if (!result) {
  69                 return NULL;
  70         }
  71
  72         newname = capdecode(talloc_tos(), result->d_name);
  73         if (!newname) {
  74                 return NULL;
  75         }
  76         DEBUG(3,("cap: cap_readdir: %s\n", newname));
  77         newnamelen = strlen(newname)+1;
  78         newdirent = (struct dirent *)talloc_array(talloc_tos(),
  79                         char,
  80                         sizeof(struct dirent)+
  81                                 newnamelen);
  82         if (!newdirent) {
  83                 return NULL;
  84         }
  85         memcpy(newdirent, result, sizeof(struct dirent));
  86         memcpy(&newdirent->d_name, newname, newnamelen);
  87         return newdirent;
  88 }
  89
  90 static int cap_mkdir(vfs_handle_struct *handle, const char *path, mode_t mode)
  91 {
  92         char *cappath = capencode(talloc_tos(), path);
  93
  94         if (!cappath) {
  95                 errno = ENOMEM;
  96                 return -1;
  97         }
  98         return SMB_VFS_NEXT_MKDIR(handle, cappath, mode);
  99 }
 100
 101 static int cap_rmdir(vfs_handle_struct *handle, const char *path)
 102 {
 103         char *cappath = capencode(talloc_tos(), path);
 104
 105         if (!cappath) {
 106                 errno = ENOMEM;
 107                 return -1;
 108         }
 109         return SMB_VFS_NEXT_RMDIR(handle, cappath);
 110 }
 111
 112 static int cap_open(vfs_handle_struct *handle, struct smb_filename *smb_fname,
 113                     files_struct *fsp, int flags, mode_t mode)
 114 {
 115         char *cappath;
 116         char *tmp_base_name = NULL;
 117         int ret;
 118
 119         cappath = capencode(talloc_tos(), smb_fname->base_name);
 120
 121         if (!cappath) {
 122                 errno = ENOMEM;
 123                 return -1;
 124         }
 125
 126         tmp_base_name = smb_fname->base_name;
 127         smb_fname->base_name = cappath;
 128
 129         DEBUG(3,("cap: cap_open for %s\n", smb_fname_str_dbg(smb_fname)));
 130         ret = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
 131
 132         smb_fname->base_name = tmp_base_name;
 133         TALLOC_FREE(cappath);
 134
 135         return ret;
 136 }
 137
 138 static int cap_rename(vfs_handle_struct *handle,
 139                       const struct smb_filename *smb_fname_src,
 140                       const struct smb_filename *smb_fname_dst)
 141 {
 142         char *capold = NULL;
 143         char *capnew = NULL;
 144         struct smb_filename *smb_fname_src_tmp = NULL;
 145         struct smb_filename *smb_fname_dst_tmp = NULL;
 146         NTSTATUS status;
 147         int ret = -1;
 148
 149         capold = capencode(talloc_tos(), smb_fname_src->base_name);
 150         capnew = capencode(talloc_tos(), smb_fname_dst->base_name);
 151         if (!capold || !capnew) {
 152                 errno = ENOMEM;
 153                 goto out;
 154         }
 155
 156         /* Setup temporary smb_filename structs. */
 157         status = copy_smb_filename(talloc_tos(), smb_fname_src,
 158                                    &smb_fname_src_tmp);
 159         if (!NT_STATUS_IS_OK(status)) {
 160                 errno = map_errno_from_nt_status(status);
 161                 goto out;
 162         }
 163         status = copy_smb_filename(talloc_tos(), smb_fname_dst,
 164                                    &smb_fname_dst_tmp);
 165         if (!NT_STATUS_IS_OK(status)) {
 166                 errno = map_errno_from_nt_status(status);
 167                 goto out;
 168         }
 169
 170         smb_fname_src_tmp->base_name = capold;
 171         smb_fname_dst_tmp->base_name = capnew;
 172
 173         ret = SMB_VFS_NEXT_RENAME(handle, smb_fname_src_tmp,
 174                                   smb_fname_dst_tmp);
 175  out:
 176         TALLOC_FREE(capold);
 177         TALLOC_FREE(capnew);
 178         TALLOC_FREE(smb_fname_src_tmp);
 179         TALLOC_FREE(smb_fname_dst_tmp);
 180
 181         return ret;
 182 }
 183
 184 static int cap_stat(vfs_handle_struct *handle, struct smb_filename *smb_fname)
 185 {
 186         char *cappath;
 187         char *tmp_base_name = NULL;
 188         int ret;
 189
 190         cappath = capencode(talloc_tos(), smb_fname->base_name);
 191
 192         if (!cappath) {
 193                 errno = ENOMEM;
 194                 return -1;
 195         }
 196
 197         tmp_base_name = smb_fname->base_name;
 198         smb_fname->base_name = cappath;
 199
 200         ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
 201
 202         smb_fname->base_name = tmp_base_name;
 203         TALLOC_FREE(cappath);
 204
 205         return ret;
 206 }
 207
 208 static int cap_lstat(vfs_handle_struct *handle, struct smb_filename *smb_fname)
 209 {
 210         char *cappath;
 211         char *tmp_base_name = NULL;
 212         int ret;
 213
 214         cappath = capencode(talloc_tos(), smb_fname->base_name);
 215
 216         if (!cappath) {
 217                 errno = ENOMEM;
 218                 return -1;
 219         }
 220
 221         tmp_base_name = smb_fname->base_name;
 222         smb_fname->base_name = cappath;
 223
 224         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
 225
 226         smb_fname->base_name = tmp_base_name;
 227         TALLOC_FREE(cappath);
 228
 229         return ret;
 230 }
 231
 232 static int cap_unlink(vfs_handle_struct *handle,
 233                       const struct smb_filename *smb_fname)
 234 {
 235         struct smb_filename *smb_fname_tmp = NULL;
 236         char *cappath = NULL;
 237         NTSTATUS status;
 238         int ret;
 239
 240         cappath = capencode(talloc_tos(), smb_fname->base_name);
 241         if (!cappath) {
 242                 errno = ENOMEM;
 243                 return -1;
 244         }
 245
 246         /* Setup temporary smb_filename structs. */
 247         status = copy_smb_filename(talloc_tos(), smb_fname,
 248                                    &smb_fname_tmp);
 249         if (!NT_STATUS_IS_OK(status)) {
 250                 errno = map_errno_from_nt_status(status);
 251                 return -1;
 252         }
 253
 254         smb_fname_tmp->base_name = cappath;
 255
 256         ret = SMB_VFS_NEXT_UNLINK(handle, smb_fname_tmp);
 257
 258         TALLOC_FREE(smb_fname_tmp);
 259         return ret;
 260 }
 261
 262 static int cap_chmod(vfs_handle_struct *handle, const char *path, mode_t mode)
 263 {
 264         char *cappath = capencode(talloc_tos(), path);
 265
 266         if (!cappath) {
 267                 errno = ENOMEM;
 268                 return -1;
 269         }
 270         return SMB_VFS_NEXT_CHMOD(handle, cappath, mode);
 271 }
 272
 273 static int cap_chown(vfs_handle_struct *handle, const char *path, uid_t uid, gid_t gid)
 274 {
 275         char *cappath = capencode(talloc_tos(), path);
 276
 277         if (!cappath) {
 278                 errno = ENOMEM;
 279                 return -1;
 280         }
 281         return SMB_VFS_NEXT_CHOWN(handle, cappath, uid, gid);
 282 }
 283
 284 static int cap_lchown(vfs_handle_struct *handle, const char *path, uid_t uid, gid_t gid)
 285 {
 286         char *cappath = capencode(talloc_tos(), path);
 287
 288         if (!cappath) {
 289                 errno = ENOMEM;
 290                 return -1;
 291         }
 292         return SMB_VFS_NEXT_LCHOWN(handle, cappath, uid, gid);
 293 }
 294
 295 static int cap_chdir(vfs_handle_struct *handle, const char *path)
 296 {
 297         char *cappath = capencode(talloc_tos(), path);
 298
 299         if (!cappath) {
 300                 errno = ENOMEM;
 301                 return -1;
 302         }
 303         DEBUG(3,("cap: cap_chdir for %s\n", path));
 304         return SMB_VFS_NEXT_CHDIR(handle, cappath);
 305 }
 306
 307 static int cap_ntimes(vfs_handle_struct *handle,
 308                       const struct smb_filename *smb_fname,
 309                       struct smb_file_time *ft)
 310 {
 311         struct smb_filename *smb_fname_tmp = NULL;
 312         char *cappath = NULL;
 313         NTSTATUS status;
 314         int ret;
 315
 316         cappath = capencode(talloc_tos(), smb_fname->base_name);
 317
 318         if (!cappath) {
 319                 errno = ENOMEM;
 320                 return -1;
 321         }
 322
 323         /* Setup temporary smb_filename structs. */
 324         status = copy_smb_filename(talloc_tos(), smb_fname,
 325                                    &smb_fname_tmp);
 326         if (!NT_STATUS_IS_OK(status)) {
 327                 errno = map_errno_from_nt_status(status);
 328                 return -1;
 329         }
 330
 331         smb_fname_tmp->base_name = cappath;
 332
 333         ret = SMB_VFS_NEXT_NTIMES(handle, smb_fname_tmp, ft);
 334
 335         TALLOC_FREE(smb_fname_tmp);
 336         return ret;
 337 }
 338
 339
 340 static int cap_symlink(vfs_handle_struct *handle, const char *oldpath,
 341                        const char *newpath)
 342 {
 343         char *capold = capencode(talloc_tos(), oldpath);
 344         char *capnew = capencode(talloc_tos(), newpath);
 345
 346         if (!capold || !capnew) {
 347                 errno = ENOMEM;
 348                 return -1;
 349         }
 350         return SMB_VFS_NEXT_SYMLINK(handle, capold, capnew);
 351 }
 352
 353 static int cap_readlink(vfs_handle_struct *handle, const char *path,
 354                         char *buf, size_t bufsiz)
 355 {
 356         char *cappath = capencode(talloc_tos(), path);
 357
 358         if (!cappath) {
 359                 errno = ENOMEM;
 360                 return -1;
 361         }
 362         return SMB_VFS_NEXT_READLINK(handle, cappath, buf, bufsiz);
 363 }
 364
 365 static int cap_link(vfs_handle_struct *handle, const char *oldpath, const char *newpath)
 366 {
 367         char *capold = capencode(talloc_tos(), oldpath);
 368         char *capnew = capencode(talloc_tos(), newpath);
 369
 370         if (!capold || !capnew) {
 371                 errno = ENOMEM;
 372                 return -1;
 373         }
 374         return SMB_VFS_NEXT_LINK(handle, capold, capnew);
 375 }
 376
 377 static int cap_mknod(vfs_handle_struct *handle, const char *path, mode_t mode, SMB_DEV_T dev)
 378 {
 379         char *cappath = capencode(talloc_tos(), path);
 380
 381         if (!cappath) {
 382                 errno = ENOMEM;
 383                 return -1;
 384         }
 385         return SMB_VFS_NEXT_MKNOD(handle, cappath, mode, dev);
 386 }
 387
 388 static char *cap_realpath(vfs_handle_struct *handle, const char *path)
 389 {
 390         /* monyo need capencode'ed and capdecode'ed? */
 391         char *cappath = capencode(talloc_tos(), path);
 392
 393         if (!cappath) {
 394                 errno = ENOMEM;
 395                 return NULL;
 396         }
 397         return SMB_VFS_NEXT_REALPATH(handle, cappath);
 398 }
 399
 400 static int cap_chmod_acl(vfs_handle_struct *handle, const char *path, mode_t mode)
 401 {
 402         char *cappath = capencode(talloc_tos(), path);
 403
 404         /* If the underlying VFS doesn't have ACL support... */
 405         if (!cappath) {
 406                 errno = ENOMEM;
 407                 return -1;
 408         }
 409         return SMB_VFS_NEXT_CHMOD_ACL(handle, cappath, mode);
 410 }
 411
 412 static SMB_ACL_T cap_sys_acl_get_file(vfs_handle_struct *handle,
 413                                       const char *path, SMB_ACL_TYPE_T type,
 414                                       TALLOC_CTX *mem_ctx)
 415 {
 416         char *cappath = capencode(talloc_tos(), path);
 417
 418         if (!cappath) {
 419                 errno = ENOMEM;
 420                 return (SMB_ACL_T)NULL;
 421         }
 422         return SMB_VFS_NEXT_SYS_ACL_GET_FILE(handle, cappath, type, mem_ctx);
 423 }
 424
 425 static int cap_sys_acl_set_file(vfs_handle_struct *handle, const char *path, SMB_ACL_TYPE_T acltype, SMB_ACL_T theacl)
 426 {
 427         char *cappath = capencode(talloc_tos(), path);
 428
 429         if (!cappath) {
 430                 errno = ENOMEM;
 431                 return -1;
 432         }
 433         return SMB_VFS_NEXT_SYS_ACL_SET_FILE(handle, cappath, acltype, theacl);
 434 }
 435
 436 static int cap_sys_acl_delete_def_file(vfs_handle_struct *handle, const char *path)
 437 {
 438         char *cappath = capencode(talloc_tos(), path);
 439
 440         if (!cappath) {
 441                 errno = ENOMEM;
 442                 return -1;
 443         }
 444         return SMB_VFS_NEXT_SYS_ACL_DELETE_DEF_FILE(handle, cappath);
 445 }
 446
 447 static ssize_t cap_getxattr(vfs_handle_struct *handle, const char *path, const char *name, void *value, size_t size)
 448 {
 449         char *cappath = capencode(talloc_tos(), path);
 450         char *capname = capencode(talloc_tos(), name);
 451
 452         if (!cappath || !capname) {
 453                 errno = ENOMEM;
 454                 return -1;
 455         }
 456         return SMB_VFS_NEXT_GETXATTR(handle, cappath, capname, value, size);
 457 }
 458
 459 static ssize_t cap_fgetxattr(vfs_handle_struct *handle, struct files_struct *fsp, const char *path, void *value, size_t size)
 460 {
 461         char *cappath = capencode(talloc_tos(), path);
 462
 463         if (!cappath) {
 464                 errno = ENOMEM;
 465                 return -1;
 466         }
 467         return SMB_VFS_NEXT_FGETXATTR(handle, fsp, cappath, value, size);
 468 }
 469
 470 static ssize_t cap_listxattr(vfs_handle_struct *handle, const char *path, char *list, size_t size)
 471 {
 472         char *cappath = capencode(talloc_tos(), path);
 473
 474         if (!cappath) {
 475                 errno = ENOMEM;
 476                 return -1;
 477         }
 478         return SMB_VFS_NEXT_LISTXATTR(handle, cappath, list, size);
 479 }
 480
 481 static int cap_removexattr(vfs_handle_struct *handle, const char *path, const char *name)
 482 {
 483         char *cappath = capencode(talloc_tos(), path);
 484         char *capname = capencode(talloc_tos(), name);
 485
 486         if (!cappath || !capname) {
 487                 errno = ENOMEM;
 488                 return -1;
 489         }
 490         return SMB_VFS_NEXT_REMOVEXATTR(handle, cappath, capname);
 491 }
 492
 493 static int cap_fremovexattr(vfs_handle_struct *handle, struct files_struct *fsp, const char *path)
 494 {
 495         char *cappath = capencode(talloc_tos(), path);
 496
 497         if (!cappath) {
 498                 errno = ENOMEM;
 499                 return -1;
 500         }
 501         return SMB_VFS_NEXT_FREMOVEXATTR(handle, fsp, cappath);
 502 }
 503
 504 static int cap_setxattr(vfs_handle_struct *handle, const char *path, const char *name, const void *value, size_t size, int flags)
 505 {
 506         char *cappath = capencode(talloc_tos(), path);
 507         char *capname = capencode(talloc_tos(), name);
 508
 509         if (!cappath || !capname) {
 510                 errno = ENOMEM;
 511                 return -1;
 512         }
 513         return SMB_VFS_NEXT_SETXATTR(handle, cappath, capname, value, size, flags);
 514 }
 515
 516 static int cap_fsetxattr(vfs_handle_struct *handle, struct files_struct *fsp, const char *path, const void *value, size_t size, int flags)
 517 {
 518         char *cappath = capencode(talloc_tos(), path);
 519
 520         if (!cappath) {
 521                 errno = ENOMEM;
 522                 return -1;
 523         }
 524         return SMB_VFS_NEXT_FSETXATTR(handle, fsp, cappath, value, size, flags);
 525 }
 526
 527 static struct vfs_fn_pointers vfs_cap_fns = {
 528         .disk_free_fn = cap_disk_free,
 529         .opendir_fn = cap_opendir,
 530         .readdir_fn = cap_readdir,
 531         .mkdir_fn = cap_mkdir,
 532         .rmdir_fn = cap_rmdir,
 533         .open_fn = cap_open,
 534         .rename_fn = cap_rename,
 535         .stat_fn = cap_stat,
 536         .lstat_fn = cap_lstat,
 537         .unlink_fn = cap_unlink,
 538         .chmod_fn = cap_chmod,
 539         .chown_fn = cap_chown,
 540         .lchown_fn = cap_lchown,
 541         .chdir_fn = cap_chdir,
 542         .ntimes_fn = cap_ntimes,
 543         .symlink_fn = cap_symlink,
 544         .readlink_fn = cap_readlink,
 545         .link_fn = cap_link,
 546         .mknod_fn = cap_mknod,
 547         .realpath_fn = cap_realpath,
 548         .chmod_acl_fn = cap_chmod_acl,
 549         .sys_acl_get_file_fn = cap_sys_acl_get_file,
 550         .sys_acl_set_file_fn = cap_sys_acl_set_file,
 551         .sys_acl_delete_def_file_fn = cap_sys_acl_delete_def_file,
 552         .getxattr_fn = cap_getxattr,
 553         .fgetxattr_fn = cap_fgetxattr,
 554         .listxattr_fn = cap_listxattr,
 555         .removexattr_fn = cap_removexattr,
 556         .fremovexattr_fn = cap_fremovexattr,
 557         .setxattr_fn = cap_setxattr,
 558         .fsetxattr_fn = cap_fsetxattr
 559 };
 560
 561 NTSTATUS vfs_cap_init(void);
 562 NTSTATUS vfs_cap_init(void)
 563 {
 564         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "cap",
 565                                 &vfs_cap_fns);
 566 }
 567
 568 /* For CAP functions */
 569 #define hex_tag ':'
 570 #define hex2bin(c)              hex2bin_table[(unsigned char)(c)]
 571 #define bin2hex(c)              bin2hex_table[(unsigned char)(c)]
 572 #define is_hex(s)               ((s)[0] == hex_tag)
 573
 574 static unsigned char hex2bin_table[256] = {
 575 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x00 */
 576 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x10 */
 577 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x20 */
 578 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 0, 0, 0, /* 0x30 */
 579 0000, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0000, /* 0x40 */
 580 0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,
 581 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x50 */
 582 0000, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0000, /* 0x60 */
 583 0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,
 584 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x70 */
 585 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x80 */
 586 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x90 */
 587 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xa0 */
 588 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xb0 */
 589 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xc0 */
 590 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xd0 */
 591 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xe0 */
 592 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0  /* 0xf0 */
 593 };
 594 static unsigned char bin2hex_table[256] = "0123456789abcdef";
 595
 596 /*******************************************************************
 597   original code -> ":xx"  - CAP format
 598 ********************************************************************/
 599
 600 static char *capencode(TALLOC_CTX *ctx, const char *from)
 601 {
 602         char *out = NULL;
 603         const char *p1;
 604         char *to = NULL;
 605         size_t len = 0;
 606
 607         for (p1 = from; *p1; p1++) {
 608                 if ((unsigned char)*p1 >= 0x80) {
 609                         len += 3;
 610                 } else {
 611                         len++;
 612                 }
 613         }
 614         len++;
 615
 616         to = talloc_array(ctx, char, len);
 617         if (!to) {
 618                 return NULL;
 619         }
 620
 621         for (out = to; *from;) {
 622                 /* buffer husoku error */
 623                 if ((unsigned char)*from >= 0x80) {
 624                         *out++ = hex_tag;
 625                         *out++ = bin2hex (((*from)>>4)&0x0f);
 626                         *out++ = bin2hex ((*from)&0x0f);
 627                         from++;
 628                 } else {
 629                         *out++ = *from++;
 630                 }
 631         }
 632         *out = '\0';
 633         return to;
 634 }
 635
 636 /*******************************************************************
 637   CAP -> original code
 638 ********************************************************************/
 639 /* ":xx" -> a byte */
 640
 641 static char *capdecode(TALLOC_CTX *ctx, const char *from)
 642 {
 643         const char *p1;
 644         char *out = NULL;
 645         char *to = NULL;
 646         size_t len = 0;
 647
 648         for (p1 = from; *p1; len++) {
 649                 if (is_hex(p1)) {
 650                         p1 += 3;
 651                 } else {
 652                         p1++;
 653                 }
 654         }
 655         len++;
 656
 657         to = talloc_array(ctx, char, len);
 658         if (!to) {
 659                 return NULL;
 660         }
 661
 662         for (out = to; *from;) {
 663                 if (is_hex(from)) {
 664                         *out++ = (hex2bin(from[1])<<4) | (hex2bin(from[2]));
 665                         from += 3;
 666                 } else {
 667                         *out++ = *from++;
 668                 }
 669         }
 670         *out = '\0';
 671         return to;
 672 }