Home › Tcl Library Procedures Tcl
Tclzipfs C API
Handle ZIP files as Tcl virtual filesystems
Also documents TclZipfs_AppHook, TclZipfs_Mount, TclZipfs_MountBuffer, TclZipfs_Unmount
literal type exactly as shown
argument replace with your value
?optional? may be omitted
Synopsis#
const char *
TclZipfs_AppHook(argcPtr, argvPtr)
int TclZipfs_Mount(interp, zipname, mountpoint, password)#
int TclZipfs_MountBuffer(interp, data, dataLen, mountpoint, copy)#
int TclZipfs_Unmount(interp, mountpoint)#
Arguments#
- int *argcPtr (in)
-
Pointer to a variable holding the number of command line arguments from
main(). - char ***argvPtr (in)
-
Pointer to an array of strings containing the command line arguments to
main(). - Tcl_Interp *interp (in)
-
Interpreter in which the ZIP file system is mounted. The interpreter's result is modified to hold the result or error message from the script.
- const char *zipname (in)
-
Name of a ZIP file. Must not be NULL when either mounting or unmounting a ZIP.
- const char *mountpoint (in)
-
Name of a mount point, which must be a legal Tcl file or directory name. May be NULL to query current mount points.
- const char *password (in)
-
An (optional) password. Use NULL if no password is wanted to read the file.
- const void *data (in)
-
A data buffer to mount. The data buffer must hold the contents of a ZIP archive, and must not be NULL.
- size_t dataLen (in)
-
The number of bytes in the supplied data buffer argument, data.
- int copy (in)
-
If non-zero, the ZIP archive in the data buffer will be internally copied before mounting, allowing the data buffer to be disposed once
TclZipfs_MountBufferreturns. If zero, the caller guarantees that the buffer will be valid to read from for the duration of the mount.
Description#
TclZipfs_AppHook is a utility function to perform standard application initialization procedures, taking into account available ZIP archives as follows:
- [1]
-
If the current application has a mountable ZIP archive, that archive is mounted under ZIPFS_VOLUME
/appas a read-only Tcl virtual file system (VFS). The value of ZIPFS_VOLUME can be retrieved using the Tcl commandzipfs root. - [2]
-
If a file named
main.tclis located in the root directory of that file system (i.e., at ZIPFS_VOLUME/app/main.tclafter the ZIP archive is mounted as described above) it is treated as the startup script for the process. - [3]
-
If the file ZIPFS_VOLUME
/app/tcl_library/init.tclis present, thetcl_libraryglobal variable in the initial Tcl interpreter is set to ZIPFS_VOLUME/app/tcl_library. - [4]
-
If the directory
tcl_librarywas not found in the main application mount, the system will then search for it as either a VFS attached to the application dynamic library, or as a zip archive namedlibtcl_major_minor_patchlevel.zipeither in the present working directory or in the standard Tcl install location. (For example, the Tcl 9.0.2 release would be searched for in a filelibtcl_9_0_2.zip.) That archive, if located, is also mounted read-only.On Windows,
TclZipfs_AppHookhas a slightly different signature, since it uses WCHAR instead of char. As a result, it requires the application to be compiled with the UNICODE preprocessor symbol defined (e.g., via the-DUNICODEcompiler flag).The result of
TclZipfs_AppHookis the full Tcl version with build information (e.g.,9.0.0+abcdef...abcdef.gcc-1002). The function may modify the variables pointed to by argcPtr and argvPtr to remove arguments; the current implementation does not do so, but callers should not assume that this will be true in the future.TclZipfs_Mountis used to mount ZIP archives and to retrieve information about currently mounted archives. If mountpoint and zipname are both specified (i.e. non-NULL), the function mounts the ZIP archive zipname on the mount point given in mountpoint. If password is not NULL, it should point to the NUL terminated password protecting the archive. If not under the zipfs file system root, mountpoint is normalized with respect to it. For example, a mount point passed as eithermtor/mtwould be normalized to//zipfs:/mt, given that ZIPFS_VOLUME as returned byzipfs rootis “//zipfs:/”. An error is raised if the mount point includes a drive or UNC volume. On success, interp's result is set to the normalized mount point path.If mountpoint is a NULL pointer, information on all currently mounted ZIP file systems is stored in interp's result as a sequence of mount points and ZIP file names.
If mountpoint is not NULL but zipfile is NULL, the path to the archive mounted at that mount point is stored as interp's result. The function returns a standard Tcl result code.
TclZipfs_MountBuffermounts the ZIP archive content data on the mount point given in mountpoint. Both mountpoint and data must be specified as non-NULL. The copy argument determines whether the buffer is internally copied before mounting or not. The ZIP archive is assumed to be not password protected. On success, interp's result is set to the normalized mount point path.TclZipfs_Unmountundoes the effect ofTclZipfs_Mount, i.e., it unmounts the mounted ZIP file system that was mounted from zipname (at mountpoint). Errors are reported in the interpreter interp. The result of this call is a standard Tcl result code.TclZipfs_AppHookcan not be used in stub-enabled extensions.
Keywords#
compress · filesystem · zip
Copyright#
- Copyright © 2015 Jan Nijtmans <jan.nijtmans@gmail.com>
- Copyright © 2015 Christian Werner <chw@ch-werner.de>
- Copyright © 2017 Sean Woods <yoda@etoyoc.com>