Wie kopiert man Dateien mit Hilfe der DropBox REST API in Delphi

Question

Ich scheine nicht zu verwalten die Dateikopie Betrieb mit der Dropbox API. Ich kann meinen Kunden erfolgreich autorisieren, Dateien herunterladen und hochladen. Der Kopiervorgang benötigt die POST-Methode und ich denke, dass ich hier eine falsche Anfrage erzeuge. Ich definiere die POST-Methode für die OAuth-Authentifizierung und benutze Indy TIdHTTP, um die Anfrage zu posten, bekomme aber immer den Fehlercode 403 - Permission denied.

Hier ist die Dropbox api Beschreibung: https://www.dropbox.com/developers/reference/api#fileops-copy

Hier ist ein Teil meines Codes ist:

ParamStr := Format('root=%s&from_path=%s&to_path=%s', [Root, EncodeFileName(FromPath), EncodeFileName(ToPath)]); 
URL := 'https://api.dropbox.com/1/fileops/copy' + '?' + ParamStr; 

Consumer := TOAuthConsumer.Create(Key, Secret); 
AToken := TOAuthToken.Create(fToken, fTokenSecret); 
HMAC := TOAuthSignatureMethod_HMAC_SHA1.Create; 
ARequest := TOAuthRequest.Create(''); 
try 
    ARequest.HTTPURL := URL; 
    ARequest.Method := 'POST'; 
    ARequest := ARequest.FromConsumerAndToken(Consumer, AToken, ''); 
    ARequest.Sign_Request(HMAC, Consumer, AToken); 


    Params := TStringList.Create; 
    try 
    Params.Text := ParamStr + '&' + ARequest.GetString; 
    HTTP.Post(URL, Params); 
    finally 
    Params.Free; 
    end; 

Answer 1

Soweit ich weiß, wann mit indy mit der params im Körper der Nachricht kopiert und nicht in der uRL versuchen, etwas mit wie:

http:Post(URL+encodeparams(params)); 

ich bin nicht sicher, dass dies die richtige Syntax ist, aber das ist die Idee.

Answer 2

Ich denke, ich könnte hier entdeckt was falsch ist. Ich bin mir der TOAuthRequest-Klasse nicht bewusst, aber ich vermute, dass die GetString-Methode den Standard-OAuth-Header 'Authorization Bearer {KEY}' liefert. dass sehen ist Header und der richtige Weg, um es in der HTTP-Anforderung hinzuzufügen, ist

HTTP.Request.CustomHeaders.AddValue('Authorization', <the rest of the string here>) 

Sie auf der anderen Seite die Zeichenfolge an den Körper hinzufügen, die für Get-Anfragen arbeiten können, weil der Körper (die Genehmigung string) irrt für einen Header, aber mit der POST-Methode haben Sie tatsächlichen Körper vor der Autorisierungszeichenfolge und damit die OAuth Zeichenfolge wird ignoriert.

Und schließlich glaube ich nicht, dass Sie die Parameter-Zeichenfolge im Körper auch brauchen. Ein leerer Körper sollte gut funktionieren. Die Abfragezeichenfolge scheint OK zu sein.

Beispielcode:

ParamStr := Format('root=%s&from_path=%s&to_path=%s', [Root, EncodeFileName(FromPath), EncodeFileName(ToPath)]); 
URL := 'https://api.dropbox.com/1/fileops/copy' + '?' + ParamStr; 

Consumer := TOAuthConsumer.Create(Key, Secret); 
AToken := TOAuthToken.Create(fToken, fTokenSecret); 
HMAC := TOAuthSignatureMethod_HMAC_SHA1.Create; 
ARequest := TOAuthRequest.Create(''); 
try 
    ARequest.HTTPURL := URL; 
    ARequest.Method := 'POST'; 
    ARequest := ARequest.FromConsumerAndToken(Consumer, AToken, ''); 
    ARequest.Sign_Request(HMAC, Consumer, AToken); 



    HTTP.Request.CustomHeaders.AddValue('Authorization', <parsed ARequest.GetString>) 
    HTTP.Post(URL); 

Hoffnung, dass dies hilft.