UrlUtils.cs

using McTools.Xrm.Connection;
using Microsoft.Xrm.Sdk;
using Rappen.XTB.Helpers.Controls;
using System;
using System.Diagnostics;
using System.IO;
using System.Net;
using System.Web;
using System.Windows.Forms;
using static System.Windows.Forms.LinkLabel;

namespace Rappen.XTB.Helpers
{
    public static class UrlUtils
    {
        public static string UTM_MEDIUM = "XrmToolBox";
        public static string TOOL_NAME;
        public static string MVP_ID = "DX-MVP-5002475";

        /// <summary>
        /// Trying all it can to find a url and open it
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="connectionDetail">Using this profile browser and not adding UTM if included</param>
        /// <returns>Returns True if an url was found and open, False if not</returns>
        public static bool OpenUrl(object sender, ConnectionDetail connectionDetail = null)
        {
            if (sender == null)
            {
                return false;
            }
            var noextraparams = false;
            var url = GetUrl(sender);
            if (string.IsNullOrWhiteSpace(url) && sender is Link link)
            {
                url = GetUrl(link.LinkData);
            }
            if (string.IsNullOrWhiteSpace(url) && sender is LinkLabel linklbl)
            {
                if (linklbl.Links.Count > 0 && linklbl.Links[0].Enabled)
                {
                    url = GetUrl(linklbl.Links[0].LinkData);
                }
                if (string.IsNullOrWhiteSpace(url))
                {
                    url = GetUrl(linklbl.Tag);
                }
                if (string.IsNullOrWhiteSpace(url))
                {
                    url = GetUrl(linklbl.Text);
                }
            }
            if (string.IsNullOrWhiteSpace(url) && sender is ToolStripItem tsi)
            {
                url = GetUrl(tsi.Tag);
                if (string.IsNullOrWhiteSpace(url))
                {
                    url = GetUrl(tsi.Text);
                }
            }
            if (string.IsNullOrWhiteSpace(url) && sender is Control ctrl)
            {
                url = GetUrl(ctrl.Tag);
                if (string.IsNullOrWhiteSpace(url))
                {
                    url = GetUrl(ctrl.Text);
                }
            }
            if (string.IsNullOrWhiteSpace(url) && sender is Entity entity && connectionDetail != null)
            {
                url = entity.GetEntityUrl(connectionDetail);
                noextraparams = !string.IsNullOrWhiteSpace(url);
            }
            if (string.IsNullOrWhiteSpace(url) && sender is EntityReference entityref && connectionDetail != null)
            {
                url = entityref.GetEntityUrl(connectionDetail);
                noextraparams = !string.IsNullOrWhiteSpace(url);
            }
            if (string.IsNullOrEmpty(url) && sender is XRMRecordEventArgs xrmenvarg && connectionDetail != null)
            {
                url = xrmenvarg.Entity?.GetEntityUrl(connectionDetail);
                noextraparams = !string.IsNullOrWhiteSpace(url);
            }
            if (string.IsNullOrWhiteSpace(url))
            {
                return false;
            }
            if (!noextraparams && url.Contains(".dynamics.com/"))
            {
                noextraparams = true;
            }
            if (!noextraparams)
            {
                url = ProcessURL(url.Trim());
            }
            if (connectionDetail != null)
            {
                url = url.Replace(" ", "+");
                connectionDetail.OpenUrlWithBrowserProfile(new Uri(url));
            }
            else
            {
                Process.Start(url);
            }
            return true;
        }

        public static string GetFullWebApplicationUrl(this ConnectionDetail ConnectionDetail)
        {
            var url = ConnectionDetail.WebApplicationUrl;
            if (string.IsNullOrEmpty(url))
            {
                url = ConnectionDetail.ServerName;
            }
            if (!url.ToLower().StartsWith("http"))
            {
                url = string.Concat("http://", url);
            }
            var uri = new Uri(url);
            if (!uri.Host.EndsWith(".dynamics.com"))
            {
                if (string.IsNullOrEmpty(uri.AbsolutePath.Trim('/')))
                {
                    uri = new Uri(uri, ConnectionDetail.Organization);
                }
            }
            return uri.ToString();
        }

        public static string GetWebApiServiceUrl(this ConnectionDetail connectiondetail)
        {
            if (connectiondetail == null)
            {
                return string.Empty;
            }
            var url = new Uri(new Uri(connectiondetail.GetFullWebApplicationUrl()), $"api/data/v{connectiondetail.OrganizationMajorVersion}.{connectiondetail.OrganizationMinorVersion}");
            return url.ToString();
        }

        public static string GetEntityUrl(this Entity entity, ConnectionDetail ConnectionDetail)
        {
            if (entity == null)
            {
                return string.Empty;
            }
            var entref = entity.ToEntityReference();
            switch (entref.LogicalName)
            {
                case "activitypointer":
                    if (!entity.Contains("activitytypecode"))
                    {
                        MessageBox.Show("To open records of type activitypointer, attribute 'activitytypecode' must be included in the query.", "Open Record", MessageBoxButtons.OK, MessageBoxIcon.Error);
                        entref.LogicalName = string.Empty;
                    }
                    else
                    {
                        entref.LogicalName = entity["activitytypecode"].ToString();
                    }
                    break;

                case "activityparty":
                    if (!entity.Contains("partyid"))
                    {
                        MessageBox.Show("To open records of type activityparty, attribute 'partyid' must be included in the query.", "Open Record", MessageBoxButtons.OK, MessageBoxIcon.Error);
                        entref.LogicalName = string.Empty;
                    }
                    else
                    {
                        var party = (EntityReference)entity["partyid"];
                        entref.LogicalName = party.LogicalName;
                        entref.Id = party.Id;
                    }
                    break;
            }
            return entref.GetEntityUrl(ConnectionDetail);
        }

        public static string GetEntityUrl(this EntityReference entref, ConnectionDetail ConnectionDetail)
        {
            if (entref == null || string.IsNullOrEmpty(entref.LogicalName) || entref.Id.Equals(Guid.Empty))
            {
                return string.Empty;
            }
            var url = ConnectionDetail.GetFullWebApplicationUrl();
            url = string.Concat(url,
                url.EndsWith("/") ? "" : "/",
                "main.aspx?etn=",
                entref.LogicalName,
                "&pagetype=entityrecord&id=",
                entref.Id.ToString());
            return url;
        }

        public static T DownloadXml<T>(this Uri uri, T defaultvalue = default(T))
        {
            ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12;
            var webRequestXml = HttpWebRequest.Create(uri) as HttpWebRequest;
            webRequestXml.Accept = "text/html, application/xhtml+xml, */*";
            try
            {
                using (var response = webRequestXml.GetResponse())
                using (var content = response.GetResponseStream())
                using (var reader = new StreamReader(content))
                {
                    var strContent = reader.ReadToEnd();
                    return (T)XmlSerializerHelper.Deserialize(strContent, typeof(T));
                }
            }
            catch
            {
                return defaultvalue;
            }
        }

        private static string GetUrl(object holder)
        {
            if (holder is string url && url.Trim().StartsWith("http"))
            {
                return url.Trim();
            }
            else if (holder is Uri uri)
            {
                return uri.ToString();
            }
            return string.Empty;
        }

        private static string ProcessURL(string url)
        {
            if (!Uri.TryCreate(url, UriKind.RelativeOrAbsolute, out Uri _))
            {
                return url;
            }
            if (string.IsNullOrWhiteSpace(UTM_MEDIUM) || string.IsNullOrWhiteSpace(TOOL_NAME))
            {
                throw new Exception($"UTM_MEDIUM='{UTM_MEDIUM}', TOOL_NAME='{TOOL_NAME}' must be set.");
            }
            var urib = new UriBuilder(url);
            var qry = HttpUtility.ParseQueryString(urib.Query);
            if (urib.Host.ToLowerInvariant().Contains("microsoft.com"))
            {
                if (string.IsNullOrWhiteSpace(MVP_ID))
                {
                    throw new Exception($"MVP_ID must be set.");
                }
                qry.Add("WT.mc_id", MVP_ID);
                urib.Path = urib.Path.Replace("/en-us/", "/");
            }
            qry["utm_source"] = TOOL_NAME;
            qry["utm_medium"] = UTM_MEDIUM;
            urib.Query = qry.ToString();
            return urib.Uri.ToString();
        }
    }
}