//    $Revision: 1.3 $

using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using fvalgcli;    // FvPluginXXXX attribute requires fvalgcli

namespace User.SampleCode
{
    public partial class Measure
    {
        /// <summary>
        /// ヒストグラム計測.
        /// </summary>
        [FvPluginExecute]
        public void Histogram()
        {
            System.Reflection.MethodBase method = System.Reflection.MethodBase.GetCurrentMethod();
            Console.WriteLine("{0}.{1}", method.DeclaringType.FullName, method.Name);

            // (!) 注: サンプルの為、最大３チャネルに限定します.
            const uint    _CHANNEL_MAX = 3;

            // 1) インスタンスの準備.
            FVIL.Measure.CFviHistogram parser = new FVIL.Measure.CFviHistogram();
            FVIL.Measure.CFviHistogramResult[] result =
                {
                     new FVIL.Measure.CFviHistogramResult(),
                     new FVIL.Measure.CFviHistogramResult(),
                     new FVIL.Measure.CFviHistogramResult(),
                };
            FVIL.Data.CFviImage    src = new FVIL.Data.CFviImage();

            // 2) 処理対象画像の取り込み.
            FVIL.File.Function.LoadImageFile(Defs.TestImageDir + "/floppy_RGB.jpg", src, FVIL.PixelMode.Unpacking);

            if( !(src.Channel<=_CHANNEL_MAX) )
            {
                Console.WriteLine("Invalid channel num. ({0})", src.Channel);
                return;
            }

            // 3) 処理対象画像の有効性検査.
            if( FVIL.ErrorCode._SUCCESS != FVIL.Measure.CFviHistogram.CheckValidity( src ) )
                return;

            // 4) 画像処理準備.
            parser.SrcImages[0] = src;

            // ※ チャネル毎に処理します.
            for( int ch=0 ; ch<src.Channel ; ch++ )
            {
                // 5) パラメータ設定.
                switch( src.ImageType )
                {
                    default:
                        Console.WriteLine("Invalid image type. ({0})", src.ImageType);
                        return;
                    case FVIL.ImageType.UC8:
                        result[ch].Resize( 256 );
                        break;
                    case FVIL.ImageType.S16:
                    case FVIL.ImageType.US16:
                        result[ch].Resize(65535);
                        break;
                }
                parser.Result = result[ch];
                parser.Channel = (uint)ch;

                // 6) 画像処理実行.
                parser.Execute();
            }

            // (!) 注: サンプルの為、UC8 (256色) に限定します.
            switch( src.ImageType )
            {
                case FVIL.ImageType.UC8:
                    break;
                default:
                case FVIL.ImageType.S16:
                case FVIL.ImageType.US16:
                    Console.WriteLine("[warning] omit to save image.");
                    return;
            }

            // E) 確認用.
            {
                // 描画色.
                System.Drawing.Color[]    color =
                {
                    System.Drawing.Color.FromArgb(0xFF, 0x00, 0x00),    // R
                    System.Drawing.Color.FromArgb(0x00, 0xFF, 0x00),    // G
                    System.Drawing.Color.FromArgb(0x00, 0x00, 0xFF)        // B
                };

                // 背景(黒)
                int    horz = 256;
                int vert = 192;
                FVIL.Data.CFviImage    bg = new FVIL.Data.CFviImage( horz, vert, FVIL.ImageType.UC8, 1 );
                Rectangle rect = new Rectangle( 0, 0, horz, vert );

                // 画像表示の準備.
                FVIL.GDI.CFviDisplay display = new FVIL.GDI.CFviDisplay();
                display.Image = bg;
                display.DisplayRect = rect;

                // オーバレイの生成.
                FVIL.GDI.CFviOverlay pOverlay0 = new FVIL.GDI.CFviOverlay();
                pOverlay0.Scaling = false;
                display.Overlays.Add(pOverlay0);

                // 折れ線.
                for( int ch=0 ; ch<src.Channel ; ch++ )
                {
                    FVIL.GDI.CFviGdiPolyline poly = new FVIL.GDI.CFviGdiPolyline();
                    poly.Resize(horz);
                    poly.Close = false;    // false=開.

                    uint freq_min = result[ch].MinFrequency;
                    uint freq_max = result[ch].MaxFrequency;

                    for( int i=0 ; i<result[ch].Count ; i++ )
                    {
                        double freq = result[ch][i];
                        double ratio = freq / freq_max;
                        poly[i] = new FVIL.Data.CFviPoint(i, vert-(vert*ratio));
                    }
                    poly.Pen.Color = color[ch];

                    // 追加.
                    pOverlay0.Figures.Add( poly );
                }

                // 保存.
                FVIL.Data.CFviImage canvas = new FVIL.Data.CFviImage();
                display.SaveImage( canvas, display.DisplayRect, 1.0 );
                FVIL.File.Function.SaveImageFile(Defs.ResultDir + "/Measure.Histogram.png", canvas);
            }
        }
    };
}

'    $Revision: 1.3 $

Imports System.Collections.Generic
Imports System.Text
Imports System.Drawing
Imports fvalgcli
' FvPluginXXXX attribute requires fvalgcli
Namespace SampleCode
    Public Partial Class Measure
        ''' <summary>
        ''' ヒストグラム計測.
        ''' </summary>
        <FvPluginExecute()> _
        Public Sub Histogram()
            Dim method As System.Reflection.MethodBase = System.Reflection.MethodBase.GetCurrentMethod()
            Console.WriteLine("{0}.{1}", method.DeclaringType.FullName, method.Name)

            ' (!) 注: サンプルの為、最大３チャネルに限定します.
            Const _CHANNEL_MAX As UInteger = 3

            ' 1) インスタンスの準備.
            Dim parser As New FVIL.Measure.CFviHistogram()
            Dim result As FVIL.Measure.CFviHistogramResult() = {New FVIL.Measure.CFviHistogramResult(), New FVIL.Measure.CFviHistogramResult(), New FVIL.Measure.CFviHistogramResult()}
            Dim src As New FVIL.Data.CFviImage()

            ' 2) 処理対象画像の取り込み.
            FVIL.File.[Function].LoadImageFile(Defs.TestImageDir & "/floppy_RGB.jpg", src, FVIL.PixelMode.Unpacking)

            If Not (src.Channel <= _CHANNEL_MAX) Then
                Console.WriteLine("Invalid channel num. ({0})", src.Channel)
                Return
            End If

            ' 3) 処理対象画像の有効性検査.
            If FVIL.ErrorCode._SUCCESS <> FVIL.Measure.CFviHistogram.CheckValidity(src) Then
                Return
            End If

            ' 4) 画像処理準備.
            parser.SrcImages(0) = src

            ' ※ チャネル毎に処理します.
            For ch As Integer = 0 To src.Channel - 1
                ' 5) パラメータ設定.
                Select Case src.ImageType
                    Case FVIL.ImageType.UC8
                        result(ch).Resize(256)
                        Exit Select
                    Case FVIL.ImageType.S16, FVIL.ImageType.US16
                        result(ch).Resize(65535)
                        Exit Select
                    Case Else
                        Console.WriteLine("Invalid image type. ({0})", src.ImageType)
                        Return
                End Select
                parser.Result = result(ch)
                parser.Channel = CUInt(ch)

                ' 6) 画像処理実行.
                parser.Execute()
            Next

            ' (!) 注: サンプルの為、UC8 (256色) に限定します.
            Select Case src.ImageType
                Case FVIL.ImageType.UC8
                    Exit Select
                Case FVIL.ImageType.US16
                    Console.WriteLine("[warning] omit to save image.")
                    Return
                Case FVIL.ImageType.S16
                    Console.WriteLine("[warning] omit to save image.")
                    Return
                Case Else
                    Console.WriteLine("[warning] omit to save image.")
                    Return
            End Select

            ' E) 確認用.
            If True Then
                ' 描画色.
                ' R
                ' G
                ' B
                Dim color As System.Drawing.Color() = {System.Drawing.Color.FromArgb(&HFF, &H0, &H0), System.Drawing.Color.FromArgb(&H0, &HFF, &H0), System.Drawing.Color.FromArgb(&H0, &H0, &HFF)}

                ' 背景(黒)
                Dim horz As Integer = 256
                Dim vert As Integer = 192
                Dim bg As New FVIL.Data.CFviImage(horz, vert, FVIL.ImageType.UC8, 1)
                Dim rect As New Rectangle(0, 0, horz, vert)

                ' 画像表示の準備.
                Dim display As New FVIL.GDI.CFviDisplay()
                display.Image = bg
                display.DisplayRect = rect

                ' オーバレイの生成.
                Dim pOverlay0 As New FVIL.GDI.CFviOverlay()
                pOverlay0.Scaling = False
                display.Overlays.Add(pOverlay0)

                ' 折れ線.
                For ch As Integer = 0 To src.Channel - 1
                    Dim poly As New FVIL.GDI.CFviGdiPolyline()
                    poly.Resize(horz)
                    poly.Close = False
                    ' false=開.
                    Dim freq_min As UInteger = result(ch).MinFrequency
                    Dim freq_max As UInteger = result(ch).MaxFrequency

                    For i As Integer = 0 To result(ch).Count - 1
                        Dim freq As Double = result(ch)(i)
                        Dim ratio As Double = freq / freq_max
                        poly(i) = New FVIL.Data.CFviPoint(i, vert - (vert * ratio))
                    Next
                    poly.Pen.Color = color(ch)

                    ' 追加.
                    pOverlay0.Figures.Add(poly)
                Next

                ' 保存.
                Dim canvas As New FVIL.Data.CFviImage()
                display.SaveImage(canvas, display.DisplayRect, 1.0)
                FVIL.File.[Function].SaveImageFile(Defs.ResultDir & "/Measure.Histogram.png", canvas)
            End If
        End Sub
    End Class
End Namespace