Roxen.git / server / modules / filesystems / filesystem.pike

version» Context lines:

Roxen.git/server/modules/filesystems/filesystem.pike:1:   // This is a roxen module. (c) Informationsv√§varna AB 1996.      // This is a virtual "file-system".   // It will be located somewhere in the name-space of the server.   // Also inherited by some of the other filesystems. - string cvs_version = "$Id: filesystem.pike,v 1.7 1997/01/26 23:56:47 per Exp $"; + string cvs_version = "$Id: filesystem.pike,v 1.7.2.1 1997/03/02 19:23:04 grubba Exp $";   #include <module.h>      #if DEBUG_LEVEL > 20   # ifndef FILESYSTEM_DEBUG   # define FILESYSTEM_DEBUG   # endif   #endif      inherit "module";   inherit "roxenlib";   inherit "socket";    -  + import Array; + import Stdio; +    int redirects, accesses, errors, dirlists;   int puts, deletes;      static int do_stat = 1;      string status()   {    return ("<h2>Accesses to this filesystem</h2>"+    (redirects?"<b>Redirects</b>: "+redirects+"<br>":"")+    (accesses?"<b>Normal files</b>: "+accesses+"<br>"
Roxen.git/server/modules/filesystems/filesystem.pike:150:    errors++;    return 0;    }       dirlists++;       // Pass _all_ files, hide none.    if(QUERY(tilde) && QUERY(.files)) /* This is quite a lot faster */    return dir;    -  return filter_array(dir, dir_filter_function); +  return filter(dir, dir_filter_function);   }         mapping putting = ([]);      void done_with_put( array(object) id )   {   // perror("Done with put.\n");    id[0]->close();    id[1]->write("HTTP/1.0 200 Created\r\nContent-Length: 0\r\n\r\n");