source3/modules/vfs_scannedonly.c

   1 /*
   2  * scannedonly VFS module for Samba 3.5 and beyond
   3  *
   4  * Copyright 2007,2008,2009,2010,2011 (C) Olivier Sessink
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19  *
  20  * ABOUT SCANNEDONLY
  21  *
  22  * scannedonly implements a 'filter' like vfs module that talks over a
  23  * unix domain socket or over UDP to a anti-virus engine.
  24  *
  25  * files that are clean have a corresponding .scanned:{filename} file
  26  * in the same directory. So why the .scanned: files? They take up
  27  * only an inode, because they are 0 bytes. To test if the file is
  28  * scanned only a stat() call on the filesystem is needed which is
  29  * very quick compared to a database lookup. All modern filesystems
  30  * use database technology such as balanced trees for lookups anyway.
  31  * The number of inodes in modern filesystems is also not limiting
  32  * anymore. The .scanned: files are also easy scriptable. You can
  33  * remove them with a simple find command or create them with a
  34  * simple touch command. Extended filesystem attributes have similar
  35  * properties, but are not supported on all filesystems, so that
  36  * would limit the usage of the module (and attributes are not as
  37  * easily scriptable)
  38  *
  39  * files that are not clean are sent to the AV-engine. Only the
  40  * filename is sent over the socket. The protocol is very simple:
  41  * a newline separated list of filenames inside each datagram.
  42  *
  43  * a file AV-scan may be requested multiple times, the AV-engine
  44  * should also check if the file has been scanned already. Requests
  45  * can also be dropped by the AV-engine (and we thus don't need the
  46  * reliability of TCP).
  47  *
  48  */
  49
  50 #include "includes.h"
  51 #include "smbd/smbd.h"
  52 #include "system/filesys.h"
  53
  54 #include "config.h"
  55
  56 #define SENDBUFFERSIZE 1450
  57
  58 #ifndef       SUN_LEN
  59 #define       SUN_LEN(sunp)   ((size_t)((struct sockaddr_un *)0)->sun_path \
  60                                 + strlen((sunp)->sun_path))
  61 #endif
  62
  63
  64 struct Tscannedonly {
  65         int socket;
  66         int domain_socket;
  67         int portnum;
  68         int scanning_message_len;
  69         int recheck_time_open;
  70         int recheck_tries_open;
  71         int recheck_size_open;
  72         int recheck_time_readdir;
  73         int recheck_tries_readdir;
  74         bool show_special_files;
  75         bool rm_hidden_files_on_rmdir;
  76         bool hide_nonscanned_files;
  77         bool allow_nonscanned_files;
  78         const char *socketname;
  79         const char *scanhost;
  80         const char *scanning_message;
  81         const char *p_scanned; /* prefix for scanned files */
  82         const char *p_virus; /* prefix for virus containing files */
  83         const char *p_failed; /* prefix for failed to scan files */
  84         char gsendbuffer[SENDBUFFERSIZE + 1];
  85 };
  86
  87 #define STRUCTSCANO(var) ((struct Tscannedonly *)var)
  88
  89 struct scannedonly_DIR {
  90         char *base;
  91         int recheck_tries_done; /* if 0 the directory listing has not yet
  92         been checked for files that need to be scanned. */
  93         SMB_STRUCT_DIR *DIR;
  94 };
  95 #define SCANNEDONLY_DEBUG 9
  96 /*********************/
  97 /* utility functions */
  98 /*********************/
  99
 100 static char *real_path_from_notify_path(TALLOC_CTX *ctx,
 101                                         struct Tscannedonly *so,
 102                                         const char *path)
 103 {
 104         char *name;
 105         int len, pathlen;
 106
 107         name = strrchr(path, '/');
 108         if (!name) {
 109                 return NULL;
 110         }
 111         pathlen = name - path;
 112         name++;
 113         len = strlen(name);
 114         if (len <= so->scanning_message_len) {
 115                 return NULL;
 116         }
 117
 118         if (strcmp(name + (len - so->scanning_message_len),
 119                    so->scanning_message) != 0) {
 120                 return NULL;
 121         }
 122
 123         return talloc_strndup(ctx,path,
 124                               pathlen + len - so->scanning_message_len);
 125 }
 126
 127 static char *cachefile_name(TALLOC_CTX *ctx,
 128                             const char *shortname,
 129                             const char *base,
 130                             const char *p_scanned)
 131 {
 132         return talloc_asprintf(ctx, "%s%s%s", base, p_scanned, shortname);
 133 }
 134
 135 static char *name_w_ending_slash(TALLOC_CTX *ctx, const char *name)
 136 {
 137         int len = strlen(name);
 138         if (name[len - 1] == '/') {
 139                 return talloc_strdup(ctx,name);
 140         } else {
 141                 return talloc_asprintf(ctx, "%s/", name);
 142         }
 143 }
 144
 145 static char *cachefile_name_f_fullpath(TALLOC_CTX *ctx,
 146                                        const char *fullpath,
 147                                        const char *p_scanned)
 148 {
 149         const char *base;
 150         char *tmp, *cachefile;
 151         const char *shortname;
 152         tmp = strrchr(fullpath, '/');
 153         if (tmp) {
 154                 base = talloc_strndup(ctx, fullpath, (tmp - fullpath) + 1);
 155                 shortname = tmp + 1;
 156         } else {
 157                 base = "";
 158                 shortname = (const char *)fullpath;
 159         }
 160         cachefile = cachefile_name(ctx, shortname, base, p_scanned);
 161         DEBUG(SCANNEDONLY_DEBUG,
 162               ("cachefile_name_f_fullpath cachefile=%s\n", cachefile));
 163         return cachefile;
 164 }
 165
 166 static char *construct_full_path(TALLOC_CTX *ctx, vfs_handle_struct * handle,
 167                                  const char *somepath, bool ending_slash)
 168 {
 169         const char *tmp;
 170
 171         if (!somepath) {
 172                 return NULL;
 173         }
 174         if (somepath[0] == '/') {
 175                 if (ending_slash) {
 176                         return name_w_ending_slash(ctx,somepath);
 177                 }
 178                 return talloc_strdup(ctx,somepath);
 179         }
 180         tmp = somepath;
 181         if (tmp[0]=='.'&&tmp[1]=='/') {
 182                 tmp+=2;
 183         }
 184         /* vfs_GetWd() seems to return a path with a slash */
 185         if (ending_slash) {
 186                 return talloc_asprintf(ctx, "%s/%s/",
 187                                        vfs_GetWd(ctx, handle->conn),tmp);
 188         }
 189         return talloc_asprintf(ctx, "%s/%s",
 190                                vfs_GetWd(ctx, handle->conn),tmp);
 191 }
 192
 193 static int connect_to_scanner(vfs_handle_struct * handle)
 194 {
 195         struct Tscannedonly *so = (struct Tscannedonly *)handle->data;
 196
 197         if (so->domain_socket) {
 198                 struct sockaddr_un saun;
 199                 DEBUG(SCANNEDONLY_DEBUG, ("socket=%s\n", so->socketname));
 200                 if ((so->socket = socket(AF_UNIX, SOCK_DGRAM, 0)) < 0) {
 201                         DEBUG(2, ("failed to create socket %s\n",
 202                                   so->socketname));
 203                         return -1;
 204                 }
 205                 saun.sun_family = AF_UNIX;
 206                 strncpy(saun.sun_path, so->socketname,
 207                         sizeof(saun.sun_path) - 1);
 208                 if (connect(so->socket, (struct sockaddr *)(void *)&saun,
 209                             SUN_LEN(&saun)) < 0) {
 210                         DEBUG(2, ("failed to connect to socket %s\n",
 211                                   so->socketname));
 212                         return -1;
 213                 }
 214                 DEBUG(SCANNEDONLY_DEBUG,("bound %s to socket %d\n",
 215                                          saun.sun_path, so->socket));
 216
 217         } else {
 218                 so->socket = open_udp_socket(so->scanhost, so->portnum);
 219                 if (so->socket < 0) {
 220                         DEBUG(2,("failed to open UDP socket to %s:%d\n",
 221                                  so->scanhost,so->portnum));
 222                         return -1;
 223                 }
 224         }
 225
 226         {/* increasing the socket buffer is done because we have large bursts
 227             of UDP packets or DGRAM's on a domain socket whenever we hit a
 228             large directory with lots of unscanned files. */
 229                 int sndsize;
 230                 socklen_t size = sizeof(int);
 231                 getsockopt(so->socket, SOL_SOCKET, SO_RCVBUF,
 232                            (char *)&sndsize, &size);
 233                 DEBUG(SCANNEDONLY_DEBUG, ("current socket buffer size=%d\n",
 234                                           sndsize));
 235                 sndsize = 262144;
 236                 if (setsockopt(so->socket, SOL_SOCKET, SO_RCVBUF,
 237                                (char *)&sndsize,
 238                                (int)sizeof(sndsize)) != 0) {
 239                         DEBUG(SCANNEDONLY_DEBUG,
 240                               ("error setting socket buffer %s (%d)\n",
 241                                strerror(errno), errno));
 242                 }
 243         }
 244         set_blocking(so->socket, false);
 245         return 0;
 246 }
 247
 248 static void flush_sendbuffer(vfs_handle_struct * handle)
 249 {
 250         struct Tscannedonly *so = (struct Tscannedonly *)handle->data;
 251         int ret, len, loop = 10;
 252         if (so->gsendbuffer[0] == '\0') {
 253                 return;
 254         }
 255
 256         do {
 257                 loop--;
 258                 len = strlen(so->gsendbuffer);
 259                 ret = send(so->socket, so->gsendbuffer, len, 0);
 260                 if (ret == len) {
 261                         so->gsendbuffer[0] = '\0';
 262                         break;
 263                 }
 264                 if (ret == -1) {
 265                         DEBUG(3,("scannedonly flush_sendbuffer: "
 266                                  "error sending on socket %d to scanner:"
 267                                  " %s (%d)\n",
 268                                  so->socket, strerror(errno), errno));
 269                         if (errno == ECONNREFUSED || errno == ENOTCONN
 270                             || errno == ECONNRESET) {
 271                                 if (connect_to_scanner(handle) == -1)
 272                                         break;  /* connecting fails, abort */
 273                                 /* try again */
 274                         } else if (errno != EINTR) {
 275                                 /* on EINTR we just try again, all remaining
 276                                    other errors we log the error
 277                                    and try again ONCE */
 278                                 loop = 1;
 279                                 DEBUG(3,("scannedonly flush_sendbuffer: "
 280                                          "error sending data to scanner: %s "
 281                                          "(%d)\n", strerror(errno), errno));
 282                         }
 283                 } else {
 284                         /* --> partial write: Resend all filenames that were
 285                            not or not completely written. a partial filename
 286                            written means the filename will not arrive correctly,
 287                            so resend it completely */
 288                         int pos = 0;
 289                         while (pos < len) {
 290                                 char *tmp = strchr(so->gsendbuffer+pos, '\n');
 291                                 if (tmp && tmp - so->gsendbuffer < ret)
 292                                         pos = tmp - so->gsendbuffer + 1;
 293                                 else
 294                                         break;
 295                         }
 296                         memmove(so->gsendbuffer, so->gsendbuffer + pos,
 297                                 SENDBUFFERSIZE - ret);
 298                         /* now try again */
 299                 }
 300         } while (loop > 0);
 301
 302         if (so->gsendbuffer[0] != '\0') {
 303                 DEBUG(2,
 304                       ("scannedonly flush_sendbuffer: "
 305                        "failed to send files to AV scanner, "
 306                        "discarding files."));
 307                 so->gsendbuffer[0] = '\0';
 308         }
 309 }
 310
 311 static void notify_scanner(vfs_handle_struct * handle, const char *scanfile)
 312 {
 313         const char *tmp;
 314         int tmplen, gsendlen;
 315         struct Tscannedonly *so = (struct Tscannedonly *)handle->data;
 316         TALLOC_CTX *ctx=talloc_tos();
 317         if (scanfile[0] != '/') {
 318                 tmp = construct_full_path(ctx,handle, scanfile, false);
 319         } else {
 320                 tmp = (const char *)scanfile;
 321         }
 322         tmplen = strlen(tmp);
 323         gsendlen = strlen(so->gsendbuffer);
 324         DEBUG(SCANNEDONLY_DEBUG,
 325               ("scannedonly notify_scanner: tmp=%s, tmplen=%d, gsendlen=%d\n",
 326                tmp, tmplen, gsendlen));
 327         if (gsendlen + tmplen >= SENDBUFFERSIZE) {
 328                 flush_sendbuffer(handle);
 329         }
 330         strlcat(so->gsendbuffer, tmp, SENDBUFFERSIZE + 1);
 331         strlcat(so->gsendbuffer, "\n", SENDBUFFERSIZE + 1);
 332 }
 333
 334 static bool is_scannedonly_file(struct Tscannedonly *so, const char *shortname)
 335 {
 336         if (shortname[0]!='.') {
 337                 return false;
 338         }
 339         if (strncmp(shortname, so->p_scanned, strlen(so->p_scanned)) == 0) {
 340                 return true;
 341         }
 342         if (strncmp(shortname, so->p_virus, strlen(so->p_virus)) == 0) {
 343                 return true;
 344         }
 345         if (strncmp(shortname, so->p_failed, strlen(so->p_failed)) == 0) {
 346                 return true;
 347         }
 348         return false;
 349 }
 350
 351 static bool timespec_is_newer(struct timespec *base, struct timespec *test)
 352 {
 353         return timespec_compare(base,test) < 0;
 354 }
 355
 356 /*
 357 vfs_handle_struct *handle the scannedonly handle
 358 scannedonly_DIR * sDIR the scannedonly struct if called from _readdir()
 359 or NULL
 360 fullpath is a full path starting from / or a relative path to the
 361 current working directory
 362 shortname is the filename without directory components
 363 basename, is the directory without file name component
 364 allow_nonexistant return TRUE if stat() on the requested file fails
 365 recheck_time, the time in milliseconds to wait for the daemon to
 366 create a .scanned file
 367 recheck_tries, the number of tries to wait
 368 recheck_size, size in Kb of files that should not be waited for
 369 loop : boolean if we should try to loop over all files in the directory
 370 and send a notify to the scanner for all files that need scanning
 371 */
 372 static bool scannedonly_allow_access(vfs_handle_struct * handle,
 373                                      struct scannedonly_DIR *sDIR,
 374                                      struct smb_filename *smb_fname,
 375                                      const char *shortname,
 376                                      const char *base_name,
 377                                      int allow_nonexistant,
 378                                      int recheck_time, int recheck_tries,
 379                                      int recheck_size, int loop)
 380 {
 381         struct smb_filename *cache_smb_fname;
 382         TALLOC_CTX *ctx=talloc_tos();
 383         char *cachefile;
 384         int retval = -1;
 385         DEBUG(SCANNEDONLY_DEBUG,
 386               ("smb_fname->base_name=%s, shortname=%s, base_name=%s\n"
 387                ,smb_fname->base_name,shortname,base_name));
 388
 389         if (ISDOT(shortname) || ISDOTDOT(shortname)) {
 390                 return true;
 391         }
 392         if (is_scannedonly_file(STRUCTSCANO(handle->data), shortname)) {
 393                 DEBUG(SCANNEDONLY_DEBUG,
 394                       ("scannedonly_allow_access, %s is a scannedonly file, "
 395                        "return 0\n", shortname));
 396                 return false;
 397         }
 398
 399         if (!VALID_STAT(smb_fname->st)) {
 400                 DEBUG(SCANNEDONLY_DEBUG,("stat %s\n",smb_fname->base_name));
 401                 retval = SMB_VFS_NEXT_STAT(handle, smb_fname);
 402                 if (retval != 0) {
 403                         /* failed to stat this file?!? --> hide it */
 404                         DEBUG(SCANNEDONLY_DEBUG,("no valid stat, return"
 405                                                  " allow_nonexistant=%d\n",
 406                                                  allow_nonexistant));
 407                         return allow_nonexistant;
 408                 }
 409         }
 410         if (!S_ISREG(smb_fname->st.st_ex_mode)) {
 411                 DEBUG(SCANNEDONLY_DEBUG,
 412                       ("%s is not a regular file, ISDIR=%d\n",
 413                        smb_fname->base_name,
 414                        S_ISDIR(smb_fname->st.st_ex_mode)));
 415                 return (STRUCTSCANO(handle->data)->
 416                         show_special_files ||
 417                         S_ISDIR(smb_fname->st.st_ex_mode));
 418         }
 419         if (smb_fname->st.st_ex_size == 0) {
 420                 DEBUG(SCANNEDONLY_DEBUG,("empty file, return 1\n"));
 421                 return true;    /* empty files cannot contain viruses ! */
 422         }
 423         cachefile = cachefile_name(ctx,
 424                                    shortname,
 425                                    base_name,
 426                                    STRUCTSCANO(handle->data)->p_scanned);
 427         create_synthetic_smb_fname(ctx, cachefile,NULL,NULL,&cache_smb_fname);
 428         if (!VALID_STAT(cache_smb_fname->st)) {
 429                 retval = SMB_VFS_NEXT_STAT(handle, cache_smb_fname);
 430         }
 431         if (retval == 0 && VALID_STAT(cache_smb_fname->st)) {
 432                 if (timespec_is_newer(&smb_fname->st.st_ex_ctime,
 433                                       &cache_smb_fname->st.st_ex_ctime)) {
 434                         talloc_free(cache_smb_fname);
 435                         return true;
 436                 }
 437                 /* no cachefile or too old */
 438                 SMB_VFS_NEXT_UNLINK(handle, cache_smb_fname);
 439                 retval = -1;
 440         }
 441
 442         notify_scanner(handle, smb_fname->base_name);
 443
 444         if (loop && sDIR && sDIR->recheck_tries_done == 0) {
 445                 /* check the rest of the directory and notify the
 446                    scanner if some file needs scanning */
 447                 long offset;
 448                 SMB_STRUCT_DIRENT *dire;
 449
 450                 offset = SMB_VFS_NEXT_TELLDIR(handle, sDIR->DIR);
 451                 dire = SMB_VFS_NEXT_READDIR(handle, sDIR->DIR, NULL);
 452                 while (dire) {
 453                         char *fpath2;
 454                         struct smb_filename *smb_fname2;
 455                         fpath2 = talloc_asprintf(ctx, "%s%s", base_name,dire->d_name);
 456                         DEBUG(SCANNEDONLY_DEBUG,
 457                               ("scannedonly_allow_access in loop, "
 458                                "found %s\n", fpath2));
 459                         create_synthetic_smb_fname(ctx, fpath2,NULL,NULL,
 460                                                    &smb_fname2);
 461                         scannedonly_allow_access(handle, NULL,
 462                                                  smb_fname2,
 463                                                  dire->d_name,
 464                                                  base_name, 0, 0, 0, 0, 0);
 465                         talloc_free(fpath2);
 466                         talloc_free(smb_fname2);
 467                         dire = SMB_VFS_NEXT_READDIR(handle, sDIR->DIR,NULL);
 468                 }
 469                 sDIR->recheck_tries_done = 1;
 470                 SMB_VFS_NEXT_SEEKDIR(handle, sDIR->DIR, offset);
 471         }
 472         if (recheck_time > 0
 473             && ((recheck_size > 0
 474                  && smb_fname->st.st_ex_size < (1024 * recheck_size))
 475                  || (sDIR && sDIR->recheck_tries_done < recheck_tries)
 476                 )) {
 477                 int numloops = sDIR ? sDIR->recheck_tries_done : 0;
 478                 flush_sendbuffer(handle);
 479                 while (retval != 0      /*&& errno == ENOENT */
 480                        && numloops < recheck_tries) {
 481                         DEBUG(SCANNEDONLY_DEBUG,
 482                               ("scannedonly_allow_access, wait (try=%d "
 483                                "(max %d), %d ms) for %s\n",
 484                                numloops, recheck_tries,
 485                                recheck_time, cache_smb_fname->base_name));
 486                         smb_msleep(recheck_time);
 487                         retval = SMB_VFS_NEXT_STAT(handle, cache_smb_fname);
 488                         numloops++;
 489                 }
 490                 if (sDIR)
 491                         sDIR->recheck_tries_done = numloops;
 492         }
 493         /* still no cachefile, or still too old, return 0 */
 494         if (retval != 0
 495             || !timespec_is_newer(&smb_fname->st.st_ex_ctime,
 496                                   &cache_smb_fname->st.st_ex_ctime)) {
 497                 DEBUG(SCANNEDONLY_DEBUG,
 498                       ("retval=%d, return 0\n",retval));
 499                 return false;
 500         }
 501         return true;
 502 }
 503
 504 /*********************/
 505 /* VFS functions     */
 506 /*********************/
 507
 508 static SMB_STRUCT_DIR *scannedonly_opendir(vfs_handle_struct * handle,
 509                                            const char *fname,
 510                                            const char *mask, uint32 attr)
 511 {
 512         SMB_STRUCT_DIR *DIRp;
 513         struct scannedonly_DIR *sDIR;
 514
 515         DIRp = SMB_VFS_NEXT_OPENDIR(handle, fname, mask, attr);
 516         if (!DIRp) {
 517                 return NULL;
 518         }
 519
 520         sDIR = talloc(NULL, struct scannedonly_DIR);
 521         if (fname[0] != '/') {
 522                 sDIR->base = construct_full_path(sDIR,handle, fname, true);
 523         } else {
 524                 sDIR->base = name_w_ending_slash(sDIR, fname);
 525         }
 526         DEBUG(SCANNEDONLY_DEBUG,
 527                         ("scannedonly_opendir, fname=%s, base=%s\n",fname,sDIR->base));
 528         sDIR->DIR = DIRp;
 529         sDIR->recheck_tries_done = 0;
 530         return (SMB_STRUCT_DIR *) sDIR;
 531 }
 532
 533 static SMB_STRUCT_DIR *scannedonly_fdopendir(vfs_handle_struct * handle,
 534                                            files_struct *fsp,
 535                                            const char *mask, uint32 attr)
 536 {
 537         SMB_STRUCT_DIR *DIRp;
 538         struct scannedonly_DIR *sDIR;
 539         const char *fname;
 540
 541         DIRp = SMB_VFS_NEXT_FDOPENDIR(handle, fsp, mask, attr);
 542         if (!DIRp) {
 543                 return NULL;
 544         }
 545
 546         fname = (const char *)fsp->fsp_name->base_name;
 547
 548         sDIR = talloc(NULL, struct scannedonly_DIR);
 549         if (fname[0] != '/') {
 550                 sDIR->base = construct_full_path(sDIR,handle, fname, true);
 551         } else {
 552                 sDIR->base = name_w_ending_slash(sDIR, fname);
 553         }
 554         DEBUG(SCANNEDONLY_DEBUG,
 555                         ("scannedonly_fdopendir, fname=%s, base=%s\n",fname,sDIR->base));
 556         sDIR->DIR = DIRp;
 557         sDIR->recheck_tries_done = 0;
 558         return (SMB_STRUCT_DIR *) sDIR;
 559 }
 560
 561
 562 static SMB_STRUCT_DIRENT *scannedonly_readdir(vfs_handle_struct *handle,
 563                                               SMB_STRUCT_DIR * dirp,
 564                                               SMB_STRUCT_STAT *sbuf)
 565 {
 566         SMB_STRUCT_DIRENT *result;
 567         int allowed = 0;
 568         char *tmp;
 569         struct smb_filename *smb_fname;
 570         char *notify_name;
 571         int namelen;
 572         SMB_STRUCT_DIRENT *newdirent;
 573         TALLOC_CTX *ctx=talloc_tos();
 574
 575         struct scannedonly_DIR *sDIR = (struct scannedonly_DIR *)dirp;
 576         if (!dirp) {
 577                 return NULL;
 578         }
 579
 580         result = SMB_VFS_NEXT_READDIR(handle, sDIR->DIR, sbuf);
 581
 582         if (!result)
 583                 return NULL;
 584
 585         if (is_scannedonly_file(STRUCTSCANO(handle->data), result->d_name)) {
 586                 DEBUG(SCANNEDONLY_DEBUG,
 587                       ("scannedonly_readdir, %s is a scannedonly file, "
 588                        "skip to next entry\n", result->d_name));
 589                 return scannedonly_readdir(handle, dirp, NULL);
 590         }
 591         tmp = talloc_asprintf(ctx, "%s%s", sDIR->base, result->d_name);
 592         DEBUG(SCANNEDONLY_DEBUG,
 593               ("scannedonly_readdir, check access to %s (sbuf=%p)\n",
 594                tmp,sbuf));
 595
 596         /* even if we don't hide nonscanned files or we allow non scanned
 597            files we call allow_access because it will notify the daemon to
 598            scan these files */
 599         create_synthetic_smb_fname(ctx, tmp,NULL,
 600                                    sbuf?VALID_STAT(*sbuf)?sbuf:NULL:NULL,
 601                                    &smb_fname);
 602         allowed = scannedonly_allow_access(
 603                 handle, sDIR, smb_fname,
 604                 result->d_name,
 605                 sDIR->base, 0,
 606                 STRUCTSCANO(handle->data)->hide_nonscanned_files
 607                 ? STRUCTSCANO(handle->data)->recheck_time_readdir
 608                 : 0,
 609                 STRUCTSCANO(handle->data)->recheck_tries_readdir,
 610                 -1,
 611                 1);
 612         DEBUG(SCANNEDONLY_DEBUG,
 613               ("scannedonly_readdir access to %s (%s) = %d\n", tmp,
 614                result->d_name, allowed));
 615         if (allowed) {
 616                 return result;
 617         }
 618         DEBUG(SCANNEDONLY_DEBUG,
 619               ("hide_nonscanned_files=%d, allow_nonscanned_files=%d\n",
 620                STRUCTSCANO(handle->data)->hide_nonscanned_files,
 621                STRUCTSCANO(handle->data)->allow_nonscanned_files
 622                       ));
 623
 624         if (!STRUCTSCANO(handle->data)->hide_nonscanned_files
 625             || STRUCTSCANO(handle->data)->allow_nonscanned_files) {
 626                 return result;
 627         }
 628
 629         DEBUG(SCANNEDONLY_DEBUG,
 630               ("scannedonly_readdir, readdir listing for %s not "
 631                "allowed, notify user\n", result->d_name));
 632         notify_name = talloc_asprintf(
 633                 ctx,"%s %s",result->d_name,
 634                 STRUCTSCANO(handle->data)->scanning_message);
 635         namelen = strlen(notify_name);
 636         newdirent = (SMB_STRUCT_DIRENT *)talloc_array(
 637                 ctx, char, sizeof(SMB_STRUCT_DIRENT) + namelen + 1);
 638         if (!newdirent) {
 639                 return NULL;
 640         }
 641         memcpy(newdirent, result, sizeof(SMB_STRUCT_DIRENT));
 642         memcpy(&newdirent->d_name, notify_name, namelen + 1);
 643         DEBUG(SCANNEDONLY_DEBUG,
 644               ("scannedonly_readdir, return newdirent at %p with "
 645                "notification %s\n", newdirent, newdirent->d_name));
 646         return newdirent;
 647 }
 648
 649 static void scannedonly_seekdir(struct vfs_handle_struct *handle,
 650                                 SMB_STRUCT_DIR * dirp, long offset)
 651 {
 652         struct scannedonly_DIR *sDIR = (struct scannedonly_DIR *)dirp;
 653         SMB_VFS_NEXT_SEEKDIR(handle, sDIR->DIR, offset);
 654 }
 655
 656 static long scannedonly_telldir(struct vfs_handle_struct *handle,
 657                                 SMB_STRUCT_DIR * dirp)
 658 {
 659         struct scannedonly_DIR *sDIR = (struct scannedonly_DIR *)dirp;
 660         return SMB_VFS_NEXT_TELLDIR(handle, sDIR->DIR);
 661 }
 662
 663 static void scannedonly_rewinddir(struct vfs_handle_struct *handle,
 664                                   SMB_STRUCT_DIR * dirp)
 665 {
 666         struct scannedonly_DIR *sDIR = (struct scannedonly_DIR *)dirp;
 667         SMB_VFS_NEXT_REWINDDIR(handle, sDIR->DIR);
 668 }
 669
 670 static int scannedonly_closedir(vfs_handle_struct * handle,
 671                                 SMB_STRUCT_DIR * dirp)
 672 {
 673         int retval;
 674         struct scannedonly_DIR *sDIR = (struct scannedonly_DIR *)dirp;
 675         flush_sendbuffer(handle);
 676         retval = SMB_VFS_NEXT_CLOSEDIR(handle, sDIR->DIR);
 677         TALLOC_FREE(sDIR);
 678         return retval;
 679 }
 680
 681 static int scannedonly_stat(vfs_handle_struct * handle,
 682                             struct smb_filename *smb_fname)
 683 {
 684         int ret;
 685         ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
 686         DEBUG(SCANNEDONLY_DEBUG, ("scannedonly_stat: %s returned %d\n",
 687                                   smb_fname->base_name, ret));
 688         if (ret != 0 && errno == ENOENT) {
 689                 TALLOC_CTX *ctx=talloc_tos();
 690                 char *test_base_name, *tmp_base_name = smb_fname->base_name;
 691                 /* possibly this was a fake name (file is being scanned for
 692                    viruses.txt): check for that and create the real name and
 693                    stat the real name */
 694                 test_base_name = real_path_from_notify_path(
 695                         ctx,
 696                         STRUCTSCANO(handle->data),
 697                         smb_fname->base_name);
 698                 if (test_base_name) {
 699                         smb_fname->base_name = test_base_name;
 700                         ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
 701                         DEBUG(5, ("_stat: %s returned %d\n",
 702                                   test_base_name, ret));
 703                         smb_fname->base_name = tmp_base_name;
 704                 }
 705         }
 706         return ret;
 707 }
 708
 709 static int scannedonly_lstat(vfs_handle_struct * handle,
 710                              struct smb_filename *smb_fname)
 711 {
 712         int ret;
 713         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
 714         DEBUG(SCANNEDONLY_DEBUG, ("scannedonly_lstat: %s returned %d\n",
 715                                   smb_fname->base_name, ret));
 716         if (ret != 0 && errno == ENOENT) {
 717                 TALLOC_CTX *ctx=talloc_tos();
 718                 char *test_base_name, *tmp_base_name = smb_fname->base_name;
 719                 /* possibly this was a fake name (file is being scanned for
 720                    viruses.txt): check for that and create the real name and
 721                    stat the real name */
 722                 test_base_name = real_path_from_notify_path(
 723                         ctx, STRUCTSCANO(handle->data), smb_fname->base_name);
 724                 if (test_base_name) {
 725                         smb_fname->base_name = test_base_name;
 726                         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
 727                         DEBUG(5, ("_lstat: %s returned %d\n",
 728                                   test_base_name, ret));
 729                         smb_fname->base_name = tmp_base_name;
 730                 }
 731         }
 732         return ret;
 733 }
 734
 735 static int scannedonly_open(vfs_handle_struct * handle,
 736                             struct smb_filename *smb_fname,
 737                             files_struct * fsp, int flags, mode_t mode)
 738 {
 739         const char *base;
 740         char *tmp, *shortname;
 741         int allowed, write_access = 0;
 742         TALLOC_CTX *ctx=talloc_tos();
 743         /* if open for writing ignore it */
 744         if ((flags & O_ACCMODE) == O_WRONLY) {
 745                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
 746         }
 747         if ((flags & O_ACCMODE) == O_RDWR) {
 748                 write_access = 1;
 749         }
 750         /* check if this file is scanned already */
 751         tmp = strrchr(smb_fname->base_name, '/');
 752         if (tmp) {
 753                 base = talloc_strndup(ctx,smb_fname->base_name,
 754                                       (tmp - smb_fname->base_name) + 1);
 755                 shortname = tmp + 1;
 756         } else {
 757                 base = "";
 758                 shortname = (char *)smb_fname->base_name;
 759         }
 760         allowed = scannedonly_allow_access(
 761                 handle, NULL, smb_fname, shortname,
 762                 base,
 763                 write_access,
 764                 STRUCTSCANO(handle->data)->recheck_time_open,
 765                 STRUCTSCANO(handle->data)->recheck_tries_open,
 766                 STRUCTSCANO(handle->data)->recheck_size_open,
 767                 0);
 768         flush_sendbuffer(handle);
 769         DEBUG(SCANNEDONLY_DEBUG, ("scannedonly_open: allow=%d for %s\n",
 770                                   allowed, smb_fname->base_name));
 771         if (allowed
 772             || STRUCTSCANO(handle->data)->allow_nonscanned_files) {
 773                 return SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
 774         }
 775         errno = EACCES;
 776         return -1;
 777 }
 778
 779 static int scannedonly_close(vfs_handle_struct * handle, files_struct * fsp)
 780 {
 781         /* we only have to notify the scanner
 782            for files that were open readwrite or writable. */
 783         if (fsp->can_write) {
 784                 TALLOC_CTX *ctx = talloc_tos();
 785                 notify_scanner(handle, construct_full_path(
 786                                        ctx,handle,
 787                                        fsp->fsp_name->base_name,false));
 788                 flush_sendbuffer(handle);
 789         }
 790         return SMB_VFS_NEXT_CLOSE(handle, fsp);
 791 }
 792
 793 static int scannedonly_rename(vfs_handle_struct * handle,
 794                               const struct smb_filename *smb_fname_src,
 795                               const struct smb_filename *smb_fname_dst)
 796 {
 797         /* rename the cache file before we pass the actual rename on */
 798         struct smb_filename *smb_fname_src_tmp = NULL;
 799         struct smb_filename *smb_fname_dst_tmp = NULL;
 800         char *cachefile_src, *cachefile_dst;
 801         bool needscandst=false;
 802         int ret;
 803         TALLOC_CTX *ctx = talloc_tos();
 804
 805         /* Setup temporary smb_filename structs. */
 806         cachefile_src = cachefile_name_f_fullpath(
 807                 ctx,
 808                 smb_fname_src->base_name,
 809                 STRUCTSCANO(handle->data)->p_scanned);
 810         cachefile_dst = cachefile_name_f_fullpath(
 811                 ctx,
 812                 smb_fname_dst->base_name,
 813                 STRUCTSCANO(handle->data)->p_scanned);
 814         create_synthetic_smb_fname(ctx, cachefile_src,NULL,NULL,
 815                                    &smb_fname_src_tmp);
 816         create_synthetic_smb_fname(ctx, cachefile_dst,NULL,NULL,
 817                                    &smb_fname_dst_tmp);
 818
 819         ret = SMB_VFS_NEXT_RENAME(handle, smb_fname_src_tmp, smb_fname_dst_tmp);
 820         if (ret == ENOENT) {
 821                 needscandst=true;
 822         } else if (ret != 0) {
 823                 DEBUG(SCANNEDONLY_DEBUG,
 824                       ("failed to rename %s into %s error %d: %s\n", cachefile_src,
 825                        cachefile_dst, ret, strerror(ret)));
 826                 needscandst=true;
 827         }
 828         ret = SMB_VFS_NEXT_RENAME(handle, smb_fname_src, smb_fname_dst);
 829         if (ret == 0 && needscandst) {
 830                 notify_scanner(handle, smb_fname_dst->base_name);
 831                 flush_sendbuffer(handle);
 832         }
 833         return ret;
 834 }
 835
 836 static int scannedonly_unlink(vfs_handle_struct * handle,
 837                               const struct smb_filename *smb_fname)
 838 {
 839         /* unlink the 'scanned' file too */
 840         struct smb_filename *smb_fname_cache = NULL;
 841         char * cachefile;
 842         TALLOC_CTX *ctx = talloc_tos();
 843
 844         cachefile = cachefile_name_f_fullpath(
 845                 ctx,
 846                 smb_fname->base_name,
 847                 STRUCTSCANO(handle->data)->p_scanned);
 848         create_synthetic_smb_fname(ctx, cachefile,NULL,NULL,
 849                                    &smb_fname_cache);
 850         if (SMB_VFS_NEXT_UNLINK(handle, smb_fname_cache) != 0) {
 851                 DEBUG(SCANNEDONLY_DEBUG, ("_unlink: failed to unlink %s\n",
 852                                           smb_fname_cache->base_name));
 853         }
 854         return SMB_VFS_NEXT_UNLINK(handle, smb_fname);
 855 }
 856
 857 static int scannedonly_rmdir(vfs_handle_struct * handle, const char *path)
 858 {
 859         /* if there are only .scanned: .virus: or .failed: files, we delete
 860            those, because the client cannot see them */
 861         DIR *dirp;
 862         SMB_STRUCT_DIRENT *dire;
 863         TALLOC_CTX *ctx = talloc_tos();
 864         bool only_deletable_files = true, have_files = false;
 865         char *path_w_slash;
 866
 867         if (!STRUCTSCANO(handle->data)->rm_hidden_files_on_rmdir)
 868                 return SMB_VFS_NEXT_RMDIR(handle, path);
 869
 870         path_w_slash = name_w_ending_slash(ctx,path);
 871         dirp = SMB_VFS_NEXT_OPENDIR(handle, path, NULL, 0);
 872         if (!dirp) {
 873                 return -1;
 874         }
 875         while ((dire = SMB_VFS_NEXT_READDIR(handle, dirp, NULL)) != NULL) {
 876                 if (ISDOT(dire->d_name) || ISDOTDOT(dire->d_name)) {
 877                         continue;
 878                 }
 879                 have_files = true;
 880                 if (!is_scannedonly_file(STRUCTSCANO(handle->data),
 881                                          dire->d_name)) {
 882                         struct smb_filename *smb_fname = NULL;
 883                         char *fullpath;
 884                         int retval;
 885
 886                         if (STRUCTSCANO(handle->data)->show_special_files) {
 887                                 only_deletable_files = false;
 888                                 break;
 889                         }
 890                         /* stat the file and see if it is a
 891                            special file */
 892                         fullpath = talloc_asprintf(ctx, "%s%s", path_w_slash,
 893                                                   dire->d_name);
 894                         create_synthetic_smb_fname(ctx, fullpath,NULL,NULL,
 895                                                    &smb_fname);
 896                         retval = SMB_VFS_NEXT_STAT(handle, smb_fname);
 897                         if (retval == 0
 898                             && S_ISREG(smb_fname->st.st_ex_mode)) {
 899                                 only_deletable_files = false;
 900                         }
 901                         TALLOC_FREE(fullpath);
 902                         TALLOC_FREE(smb_fname);
 903                         break;
 904                 }
 905         }
 906         DEBUG(SCANNEDONLY_DEBUG,
 907               ("path=%s, have_files=%d, only_deletable_files=%d\n",
 908                path, have_files, only_deletable_files));
 909         if (have_files && only_deletable_files) {
 910                 DEBUG(SCANNEDONLY_DEBUG,
 911                       ("scannedonly_rmdir, remove leftover scannedonly "
 912                        "files from %s\n", path_w_slash));
 913                 SMB_VFS_NEXT_REWINDDIR(handle, dirp);
 914                 while ((dire = SMB_VFS_NEXT_READDIR(handle, dirp, NULL))
 915                        != NULL) {
 916                         char *fullpath;
 917                         struct smb_filename *smb_fname = NULL;
 918                         if (ISDOT(dire->d_name) || ISDOTDOT(dire->d_name)) {
 919                                 continue;
 920                         }
 921                         fullpath = talloc_asprintf(ctx, "%s%s", path_w_slash,
 922                                                   dire->d_name);
 923                         create_synthetic_smb_fname(ctx, fullpath,NULL,NULL,
 924                                                    &smb_fname);
 925                         DEBUG(SCANNEDONLY_DEBUG, ("unlink %s\n", fullpath));
 926                         SMB_VFS_NEXT_UNLINK(handle, smb_fname);
 927                         TALLOC_FREE(fullpath);
 928                         TALLOC_FREE(smb_fname);
 929                 }
 930         }
 931         SMB_VFS_NEXT_CLOSEDIR(handle, dirp);
 932         return SMB_VFS_NEXT_RMDIR(handle, path);
 933 }
 934
 935 static void free_scannedonly_data(void **data)
 936 {
 937         SAFE_FREE(*data);
 938 }
 939
 940 static int scannedonly_connect(struct vfs_handle_struct *handle,
 941                                const char *service, const char *user)
 942 {
 943
 944         struct Tscannedonly *so;
 945
 946         so = SMB_MALLOC_P(struct Tscannedonly);
 947         handle->data = (void *)so;
 948         handle->free_data = free_scannedonly_data;
 949         so->gsendbuffer[0]='\0';
 950         so->domain_socket =
 951                 lp_parm_bool(SNUM(handle->conn), "scannedonly",
 952                              "domain_socket", True);
 953         so->socketname = lp_parm_const_string(SNUM(handle->conn),
 954                                              "scannedonly", "socketname",
 955                                              "/var/lib/scannedonly/scan");
 956
 957         so->portnum =
 958                 lp_parm_int(SNUM(handle->conn), "scannedonly", "portnum",
 959                             2020);
 960         so->scanhost = lp_parm_const_string(SNUM(handle->conn),
 961                                              "scannedonly", "scanhost",
 962                                              "localhost");
 963
 964         so->show_special_files =
 965                 lp_parm_bool(SNUM(handle->conn), "scannedonly",
 966                              "show_special_files", True);
 967         so->rm_hidden_files_on_rmdir =
 968                 lp_parm_bool(SNUM(handle->conn), "scannedonly",
 969                              "rm_hidden_files_on_rmdir", True);
 970         so->hide_nonscanned_files =
 971                 lp_parm_bool(SNUM(handle->conn), "scannedonly",
 972                              "hide_nonscanned_files", False);
 973         so->allow_nonscanned_files =
 974                 lp_parm_bool(SNUM(handle->conn), "scannedonly",
 975                              "allow_nonscanned_files", False);
 976         so->scanning_message = lp_parm_const_string(SNUM(handle->conn),
 977                                              "scannedonly",
 978                                              "scanning_message",
 979                                              "is being scanned for viruses");
 980         so->scanning_message_len = strlen(so->scanning_message);
 981         so->recheck_time_open =
 982                 lp_parm_int(SNUM(handle->conn), "scannedonly",
 983                             "recheck_time_open", 50);
 984         so->recheck_tries_open =
 985                 lp_parm_int(SNUM(handle->conn), "scannedonly",
 986                             "recheck_tries_open", 100);
 987         so->recheck_size_open =
 988                 lp_parm_int(SNUM(handle->conn), "scannedonly",
 989                             "recheck_size_open", 100);
 990         so->recheck_time_readdir =
 991                 lp_parm_int(SNUM(handle->conn), "scannedonly",
 992                             "recheck_time_readdir", 50);
 993         so->recheck_tries_readdir =
 994                 lp_parm_int(SNUM(handle->conn), "scannedonly",
 995                             "recheck_tries_readdir", 20);
 996
 997         so->p_scanned =
 998                 lp_parm_const_string(SNUM(handle->conn),
 999                                              "scannedonly",
1000                                              "pref_scanned",
1001                                              ".scanned:");
1002         so->p_virus =
1003                 lp_parm_const_string(SNUM(handle->conn),
1004                                              "scannedonly",
1005                                              "pref_virus",
1006                                              ".virus:");
1007         so->p_failed =
1008                 lp_parm_const_string(SNUM(handle->conn),
1009                                              "scannedonly",
1010                                              "pref_failed",
1011                                              ".failed:");
1012         connect_to_scanner(handle);
1013
1014         return SMB_VFS_NEXT_CONNECT(handle, service, user);
1015 }
1016
1017 /* VFS operations structure */
1018 static struct vfs_fn_pointers vfs_scannedonly_fns = {
1019         .opendir = scannedonly_opendir,
1020         .fdopendir = scannedonly_fdopendir,
1021         .readdir = scannedonly_readdir,
1022         .seekdir = scannedonly_seekdir,
1023         .telldir = scannedonly_telldir,
1024         .rewind_dir = scannedonly_rewinddir,
1025         .closedir = scannedonly_closedir,
1026         .rmdir = scannedonly_rmdir,
1027         .stat = scannedonly_stat,
1028         .lstat = scannedonly_lstat,
1029         .open_fn = scannedonly_open,
1030         .close_fn = scannedonly_close,
1031         .rename = scannedonly_rename,
1032         .unlink = scannedonly_unlink,
1033         .connect_fn = scannedonly_connect
1034 };
1035
1036 NTSTATUS vfs_scannedonly_init(void)
1037 {
1038         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "scannedonly",
1039                                 &vfs_scannedonly_fns);
1040 }