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

version» Context lines:

Roxen.git/server/modules/filesystems/tarfs.pike:1:   inherit "module";    - constant cvs_version= "$Id: tarfs.pike,v 1.5 2001/01/29 05:40:30 per Exp $"; + constant cvs_version= "$Id: tarfs.pike,v 1.6 2001/05/16 07:50:59 per Exp $";      // The Filesystem.Tar module is not threadsafe.   constant thread_safe=0;      //<locale-token project="mod_targs">_</locale-token>   #define _(X,Y) _DEF_LOCALE("mod_tarfs",X,Y)   // end of the locale related stuff   #include <module.h>      constant module_type = MODULE_LOCATION; - LocaleString module_name = _(0,"Tarfile system"); + LocaleString module_name = _(0,"File systems: Tar File");   LocaleString module_doc =   _(0,"This is a file system module that makes it possible to mount a "    "directory structure from a tar-file directly on the site. gzip compressed "    "tar-files are not supported");   constant module_unique = 0;      void create()   {    defvar( "mountpoint", "/",    _(0,"Mount point"), TYPE_LOCATION|VAR_INITIAL,    _(0,"Where the module will be mounted in the site's virtual file "    "system.") );    -  defvar("tarfile", "config_interface/docs.tar", +  defvar("tarfile", "docs.tar",    _(0,"Tar file and root path"), TYPE_FILE|VAR_INITIAL,    _(0,"The tarfile, and an optional root path (syntax: /tar/file.tar:/"    "root/dir/)") );   }      string mp, error_msg;      Filesystem.Tar tar;    -  + string query_name() + { +  return query("mountpoint")+" from "+query("tarfile"); + } +    void start()   {    string path = "", tf = query( "tarfile" );    mp = query("mountpoint");    sscanf( tf, "%s:%s", tf, path );    tar = 0;    if( catch(tar = Filesystem.Tar( tf )) )    {    report_error( "Failed to open tar-file "+tf+"!" );    tar = 0;