Added option to disable certificate checking
[pithos-ms-client] / trunk / Pithos.Network / CloudFilesClient.cs
index 70c232d..e11b4d6 100644 (file)
@@ -1,31 +1,74 @@
-// **CloudFilesClient** provides a simple client interface to CloudFiles and Pithos
+#region
+/* -----------------------------------------------------------------------
+ * <copyright file="CloudFilesClient.cs" company="GRNet">
+ * 
+ * Copyright 2011-2012 GRNET S.A. All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or
+ * without modification, are permitted provided that the following
+ * conditions are met:
+ *
+ *   1. Redistributions of source code must retain the above
+ *      copyright notice, this list of conditions and the following
+ *      disclaimer.
+ *
+ *   2. Redistributions in binary form must reproduce the above
+ *      copyright notice, this list of conditions and the following
+ *      disclaimer in the documentation and/or other materials
+ *      provided with the distribution.
+ *
+ *
+ * THIS SOFTWARE IS PROVIDED BY GRNET S.A. ``AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL GRNET S.A OR
+ * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+ * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
+ * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
+ * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
+ * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ *
+ * The views and conclusions contained in the software and
+ * documentation are those of the authors and should not be
+ * interpreted as representing official policies, either expressed
+ * or implied, of GRNET S.A.
+ * </copyright>
+ * -----------------------------------------------------------------------
+ */
+#endregion
+
+// **CloudFilesClient** provides a simple client interface to CloudFiles and Pithos
 //
 // The class provides methods to upload/download files, delete files, manage containers
 
 
 using System;
 using System.Collections.Generic;
+using System.Collections.Specialized;
 using System.ComponentModel.Composition;
 using System.Diagnostics;
 using System.Diagnostics.Contracts;
-using System.Globalization;
 using System.IO;
 using System.Linq;
 using System.Net;
+using System.Reflection;
 using System.Security.Cryptography;
 using System.Text;
-using System.Threading.Algorithms;
 using System.Threading.Tasks;
 using Newtonsoft.Json;
 using Pithos.Interfaces;
 using log4net;
-using WebHeaderCollection = System.Net.WebHeaderCollection;
 
 namespace Pithos.Network
 {
     [Export(typeof(ICloudClient))]
     public class CloudFilesClient:ICloudClient
     {
+        private static readonly ILog Log = LogManager.GetLogger(MethodBase.GetCurrentMethod().DeclaringType);
+
         //CloudFilesClient uses *_baseClient* internally to communicate with the server
         //RestClient provides a REST-friendly interface over the standard WebClient.
         private RestClient _baseClient;
@@ -57,7 +100,20 @@ namespace Pithos.Network
 
         protected Uri RootAddressUri { get; set; }
 
-        private Uri _proxy;
+       /* private WebProxy _proxy;
+        public WebProxy Proxy
+        {
+            get { return _proxy; }
+            set
+            {
+                _proxy = value;
+                if (_baseClient != null)
+                    _baseClient.Proxy = value;                
+            }
+        }
+*/
+
+        /* private Uri _proxy;
         public Uri Proxy
         {
             get { return _proxy; }
@@ -67,7 +123,7 @@ namespace Pithos.Network
                 if (_baseClient != null)
                     _baseClient.Proxy = new WebProxy(value);                
             }
-        }
+        }*/
 
         public double DownloadPercentLimit { get; set; }
         public double UploadPercentLimit { get; set; }
@@ -83,7 +139,6 @@ namespace Pithos.Network
         public bool UsePithos { get; set; }
 
 
-        private static readonly ILog Log = LogManager.GetLogger("CloudFilesClient");
 
         public CloudFilesClient(string userName, string apiKey)
         {
@@ -99,13 +154,13 @@ namespace Pithos.Network
             Contract.Ensures(StorageUrl != null);
             Contract.Ensures(_baseClient != null);
             Contract.Ensures(RootAddressUri != null);
-            Contract.EndContractBlock();
+            Contract.EndContractBlock();          
 
             _baseClient = new RestClient
             {
                 BaseAddress = accountInfo.StorageUri.ToString(),
                 Timeout = 10000,
-                Retries = 3
+                Retries = 3,
             };
             StorageUrl = accountInfo.StorageUri;
             Token = accountInfo.Token;
@@ -136,10 +191,12 @@ namespace Pithos.Network
 
             Log.InfoFormat("[AUTHENTICATE] Start for {0}", UserName);
 
+            var groups = new List<Group>();
+
             using (var authClient = new RestClient{BaseAddress=AuthenticationUrl})
-            {
-                if (Proxy != null)
-                    authClient.Proxy = new WebProxy(Proxy);
+            {                
+               /* if (Proxy != null)
+                    authClient.Proxy = Proxy;*/
 
                 Contract.Assume(authClient.Headers!=null);
 
@@ -158,7 +215,8 @@ namespace Pithos.Network
                 {
                     BaseAddress = storageUrl,
                     Timeout = 10000,
-                    Retries = 3
+                    Retries = 3,
+                    //Proxy=Proxy
                 };
 
                 StorageUrl = new Uri(storageUrl);
@@ -173,11 +231,20 @@ namespace Pithos.Network
                     throw new InvalidOperationException("Failed to obtain token url");
                 Token = token;
 
+               /* var keys = authClient.ResponseHeaders.AllKeys.AsQueryable();
+                groups = (from key in keys
+                            where key.StartsWith("X-Account-Group-")
+                            let name = key.Substring(16)
+                            select new Group(name, authClient.ResponseHeaders[key]))
+                        .ToList();
+                    
+*/
             }
 
             Log.InfoFormat("[AUTHENTICATE] End for {0}", UserName);
+            
 
-            return new AccountInfo {StorageUri = StorageUrl, Token = Token, UserName = UserName};            
+            return new AccountInfo {StorageUri = StorageUrl, Token = Token, UserName = UserName,Groups=groups};            
 
         }
 
@@ -185,7 +252,6 @@ namespace Pithos.Network
 
         public IList<ContainerInfo> ListContainers(string account)
         {
-
             using (var client = new RestClient(_baseClient))
             {
                 if (!String.IsNullOrWhiteSpace(account))
@@ -199,6 +265,11 @@ namespace Pithos.Network
                 if (client.StatusCode == HttpStatusCode.NoContent)
                     return new List<ContainerInfo>();
                 var infos = JsonConvert.DeserializeObject<IList<ContainerInfo>>(content);
+                
+                foreach (var info in infos)
+                {
+                    info.Account = account;
+                }
                 return infos;
             }
 
@@ -206,12 +277,12 @@ namespace Pithos.Network
 
         private string GetAccountUrl(string account)
         {
-            return new Uri(this.RootAddressUri, new Uri(account,UriKind.Relative)).AbsoluteUri;
+            return new Uri(RootAddressUri, new Uri(account,UriKind.Relative)).AbsoluteUri;
         }
 
         public IList<ShareAccountInfo> ListSharingAccounts(DateTime? since=null)
         {
-            using (log4net.ThreadContext.Stacks["Share"].Push("List Accounts"))
+            using (ThreadContext.Stacks["Share"].Push("List Accounts"))
             {
                 if (Log.IsDebugEnabled) Log.DebugFormat("START");
 
@@ -245,28 +316,73 @@ namespace Pithos.Network
         public IList<ObjectInfo> ListSharedObjects(DateTime? since = null)
         {
 
-            using (log4net.ThreadContext.Stacks["Share"].Push("List Objects"))
+            using (ThreadContext.Stacks["Share"].Push("List Objects"))
             {
                 if (Log.IsDebugEnabled) Log.DebugFormat("START");
-
+                //'since' is not used here because we need to have ListObjects return a NoChange result
+                //for all shared accounts,containers
+                var accounts = ListSharingAccounts();
+                var items = from account in accounts 
+                            let containers = ListContainers(account.name) 
+                            from container in containers 
+                            select ListObjects(account.name, container.Name,since);
+                var objects=items.SelectMany(r=> r).ToList();
+/*
                 var objects = new List<ObjectInfo>();
-                var accounts = ListSharingAccounts(since);
-                foreach (var account in accounts)
+                foreach (var containerObjects in items)
+                {
+                    objects.AddRange(containerObjects);
+                }
+*/
+                if (Log.IsDebugEnabled) Log.DebugFormat("END");
+                return objects;
+            }
+        }
+
+        public void SetTags(ObjectInfo target,IDictionary<string,string> tags)
+        {
+            if (String.IsNullOrWhiteSpace(Token))
+                throw new InvalidOperationException("The Token is not set");
+            if (StorageUrl == null)
+                throw new InvalidOperationException("The StorageUrl is not set");
+            if (target == null)
+                throw new ArgumentNullException("target");
+            Contract.EndContractBlock();
+
+            using (ThreadContext.Stacks["Share"].Push("Share Object"))
+            {
+                if (Log.IsDebugEnabled) Log.DebugFormat("START");
+
+                using (var client = new RestClient(_baseClient))
                 {
-                    //Skip the account if it hasn't been modified
-                    if (account.last_modified < since)
-                        continue;
 
-                    var containers = ListContainers(account.name);
-                    foreach (var container in containers)
+                    client.BaseAddress = GetAccountUrl(target.Account);
+
+                    client.Parameters.Clear();
+                    client.Parameters.Add("update", "");
+
+                    foreach (var tag in tags)
+                    {
+                        var headerTag = String.Format("X-Object-Meta-{0}", tag.Key);
+                        client.Headers.Add(headerTag, tag.Value);
+                    }
+                    
+                    client.DownloadStringWithRetry(target.Container, 3);
+
+                    
+                    client.AssertStatusOK("SetTags failed");
+                    //If the status is NOT ACCEPTED we have a problem
+                    if (client.StatusCode != HttpStatusCode.Accepted)
                     {
-                        var containerObjects = ListObjects(account.name, container.Name, since);
-                        objects.AddRange(containerObjects);
+                        Log.Error("Failed to set tags");
+                        throw new Exception("Failed to set tags");
                     }
+
+                    if (Log.IsDebugEnabled) Log.DebugFormat("END");
                 }
-                if (Log.IsDebugEnabled) Log.DebugFormat("END");
-                return objects;
             }
+
+
         }
 
         public void ShareObject(string account, string container, string objectName, string shareTo, bool read, bool write)
@@ -285,7 +401,7 @@ namespace Pithos.Network
                 throw new ArgumentNullException("shareTo");
             Contract.EndContractBlock();
 
-            using (log4net.ThreadContext.Stacks["Share"].Push("Share Object"))
+            using (ThreadContext.Stacks["Share"].Push("Share Object"))
             {
                 if (Log.IsDebugEnabled) Log.DebugFormat("START");
                 
@@ -321,6 +437,154 @@ namespace Pithos.Network
 
         }
 
+        public AccountInfo GetAccountPolicies(AccountInfo accountInfo)
+        {
+            if (accountInfo==null)
+                throw new ArgumentNullException("accountInfo");
+            Contract.EndContractBlock();
+
+            using (ThreadContext.Stacks["Account"].Push("GetPolicies"))
+            {
+                if (Log.IsDebugEnabled) Log.DebugFormat("START");
+
+                using (var client = new RestClient(_baseClient))
+                {
+                    if (!String.IsNullOrWhiteSpace(accountInfo.UserName))
+                        client.BaseAddress = GetAccountUrl(accountInfo.UserName);
+
+                    client.Parameters.Clear();
+                    client.Parameters.Add("format", "json");                    
+                    client.Head(String.Empty, 3);
+
+                    var quotaValue=client.ResponseHeaders["X-Account-Policy-Quota"];
+                    var bytesValue= client.ResponseHeaders["X-Account-Bytes-Used"];
+
+                    long quota, bytes;
+                    if (long.TryParse(quotaValue, out quota))
+                        accountInfo.Quota = quota;
+                    if (long.TryParse(bytesValue, out bytes))
+                        accountInfo.BytesUsed = bytes;
+                    
+                    return accountInfo;
+
+                }
+
+            }
+        }
+
+        public void UpdateMetadata(ObjectInfo objectInfo)
+        {
+            if (objectInfo == null)
+                throw new ArgumentNullException("objectInfo");
+            Contract.EndContractBlock();
+
+            using (ThreadContext.Stacks["Objects"].Push("UpdateMetadata"))
+            {
+                if (Log.IsDebugEnabled) Log.DebugFormat("START");
+
+
+                using(var client=new RestClient(_baseClient))
+                {
+
+                    client.BaseAddress = GetAccountUrl(objectInfo.Account);
+                    
+                    client.Parameters.Clear();
+                    
+
+                    //Set Tags
+                    foreach (var tag in objectInfo.Tags)
+                    {
+                        var headerTag = String.Format("X-Object-Meta-{0}", tag.Key);
+                        client.Headers.Add(headerTag, tag.Value);
+                    }
+
+                    //Set Permissions
+
+                    var permissions=objectInfo.GetPermissionString();
+                    client.SetNonEmptyHeaderValue("X-Object-Sharing",permissions);
+
+                    client.SetNonEmptyHeaderValue("Content-Disposition",objectInfo.ContendDisposition);
+                    client.SetNonEmptyHeaderValue("Content-Encoding",objectInfo.ContentEncoding);
+                    client.SetNonEmptyHeaderValue("X-Object-Manifest",objectInfo.Manifest);
+                    var isPublic = objectInfo.IsPublic.ToString().ToLower();
+                    client.Headers.Add("X-Object-Public", isPublic);
+
+
+                    var uriBuilder = client.GetAddressBuilder(objectInfo.Container, objectInfo.Name);
+                    var uri = uriBuilder.Uri;
+
+                    client.UploadValues(uri,new NameValueCollection());
+
+
+                    client.AssertStatusOK("UpdateMetadata failed");
+                    //If the status is NOT ACCEPTED or OK we have a problem
+                    if (!(client.StatusCode == HttpStatusCode.Accepted || client.StatusCode == HttpStatusCode.OK))
+                    {
+                        Log.Error("Failed to update metadata");
+                        throw new Exception("Failed to update metadata");
+                    }
+
+                    if (Log.IsDebugEnabled) Log.DebugFormat("END");
+                }
+            }
+
+        }
+
+        public void UpdateMetadata(ContainerInfo containerInfo)
+        {
+            if (containerInfo == null)
+                throw new ArgumentNullException("containerInfo");
+            Contract.EndContractBlock();
+
+            using (ThreadContext.Stacks["Containers"].Push("UpdateMetadata"))
+            {
+                if (Log.IsDebugEnabled) Log.DebugFormat("START");
+
+
+                using(var client=new RestClient(_baseClient))
+                {
+
+                    client.BaseAddress = GetAccountUrl(containerInfo.Account);
+                    
+                    client.Parameters.Clear();
+                    
+
+                    //Set Tags
+                    foreach (var tag in containerInfo.Tags)
+                    {
+                        var headerTag = String.Format("X-Container-Meta-{0}", tag.Key);
+                        client.Headers.Add(headerTag, tag.Value);
+                    }
+
+                    
+                    //Set Policies
+                    foreach (var policy in containerInfo.Policies)
+                    {
+                        var headerPolicy = String.Format("X-Container-Policy-{0}", policy.Key);
+                        client.Headers.Add(headerPolicy, policy.Value);
+                    }
+
+
+                    var uriBuilder = client.GetAddressBuilder(containerInfo.Name,"");
+                    var uri = uriBuilder.Uri;
+
+                    client.UploadValues(uri,new NameValueCollection());
+
+
+                    client.AssertStatusOK("UpdateMetadata failed");
+                    //If the status is NOT ACCEPTED or OK we have a problem
+                    if (!(client.StatusCode == HttpStatusCode.Accepted || client.StatusCode == HttpStatusCode.OK))
+                    {
+                        Log.Error("Failed to update metadata");
+                        throw new Exception("Failed to update metadata");
+                    }
+
+                    if (Log.IsDebugEnabled) Log.DebugFormat("END");
+                }
+            }
+
+        }
+
 
         public IList<ObjectInfo> ListObjects(string account, string container, DateTime? since = null)
         {
@@ -328,7 +592,7 @@ namespace Pithos.Network
                 throw new ArgumentNullException("container");
             Contract.EndContractBlock();
 
-            using (log4net.ThreadContext.Stacks["Objects"].Push("List"))
+            using (ThreadContext.Stacks["Objects"].Push("List"))
             {
                 if (Log.IsDebugEnabled) Log.DebugFormat("START");
 
@@ -344,6 +608,8 @@ namespace Pithos.Network
 
                     client.AssertStatusOK("ListObjects failed");
 
+                    if (client.StatusCode==HttpStatusCode.NotModified)
+                        return new[]{new NoModificationInfo(account,container)};
                     //If the result is empty, return an empty list,
                     var infos = String.IsNullOrWhiteSpace(content)
                                     ? new List<ObjectInfo>()
@@ -354,24 +620,25 @@ namespace Pithos.Network
                     {
                         info.Container = container;
                         info.Account = account;
+                        info.StorageUri = this.StorageUrl;
                     }
-                    if (Log.IsDebugEnabled) Log.DebugFormat("START");
+                    if (Log.IsDebugEnabled) Log.DebugFormat("END");
                     return infos;
                 }
             }
         }
 
-
-
         public IList<ObjectInfo> ListObjects(string account, string container, string folder, DateTime? since = null)
         {
             if (String.IsNullOrWhiteSpace(container))
                 throw new ArgumentNullException("container");
+/*
             if (String.IsNullOrWhiteSpace(folder))
                 throw new ArgumentNullException("folder");
+*/
             Contract.EndContractBlock();
 
-            using (log4net.ThreadContext.Stacks["Objects"].Push("List"))
+            using (ThreadContext.Stacks["Objects"].Push("List"))
             {
                 if (Log.IsDebugEnabled) Log.DebugFormat("START");
 
@@ -387,8 +654,17 @@ namespace Pithos.Network
                     var content = client.DownloadStringWithRetry(container, 3);
                     client.AssertStatusOK("ListObjects failed");
 
-                    var infos = JsonConvert.DeserializeObject<IList<ObjectInfo>>(content);
+                    if (client.StatusCode==HttpStatusCode.NotModified)
+                        return new[]{new NoModificationInfo(account,container,folder)};
 
+                    var infos = JsonConvert.DeserializeObject<IList<ObjectInfo>>(content);
+                    foreach (var info in infos)
+                    {
+                        info.Account = account;
+                        if (info.Container == null)
+                            info.Container = container;
+                        info.StorageUri = this.StorageUrl;
+                    }
                     if (Log.IsDebugEnabled) Log.DebugFormat("END");
                     return infos;
                 }
@@ -402,7 +678,7 @@ namespace Pithos.Network
                 throw new ArgumentNullException("container", "The container property can't be empty");
             Contract.EndContractBlock();
 
-            using (log4net.ThreadContext.Stacks["Containters"].Push("Exists"))
+            using (ThreadContext.Stacks["Containters"].Push("Exists"))
             {
                 if (Log.IsDebugEnabled) Log.DebugFormat("START");
 
@@ -473,7 +749,7 @@ namespace Pithos.Network
                 throw new ArgumentNullException("objectName", "The objectName property can't be empty");
             Contract.EndContractBlock();
 
-            using (log4net.ThreadContext.Stacks["Objects"].Push("GetObjectInfo"))
+            using (ThreadContext.Stacks["Objects"].Push("GetObjectInfo"))
             {                
 
                 using (var client = new RestClient(_baseClient))
@@ -494,24 +770,32 @@ namespace Pithos.Network
                             case HttpStatusCode.OK:
                             case HttpStatusCode.NoContent:
                                 var keys = client.ResponseHeaders.AllKeys.AsQueryable();
-                                var tags = (from key in keys
-                                            where key.StartsWith("X-Object-Meta-")
-                                            let name = key.Substring(14)
-                                            select new {Name = name, Value = client.ResponseHeaders[name]})
-                                    .ToDictionary(t => t.Name, t => t.Value);
+                                var tags = client.GetMeta("X-Object-Meta-");
                                 var extensions = (from key in keys
                                                   where key.StartsWith("X-Object-") && !key.StartsWith("X-Object-Meta-")
                                                   select new {Name = key, Value = client.ResponseHeaders[key]})
                                     .ToDictionary(t => t.Name, t => t.Value);
+
+                                var permissions=client.GetHeaderValue("X-Object-Sharing", true);
+                                
+                                
                                 var info = new ObjectInfo
                                                {
+                                                   Account = account,
+                                                   Container = container,
                                                    Name = objectName,
                                                    Hash = client.GetHeaderValue("ETag"),
                                                    Content_Type = client.GetHeaderValue("Content-Type"),
+                                                   Bytes = Convert.ToInt64(client.GetHeaderValue("Content-Length",true)),
                                                    Tags = tags,
                                                    Last_Modified = client.LastModified,
-                                                   Extensions = extensions
+                                                   Extensions = extensions,
+                                                   ContentEncoding=client.GetHeaderValue("Content-Encoding",true),
+                                                   ContendDisposition = client.GetHeaderValue("Content-Disposition",true),
+                                                   Manifest=client.GetHeaderValue("X-Object-Manifest",true),
+                                                   PublicUrl=client.GetHeaderValue("X-Object-Public",true),                                                   
                                                };
+                                info.SetPermissions(permissions);
                                 return info;
                             case HttpStatusCode.NotFound:
                                 return ObjectInfo.Empty;
@@ -524,7 +808,7 @@ namespace Pithos.Network
                     }
                     catch (RetryException)
                     {
-                        Log.WarnFormat("[RETRY FAIL] GetObjectInfo for {0} failed.");
+                        Log.WarnFormat("[RETRY FAIL] GetObjectInfo for {0} failed.",objectName);
                         return ObjectInfo.Empty;
                     }
                     catch (WebException e)
@@ -563,6 +847,8 @@ namespace Pithos.Network
             }
         }
 
+     
+
         public ContainerInfo GetContainerInfo(string account, string container)
         {
             if (String.IsNullOrWhiteSpace(container))
@@ -579,15 +865,24 @@ namespace Pithos.Network
                 {
                     case HttpStatusCode.OK:
                     case HttpStatusCode.NoContent:
+                        var tags = client.GetMeta("X-Container-Meta-");
+                        var policies = client.GetMeta("X-Container-Policy-");
+
                         var containerInfo = new ContainerInfo
                                                 {
+                                                    Account=account,
                                                     Name = container,
                                                     Count =
                                                         long.Parse(client.GetHeaderValue("X-Container-Object-Count")),
                                                     Bytes = long.Parse(client.GetHeaderValue("X-Container-Bytes-Used")),
                                                     BlockHash = client.GetHeaderValue("X-Container-Block-Hash"),
-                                                    BlockSize=int.Parse(client.GetHeaderValue("X-Container-Block-Size"))
+                                                    BlockSize=int.Parse(client.GetHeaderValue("X-Container-Block-Size")),
+                                                    Last_Modified=client.LastModified,
+                                                    Tags=tags,
+                                                    Policies=policies
                                                 };
+                        
+
                         return containerInfo;
                     case HttpStatusCode.NotFound:
                         return ContainerInfo.Empty;
@@ -598,9 +893,11 @@ namespace Pithos.Network
         }
 
         public void CreateContainer(string account, string container)
-        {            
+        {
+            if (String.IsNullOrWhiteSpace(account))
+                throw new ArgumentNullException("account");
             if (String.IsNullOrWhiteSpace(container))
-                throw new ArgumentNullException("container", "The container property can't be empty");
+                throw new ArgumentNullException("container");
             Contract.EndContractBlock();
 
             using (var client = new RestClient(_baseClient))
@@ -723,7 +1020,7 @@ namespace Pithos.Network
 
 
             //Don't use a timeout because putting the hashmap may be a long process
-            var client = new RestClient(_baseClient) { Timeout = 0 };
+            var client = new RestClient(_baseClient) { Timeout = 0 };           
             if (!String.IsNullOrWhiteSpace(account))
                 client.BaseAddress = GetAccountUrl(account);
 
@@ -736,9 +1033,10 @@ namespace Pithos.Network
 
             //Send the tree hash as Json to the server            
             client.Headers[HttpRequestHeader.ContentType] = "application/octet-stream";
-            var uploadTask=client.UploadStringTask(uri, "PUT", hash.ToJson());
-
-            
+            var jsonHash = hash.ToJson();
+            var uploadTask=client.UploadStringTask(uri, "PUT", jsonHash);
+            if (Log.IsDebugEnabled)
+                Log.DebugFormat("Hashes:\r\n{0}", jsonHash);
             return uploadTask.ContinueWith(t =>
             {
 
@@ -757,41 +1055,40 @@ namespace Pithos.Network
                 {
                     var ex = t.Exception.InnerException;
                     var we = ex as WebException;
+                    
                     var response = we.Response as HttpWebResponse;
                     if (response!=null && response.StatusCode==HttpStatusCode.Conflict)
                     {
                         //In case of 409 the missing parts will be in the response content                        
                         using (var stream = response.GetResponseStream())
-                        using(var reader=new StreamReader(stream))
+                        using(var reader=stream.GetLoggedReader(Log,response.ContentLength))
                         {
-                            //We need to cleanup the content before returning it because it contains
+                            //We used to have to cleanup the content before returning it because it contains
                             //error content after the list of hashes
-                            var hashes = new List<string>();
-                            string line=null;
-                            //All lines up to the first empty line are hashes
-                            while(!String.IsNullOrWhiteSpace(line=reader.ReadLine()))
-                            {
-                                hashes.Add(line);
-                            }
-
+                            //
+                            //As of 30/1/2012, the result is a proper Json array so we don't need to read the content
+                            //line by line
+                            
+                            var serializer = new JsonSerializer();                            
+                            serializer.Error += (sender, args) => Log.ErrorFormat("Deserialization error at [{0}] [{1}]", args.ErrorContext.Error, args.ErrorContext.Member);
+                            var hashes = (List<string>)serializer.Deserialize(reader, typeof(List<string>));
                             return hashes;
                         }                        
-                    }
-                    else
-                        //Any other status code is unexpected and the exception should be rethrown
-                        throw ex;
+                    }                    
+                    //Any other status code is unexpected and the exception should be rethrown
+                    Log.LogError(response);
+                    throw ex;
                     
                 }
                 //Any other status code is unexpected but there was no exception. We can probably continue processing
-                else
-                {
-                    Log.WarnFormat("Unexcpected status code when putting map: {0} - {1}",client.StatusCode,client.StatusDescription);                    
-                }
+                Log.WarnFormat("Unexcpected status code when putting map: {0} - {1}",client.StatusCode,client.StatusDescription);                    
+                
                 return empty;
             });
 
         }
 
+        
         public Task<byte[]> GetBlock(string account, string container, Uri relativeUrl, long start, long? end)
         {
             if (String.IsNullOrWhiteSpace(Token))
@@ -826,7 +1123,7 @@ namespace Pithos.Network
         }
 
 
-        public Task PostBlock(string account, string container, byte[] block, int offset, int count)
+        public async Task PostBlock(string account, string container, byte[] block, int offset, int count)
         {
             if (String.IsNullOrWhiteSpace(container))
                 throw new ArgumentNullException("container");
@@ -842,49 +1139,48 @@ namespace Pithos.Network
                 throw new InvalidOperationException("Invalid Storage Url");                        
             Contract.EndContractBlock();
 
-                        
-            //Don't use a timeout because putting the hashmap may be a long process
-            var client = new RestClient(_baseClient) { Timeout = 0 };
-            if (!String.IsNullOrWhiteSpace(account))
-                client.BaseAddress = GetAccountUrl(account);
 
-            var builder = client.GetAddressBuilder(container, "");
-            //We are doing an update
-            builder.Query = "update";
-            var uri = builder.Uri;
+            try
+            {
 
-            client.Headers[HttpRequestHeader.ContentType] = "application/octet-stream";
+            //Don't use a timeout because putting the hashmap may be a long process
+                using (var client = new RestClient(_baseClient) { Timeout = 0 })
+                {
+                    if (!String.IsNullOrWhiteSpace(account))
+                        client.BaseAddress = GetAccountUrl(account);
 
-            Log.InfoFormat("[BLOCK POST] START");
+                    var builder = client.GetAddressBuilder(container, "");
+                    //We are doing an update
+                    builder.Query = "update";
+                    var uri = builder.Uri;
 
-            client.UploadProgressChanged += (sender, args) => 
-                Log.InfoFormat("[BLOCK POST PROGRESS] {0}% {1} of {2}",
-                                    args.ProgressPercentage, args.BytesSent,
-                                    args.TotalBytesToSend);
-            client.UploadFileCompleted += (sender, args) => 
-                Log.InfoFormat("[BLOCK POST PROGRESS] Completed ");
+                    client.Headers[HttpRequestHeader.ContentType] = "application/octet-stream";
 
-            
-            //Send the block
-            var uploadTask = client.UploadDataTask(uri, "POST", block)
-            .ContinueWith(upload =>
-            {
-                client.Dispose();
+                    Log.InfoFormat("[BLOCK POST] START");
 
-                if (upload.IsFaulted)
-                {
-                    var exception = upload.Exception.InnerException;
-                    Log.ErrorFormat("[BLOCK POST] FAIL with \r{0}", exception);                        
-                    throw exception;
+                    client.UploadProgressChanged += (sender, args) =>
+                                                    Log.InfoFormat("[BLOCK POST PROGRESS] {0}% {1} of {2}",
+                                                                   args.ProgressPercentage, args.BytesSent,
+                                                                   args.TotalBytesToSend);
+                    client.UploadFileCompleted += (sender, args) =>
+                                                  Log.InfoFormat("[BLOCK POST PROGRESS] Completed ");
+
+                    var buffer = new byte[count];
+                    Buffer.BlockCopy(block, offset, buffer, 0, count);
+                    //Send the block
+                    await client.UploadDataTask(uri, "POST", buffer);
+                    Log.InfoFormat("[BLOCK POST] END");
                 }
-                    
-                Log.InfoFormat("[BLOCK POST] END");
-            });
-            return uploadTask;            
+            }
+            catch (Exception exc)
+            {
+                Log.ErrorFormat("[BLOCK POST] FAIL with \r{0}", exc);                                        
+                throw;
+            }
         }
 
 
-        public Task<TreeHash> GetHashMap(string account, string container, string objectName)
+        public async Task<TreeHash> GetHashMap(string account, string container, string objectName)
         {
             if (String.IsNullOrWhiteSpace(container))
                 throw new ArgumentNullException("container");
@@ -902,40 +1198,26 @@ namespace Pithos.Network
                 //object to avoid concurrency errors.
                 //
                 //Download operations take a long time therefore they have no timeout.
-                //TODO: Do we really? this is a hashmap operation, not a download
-                var client = new RestClient(_baseClient) { Timeout = 0 };
-                if (!String.IsNullOrWhiteSpace(account))
-                    client.BaseAddress = GetAccountUrl(account);
-
-
-                //The container and objectName are relative names. They are joined with the client's
-                //BaseAddress to create the object's absolute address
-                var builder = client.GetAddressBuilder(container, objectName);
-                builder.Query = "format=json&hashmap";
-                var uri = builder.Uri;
+                //TODO: Do they really? this is a hashmap operation, not a download
                 
                 //Start downloading the object asynchronously
-                var downloadTask = client.DownloadStringTask(uri);
-                
-                //Once the download completes
-                return downloadTask.ContinueWith(download =>
+                using (var client = new RestClient(_baseClient) { Timeout = 0 })
                 {
-                    //Delete the local client object
-                    client.Dispose();
-                    //And report failure or completion
-                    if (download.IsFaulted)
-                    {
-                        Log.ErrorFormat("[GET HASH] FAIL for {0} with \r{1}", objectName,
-                                        download.Exception);
-                        throw download.Exception;
-                    }
-                                          
-                    //The server will return an empty string if the file is empty
-                    var json = download.Result;
+                    if (!String.IsNullOrWhiteSpace(account))
+                        client.BaseAddress = GetAccountUrl(account);
+
+                    //The container and objectName are relative names. They are joined with the client's
+                    //BaseAddress to create the object's absolute address
+                    var builder = client.GetAddressBuilder(container, objectName);
+                    builder.Query = "format=json&hashmap";
+                    var uri = builder.Uri;
+
+
+                    var json = await client.DownloadStringTaskAsync(uri);
                     var treeHash = TreeHash.Parse(json);
-                    Log.InfoFormat("[GET HASH] END {0}", objectName);                                             
+                    Log.InfoFormat("[GET HASH] END {0}", objectName);
                     return treeHash;
-                });
+                }
             }
             catch (Exception exc)
             {
@@ -943,8 +1225,6 @@ namespace Pithos.Network
                 throw;
             }
 
-
-
         }
 
 
@@ -957,7 +1237,7 @@ namespace Pithos.Network
         /// <param name="fileName"></param>
         /// <param name="hash">Optional hash value for the file. If no hash is provided, the method calculates a new hash</param>
         /// <remarks>>This method should have no timeout or a very long one</remarks>
-        public Task PutObject(string account, string container, string objectName, string fileName, string hash = null)
+        public async Task PutObject(string account, string container, string objectName, string fileName, string hash = null, string contentType = "application/octet-stream")
         {
             if (String.IsNullOrWhiteSpace(container))
                 throw new ArgumentNullException("container", "The container property can't be empty");
@@ -965,57 +1245,54 @@ namespace Pithos.Network
                 throw new ArgumentNullException("objectName", "The objectName property can't be empty");
             if (String.IsNullOrWhiteSpace(fileName))
                 throw new ArgumentNullException("fileName", "The fileName property can't be empty");
-            if (!File.Exists(fileName))
-                throw new FileNotFoundException("The file does not exist",fileName);
+/*
+            if (!File.Exists(fileName) && !Directory.Exists(fileName))
+                throw new FileNotFoundException("The file or directory does not exist",fileName);
+*/
             Contract.EndContractBlock();
             
             try
             {
 
-                var client = new RestClient(_baseClient){Timeout=0};
-                if (!String.IsNullOrWhiteSpace(account))
-                    client.BaseAddress = GetAccountUrl(account);
-
-                var builder = client.GetAddressBuilder(container, objectName);
-                var uri = builder.Uri;
-
-                string etag = hash ?? CalculateHash(fileName);
-
-                client.Headers.Add("Content-Type", "application/octet-stream");
-                client.Headers.Add("ETag", etag);
-
-
-                Log.InfoFormat("[PUT] START {0}", objectName);
-                client.UploadProgressChanged += (sender, args) =>
+                using (var client = new RestClient(_baseClient) { Timeout = 0 })
                 {
-                    using (log4net.ThreadContext.Stacks["PUT"].Push("Progress"))
-                    {
-                        Log.InfoFormat("{0} {1}% {2} of {3}", fileName, args.ProgressPercentage,
-                                       args.BytesSent, args.TotalBytesToSend);
-                    }
-                };
+                    if (!String.IsNullOrWhiteSpace(account))
+                        client.BaseAddress = GetAccountUrl(account);
 
-                client.UploadFileCompleted += (sender, args) =>
-                {
-                    using (log4net.ThreadContext.Stacks["PUT"].Push("Progress"))
-                    {
-                        Log.InfoFormat("Completed {0}", fileName);
-                    }
-                };
-                return client.UploadFileTask(uri, "PUT", fileName)
-                    .ContinueWith(upload=>
-                                      {
-                                          client.Dispose();
+                    var builder = client.GetAddressBuilder(container, objectName);
+                    var uri = builder.Uri;
+
+                    string etag = hash ?? CalculateHash(fileName);
+
+                    client.Headers.Add("Content-Type", contentType);
+                    client.Headers.Add("ETag", etag);
+
+
+                    Log.InfoFormat("[PUT] START {0}", objectName);
+                    client.UploadProgressChanged += (sender, args) =>
+                                                        {
+                                                            using (ThreadContext.Stacks["PUT"].Push("Progress"))
+                                                            {
+                                                                Log.InfoFormat("{0} {1}% {2} of {3}", fileName,
+                                                                               args.ProgressPercentage,
+                                                                               args.BytesSent, args.TotalBytesToSend);
+                                                            }
+                                                        };
+
+                    client.UploadFileCompleted += (sender, args) =>
+                                                      {
+                                                          using (ThreadContext.Stacks["PUT"].Push("Progress"))
+                                                          {
+                                                              Log.InfoFormat("Completed {0}", fileName);
+                                                          }
+                                                      };
+                    if (contentType=="application/directory")
+                        await client.UploadDataTaskAsync(uri, "PUT", new byte[0]);
+                    else
+                        await client.UploadFileTaskAsync(uri, "PUT", fileName);
+                }
 
-                                          if (upload.IsFaulted)
-                                          {
-                                              var exc = upload.Exception.InnerException;
-                                              Log.ErrorFormat("[PUT] FAIL for {0} with \r{1}",objectName,exc);
-                                              throw exc;
-                                          }
-                                          else
-                                            Log.InfoFormat("[PUT] END {0}", objectName);
-                                      });
+                Log.InfoFormat("[PUT] END {0}", objectName);
             }
             catch (Exception exc)
             {
@@ -1028,6 +1305,9 @@ namespace Pithos.Network
         
         private static string CalculateHash(string fileName)
         {
+            Contract.Requires(!String.IsNullOrWhiteSpace(fileName));
+            Contract.EndContractBlock();
+
             string hash;
             using (var hasher = MD5.Create())
             using(var stream=File.OpenRead(fileName))
@@ -1039,29 +1319,7 @@ namespace Pithos.Network
             }
             return hash;
         }
-
-       /* public void DeleteObject(string container, string objectName,string account)
-        {
-            if (String.IsNullOrWhiteSpace(container))
-                throw new ArgumentNullException("container", "The container property can't be empty");
-            if (String.IsNullOrWhiteSpace(objectName))
-                throw new ArgumentNullException("objectName", "The objectName property can't be empty");
-            Contract.EndContractBlock();
-
-            using (var client = new RestClient(_baseClient))
-            {
-                if (!String.IsNullOrWhiteSpace(account))
-                    client.BaseAddress = GetAccountUrl(account);
-                );
-                client.DeleteWithRetry(container + "/" + objectName, 3);
-
-                var expectedCodes = new[] {HttpStatusCode.NotFound, HttpStatusCode.NoContent};
-                if (!expectedCodes.Contains(client.StatusCode))
-                    throw CreateWebException("DeleteObject", client.StatusCode);
-            }
-
-        }*/
-
+        
         public void MoveObject(string account, string sourceContainer, string oldObjectName, string targetContainer, string newObjectName)
         {
             if (String.IsNullOrWhiteSpace(sourceContainer))
@@ -1109,6 +1367,7 @@ namespace Pithos.Network
 
                 client.Headers.Add("X-Move-From", sourceUrl);
                 client.AllowedStatusCodes.Add(HttpStatusCode.NotFound);
+                Log.InfoFormat("[TRASH] [{0}] to [{1}]",sourceUrl,targetUrl);
                 client.PutWithRetry(targetUrl, 3);
 
                 var expectedCodes = new[] {HttpStatusCode.OK, HttpStatusCode.NoContent, HttpStatusCode.Created,HttpStatusCode.NotFound};
@@ -1123,7 +1382,13 @@ namespace Pithos.Network
             return new WebException(String.Format("{0} failed with unexpected status code {1}", operation, statusCode));
         }
 
-        
+
+/*
+        public IEnumerable<ObjectInfo> ListDirectories(ContainerInfo container)
+        {
+            var directories=this.ListObjects(container.Account, container.Name, "/");
+        }
+*/
     }
 
     public class ShareAccountInfo