/*

  This Source Code Form is subject to the terms of the Mozilla Public

  License, v. 2.0. If a copy of the MPL was not distributed with this

  file, You can obtain one at http://mozilla.org/MPL/2.0/.

  Copyright (C) 2009-2012 Michael Möller <mmoeller@openhardwaremonitor.org>

*/

using System;

using System.Drawing;

using System.Drawing.Drawing2D;

using System.Drawing.Imaging;

using System.Drawing.Text;

using System.Runtime.InteropServices;

using System.Windows.Forms;

using OpenHardwareMonitor.Hardware;

using OpenHardwareMonitor.Utilities;

namespace OpenHardwareMonitor.GUI {

  public class SensorNotifyIcon : IDisposable {

    private UnitManager unitManager;

    private ISensor sensor;

    private NotifyIconAdv notifyIcon;

    private Bitmap bitmap;

    private Graphics graphics;

    private Color color;

    private Color darkColor;

    private Brush brush;

    private Brush darkBrush;

    private Pen pen;

    private Font font;

    private Font smallFont;

    public SensorNotifyIcon(SystemTray sensorSystemTray, ISensor sensor,

      bool balloonTip, PersistentSettings settings, UnitManager unitManager) 

    {

      this.unitManager = unitManager;

      this.sensor = sensor;

      this.notifyIcon = new NotifyIconAdv();

      Color defaultColor = Color.Black;

      if (sensor.SensorType == SensorType.Load ||

          sensor.SensorType == SensorType.Control ||

          sensor.SensorType == SensorType.Level) 

      {

        defaultColor = Color.FromArgb(0xff, 0x70, 0x8c, 0xf1);

      }

      Color = settings.GetValue(new Identifier(sensor.Identifier, 

        "traycolor").ToString(), defaultColor);      

      this.pen = new Pen(Color.FromArgb(96, Color.Black));

      ContextMenu contextMenu = new ContextMenu();

      MenuItem hideShowItem = new MenuItem("Hide/Show");

      hideShowItem.Click += delegate(object obj, EventArgs args) {

        sensorSystemTray.SendHideShowCommand();

      };

      contextMenu.MenuItems.Add(hideShowItem);

      contextMenu.MenuItems.Add(new MenuItem("-"));

      MenuItem removeItem = new MenuItem("Remove Sensor");

      removeItem.Click += delegate(object obj, EventArgs args) {

        sensorSystemTray.Remove(this.sensor);

      };

      contextMenu.MenuItems.Add(removeItem);

      MenuItem colorItem = new MenuItem("Change Color...");

      colorItem.Click += delegate(object obj, EventArgs args) {

        ColorDialog dialog = new ColorDialog();

        dialog.Color = Color;

        if (dialog.ShowDialog() == DialogResult.OK) {

          Color = dialog.Color;

          settings.SetValue(new Identifier(sensor.Identifier,

            "traycolor").ToString(), Color);

        }

      };

      contextMenu.MenuItems.Add(colorItem);

      contextMenu.MenuItems.Add(new MenuItem("-"));

      MenuItem exitItem = new MenuItem("Exit");

      exitItem.Click += delegate(object obj, EventArgs args) {

        sensorSystemTray.SendExitCommand();

      };

      contextMenu.MenuItems.Add(exitItem);

      this.notifyIcon.ContextMenu = contextMenu;

      this.notifyIcon.DoubleClick += delegate(object obj, EventArgs args) {

        sensorSystemTray.SendHideShowCommand();

      };      

      // get the default dpi to create an icon with the correct size

      float dpiX, dpiY;

      using (Bitmap b = new Bitmap(1, 1, PixelFormat.Format32bppArgb)) {

        dpiX = b.HorizontalResolution;

        dpiY = b.VerticalResolution;

      }

      // adjust the size of the icon to current dpi (default is 16x16 at 96 dpi) 

      int width = (int)Math.Round(16 * dpiX / 96);

      int height = (int)Math.Round(16 * dpiY / 96);

      // make sure it does never get smaller than 16x16

      width = width < 16 ? 16 : width;

      height = height < 16 ? 16 : height;

      // adjust the font size to the icon size

      FontFamily family = SystemFonts.MessageBoxFont.FontFamily;

      float baseSize;

      switch (family.Name) {

        case "Segoe UI": baseSize = 12; break;

        case "Tahoma": baseSize = 11; break;

        default: baseSize = 12; break;

      }

      this.font = new Font(family,

        baseSize * width / 16.0f, GraphicsUnit.Pixel);

      this.smallFont = new Font(family, 

        0.75f * baseSize * width / 16.0f, GraphicsUnit.Pixel);

      this.bitmap = new Bitmap(width, height, PixelFormat.Format32bppArgb);      

      this.graphics = Graphics.FromImage(this.bitmap);

      if (Environment.OSVersion.Version.Major > 5) {

        this.graphics.TextRenderingHint = TextRenderingHint.ClearTypeGridFit;

        this.graphics.SmoothingMode = SmoothingMode.HighQuality;

      }

    }

    public ISensor Sensor {

      get { return sensor; }

    }

    public Color Color {

      get { return color; }

      set { 

        this.color = value;

        this.darkColor = Color.FromArgb(255,

          this.color.R / 3,

          this.color.G / 3,

          this.color.B / 3);

        Brush brush = this.brush;

        this.brush = new SolidBrush(this.color);

        if (brush != null)

          brush.Dispose();

        Brush darkBrush = this.darkBrush;

        this.darkBrush = new SolidBrush(this.darkColor);

        if (darkBrush != null)

          darkBrush.Dispose();

      }

    }

    public void Dispose() {      

      Icon icon = notifyIcon.Icon;

      notifyIcon.Icon = null;

      if (icon != null)

        icon.Dispose();      

      notifyIcon.Dispose();

      if (brush != null)

        brush.Dispose();

      if (darkBrush != null)

        darkBrush.Dispose();

      pen.Dispose();

      graphics.Dispose();      

      bitmap.Dispose();

      font.Dispose();

      smallFont.Dispose();

    }

    private string GetString() {

      if (!sensor.Value.HasValue)

        return "-";

      switch (sensor.SensorType) {

        case SensorType.Voltage:

          return string.Format("{0:F1}", sensor.Value);

        case SensorType.Clock:

          return string.Format("{0:F1}", 1e-3f * sensor.Value);

        case SensorType.Load: 

          return string.Format("{0:F0}", sensor.Value);

        case SensorType.Temperature:

          if (unitManager.TemperatureUnit == TemperatureUnit.Fahrenheit)

            return string.Format("{0:F0}", 

              UnitManager.CelsiusToFahrenheit(sensor.Value));

          else

            return string.Format("{0:F0}", sensor.Value);

        case SensorType.Fan: 

          return string.Format("{0:F1}", 1e-3f * sensor.Value);

        case SensorType.Flow:

          return string.Format("{0:F1}", 1e-3f * sensor.Value);

        case SensorType.Control:

          return string.Format("{0:F0}", sensor.Value);

        case SensorType.Level:

          return string.Format("{0:F0}", sensor.Value);

        case SensorType.Power:

          return string.Format("{0:F0}", sensor.Value);

        case SensorType.Data:

          return string.Format("{0:F0}", sensor.Value);

        case SensorType.Factor:

          return string.Format("{0:F1}", sensor.Value);

      }

      return "-";

    }

    private Icon CreateTransparentIcon() {

      string text = GetString();

      int count = 0;

      for (int i = 0; i < text.Length; i++)

        if ((text[i] >= '0' && text[i] <= '9') || text[i] == '-')

          count++;

      bool small = count > 2;

      graphics.Clear(Color.Black);

      TextRenderer.DrawText(graphics, text, small ? smallFont : font,

        new Point(-2, small ? 1 : 0), Color.White, Color.Black);        

      BitmapData data = bitmap.LockBits(

        new Rectangle(0, 0, bitmap.Width, bitmap.Height),

        ImageLockMode.ReadOnly, PixelFormat.Format32bppArgb);

      IntPtr Scan0 = data.Scan0;

      int numBytes = bitmap.Width * bitmap.Height * 4;

      byte[] bytes = new byte[numBytes];

      Marshal.Copy(Scan0, bytes, 0, numBytes);

      bitmap.UnlockBits(data);

      byte red, green, blue;

      for (int i = 0; i < bytes.Length; i += 4) {

        blue = bytes[i];

        green = bytes[i + 1];

        red = bytes[i + 2];

        bytes[i] = color.B;

        bytes[i + 1] = color.G;

        bytes[i + 2] = color.R;

        bytes[i + 3] = (byte)(0.3 * red + 0.59 * green + 0.11 * blue);

      }

      return IconFactory.Create(bytes, bitmap.Width, bitmap.Height, 

        PixelFormat.Format32bppArgb);

    }

    private Icon CreatePercentageIcon() {      

      try {

        graphics.Clear(Color.Transparent);

      } catch (ArgumentException) {

        graphics.Clear(Color.Black);

      }

      graphics.FillRectangle(darkBrush, 0.5f, -0.5f, bitmap.Width - 2, bitmap.Height);

      float value = sensor.Value.GetValueOrDefault();

      float y = 0.16f * (100 - value);

      graphics.FillRectangle(brush, 0.5f, -0.5f + y, bitmap.Width - 2, bitmap.Height - y);

      graphics.DrawRectangle(pen, 1, 0, bitmap.Width - 3, bitmap.Height - 1);

      BitmapData data = bitmap.LockBits(

        new Rectangle(0, 0, bitmap.Width, bitmap.Height),

        ImageLockMode.ReadOnly, PixelFormat.Format32bppArgb);

      byte[] bytes = new byte[bitmap.Width * bitmap.Height * 4];

      Marshal.Copy(data.Scan0, bytes, 0, bytes.Length);

      bitmap.UnlockBits(data);

      return IconFactory.Create(bytes, bitmap.Width, bitmap.Height, 

        PixelFormat.Format32bppArgb);

    }

    public void Update() {

      Icon icon = notifyIcon.Icon;

      switch (sensor.SensorType) {

        case SensorType.Load:

        case SensorType.Control:

        case SensorType.Level:

          notifyIcon.Icon = CreatePercentageIcon();

          break;

        default:

          notifyIcon.Icon = CreateTransparentIcon();

          break;

      }

      if (icon != null) 

        icon.Dispose();

      string format = "";

      switch (sensor.SensorType) {

        case SensorType.Voltage: format = "\n{0}: {1:F2} V"; break;

        case SensorType.Clock: format = "\n{0}: {1:F0} MHz"; break;

        case SensorType.Load: format = "\n{0}: {1:F1} %"; break;

        case SensorType.Temperature: format = "\n{0}: {1:F1} °C"; break;

        case SensorType.Fan: format = "\n{0}: {1:F0} RPM"; break;

        case SensorType.Flow: format = "\n{0}: {1:F0} L/h"; break;

        case SensorType.Control: format = "\n{0}: {1:F1} %"; break;

        case SensorType.Level: format = "\n{0}: {1:F1} %"; break;

        case SensorType.Power: format = "\n{0}: {1:F0} W"; break;

        case SensorType.Data: format = "\n{0}: {1:F0} GB"; break;

        case SensorType.Factor: format = "\n{0}: {1:F3} GB"; break;

      }

      string formattedValue = string.Format(format, sensor.Name, sensor.Value);

      if (sensor.SensorType == SensorType.Temperature &&

        unitManager.TemperatureUnit == TemperatureUnit.Fahrenheit) 

      {

        format = "\n{0}: {1:F1} °F";

        formattedValue = string.Format(format, sensor.Name,

          UnitManager.CelsiusToFahrenheit(sensor.Value));

      }

      string hardwareName = sensor.Hardware.Name;

      hardwareName = hardwareName.Substring(0, 

        Math.Min(63 - formattedValue.Length, hardwareName.Length));

      string text = hardwareName + formattedValue;

      if (text.Length > 63)

        text = null;

      notifyIcon.Text = text;

      notifyIcon.Visible = true;         

    }

  }

}