using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace OnlineStore.HCSingleStore
{
    class Class1
	{
//		<Query Kind = "Program" >
  
//	< Reference > &lt; RuntimeDirectory&gt;\System.Net.Http.dll</Reference>
//  <Reference>&lt;RuntimeDirectory&gt;\System.Windows.Forms.dll</Reference>
//  <NuGetReference>Newtonsoft.Json</NuGetReference>
//  <NuGetReference>SharpDX</NuGetReference>
//  <NuGetReference>SharpDX.Direct2D1</NuGetReference>
//  <NuGetReference>SharpDX.Mathematics</NuGetReference>
//  <Namespace>D2D = SharpDX.Direct2D1</Namespace>
//  <Namespace>DWrite = SharpDX.DirectWrite</Namespace>
//  <Namespace>Newtonsoft.Json.Linq</Namespace>
//  <Namespace>SharpDX.Direct2D1</Namespace>
//  <Namespace>SharpDX.IO</Namespace>
//  <Namespace>SharpDX.Mathematics.Interop</Namespace>
//  <Namespace>System.Net.Http</Namespace>
//  <Namespace>System.Threading.Tasks</Namespace>
//  <Namespace>WIC = SharpDX.WIC</Namespace>
//  <Namespace>SharpDX</Namespace>
//  <Namespace>System.Runtime.InteropServices</Namespace>
//  <Namespace>Microsoft.Win32</Namespace>
//  <Namespace>System.Windows.Forms</Namespace>
//</Query>

HttpClient http = new HttpClient();

		async Task Main()
		{
			$"Get bing url...".Dump();
			string url = await GetBingPicture();
			$"Get quote...".Dump();
			string english = await GetQuote();
			$"Download {url}...".Dump();
			string file = await DownloadUrlAsFileName(url);
			$"Generating...".Dump();
			string wallpaperFileName = GenerateWallpaper(file, english);
			Wallpaper.Set(wallpaperFileName, UserQuery.Wallpaper.Style.Centered);
			Util.Image(wallpaperFileName.Dump()).Dump();
		}

		string GenerateWallpaper(string pictureFileName, string english)
		{
			var wic = new WIC.ImagingFactory2();
			var d2d = new D2D.Factory();
			float dpi = d2d.DesktopDpi.Width;
			Size2 size = new Size2(Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.Bounds.Height);
			WIC.FormatConverter image = CreateWicImage(wic, pictureFileName);
			using (var wicBitmap = new WIC.Bitmap(wic, size.Width, size.Height, WIC.PixelFormat.Format32bppPBGRA, WIC.BitmapCreateCacheOption.CacheOnDemand))
			using (var target = new D2D.WicRenderTarget(d2d, wicBitmap, new D2D.RenderTargetProperties()))
			using (var dc = target.QueryInterface<D2D.DeviceContext>())
			using (var bmpPicture = D2D.Bitmap.FromWicBitmap(target, image))
			using (var dwriteFactory = new SharpDX.DirectWrite.Factory())
			using (var brush = new SolidColorBrush(target, SharpDX.Color.Yellow))
			using (var bmpLayer = new D2D.Bitmap1(dc, target.PixelSize,
				new D2D.BitmapProperties1(new D2D.PixelFormat(SharpDX.DXGI.Format.B8G8R8A8_UNorm, D2D.AlphaMode.Premultiplied), dpi, dpi, D2D.BitmapOptions.Target)))
			{
				var oldTarget = dc.Target;
				dc.Target = bmpLayer;
				target.BeginDraw();
				{
					var textFormat = new DWrite.TextFormat(dwriteFactory, "Tahoma", size.Height / 27);

					// draw English
					{
						var textLayout = new DWrite.TextLayout(dwriteFactory, english, textFormat, target.Size.Width * 0.75f, float.MaxValue);
						var center = new Vector2((target.Size.Width - textLayout.Metrics.Width) / 2, (target.Size.Height - textLayout.Metrics.Height) / 2);
						target.DrawTextLayout(new Vector2(center.X, center.Y), textLayout, brush);
					}
				}
				target.EndDraw();

				// shadow
				var shadow = new D2D.Effects.Shadow(dc);
				shadow.SetInput(0, bmpLayer, new RawBool(false));

				dc.Target = oldTarget;
				target.BeginDraw();
				{
					target.DrawBitmap(bmpPicture, new RectangleF(0, 0, target.Size.Width, target.Size.Height), 1.0f, BitmapInterpolationMode.Linear);
					dc.DrawImage(shadow, new Vector2(size.Height / 150.0f, size.Height / 150.0f));
					dc.UnitMode = UnitMode.Pixels;
					target.DrawBitmap(bmpLayer, 1.0f, BitmapInterpolationMode.Linear);
				}
				target.EndDraw();

				string wallpaperFileName = Path.GetTempPath() + "wallpaper.png";
				using (var wallpaperStream = File.OpenWrite(wallpaperFileName))
				{
					SaveD2DBitmap(wic, wicBitmap, wallpaperStream);
					wallpaperStream.Close();
					return wallpaperFileName;
				}
			}
		}

		async Task<string> GetQuote()
		{
			var url = @"https://favqs.com/api/qotd";
			var content = await http.GetStringAsync(url);
			var json = JToken.Parse(content);
			return json["quote"]["body"] + "\r\n\t\t\t\t——" + json["quote"]["author"];
		}

		async Task<string> GetBingPicture()
		{
			var url = @"https://www.bing.com/HPImageArchive.aspx?format=js&idx=0&n=5&mkt=zh-cn";
			var content = await http.GetStringAsync(url);
			var json = JToken.Parse(content);
			var images = json["images"]
				.Select(x => x["url"].ToString())
				.Select(x => "https://cn.bing.com" + x);
			return images.First();
		}

		async Task<string> DownloadUrlAsFileName(string url)
		{
			var fileName = Path.GetTempFileName();
			File.WriteAllBytes(fileName, await http.GetByteArrayAsync(url));
			return fileName;
		}

		WIC.FormatConverter CreateWicImage(WIC.ImagingFactory wicFactory, string filename)
		{
			using (var decoder = new WIC.JpegBitmapDecoder(wicFactory))
			using (var decodeStream = new WIC.WICStream(wicFactory, filename, NativeFileAccess.Read))
			{
				decoder.Initialize(decodeStream, WIC.DecodeOptions.CacheOnLoad);
				using (var decodeFrame = decoder.GetFrame(0))
				{
					var converter = new WIC.FormatConverter(wicFactory);
					converter.Initialize(decodeFrame, WIC.PixelFormat.Format32bppPBGRA);
					return converter;
				}
			}
		}

		void SaveD2DBitmap(WIC.ImagingFactory wicFactory, WIC.Bitmap wicBitmap, Stream outputStream)
		{
			using (var encoder = new WIC.BitmapEncoder(wicFactory, WIC.ContainerFormatGuids.Png))
			{
				encoder.Initialize(outputStream);
				using (var frame = new WIC.BitmapFrameEncode(encoder))
				{
					frame.Initialize();
					frame.SetSize(wicBitmap.Size.Width, wicBitmap.Size.Height);

					var pixelFormat = wicBitmap.PixelFormat;
					frame.SetPixelFormat(ref pixelFormat);
					frame.WriteSource(wicBitmap);

					frame.Commit();
					encoder.Commit();
				}
			}
		}

		public sealed class Wallpaper
		{
			const int SPI_SETDESKWALLPAPER = 20;
			const int SPIF_UPDATEINIFILE = 0x01;
			const int SPIF_SENDWININICHANGE = 0x02;

			[DllImport("user32.dll", CharSet = CharSet.Auto)]
			static extern int SystemParametersInfo(int uAction, int uParam, string lpvParam, int fuWinIni);

			public enum Style : int
			{
				Tiled,
				Centered,
				Stretched
			}

			public static void Set(string pictureFileName, Style style)
			{
				RegistryKey key = Registry.CurrentUser.OpenSubKey(@"Control Panel\Desktop", true);
				if (style == Style.Stretched)
				{
					key.SetValue(@"WallpaperStyle", 2.ToString());
					key.SetValue(@"TileWallpaper", 0.ToString());
				}

				if (style == Style.Centered)
				{
					key.SetValue(@"WallpaperStyle", 1.ToString());
					key.SetValue(@"TileWallpaper", 0.ToString());
				}

				if (style == Style.Tiled)
				{
					key.SetValue(@"WallpaperStyle", 1.ToString());
					key.SetValue(@"TileWallpaper", 1.ToString());
				}

				SystemParametersInfo(SPI_SETDESKWALLPAPER,
					0,
					pictureFileName,
					SPIF_UPDATEINIFILE | SPIF_SENDWININICHANGE);
			}
		}
	}
}