nihav-core/src/scale/colorcvt.rs

   1 use super::*;
   2 use super::kernel::Kernel;
   3
   4 const DEFAULT_YUV: usize = 4;
   5
   6 const YUV_PARAMS: &[[f32; 2]] = &[
   7     [ 0.333,    0.333   ], // RGB
   8     [ 0.2126,   0.0722  ], // ITU-R BT709
   9     [ 0.333,    0.333   ], // unspecified
  10     [ 0.333,    0.333   ], // reserved
  11     [ 0.299,    0.114   ], // ITU-R BT601
  12     [ 0.299,    0.114   ], // ITU-R BT470
  13     [ 0.299,    0.114   ], // SMPTE 170M
  14     [ 0.212,    0.087   ], // SMPTE 240M
  15     [ 0.333,    0.333   ], // YCoCg
  16     [ 0.2627,   0.0593  ], // ITU-R BT2020
  17     [ 0.2627,   0.0593  ], // ITU-R BT2020
  18 ];
  19
  20 const BT_PAL_COEFFS: [f32; 2] = [ 0.493, 0.877 ];
  21
  22 const SMPTE_NTSC_COEFFS: &[f32; 4] = &[ -0.268, 0.7358, 0.4127, 0.4778 ];
  23
  24 /*const RGB2YCOCG: [[f32; 3]; 3] = [
  25     [  0.25,  0.5,  0.25 ],
  26     [ -0.25,  0.5, -0.25 ],
  27     [  0.5,   0.0, -0.5  ]
  28 ];
  29 const YCOCG2RGB: [[f32; 3]; 3] = [
  30     [ 1.0, -1.0,  1.0 ],
  31     [ 1.0,  1.0,  0.0 ],
  32     [ 1.0, -1.0, -1.0 ]
  33 ];
  34
  35 const XYZ2RGB: [[f32; 3]; 3] = [
  36     [ 0.49,    0.31,   0.2     ],
  37     [ 0.17697, 0.8124, 0.01063 ],
  38     [ 0.0,     0.01,   0.99    ]
  39 ];
  40 const RGB2XYZ: [[f32; 3]; 3] = [
  41     [  2.364613, -0.89654, -0.46807 ],
  42     [ -0.515167,  1.42641,  0.08876 ],
  43     [  0.0052,   -0.01441,  1.00920 ]
  44 ];*/
  45
  46 fn make_rgb2yuv(kr: f32, kb: f32, mat: &mut [[f32; 3]; 3]) {
  47     // Y
  48     mat[0][0] = kr;
  49     mat[0][1] = 1.0 - kr - kb;
  50     mat[0][2] = kb;
  51     // Cb
  52     mat[1][0] = -mat[0][0] * 0.5 / (1.0 - kb);
  53     mat[1][1] = -mat[0][1] * 0.5 / (1.0 - kb);
  54     mat[1][2] = 0.5;
  55     // Cr
  56     mat[2][0] = 0.5;
  57     mat[2][1] = -mat[0][1] * 0.5 / (1.0 - kr);
  58     mat[2][2] = -mat[0][2] * 0.5 / (1.0 - kr);
  59 }
  60
  61 fn make_yuv2rgb(kr: f32, kb: f32, mat: &mut [[f32; 3]; 3]) {
  62     let kg = 1.0 - kr - kb;
  63
  64     // R
  65     mat[0][0] = 1.0;
  66     mat[0][1] = 0.0;
  67     mat[0][2] = 2.0 * (1.0 - kr);
  68     // G
  69     mat[1][0] = 1.0;
  70     mat[1][1] = -kb * 2.0 * (1.0 - kb) / kg;
  71     mat[1][2] = -kr * 2.0 * (1.0 - kr) / kg;
  72     // B
  73     mat[2][0] = 1.0;
  74     mat[2][1] = 2.0 * (1.0 - kb);
  75     mat[2][2] = 0.0;
  76 }
  77
  78 fn apply_pal_rgb2yuv(eu: f32, ev: f32, mat: &mut [[f32; 3]; 3]) {
  79     let ufac = 2.0 * (1.0 - mat[0][2]) * eu;
  80     let vfac = 2.0 * (1.0 - mat[0][0]) * ev;
  81
  82     // U
  83     mat[1][0] *= ufac;
  84     mat[1][1] *= ufac;
  85     mat[1][2]  = eu * (1.0 - mat[0][2]);
  86     // V
  87     mat[2][0]  = ev * (1.0 - mat[0][0]);
  88     mat[2][1] *= vfac;
  89     mat[2][2] *= vfac;
  90 }
  91
  92 fn apply_pal_yuv2rgb(eu: f32, ev: f32, mat: &mut [[f32; 3]; 3]) {
  93     let ufac = 1.0 / (mat[2][1] * eu);
  94     let vfac = 1.0 / (mat[0][2] * ev);
  95
  96     // R
  97     mat[0][2] *= vfac;
  98     // G
  99     mat[1][1] *= ufac;
 100     mat[1][2] *= vfac;
 101     // B
 102     mat[2][1] *= ufac;
 103 }
 104
 105 fn apply_ntsc_rgb2yiq(params: &[f32; 4], mat: &mut [[f32; 3]; 3]) {
 106     let ufac = 2.0 * (1.0 - mat[0][2]);
 107     let vfac = 2.0 * (1.0 - mat[0][0]);
 108     let mut tmp: [[f32; 3]; 2] = [[0.0; 3]; 2];
 109
 110     for i in 0..3 {
 111         tmp[0][i] = mat[1][i] * ufac;
 112         tmp[1][i] = mat[2][i] * vfac;
 113     }
 114     for i in 0..3 {
 115         mat[1][i] = params[0] * tmp[0][i] + params[1] * tmp[1][i];
 116         mat[2][i] = params[2] * tmp[0][i] + params[3] * tmp[1][i];
 117     }
 118 }
 119
 120 fn subm_det(mat: &[[f32; 3]; 3], col: usize, row: usize) -> f32 {
 121     let row0 = if row == 0 { 1 } else { 0 };
 122     let row1 = if (row == 1) || (row0 == 1) { 2 } else { 1 };
 123     let col0 = if col == 0 { 1 } else { 0 };
 124     let col1 = if (col == 1) || (col0 == 1) { 2 } else { 1 };
 125
 126     let det = mat[row0][col0] * mat[row1][col1] - mat[row0][col1] * mat[row1][col0];
 127     if ((col ^ row) & 1) == 0 {
 128         det
 129     } else {
 130         -det
 131     }
 132 }
 133
 134 fn invert_matrix(mat: &mut [[f32; 3]; 3]) {
 135     let d00 = subm_det(mat, 0, 0);
 136     let d01 = subm_det(mat, 0, 1);
 137     let d02 = subm_det(mat, 0, 2);
 138     let d10 = subm_det(mat, 1, 0);
 139     let d11 = subm_det(mat, 1, 1);
 140     let d12 = subm_det(mat, 1, 2);
 141     let d20 = subm_det(mat, 2, 0);
 142     let d21 = subm_det(mat, 2, 1);
 143     let d22 = subm_det(mat, 2, 2);
 144     let det = 1.0 / (mat[0][0] * d00 + mat[0][1] * d10 + mat[0][2] * d20).abs();
 145
 146     mat[0][0] = det * d00;
 147     mat[0][1] = det * d01;
 148     mat[0][2] = det * d02;
 149     mat[1][0] = det * d10;
 150     mat[1][1] = det * d11;
 151     mat[1][2] = det * d12;
 152     mat[2][0] = det * d20;
 153     mat[2][1] = det * d21;
 154     mat[2][2] = det * d22;
 155 }
 156
 157 fn matrix_mul(mat: &[[f32; 3]; 3], a: f32, b: f32, c: f32) -> (f32, f32, f32) {
 158     (a * mat[0][0] + b * mat[0][1] + c * mat[0][2],
 159      a * mat[1][0] + b * mat[1][1] + c * mat[1][2],
 160      a * mat[2][0] + b * mat[2][1] + c * mat[2][2] )
 161 }
 162
 163 #[derive(Default)]
 164 struct RgbToYuv {
 165     matrix: [[f32; 3]; 3],
 166 }
 167
 168 impl RgbToYuv {
 169     fn new() -> Self { Self::default() }
 170 }
 171
 172 #[allow(clippy::many_single_char_names)]
 173 impl Kernel for RgbToYuv {
 174     fn init(&mut self, in_fmt: &ScaleInfo, dest_fmt: &ScaleInfo) -> ScaleResult<NABufferType> {
 175         let mut df = dest_fmt.fmt;
 176 //todo coeff selection
 177         make_rgb2yuv(YUV_PARAMS[DEFAULT_YUV][0], YUV_PARAMS[DEFAULT_YUV][1], &mut self.matrix);
 178         if let ColorModel::YUV(yuvsm) = df.get_model() {
 179             match yuvsm {
 180             YUVSubmodel::YCbCr  => {},
 181             YUVSubmodel::YIQ    => { apply_ntsc_rgb2yiq(SMPTE_NTSC_COEFFS, &mut self.matrix); },
 182             YUVSubmodel::YUVJ   => { apply_pal_rgb2yuv(BT_PAL_COEFFS[0], BT_PAL_COEFFS[1], &mut self.matrix); },
 183             };
 184         } else {
 185             return Err(ScaleError::InvalidArgument);
 186         }
 187         for i in 0..MAX_CHROMATONS {
 188             if let Some(ref mut chr) = df.comp_info[i] {
 189                 chr.packed = false;
 190                 chr.comp_offs = i as u8;
 191                 chr.h_ss = 0;
 192                 chr.v_ss = 0;
 193             }
 194         }
 195 println!(" [intermediate format {}]", df);
 196         let res = alloc_video_buffer(NAVideoInfo::new(in_fmt.width, in_fmt.height, false, df), 3);
 197         if res.is_err() { return Err(ScaleError::AllocError); }
 198         Ok(res.unwrap())
 199     }
 200     fn process(&mut self, pic_in: &NABufferType, pic_out: &mut NABufferType) {
 201         if let (Some(ref sbuf), Some(ref mut dbuf)) = (pic_in.get_vbuf(), pic_out.get_vbuf()) {
 202             if dbuf.get_info().get_format().get_num_comp() < 3 {
 203                 return self.process_grayscale(sbuf, dbuf);
 204             }
 205             let istrides = [sbuf.get_stride(0), sbuf.get_stride(1), sbuf.get_stride(2)];
 206             let dstrides = [dbuf.get_stride(0), dbuf.get_stride(1), dbuf.get_stride(2)];
 207             let (w, h) = sbuf.get_dimensions(0);
 208
 209             let mut roff = sbuf.get_offset(0);
 210             let mut goff = sbuf.get_offset(1);
 211             let mut boff = sbuf.get_offset(2);
 212             let mut yoff = dbuf.get_offset(0);
 213             let mut uoff = dbuf.get_offset(1);
 214             let mut voff = dbuf.get_offset(2);
 215             let src = sbuf.get_data();
 216             let dst = dbuf.get_data_mut().unwrap();
 217             for _y in 0..h {
 218                 for x in 0..w {
 219                     let r = f32::from(src[roff + x]);
 220                     let g = f32::from(src[goff + x]);
 221                     let b = f32::from(src[boff + x]);
 222                     let (y, u, v) = matrix_mul(&self.matrix, r, g, b);
 223
 224                     dst[yoff + x] = (y as i16).max(0).min(255) as u8;
 225                     dst[uoff + x] = ((u as i16).max(-128).min(128) + 128) as u8;
 226                     dst[voff + x] = ((v as i16).max(-128).min(128) + 128) as u8;
 227                 }
 228                 roff += istrides[0];
 229                 goff += istrides[1];
 230                 boff += istrides[2];
 231                 yoff += dstrides[0];
 232                 uoff += dstrides[1];
 233                 voff += dstrides[2];
 234             }
 235         }
 236     }
 237 }
 238
 239 impl RgbToYuv {
 240     fn process_grayscale(&self, sbuf: &NAVideoBuffer<u8>, dbuf: &mut NAVideoBuffer<u8>) {
 241         let istrides = [sbuf.get_stride(0), sbuf.get_stride(1), sbuf.get_stride(2)];
 242         let ystride = dbuf.get_stride(0);
 243         let (w, h) = sbuf.get_dimensions(0);
 244
 245         let mut roff = sbuf.get_offset(0);
 246         let mut goff = sbuf.get_offset(1);
 247         let mut boff = sbuf.get_offset(2);
 248         let mut yoff = dbuf.get_offset(0);
 249         let src = sbuf.get_data();
 250         let dst = dbuf.get_data_mut().unwrap();
 251         for _y in 0..h {
 252             for x in 0..w {
 253                 let r = f32::from(src[roff + x]);
 254                 let g = f32::from(src[goff + x]);
 255                 let b = f32::from(src[boff + x]);
 256                 let (y, _u, _v) = matrix_mul(&self.matrix, r, g, b);
 257
 258                 dst[yoff + x] = (y as i16).max(0).min(255) as u8;
 259             }
 260             roff += istrides[0];
 261             goff += istrides[1];
 262             boff += istrides[2];
 263             yoff += ystride;
 264         }
 265     }
 266 }
 267
 268 pub fn create_rgb2yuv() -> Box<dyn Kernel> {
 269     Box::new(RgbToYuv::new())
 270 }
 271
 272 #[derive(Default)]
 273 struct YuvToRgb {
 274     matrix: [[f32; 3]; 3],
 275     yscale: Vec<i16>,
 276     r_chr:  Vec<i16>,
 277     g_u:    Vec<i16>,
 278     g_v:    Vec<i16>,
 279     b_chr:  Vec<i16>,
 280 }
 281
 282 impl YuvToRgb {
 283     fn new() -> Self { Self::default() }
 284 }
 285
 286 #[allow(clippy::many_single_char_names)]
 287 impl Kernel for YuvToRgb {
 288     fn init(&mut self, in_fmt: &ScaleInfo, dest_fmt: &ScaleInfo) -> ScaleResult<NABufferType> {
 289         let mut df = dest_fmt.fmt;
 290         df.palette = false;
 291         if !df.is_unpacked() || df.get_max_depth() != 8 || df.get_total_depth() != df.get_num_comp() as u8 * 8 {
 292             df = NAPixelFormaton {
 293                     model: ColorModel::RGB(RGBSubmodel::RGB), components: 3,
 294                     comp_info: [
 295                         Some(NAPixelChromaton{ h_ss: 0, v_ss: 0, packed: false, depth: 8, shift: 0, comp_offs: 0, next_elem: 1 }),
 296                         Some(NAPixelChromaton{ h_ss: 0, v_ss: 0, packed: false, depth: 8, shift: 0, comp_offs: 1, next_elem: 1 }),
 297                         Some(NAPixelChromaton{ h_ss: 0, v_ss: 0, packed: false, depth: 8, shift: 0, comp_offs: 2, next_elem: 1 }),
 298                         None, None],
 299                     elem_size: 3, be: false, alpha: false, palette: false };
 300             if in_fmt.fmt.alpha && dest_fmt.fmt.alpha {
 301                 df.alpha = true;
 302                 df.components = 4;
 303                 df.comp_info[3] = Some(NAPixelChromaton{ h_ss: 0, v_ss: 0, packed: false, depth: 8, shift: 0, comp_offs: 3, next_elem: 1 });
 304             }
 305         }
 306 //todo coeff selection
 307         make_yuv2rgb(YUV_PARAMS[DEFAULT_YUV][0], YUV_PARAMS[DEFAULT_YUV][1], &mut self.matrix);
 308         if let ColorModel::YUV(yuvsm) = in_fmt.fmt.get_model() {
 309             match yuvsm {
 310                 YUVSubmodel::YCbCr  => {},
 311                 YUVSubmodel::YIQ    => {
 312                     make_rgb2yuv(YUV_PARAMS[DEFAULT_YUV][0], YUV_PARAMS[DEFAULT_YUV][1], &mut self.matrix);
 313                     apply_ntsc_rgb2yiq(SMPTE_NTSC_COEFFS, &mut self.matrix);
 314                     invert_matrix(&mut self.matrix);
 315                 },
 316                 YUVSubmodel::YUVJ   => {
 317                     apply_pal_yuv2rgb(BT_PAL_COEFFS[0], BT_PAL_COEFFS[1], &mut self.matrix);
 318                 },
 319             };
 320             if yuvsm != YUVSubmodel::YIQ {
 321                 self.yscale = Vec::with_capacity(256);
 322                 self.r_chr  = Vec::with_capacity(256);
 323                 self.g_u    = Vec::with_capacity(256);
 324                 self.g_v    = Vec::with_capacity(256);
 325                 self.b_chr  = Vec::with_capacity(256);
 326                 for i in 0..256 {
 327                     let yval = i as i16; // todo limited range as well
 328                     self.yscale.push(yval);
 329                     let rval = (((i as f32) - 128.0) * self.matrix[0][2]) as i16;
 330                     self.r_chr.push(rval);
 331                     let uval = (((i as f32) - 128.0) * self.matrix[1][1]) as i16;
 332                     self.g_u.push(uval);
 333                     let vval = (((i as f32) - 128.0) * self.matrix[1][2]) as i16;
 334                     self.g_v.push(vval);
 335                     let bval = (((i as f32) - 128.0) * self.matrix[2][1]) as i16;
 336                     self.b_chr.push(bval);
 337                 }
 338             }
 339         } else {
 340             return Err(ScaleError::InvalidArgument);
 341         }
 342         for i in 0..MAX_CHROMATONS {
 343             if let Some(ref mut chr) = df.comp_info[i] {
 344                 chr.packed = false;
 345                 chr.comp_offs = i as u8;
 346             }
 347         }
 348 println!(" [intermediate format {}]", df);
 349         let res = alloc_video_buffer(NAVideoInfo::new(in_fmt.width, in_fmt.height, false, df), 3);
 350         if res.is_err() { return Err(ScaleError::AllocError); }
 351         Ok(res.unwrap())
 352     }
 353     fn process(&mut self, pic_in: &NABufferType, pic_out: &mut NABufferType) {
 354         if let (Some(ref sbuf), Some(ref mut dbuf)) = (pic_in.get_vbuf(), pic_out.get_vbuf()) {
 355             let istrides = [sbuf.get_stride(0), sbuf.get_stride(1), sbuf.get_stride(2)];
 356             let dstrides = [dbuf.get_stride(0), dbuf.get_stride(1), dbuf.get_stride(2)];
 357             let (w, h) = sbuf.get_dimensions(0);
 358             if sbuf.get_info().get_format().get_num_comp() < 3 {
 359                 return self.process_grayscale(sbuf, dbuf);
 360             }
 361             let (sv0, sh0) = sbuf.get_info().get_format().get_chromaton(1).unwrap().get_subsampling();
 362             let (sv1, sh1) = sbuf.get_info().get_format().get_chromaton(2).unwrap().get_subsampling();
 363
 364             let uhmask = (1 << sh0) - 1;
 365             let vhmask = (1 << sh1) - 1;
 366             let mut roff = dbuf.get_offset(0);
 367             let mut goff = dbuf.get_offset(1);
 368             let mut boff = dbuf.get_offset(2);
 369             let mut yoff = sbuf.get_offset(0);
 370             let mut uoff = sbuf.get_offset(1);
 371             let mut voff = sbuf.get_offset(2);
 372             let src = sbuf.get_data();
 373             let dst = dbuf.get_data_mut().unwrap();
 374             if !self.yscale.is_empty() {
 375                 for y in 0..h {
 376                     for x in 0..w {
 377                         let y = self.yscale[src[yoff + x] as usize];
 378                         let u = src[uoff + (x >> sv0)] as usize;
 379                         let v = src[voff + (x >> sv1)] as usize;
 380                         let r = y + self.r_chr[v];
 381                         let g = y + self.g_u[u] + self.g_v[v];
 382                         let b = y + self.b_chr[u];
 383                         dst[roff + x] = r.max(0).min(255) as u8;
 384                         dst[goff + x] = g.max(0).min(255) as u8;
 385                         dst[boff + x] = b.max(0).min(255) as u8;
 386                     }
 387                     roff += dstrides[0];
 388                     goff += dstrides[1];
 389                     boff += dstrides[2];
 390                     yoff += istrides[0];
 391                     if (y & uhmask) == uhmask {
 392                         uoff += istrides[1];
 393                     }
 394                     if (y & vhmask) == vhmask {
 395                         voff += istrides[2];
 396                     }
 397                 }
 398                 return;
 399             }
 400             for y in 0..h {
 401                 for x in 0..w {
 402                     let y = f32::from(src[yoff + x]);
 403                     let u = f32::from(i16::from(src[uoff + (x >> sv0)]) - 128);
 404                     let v = f32::from(i16::from(src[voff + (x >> sv1)]) - 128);
 405
 406                     let (r, g, b) = matrix_mul(&self.matrix, y, u, v);
 407                     dst[roff + x] = (r as i16).max(0).min(255) as u8;
 408                     dst[goff + x] = (g as i16).max(0).min(255) as u8;
 409                     dst[boff + x] = (b as i16).max(0).min(255) as u8;
 410                 }
 411                 roff += dstrides[0];
 412                 goff += dstrides[1];
 413                 boff += dstrides[2];
 414                 yoff += istrides[0];
 415                 if (y & uhmask) == uhmask {
 416                     uoff += istrides[1];
 417                 }
 418                 if (y & vhmask) == vhmask {
 419                     voff += istrides[2];
 420                 }
 421             }
 422         }
 423     }
 424 }
 425
 426 impl YuvToRgb {
 427     fn process_grayscale(&self, sbuf: &NAVideoBuffer<u8>, dbuf: &mut NAVideoBuffer<u8>) {
 428         let ystride = sbuf.get_stride(0);
 429         let dstrides = [dbuf.get_stride(0), dbuf.get_stride(1), dbuf.get_stride(2)];
 430         let (w, h) = sbuf.get_dimensions(0);
 431         let mut roff = dbuf.get_offset(0);
 432         let mut goff = dbuf.get_offset(1);
 433         let mut boff = dbuf.get_offset(2);
 434         let mut yoff = sbuf.get_offset(0);
 435         let src = sbuf.get_data();
 436         let dst = dbuf.get_data_mut().unwrap();
 437         if !self.yscale.is_empty() {
 438             for _y in 0..h {
 439                 for x in 0..w {
 440                     let y = self.yscale[src[yoff + x] as usize];
 441                     let r = y + self.r_chr[128];
 442                     let g = y + self.g_u[128] + self.g_v[128];
 443                     let b = y + self.b_chr[128];
 444                     dst[roff + x] = r.max(0).min(255) as u8;
 445                     dst[goff + x] = g.max(0).min(255) as u8;
 446                     dst[boff + x] = b.max(0).min(255) as u8;
 447                 }
 448                 roff += dstrides[0];
 449                 goff += dstrides[1];
 450                 boff += dstrides[2];
 451                 yoff += ystride;
 452             }
 453         } else {
 454             for _y in 0..h {
 455                 for x in 0..w {
 456                     let y = f32::from(src[yoff + x]);
 457                     let (r, g, b) = matrix_mul(&self.matrix, y, 0.0, 0.0);
 458                     dst[roff + x] = (r as i16).max(0).min(255) as u8;
 459                     dst[goff + x] = (g as i16).max(0).min(255) as u8;
 460                     dst[boff + x] = (b as i16).max(0).min(255) as u8;
 461                 }
 462                 roff += dstrides[0];
 463                 goff += dstrides[1];
 464                 boff += dstrides[2];
 465                 yoff += ystride;
 466             }
 467         }
 468     }
 469 }
 470
 471 pub fn create_yuv2rgb() -> Box<dyn Kernel> {
 472     Box::new(YuvToRgb::new())
 473 }