Lines Matching refs:pathPtr
35 static Tcl_Obj * FsListMounts(Tcl_Obj *pathPtr, const char *pattern);
37 Tcl_Obj *pathPtr, const char *pattern,
70 Tcl_Obj *pathPtr = Tcl_NewStringObj(path, -1);
72 Tcl_IncrRefCount(pathPtr);
73 ret = Tcl_FSStat(pathPtr, &buf);
74 Tcl_DecrRefCount(pathPtr);
156 Tcl_Obj *pathPtr = Tcl_NewStringObj(path,-1);
158 Tcl_IncrRefCount(pathPtr);
159 ret = Tcl_FSAccess(pathPtr,mode);
160 Tcl_DecrRefCount(pathPtr);
178 Tcl_Obj *pathPtr = Tcl_NewStringObj(path,-1);
180 Tcl_IncrRefCount(pathPtr);
181 ret = Tcl_FSOpenFileChannel(interp, pathPtr, modeString, permissions);
182 Tcl_DecrRefCount(pathPtr);
194 Tcl_Obj *pathPtr = Tcl_NewStringObj(dirName,-1);
195 Tcl_IncrRefCount(pathPtr);
196 ret = Tcl_FSChdir(pathPtr);
197 Tcl_DecrRefCount(pathPtr);
229 Tcl_Obj *pathPtr = Tcl_NewStringObj(fileName,-1);
230 Tcl_IncrRefCount(pathPtr);
231 ret = Tcl_FSEvalFile(interp, pathPtr);
232 Tcl_DecrRefCount(pathPtr);
1041 * the filesystem to which pathPtr belongs will be called. If pathPtr
1046 * pathPtr on the fly (equal to the cwd), and then remove it from the
1048 * assume the pathPtr passed to them is an ordinary path. In fact this
1052 * If 'pattern' is NULL, then pathPtr is assumed to be a fully specified
1080 Tcl_Obj *pathPtr, /* Contains path to directory to search. */
1101 if (pathPtr != NULL) {
1102 fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
1117 ret = (*fsPtr->matchInDirectoryProc)(interp, resultPtr, pathPtr,
1120 FsAddMountsToGlobResult(resultPtr, pathPtr, pattern, types);
1130 if (pathPtr != NULL && TclGetString(pathPtr)[0] != '\0') {
1204 Tcl_Obj *pathPtr, /* The directory in question */
1212 Tcl_Obj *mounts = FsListMounts(pathPtr, pattern);
1253 * We know mElt is absolute normalized and lies inside pathPtr, so
1255 * i.e. the representation which is relative to pathPtr.
1258 norm = Tcl_FSGetNormalizedPath(NULL, pathPtr);
1272 mElt = TclNewFSPathObj(pathPtr, mount + len, mlen - len);
1412 * The pathPtr is modified in place. The return value is the last byte
1433 Tcl_Obj *pathPtr, /* The path to normalize in place */
1457 startAt = (*proc)(interp, pathPtr, startAt);
1473 startAt = (*proc)(interp, pathPtr, startAt);
1478 * if (retVal == length-of(pathPtr)) {break;}
1735 Tcl_Obj *pathPtr) /* Path of file to process. Tilde-substitution
1738 return Tcl_FSEvalFileEx(interp, pathPtr, NULL);
1756 * contents of the file, iPtr->scriptFile is made to point to pathPtr
1765 Tcl_Obj *pathPtr, /* Path of file to process. Tilde-substitution
1778 if (Tcl_FSGetNormalizedPath(interp, pathPtr) == NULL) {
1782 if (Tcl_FSStat(pathPtr, &statBuf) == -1) {
1785 Tcl_GetString(pathPtr), "\": ", Tcl_PosixError(interp), NULL);
1788 chan = Tcl_FSOpenFileChannel(interp, pathPtr, "r", 0644);
1792 Tcl_GetString(pathPtr), "\": ", Tcl_PosixError(interp), NULL);
1821 Tcl_GetString(pathPtr), "\": ", Tcl_PosixError(interp), NULL);
1831 iPtr->scriptFile = pathPtr;
1842 * points to 'pathPtr'.
1857 const char *pathString = Tcl_GetStringFromObj(pathPtr, &length);
1965 * The appropriate function for the filesystem to which pathPtr belongs
1979 Tcl_Obj *pathPtr, /* Path of file to stat (in current CP). */
1997 Tcl_Obj *transPtr = Tcl_FSGetTranslatedPath(NULL, pathPtr);
2042 fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2046 return (*proc)(pathPtr, buf);
2060 * function for the filesystem to which pathPtr belongs will be called.
2075 Tcl_Obj *pathPtr, /* Path of file to stat (in current CP). */
2078 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2082 return (*proc)(pathPtr, buf);
2086 return (*sproc)(pathPtr, buf);
2101 * function for the filesystem to which pathPtr belongs will be called.
2114 Tcl_Obj *pathPtr, /* Path of file to access (in current CP). */
2131 Tcl_Obj *transPtr = Tcl_FSGetTranslatedPath(NULL, pathPtr);
2154 fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2158 return (*proc)(pathPtr, mode);
2172 * The appropriate function for the filesystem to which pathPtr belongs
2189 Tcl_Obj *pathPtr, /* Name of file to open. */
2208 Tcl_Obj *transPtr = Tcl_FSGetTranslatedPath(interp, pathPtr);
2238 if (Tcl_FSGetNormalizedPath(interp, pathPtr) == NULL) {
2242 fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2262 retVal = (*proc)(interp, pathPtr, mode, permissions);
2275 "of file while opening \"", Tcl_GetString(pathPtr),
2294 Tcl_AppendResult(interp, "couldn't open \"", Tcl_GetString(pathPtr),
2307 * function for the filesystem to which pathPtr belongs will be called.
2320 Tcl_Obj *pathPtr, /* File to change access/modification times */
2324 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2328 return (*proc)(pathPtr, tval);
2357 Tcl_Obj *pathPtr,
2390 Tcl_Obj *pathPtr, /* path of file we are operating on. */
2393 return (*tclpFileAttrProcs[index].getProc)(interp, index, pathPtr,
2421 Tcl_Obj *pathPtr, /* path of file we are operating on. */
2424 return (*tclpFileAttrProcs[index].setProc)(interp, index, pathPtr, objPtr);
2435 * pathPtr belongs will be called.
2454 Tcl_Obj *pathPtr,
2457 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2462 return (*proc)(pathPtr, objPtrRef);
2489 Tcl_Obj *pathPtr, /* File whose attributes are to be indexed
2501 attrTable = Tcl_FSFileAttrStrings(pathPtr, &listObj);
2555 * which pathPtr belongs will be called.
2573 Tcl_Obj *pathPtr, /* filename we are operating on. */
2576 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2581 return (*proc)(interp, index, pathPtr, objPtrRef);
2596 * which pathPtr belongs will be called.
2611 Tcl_Obj *pathPtr, /* filename we are operating on. */
2614 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2619 return (*proc)(interp, index, pathPtr, objPtr);
2903 Tcl_Obj *pathPtr)
2908 if (Tcl_FSGetNormalizedPath(NULL, pathPtr) == NULL) {
2913 fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
2922 retVal = (*proc)(pathPtr);
2937 if ((Tcl_FSStat(pathPtr, &buf) == 0) && (S_ISDIR(buf.st_mode))
2938 && (Tcl_FSAccess(pathPtr, R_OK) == 0)) {
2986 Tcl_Obj *normDirName = Tcl_FSGetNormalizedPath(NULL, pathPtr);
3006 * cd = Tcl_FSGetNativePath(pathPtr);
3039 * appropriate function for the filesystem to which pathPtr belongs will
3042 * Note that the native filesystem doesn't actually assume 'pathPtr' is a
3043 * path. Rather it assumes pathPtr is either a path or just the name
3063 Tcl_Obj *pathPtr, /* Name of the file containing the desired
3097 res = TclLoadFile(interp, pathPtr, 2, symbols, procPtrs, handlePtr,
3123 * defined. The appropriate function for the filesystem to which pathPtr
3126 * Note that the native filesystem doesn't actually assume 'pathPtr' is a
3127 * path. Rather it assumes pathPtr is either a path or just the name
3153 Tcl_Obj *pathPtr, /* Name of the file containing the desired
3173 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
3190 int retVal = (*proc)(interp, pathPtr, handlePtr, unloadProcPtr);
3216 if (Tcl_FSAccess(pathPtr, R_OK) != 0) {
3218 Tcl_GetString(pathPtr), "\": ", Tcl_PosixError(interp), NULL);
3235 ret = Tcl_FSStat(pathPtr, &statBuf);
3248 data = Tcl_FSOpenFileChannel(interp, pathPtr, "rb", 0666);
3298 if (TclCrossFilesystemCopy(interp, pathPtr, copyToPtr) != TCL_OK) {
3447 Tcl_Obj *pathPtr, /* Name of the file containing the desired
3466 res = TclpDlopen(interp, pathPtr, &handle, unloadProcPtr);
3586 * which pathPtr belongs will be called.
3590 * of the symbolic link given by 'pathPtr', or NULL if the symbolic link
3604 * is in the same FS as pathPtr.
3614 Tcl_Obj *pathPtr, /* Path of file to readlink or link */
3618 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
3624 return (*proc)(pathPtr, toPtr, linkAction);
3720 Tcl_Obj *pathPtr, /* Contains path to directory to search. */
3743 (*proc)(NULL, resultPtr, pathPtr, pattern, &mountsOnly);
3775 Tcl_Obj *pathPtr, /* Path to split. */
3788 if (TclFSGetPathType(pathPtr, &fsPtr,
3791 return TclpNativeSplitPath(pathPtr, lenPtr);
3794 return TclpNativeSplitPath(pathPtr, lenPtr);
3802 Tcl_Obj *sep = (*fsPtr->filesystemSeparatorProc)(pathPtr);
3817 p = Tcl_GetString(pathPtr);
3906 Tcl_Obj *pathPtr, /* Path to determine type for */
3924 path = Tcl_GetStringFromObj(pathPtr, &pathLen);
3930 type = TclpGetNativePathType(pathPtr, driveNameLengthPtr,
4242 * The appropriate function for the filesystem to which pathPtr belongs
4256 Tcl_Obj *pathPtr) /* Pathname of file to be removed (UTF-8). */
4258 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
4262 return (*proc)(pathPtr);
4275 * The appropriate function for the filesystem to which pathPtr belongs
4289 Tcl_Obj *pathPtr) /* Pathname of directory to create (UTF-8). */
4291 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
4295 return (*proc)(pathPtr);
4353 * The appropriate function for the filesystem to which pathPtr belongs
4367 Tcl_Obj *pathPtr, /* Pathname of directory to be removed
4376 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
4390 Tcl_Obj *normPath = Tcl_FSGetNormalizedPath(NULL, pathPtr);
4402 Tcl_Obj *dirPtr = TclPathPart(NULL, pathPtr,
4412 return (*proc)(pathPtr, recursive, errorPtr);
4440 Tcl_Obj* pathPtr)
4445 if (pathPtr == NULL) {
4456 if (pathPtr->refCount == 0) {
4470 if (TclFSEnsureEpochOk(pathPtr, &retVal) != TCL_OK) {
4485 if ((*proc)(pathPtr, &clientData) != -1) {
4487 * We assume the type of pathPtr hasn't been changed by the
4491 TclFSSetPathDetails(pathPtr, fsRecPtr, clientData);
4533 Tcl_Obj *pathPtr)
4535 return (const char *) Tcl_FSGetInternalRep(pathPtr, &tclNativeFilesystem);
4583 Tcl_Obj *pathPtr)
4587 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
4598 Tcl_Obj *typePtr = (*proc)(pathPtr);
4629 Tcl_Obj *pathPtr)
4631 const Tcl_Filesystem *fsPtr = Tcl_FSGetFileSystemForPath(pathPtr);
4637 return (*fsPtr->filesystemSeparatorProc)(pathPtr);
4671 Tcl_Obj *pathPtr)