m3color003.lvt

%
% Copyright (C) 2020,2021 The LaTeX Project
%

\documentclass{minimal}

\input{regression-test}

\RequirePackage[enable-debug]{expl3}
\ExplSyntaxOn
\debug_on:n { check-declarations , deprecation , log-functions }
\ExplSyntaxOff

\START

\AUTHOR{Joseph Wright}

\ExplSyntaxOn

\OMIT
  \cs_set_protected:Npn \test:n #1
    {
      \hbox_set:Nn \l_tmpa_box
        {
          \group_begin:
            #1
            Hello
          \group_end:
        }
      \box_show:N \l_tmpa_box
    }
\TIMO

\TEST { Multiple~models:~selecting }
  {
    \test:n { \color_select:nn { gray / rgb } { 0.1 / 0.1 , 0.1 , 0.2 } }
    \group_begin:
      \tl_set:Nn \l_color_fixed_model_tl { rgb }
      \test:n { \color_select:nn { gray / rgb } { 0.1 / 0.1 , 0.1 , 0.2 } }
    \group_end:
    \test:n
      {
        \color_select:nn { rgb / cmyk }
          { 0.1 , 0.2 , 0.3 / 0.1 , 0.2 , 0.3 , 0.4 }
      }
    \group_begin:
      \tl_set:Nn \l_color_fixed_model_tl { cmyk }
      \test:n
         {
           \color_select:nn { rgb / cmyk }
             { 0.1 , 0.2 , 0.3 / 0.1 , 0.2 , 0.3 , 0.4 }
         }
    \group_end:
    \group_begin:
      \tl_set:Nn \l_color_fixed_model_tl { gray }
      \test:n
         {
           \color_select:nn { rgb / cmyk }
             { 0.1 , 0.2 , 0.3 / 0.1 , 0.2 , 0.3 , 0.4 }
         }
    \group_end:
  }

\TEST { Multiple~models:~named }
  {
    \color_set:nnn { foo1 } { cmyk / rgb }
      { 0.1 , 0.2 , 0.3 , 0.4 / 0.1 , 0.1 , 0.2 }
    \color_set:nn { test } { cyan!50!foo1 }
    \color_show:n { test }
    \color_set:nn { test } { blue!50!foo1 }
    \color_show:n { test }
  }

\TEST { Multiple~models:~xcolor~data }
  {
    \exp_args:Nnx \color_set:nnn { foo2 } { hsb \c_colon_str rgb }
      { 0.1 , 0.1 , 0.2 }
    \color_show:n { foo2 }
  }

\TEST { Mixing~multiple~models }
  {
    \OMIT
    \color_set:nnn { myrgbcmyk } { rgb / cmyk }
      { 1 , 0 , 1 / 1 , 0 , 0 , 1 }
    \color_set:nnn { mycmykrgb } { cmyk / rgb }
      { 1 , 0 , 0 , 1 / 1 , 0 , 1 }
    \TIMO
    \color_set:nn { myexpr1 } { myrgbcmyk!30!mycmykrgb }
    \color_show:n { myexpr1 }
    \color_set:nn { myexpr2 } { mycmykrgb!30!myrgbcmyk }
    \color_show:n { myexpr2 }
    \OMIT
    \color_set:nnn { myA }{ rgb / cmyk }
      { 0.3 , 0.3 , 0.3 / 0.3 , 0.3 , 0.3 , 0.3 }
    \color_set:nnn { myB }{ cmyk /rgb }
      { 0.3 , 0.3 , 0.3 , 0.3 / 0.3 , 0.3 , 0.3 }
    \TIMO
    \color_set:nn { myC } { myA!30 }
    \color_show:n { myC }
    \color_set:nn { myD } { myB!30 }
    \color_show:n { myD }
  }

\TEST { Exporting~multiple~models }
  {
    \OMIT
    \color_set:nnn { myA } { rgb / cmyk }
      { 0.3 , 0.3 , 0.3 / 1 , 0 , 0 , 0 }
    \color_set:nnn { myB } { cmyk / rgb }
      { 1 , 0 , 0 , 0 / 0.3 , 0.3 , 0.3 }
    \TIMO
    \clist_map_inline:nn
      { backend , HTML , space-sep-cmyk , space-sep-rgb }
      {
        \color_export:nnN { myA } {#1} \l_tmpa_tl
        \tl_show:N \l_tmpa_tl
        \color_export:nnN { myB } {#1} \l_tmpa_tl
        \tl_show:N \l_tmpa_tl
      }
  }

\TEST { Showing~multiple~models }
  {
    \color_set:nnn { foo1 } { cmyk / rgb }
      { 0.1 , 0.2 , 0.3 , 0.4 / 0.1 , 0.1 , 0.2 }
    \color_show:n { foo1 }
  }
  
\TEST { Multiple~models~with~model~fixed }
  {
    \OMIT
    \color_set:nnn { mycr } { cmyk / rgb }
      { 1 , 0 , 0 , 0 / 1 , 0 , 0 }
    \color_set:nnn { myrc } { rgb / cmyk }
      { 1 , 0 , 0 / 1 , 0 , 0 , 0 }
    \TIMO
    \color_set:nn  { mixA } { myrc!50!mycr }
    \color_show:n { mixA }
    \tl_set:Nn \l_color_fixed_model_tl { cmyk }
    \color_set:nn  { mixA } { myrc!50!mycr }
    \color_show:n { mixA }
    \tl_set:Nn \l_color_fixed_model_tl { rgb }
    \color_set:nn  { mixA } { myrc!50!mycr }
    \color_show:n { mixA }
  }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\TEST { Creating~new~models }
  {
    \OMIT
      \cs_set_protected:Npn \test:nn #1#2
        {
          \exp_args:Nnnx \color_model_new:nnn { BarTone #1 } { Separation }
            {
              name = BarTone~555~GN , 
              alternative-model = \str_foldcase:n {#1} ,
              alternative-values = {#2}
            }
          \color_set:nnn { foo #1 } { BarTone #1 } { 0.5 }
          \color_show:n { foo #1 }
        }
    \TIMO
    \test:nn { CMYK } { 0.1 , 0.2 , 0.3 , 0.4 }
    \test:nn { RGB  } { 0.1 , 0.2 , 0.3 }
    \test:nn { Gray } { 0.1 }
    \color_model_new:nnn { BarToneCIELAB } { Separation }
      {
        name = BarTone~555~GN ,
        alternative-model = CIELAB ,
        alternative-values = {50, -30, -40},
        illuminant = d65
      }
    \color_show:n { BarToneCIELAB }
  }

\TEST { Creating~new~models:~errors }
  {
    \color_model_new:nnn { BarToneCMYK } { Separation } { }
    \color_model_new:nnn { foo1 } { nope } { who-cares }
    \color_model_new:nnn { foo2 } { separation } { }
    \color_model_new:nnn { foo2 } { separation }
      { name = BarTone~555~GN }
    \color_model_new:nnn { foo3 } { separation }
      { name = BarTone~555~GN , alternative-model }
    \color_model_new:nnn { foo4 } { separation }
      { name = BarTone~555~GN , alternative-model = foo }
    \color_model_new:nnn { foo5 } { separation }
      { name = BarTone~555~GN , alternative-model = CIELAB }
    \color_model_new:nnn { foo5 } { separation }
      { name = BarTone~555~GN , alternative-model = CIELAB , illuminant = dave }
  }

\TEST { Converting~new~models }
  {
    \OMIT
    \color_set:nnn { fooCMYK } { BarToneCMYK } { 0.5 }
    \TIMO
    \color_export:nnN { fooCMYK } { HTML } \l_tmpa_tl
    \tl_show:N \l_tmpa_tl
    \color_export:nnN { fooCMYK } { space-sep-cmyk } \l_tmpa_tl
    \tl_show:N \l_tmpa_tl
    \color_export:nnnN { BarToneCMYK } { 0.125 } { HTML } \l_tmpa_tl
    \tl_show:N \l_tmpa_tl
  }

\TEST { Mixing~separations }
  {
    \OMIT
    \color_set:nnn { fooCMYK } { BarToneCMYK } { 1.0 }
    \color_set:nnn { fooCIELAB } { BarToneCIELAB } { 1.0 }
    \TIMO
    \color_set:nn { foo } { fooCMYK!35 }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCMYK!55!white }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCMYK!35 }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCIELAB!55!white }
    \color_show:n { foo }
  }

\TEST { Mixing~separation:~failures }
  {
    \OMIT
    \color_set:nnn { fooCMYK } { BarToneCMYK } { 1.0 }
    \color_set:nnn { fooCIELAB } { BarToneCIELAB } { 1.0 }
    \TIMO
    \color_set:nn { foo } { fooCMYK!35!black }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCMYK!35!cyan }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCMYK!35!green }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCIELAB!35!black }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCIELAB!35!cyan }
    \color_show:n { foo }
    \color_set:nn { foo } { fooCIELAB!35!green }
    \color_show:n { foo }
  }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\TEST { DeviceN~spaces }
  {
    \color_model_new:nnn { TwoUp } { DeviceN }
      {
        names = { BarToneCMYK , black }
      }
    \color_set:nnn { twoup } { TwoUp } { 0.75 , 0.25 }
    \color_set:nn { foo } { twoup }
    \color_show:n { foo }
    \color_set:nn { foo } { twoup!50 }
    \color_show:n { foo }
    \color_model_new:nnn { AllIn } { DeviceN }
      {
        names = { BarToneCMYK , cyan ,  magenta , yellow , black }
      }
    \color_set:nnn { allin } { AllIn } { 0.75 , 0.25 , 0 , 0 , 0  }
    \color_set:nn { foo } { allin }
    \color_show:n { foo }
    \color_set:nn { foo } { allin!50 }
    \color_show:n { foo }
  }

\TEST { DeviceN~errors }
  {
    \color_model_new:nnn { TwoUpMixed } { DeviceN }
      {
        names = { BarToneCMYK , red }
      }
  }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\TEST { ICCBased~spaces }
  {
    \color_model_new:nnn { ICC } { ICCBased }
      {
        file = sRGB_v4_ICC_preference.icc , components = 3
      }
    \color_set:nnn { ICC3 } { ICC } { 0.75 , 0.25 , 0.125 }
    \color_set:nn { foo } { ICC3 }
    \color_show:n { foo }
    \color_set:nn { foo } { ICC3!50 }
    \color_show:n { foo }
  }

\TEST { ICCBased~errors }
  {
    \color_model_new:nnn { ICCmixed } { ICCBased }
      {
        drat = X
      }
    \color_model_new:nnn { ICCmixed } { ICCBased }
      {
        file = foo
      }
  }

\END