Check-in [9d3052c6f1]
Overview
Comment:More cleanup
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 9d3052c6f14a850f132f8a5efca8e60e4feb1e0156a7ab49fb4f055d17c238ad
User & Date: rkeene on 2019-05-08 16:52:29
Other Links: manifest | tags
Context
2019-05-08
17:08
Added a mode to dump template script as an independent script check-in: f09ab16ca1 user: rkeene tags: trunk
16:52
More cleanup check-in: 9d3052c6f1 user: rkeene tags: trunk
16:47
Fixed incomplete rename check-in: b586d5b0a1 user: rkeene tags: trunk
Changes

Modified xvfs-core.c from [11c7034c99] to [a09ee5d8ff].

79
80
81
82
83
84
85
86




87
88
89
90
91
92
93
94
	return(NULL);
}

static Tcl_Channel xvfs_tclfs_openFileChannel(Tcl_Interp *interp, Tcl_Obj *path, int mode, int permissions, struct xvfs_tclfs_instance_info *instanceInfo) {
	const char *pathStr;

	pathStr = xvfs_relativePath(path, instanceInfo);
fprintf(stderr, "Called open(%s)!\n", pathStr);




	
	return(NULL);
}
#endif /* XVFS_MODE_SERVER || XVFS_MODE_STANDALONE || XVFS_MODE_FLEIXBLE */

#if defined(XVFS_MODE_STANDALONE) || defined(XVFS_MODE_FLEXIBLE)
/*
 * Tcl_Filesystem handlers for the standalone implementation







<
>
>
>
>
|







79
80
81
82
83
84
85

86
87
88
89
90
91
92
93
94
95
96
97
	return(NULL);
}

static Tcl_Channel xvfs_tclfs_openFileChannel(Tcl_Interp *interp, Tcl_Obj *path, int mode, int permissions, struct xvfs_tclfs_instance_info *instanceInfo) {
	const char *pathStr;

	pathStr = xvfs_relativePath(path, instanceInfo);

	/*
	 * XXX:TODO: Do something to create the Tcl_Channel we
	 * need to return here
	 */

	return(NULL);
}
#endif /* XVFS_MODE_SERVER || XVFS_MODE_STANDALONE || XVFS_MODE_FLEIXBLE */

#if defined(XVFS_MODE_STANDALONE) || defined(XVFS_MODE_FLEXIBLE)
/*
 * Tcl_Filesystem handlers for the standalone implementation

Modified xvfs.c.rvt from [2829fbeb0b] to [c8faacca08].

1

2
3
4
5
6
7
8
9
10
11
12
#include <xvfs-core.h>

#include <unistd.h>
#include <string.h>
#include <tcl.h>
#include <sys/stat.h>

#define XVFS_NAME_LOOKUP_ERROR (-1)
#define XVFS_FILE_BLOCKSIZE 1024

#define MIN(a, b) (((a) < (b)) ? (a) : (b))

typedef enum {

>



<







1
2
3
4
5

6
7
8
9
10
11
12
#include <xvfs-core.h>
#include <sys/stat.h>
#include <unistd.h>
#include <string.h>
#include <tcl.h>


#define XVFS_NAME_LOOKUP_ERROR (-1)
#define XVFS_FILE_BLOCKSIZE 1024

#define MIN(a, b) (((a) < (b)) ? (a) : (b))

typedef enum {