[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: [Technical Users - OE Development] Webserver Method REST

[wsartorelli]

My friend, I need to put the code below in Progress, can you help me? using System; using System.Collections.Generic; using System.Collections.Specialized; using System.IO; using System.Linq; using System.Net; using System.Security.Cryptography; using System.Text; using System.Threading.Tasks; namespace Sample { class Program { static void Main(string[] args) { var uri = new Uri(@" qa01.csod.com/.../Session var request = (HttpWebRequest)WebRequest.Create(uri); var apiId = "wa2vbauugyvt"; var apiSecret = "tDCBh1b8tDO8lGVvieNqVCFUZgsPm1OoxYW4OM3WgEt21BSBpICULBe9sYaNZAEoRLVe49Fply/zgjKBP6V4gg=="; request.Headers.Add("x-csod-date", DateTime.UtcNow.ToString("yyyy-MM-ddTHH:mm:ss.000")); request.Headers.Add("x-csod-api-key", apiId); request.Method = "POST"; var stringToSign = ConstructStringToSign(request.Method, request.Headers, uri.AbsolutePath); var sig = SignString512(stringToSign, apiSecret); request.Headers.Add("x-csod-signature", sig); request.ContentType = "text/xml"; request.Timeout = 999999; request.ContentLength = 0; request.Accept = "text/xml"; using (var response = request.GetResponse()) { using (StreamReader reader = new StreamReader(response.GetResponseStream())) { string responseFromServer = reader.ReadToEnd(); Console.WriteLine(responseFromServer); } } Console.WriteLine(); Console.WriteLine("Enter To Exit"); Console.ReadLine(); } public static string ConstructStringToSign(string httpMethod, NameValueCollection headers, string pathAndQuery) { StringBuilder stringToSign = new StringBuilder(); var httpVerb = httpMethod.Trim() + "\n"; var csodHeaders = headers.Cast ().Where(w => w.StartsWith("x-csod-")) .Where(w => w != "x-csod-signature") .Distinct() .OrderBy(s => s) .Aggregate(string.Empty, (a, l) => a + l.ToLower().Trim() + ":" + headers[l].Trim() + "\n"); stringToSign.Append(httpVerb); stringToSign.Append(csodHeaders); stringToSign.Append(pathAndQuery); return stringToSign.ToString(); } public static string SignString512(string stringToSign, string secretKey) { byte[] secretkeyBytes = Convert.FromBase64String(secretKey); byte[] inputBytes = Encoding.UTF8.GetBytes(stringToSign); using (var hmac = new HMACSHA512(secretkeyBytes)) { byte[] hashValue = hmac.ComputeHash(inputBytes); return System.Convert.ToBase64String(hashValue); } } } }

Continue reading...