960 lines
34 KiB
Plaintext
960 lines
34 KiB
Plaintext
|
///////////////////////////////////////////////////////////////////////////////
|
||
|
|
//
|
||
|
|
// Microsoft Research Singularity
|
||
|
|
//
|
||
|
|
// Copyright (c) Microsoft Corporation. All rights reserved.
|
||
|
|
//
|
||
|
|
// File: AsyncCommands.sg
|
||
|
|
//
|
||
|
|
// Note:
|
||
|
|
//
|
||
|
|
|
||
|
|
// #define VERBOSE
|
||
|
|
|
||
|
|
using Microsoft.SingSharp;
|
||
|
|
using Microsoft.Singularity.Channels;
|
||
|
|
using Microsoft.Singularity.Directory;
|
||
|
|
using System;
|
||
|
|
using System.Diagnostics;
|
||
|
|
|
||
|
|
using MSD = Microsoft.Singularity.Directory;
|
||
|
|
|
||
|
|
namespace Microsoft.Singularity.Services.Fat.Fs
|
||
|
|
{
|
||
|
|
internal abstract class AsyncCommand : ITracked
|
||
|
|
{
|
||
|
|
internal abstract void Execute();
|
||
|
|
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
DebugStub.Print("Class is missing implementation of ITracked.Dispose()\n");
|
||
|
|
DebugStub.Break();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// DIRECTORY CONTRACT COMMANDS
|
||
|
|
//
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class BindCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio; // Endpoint listener
|
||
|
|
Directory parent;
|
||
|
|
DirectoryServiceContract.Exp:Ready parentExp;
|
||
|
|
char [] in ExHeap path; // Relative path
|
||
|
|
ServiceContract.Exp:Start pathExp; // Endpoint for path
|
||
|
|
|
||
|
|
internal
|
||
|
|
BindCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! parentExp,
|
||
|
|
Directory! parent,
|
||
|
|
[Claims] char[]! in ExHeap path,
|
||
|
|
[Claims] ServiceContract.Exp:Start! pathExp
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.parent = parent;
|
||
|
|
this.parentExp = parentExp;
|
||
|
|
this.path = path;
|
||
|
|
this.pathExp = pathExp;
|
||
|
|
}
|
||
|
|
|
||
|
|
private void BindDirectory(
|
||
|
|
[Claims]DirectoryServiceContract.Exp:Ready! dsc
|
||
|
|
)
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.path != null;
|
||
|
|
assert this.parentExp != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("BindDirectory(\"{0}\") ",
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
Directory child;
|
||
|
|
MSD.ErrorCode error =
|
||
|
|
PathOpen.GetDirectory(this.parent, this.path, out child);
|
||
|
|
if (error == MSD.ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
dsc.SendSuccess();
|
||
|
|
this.cio.EnqueueTuple(dsc, (!)child, false);
|
||
|
|
this.parentExp.SendAckBind();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
this.parentExp.SendNakBind(dsc, error);
|
||
|
|
}
|
||
|
|
this.cio.EnqueueTuple(this.parentExp, this.parent, true);
|
||
|
|
|
||
|
|
this.path = null;
|
||
|
|
this.parentExp = null;
|
||
|
|
this.cio = null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
private void BindFile([Claims]FileContract.Exp:Ready! fc)
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.path != null;
|
||
|
|
assert this.parentExp != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("BindFile(\"{0}\") ",
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
File child;
|
||
|
|
MSD.ErrorCode error =
|
||
|
|
PathOpen.GetFile(this.parent, this.path, out child);
|
||
|
|
if (error == MSD.ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
fc.SendSuccess();
|
||
|
|
this.cio.EnqueueTuple(fc, (!)child, false);
|
||
|
|
this.parentExp.SendAckBind();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
this.parentExp.SendNakBind(fc, error);
|
||
|
|
}
|
||
|
|
this.cio.EnqueueTuple(this.parentExp, this.parent, true);
|
||
|
|
|
||
|
|
this.path = null;
|
||
|
|
this.parentExp = null;
|
||
|
|
this.cio = null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.path != null;
|
||
|
|
assert this.pathExp != null;
|
||
|
|
assert this.parent != null;
|
||
|
|
assert this.parentExp != null;
|
||
|
|
assert this.cio != null;
|
||
|
|
|
||
|
|
DirectoryServiceContract.Exp dsc =
|
||
|
|
this.pathExp as DirectoryServiceContract.Exp;
|
||
|
|
if (dsc != null) {
|
||
|
|
this.pathExp = null;
|
||
|
|
BindDirectory(dsc);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
FileContract.Exp fc = this.pathExp as FileContract.Exp;
|
||
|
|
if (fc != null) {
|
||
|
|
this.pathExp = null;
|
||
|
|
BindFile(fc);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
assert this.parentExp != null;
|
||
|
|
|
||
|
|
CommandLogger.Log(
|
||
|
|
"Bad Bind attempt (not file/directory) \"{0}\"\n",
|
||
|
|
Bitter.ToString(this.path)
|
||
|
|
);
|
||
|
|
|
||
|
|
this.parentExp.SendNakBind(this.pathExp,
|
||
|
|
ErrorCode.NotProvider);
|
||
|
|
this.pathExp = null;
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.parentExp, this.parent, true);
|
||
|
|
this.parentExp = null;
|
||
|
|
|
||
|
|
delete this.path;
|
||
|
|
this.path = null;
|
||
|
|
|
||
|
|
this.cio = null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
CommandLogger.Log("Dispose BindCommand\n");
|
||
|
|
delete this.parentExp;
|
||
|
|
delete this.path;
|
||
|
|
delete this.pathExp;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class EnumerateCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
Directory dir;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
|
||
|
|
internal
|
||
|
|
EnumerateCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Enumerate! exp,
|
||
|
|
Directory! dir
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
try {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
|
||
|
|
uint cursor = 0;
|
||
|
|
ErrorCode error = ErrorCode.NoError;
|
||
|
|
while (true) {
|
||
|
|
EnumerationRecords [] in ExHeap records =
|
||
|
|
this.dir.Enumerate2(cursor, out cursor);
|
||
|
|
|
||
|
|
if (records == null) {
|
||
|
|
error = ErrorCode.InsufficientResources;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
exp.SendEnumerationEntries(
|
||
|
|
records,
|
||
|
|
records.Length == Directory.EnumerationChunkSize
|
||
|
|
);
|
||
|
|
switch receive {
|
||
|
|
case exp.EndEnumeration():
|
||
|
|
cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
return;
|
||
|
|
|
||
|
|
case exp.ReadEnumeration():
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
exp.SendEnumerationTerminated(error);
|
||
|
|
|
||
|
|
cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
}
|
||
|
|
catch (ChannelClosedException) {
|
||
|
|
delete this.exp;
|
||
|
|
}
|
||
|
|
this.exp = null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
CommandLogger.Log("Dispose EnumerateCommand\n");
|
||
|
|
delete this.exp;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class GetAttributesCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
Directory dir;
|
||
|
|
char[] in ExHeap path;
|
||
|
|
|
||
|
|
internal
|
||
|
|
GetAttributesCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! exp,
|
||
|
|
Directory! dir,
|
||
|
|
[Claims] char[]! in ExHeap path
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
this.path = path;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.path != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("GetAttributes(\"{0}\")",
|
||
|
|
Bitter.ToString2(this.path));
|
||
|
|
|
||
|
|
FsObject fsObject = null;
|
||
|
|
ErrorCode error = PathOpen.GetFsObject(this.dir,
|
||
|
|
this.path,
|
||
|
|
out fsObject);
|
||
|
|
this.path = null;
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
assert fsObject != null;
|
||
|
|
NodeType nodeType;
|
||
|
|
uint sizeBytes;
|
||
|
|
|
||
|
|
fsObject.GetAttributes(out nodeType, out sizeBytes);
|
||
|
|
|
||
|
|
CommandLogger.Log(" -> Type {0} Size {1}\n",
|
||
|
|
nodeType, sizeBytes);
|
||
|
|
|
||
|
|
this.exp.SendAckGetAttributes(nodeType, (long)sizeBytes);
|
||
|
|
fsObject.CloseInstance();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed\n");
|
||
|
|
|
||
|
|
assert fsObject == null;
|
||
|
|
this.exp.SendNakGetAttributes(error);
|
||
|
|
}
|
||
|
|
this.cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
}
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
CommandLogger.Log("Dispose GetAttributesCommand\n");
|
||
|
|
delete exp;
|
||
|
|
delete path;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class CreateDirectoryCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
Directory dir;
|
||
|
|
char[] in ExHeap path;
|
||
|
|
|
||
|
|
internal
|
||
|
|
CreateDirectoryCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! exp,
|
||
|
|
Directory! dir,
|
||
|
|
[Claims] char[]! in ExHeap path)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
this.path = path;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.path != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("CreateDirectory(\"{0}\", \"{1}\")",
|
||
|
|
this.dir.FullPathName,
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
Directory parent = null;
|
||
|
|
char[] in ExHeap childName = null;
|
||
|
|
|
||
|
|
ErrorCode error =
|
||
|
|
PathOpen.GetTargetAndDirectory(this.dir,
|
||
|
|
this.path,
|
||
|
|
out childName,
|
||
|
|
out parent);
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
assert parent != null;
|
||
|
|
assert childName != null;
|
||
|
|
|
||
|
|
error = parent.CreateDirectory(childName);
|
||
|
|
parent.Close();
|
||
|
|
|
||
|
|
delete childName;
|
||
|
|
childName = null;
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
this.exp.SendAckCreateDirectory();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
this.exp.SendNakCreateDirectory(error);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
assert parent == null;
|
||
|
|
assert childName == null;
|
||
|
|
this.exp.SendNakCreateDirectory(error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
this.path = null;
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete exp;
|
||
|
|
delete path;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class DeleteDirectoryCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
Directory dir;
|
||
|
|
char[] in ExHeap path;
|
||
|
|
|
||
|
|
internal
|
||
|
|
DeleteDirectoryCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! exp,
|
||
|
|
Directory! dir,
|
||
|
|
[Claims] char[]! in ExHeap path
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
this.path = path;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.path != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("DeleteDirectory(\"{0}\", \"{1}\")",
|
||
|
|
this.dir.FullPathName,
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
Directory parent = null;
|
||
|
|
char[] in ExHeap childName = null;
|
||
|
|
|
||
|
|
ErrorCode error =
|
||
|
|
PathOpen.GetTargetAndDirectory(this.dir,
|
||
|
|
this.path,
|
||
|
|
out childName,
|
||
|
|
out parent);
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
assert parent != null;
|
||
|
|
assert childName != null;
|
||
|
|
|
||
|
|
error = parent.DeleteDirectory(childName);
|
||
|
|
parent.Close();
|
||
|
|
delete childName;
|
||
|
|
childName = null;
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
this.exp.SendAckDeleteDirectory();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
this.exp.SendNakDeleteDirectory(error);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
if (childName != null) {
|
||
|
|
delete childName;
|
||
|
|
}
|
||
|
|
this.exp.SendNakDeleteDirectory(error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
this.path = null;
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete exp;
|
||
|
|
delete path;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class CreateFileCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
Directory dir;
|
||
|
|
char[] in ExHeap path;
|
||
|
|
|
||
|
|
internal
|
||
|
|
CreateFileCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! exp,
|
||
|
|
Directory! dir,
|
||
|
|
[Claims] char[]! in ExHeap path
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
this.path = path;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.path != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("CreateFile(\"{0}\", \"{1}\")",
|
||
|
|
this.dir.FullPathName,
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
Directory parent = null;
|
||
|
|
char[] in ExHeap childName = null;
|
||
|
|
|
||
|
|
ErrorCode error =
|
||
|
|
PathOpen.GetTargetAndDirectory(this.dir,
|
||
|
|
this.path,
|
||
|
|
out childName,
|
||
|
|
out parent);
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
assert parent != null;
|
||
|
|
assert childName != null;
|
||
|
|
|
||
|
|
error = parent.CreateFile(childName);
|
||
|
|
parent.Close();
|
||
|
|
delete childName;
|
||
|
|
childName = null;
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
this.exp.SendAckCreateFile();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
this.exp.SendNakCreateFile(error);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
assert parent == null;
|
||
|
|
assert childName == null;
|
||
|
|
this.exp.SendNakCreateFile(error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
this.path = null;
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete exp;
|
||
|
|
delete path;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class CreateAndBindFileCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
Directory dir;
|
||
|
|
char[] in ExHeap path;
|
||
|
|
FileContract.Exp:Start fileExp;
|
||
|
|
|
||
|
|
internal
|
||
|
|
CreateAndBindFileCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! exp,
|
||
|
|
Directory! dir,
|
||
|
|
[Claims] char[]! in ExHeap path,
|
||
|
|
[Claims] FileContract.Exp:Start! fileExp
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
this.path = path;
|
||
|
|
this.fileExp = fileExp;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.path != null;
|
||
|
|
assert this.fileExp != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("CreateAndBindFile(\"{0}\", \"{1}\")",
|
||
|
|
this.dir.FullPathName,
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
Directory parent = null;
|
||
|
|
char[] in ExHeap childName = null;
|
||
|
|
|
||
|
|
ErrorCode error =
|
||
|
|
PathOpen.GetTargetAndDirectory(this.dir, this.path,
|
||
|
|
out childName, out parent);
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
assert parent != null;
|
||
|
|
assert childName != null;
|
||
|
|
|
||
|
|
File newFile;
|
||
|
|
error = parent.CreateAndOpenFile(childName, out newFile);
|
||
|
|
parent.Close();
|
||
|
|
delete childName;
|
||
|
|
childName = null;
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
assert newFile != null;
|
||
|
|
this.fileExp.SendSuccess();
|
||
|
|
this.cio.EnqueueTuple(this.fileExp, newFile, false);
|
||
|
|
this.exp.SendAckCreateAndBindFile();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
assert newFile == null;
|
||
|
|
this.exp.SendNakCreateAndBindFile(this.fileExp,
|
||
|
|
error);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
assert parent == null;
|
||
|
|
assert childName == null;
|
||
|
|
this.exp.SendNakCreateAndBindFile(this.fileExp, error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
this.path = null;
|
||
|
|
this.fileExp = null;
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete exp;
|
||
|
|
delete path;
|
||
|
|
delete fileExp;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class DeleteFileCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
DirectoryServiceContract.Exp exp;
|
||
|
|
Directory dir;
|
||
|
|
char[] in ExHeap path;
|
||
|
|
|
||
|
|
internal
|
||
|
|
DeleteFileCommand(
|
||
|
|
ChannelIo! cio,
|
||
|
|
[Claims] DirectoryServiceContract.Exp:Ready! exp,
|
||
|
|
Directory! dir,
|
||
|
|
[Claims] char[]! in ExHeap path
|
||
|
|
)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.dir = dir;
|
||
|
|
this.exp = exp;
|
||
|
|
this.path = path;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.dir != null;
|
||
|
|
assert this.exp != null;
|
||
|
|
assert this.path != null;
|
||
|
|
|
||
|
|
CommandLogger.Log("DeleteFile(\"{0}\", \"{1}\")",
|
||
|
|
this.dir.FullPathName,
|
||
|
|
Bitter.ToString(this.path));
|
||
|
|
|
||
|
|
Directory parent = null;
|
||
|
|
char[] in ExHeap childName = null;
|
||
|
|
|
||
|
|
ErrorCode error =
|
||
|
|
PathOpen.GetTargetAndDirectory(this.dir, this.path,
|
||
|
|
out childName, out parent);
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
assert parent != null;
|
||
|
|
assert childName != null;
|
||
|
|
|
||
|
|
error = parent.DeleteFile(childName);
|
||
|
|
parent.Close();
|
||
|
|
delete childName;
|
||
|
|
childName = null;
|
||
|
|
if (error == ErrorCode.NoError) {
|
||
|
|
CommandLogger.Log(" -> OK\n");
|
||
|
|
this.exp.SendAckDeleteFile();
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
this.exp.SendNakDeleteFile(error);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
CommandLogger.Log(" -> Failed ({0})\n", error);
|
||
|
|
if (childName != null) {
|
||
|
|
delete childName;
|
||
|
|
}
|
||
|
|
this.exp.SendNakDeleteFile(error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.exp, this.dir, true);
|
||
|
|
this.exp = null;
|
||
|
|
this.path = null;
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete exp;
|
||
|
|
delete path;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// FILE CONTRACT COMMANDS
|
||
|
|
//
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class FileReadCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
FileContract.Exp fc;
|
||
|
|
File file;
|
||
|
|
byte[] in ExHeap buffer;
|
||
|
|
long bufferOffset;
|
||
|
|
long fileOffset;
|
||
|
|
long maxLength;
|
||
|
|
|
||
|
|
internal FileReadCommand(ChannelIo! cio,
|
||
|
|
[Claims] FileContract.Exp! fc,
|
||
|
|
File! file,
|
||
|
|
[Claims] byte[]! in ExHeap buffer,
|
||
|
|
long bufferOffset,
|
||
|
|
long fileOffset,
|
||
|
|
long maxLength)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.fc = fc;
|
||
|
|
this.file = file;
|
||
|
|
this.buffer = buffer;
|
||
|
|
this.bufferOffset = bufferOffset;
|
||
|
|
this.fileOffset = fileOffset;
|
||
|
|
this.maxLength = maxLength;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.fc != null;
|
||
|
|
assert this.file != null;
|
||
|
|
assert this.buffer != null;
|
||
|
|
|
||
|
|
if (bufferOffset < 0 || bufferOffset > Int32.MaxValue ||
|
||
|
|
fileOffset < 0 || fileOffset > UInt32.MaxValue ||
|
||
|
|
maxLength < 0 || maxLength > Int32.MaxValue) {
|
||
|
|
// No enumeration for file error codes (grrr!)
|
||
|
|
this.fc.SendAckRead(this.buffer, 0, -1);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
int bytesRead;
|
||
|
|
FileError error = this.file.Read(this.buffer,
|
||
|
|
(int)this.bufferOffset,
|
||
|
|
(uint)this.fileOffset,
|
||
|
|
(int)this.maxLength,
|
||
|
|
out bytesRead);
|
||
|
|
|
||
|
|
if (error != FileError.NoError) {
|
||
|
|
CommandLogger.Log("Read error {0}\n", error);
|
||
|
|
Tracing.Log(Tracing.Error,
|
||
|
|
"FatFs read error {0}",
|
||
|
|
(UIntPtr)error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.fc.SendAckRead(this.buffer, bytesRead,
|
||
|
|
(FileError.NoError == error) ? 0 : -1);
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
this.cio.EnqueueTuple(this.fc, this.file, true);
|
||
|
|
|
||
|
|
this.fc = null;
|
||
|
|
this.file = null;
|
||
|
|
this.buffer = null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete this.fc;
|
||
|
|
delete this.buffer;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// ------------------------------------------------------------------------
|
||
|
|
|
||
|
|
internal class FileWriteCommand : AsyncCommand, ITracked
|
||
|
|
{
|
||
|
|
ChannelIo cio;
|
||
|
|
FileContract.Exp fc;
|
||
|
|
File file;
|
||
|
|
byte[] in ExHeap buffer;
|
||
|
|
long bufferOffset;
|
||
|
|
long fileOffset;
|
||
|
|
long maxLength;
|
||
|
|
|
||
|
|
internal FileWriteCommand(ChannelIo! cio,
|
||
|
|
[Claims] FileContract.Exp! fc,
|
||
|
|
File! file,
|
||
|
|
[Claims] byte[]! in ExHeap buffer,
|
||
|
|
long bufferOffset,
|
||
|
|
long fileOffset,
|
||
|
|
long maxLength)
|
||
|
|
{
|
||
|
|
this.cio = cio;
|
||
|
|
this.fc = fc;
|
||
|
|
this.file = file;
|
||
|
|
this.buffer = buffer;
|
||
|
|
this.bufferOffset = bufferOffset;
|
||
|
|
this.fileOffset = fileOffset;
|
||
|
|
this.maxLength = maxLength;
|
||
|
|
}
|
||
|
|
|
||
|
|
internal override void Execute()
|
||
|
|
{
|
||
|
|
expose (this) {
|
||
|
|
assert this.cio != null;
|
||
|
|
assert this.fc != null;
|
||
|
|
assert this.file != null;
|
||
|
|
assert this.buffer != null;
|
||
|
|
|
||
|
|
if (bufferOffset < 0 || bufferOffset > Int32.MaxValue ||
|
||
|
|
fileOffset < 0 || fileOffset > UInt32.MaxValue ||
|
||
|
|
maxLength < 0 || maxLength > Int32.MaxValue) {
|
||
|
|
// No enumeration for file error codes (grrr!)
|
||
|
|
this.fc.SendAckWrite(this.buffer, 0, -1);
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
int bytesWritten;
|
||
|
|
FileError error = this.file.Write(this.buffer,
|
||
|
|
(int)this.bufferOffset,
|
||
|
|
(uint)this.fileOffset,
|
||
|
|
(int)this.maxLength,
|
||
|
|
out bytesWritten);
|
||
|
|
if (error != FileError.NoError) {
|
||
|
|
CommandLogger.Log("Write error {0}\n", error);
|
||
|
|
Tracing.Log(Tracing.Error,
|
||
|
|
"FatFs write error {0}",
|
||
|
|
(UIntPtr)error);
|
||
|
|
}
|
||
|
|
|
||
|
|
this.fc.SendAckWrite(
|
||
|
|
this.buffer, bytesWritten,
|
||
|
|
(FileError.NoError == error) ? 0 : -1
|
||
|
|
);
|
||
|
|
}
|
||
|
|
|
||
|
|
cio.EnqueueTuple(this.fc, this.file, true);
|
||
|
|
|
||
|
|
this.fc = null;
|
||
|
|
this.file = null;
|
||
|
|
this.buffer = null;
|
||
|
|
}
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
void ITracked.Expose() {}
|
||
|
|
void ITracked.UnExpose() {}
|
||
|
|
void ITracked.Acquire() {}
|
||
|
|
void ITracked.Release() {}
|
||
|
|
void ITracked.Dispose()
|
||
|
|
{
|
||
|
|
delete this.fc;
|
||
|
|
delete this.buffer;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
internal class CommandLogger
|
||
|
|
{
|
||
|
|
[ System.Diagnostics.Conditional("VERBOSE") ]
|
||
|
|
internal static void Log(string format, params object[] args)
|
||
|
|
{
|
||
|
|
DebugStub.Print(String.Format(format, args));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|