admin/x264
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

x264 source for verification 2026-05-22

Browse Source
This commit is contained in:
admin
2026-05-22 16:45:04 +08:00
commit 4647f166e5
270 changed files with 166522 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

135
common/opencl/downscale.cl Normal file
View File

@@ -0,0 +1,135 @@
/*
* downscale lowres luma: full-res buffer to down scale image, and to packed hpel image
*
* --
*
* fenc_img is an output image (area of memory referenced through a texture
* cache). A read of any pixel location (x,y) returns four pixel values:
*
* val.s0 = P(x,y)
* val.s1 = P(x+1,y)
* val.s2 = P(x+2,y)
* val.s3 = P(x+3,y)
*
* This is a 4x replication of the lowres pixels, a trade-off between memory
* size and read latency.
*
* --
*
* hpel_planes is an output image that contains the four HPEL planes used for
* subpel refinement. A read of any pixel location (x,y) returns a UInt32 with
* the four planar values C | V | H | F
*
* launch dimensions: [lowres-width, lowres-height]
*/
kernel void downscale_hpel( const global pixel *fenc,
write_only image2d_t fenc_img,
write_only image2d_t hpel_planes,
int stride )
{
int x = get_global_id( 0 );
int y = get_global_id( 1 );
uint4 values;
fenc += y * stride * 2;
const global pixel *src1 = fenc + stride;
const global pixel *src2 = (y == get_global_size( 1 )-1) ? src1 : src1 + stride;
int2 pos = (int2)(x, y);
pixel right, left;
right = rhadd( fenc[x*2], src1[x*2] );
left = rhadd( fenc[x*2+1], src1[x*2+1] );
values.s0 = rhadd( right, left ); // F
right = rhadd( fenc[2*x+1], src1[2*x+1] );
left = rhadd( fenc[2*x+2], src1[2*x+2] );
values.s1 = rhadd( right, left ); // H
right = rhadd( src1[2*x], src2[2*x] );
left = rhadd( src1[2*x+1], src2[2*x+1] );
values.s2 = rhadd( right, left ); // V
right = rhadd( src1[2*x+1], src2[2*x+1] );
left = rhadd( src1[2*x+2], src2[2*x+2] );
values.s3 = rhadd( right, left ); // C
uint4 val = (uint4) ((values.s3 & 0xff) << 24) | ((values.s2 & 0xff) << 16) | ((values.s1 & 0xff) << 8) | (values.s0 & 0xff);
write_imageui( hpel_planes, pos, val );
x = select( x, x+1, x+1 < get_global_size( 0 ) );
right = rhadd( fenc[x*2], src1[x*2] );
left = rhadd( fenc[x*2+1], src1[x*2+1] );
values.s1 = rhadd( right, left );
x = select( x, x+1, x+1 < get_global_size( 0 ) );
right = rhadd( fenc[x*2], src1[x*2] );
left = rhadd( fenc[x*2+1], src1[x*2+1] );
values.s2 = rhadd( right, left );
x = select( x, x+1, x+1 < get_global_size( 0 ) );
right = rhadd( fenc[x*2], src1[x*2] );
left = rhadd( fenc[x*2+1], src1[x*2+1] );
values.s3 = rhadd( right, left );
write_imageui( fenc_img, pos, values );
}
/*
* downscale lowres hierarchical motion search image, copy from one image to
* another decimated image. This kernel is called iteratively to generate all
* of the downscales.
*
* launch dimensions: [lower_res width, lower_res height]
*/
kernel void downscale1( read_only image2d_t higher_res, write_only image2d_t lower_res )
{
int x = get_global_id( 0 );
int y = get_global_id( 1 );
int2 pos = (int2)(x, y);
int gs = get_global_size( 0 );
uint4 top, bot, values;
top = read_imageui( higher_res, sampler, (int2)(x*2, 2*y) );
bot = read_imageui( higher_res, sampler, (int2)(x*2, 2*y+1) );
values.s0 = rhadd( rhadd( top.s0, bot.s0 ), rhadd( top.s1, bot.s1 ) );
/* these select statements appear redundant, and they should be, but tests break when
* they are not here. I believe this was caused by a driver bug
*/
values.s1 = select( values.s0, rhadd( rhadd( top.s2, bot.s2 ), rhadd( top.s3, bot.s3 ) ), ( x + 1 < gs) );
top = read_imageui( higher_res, sampler, (int2)(x*2+4, 2*y) );
bot = read_imageui( higher_res, sampler, (int2)(x*2+4, 2*y+1) );
values.s2 = select( values.s1, rhadd( rhadd( top.s0, bot.s0 ), rhadd( top.s1, bot.s1 ) ), ( x + 2 < gs ) );
values.s3 = select( values.s2, rhadd( rhadd( top.s2, bot.s2 ), rhadd( top.s3, bot.s3 ) ), ( x + 3 < gs ) );
write_imageui( lower_res, pos, (uint4)(values) );
}
/*
* Second copy of downscale kernel, no differences. This is a (no perf loss)
* workaround for a scheduling bug in current Tahiti drivers. This bug has
* theoretically been fixed in the July 2012 driver release from AMD.
*/
kernel void downscale2( read_only image2d_t higher_res, write_only image2d_t lower_res )
{
int x = get_global_id( 0 );
int y = get_global_id( 1 );
int2 pos = (int2)(x, y);
int gs = get_global_size( 0 );
uint4 top, bot, values;
top = read_imageui( higher_res, sampler, (int2)(x*2, 2*y) );
bot = read_imageui( higher_res, sampler, (int2)(x*2, 2*y+1) );
values.s0 = rhadd( rhadd( top.s0, bot.s0 ), rhadd( top.s1, bot.s1 ) );
// see comment in above function copy
values.s1 = select( values.s0, rhadd( rhadd( top.s2, bot.s2 ), rhadd( top.s3, bot.s3 ) ), ( x + 1 < gs) );
top = read_imageui( higher_res, sampler, (int2)(x*2+4, 2*y) );
bot = read_imageui( higher_res, sampler, (int2)(x*2+4, 2*y+1) );
values.s2 = select( values.s1, rhadd( rhadd( top.s0, bot.s0 ), rhadd( top.s1, bot.s1 ) ), ( x + 2 < gs ) );
values.s3 = select( values.s2, rhadd( rhadd( top.s2, bot.s2 ), rhadd( top.s3, bot.s3 ) ), ( x + 3 < gs ) );
write_imageui( lower_res, pos, (uint4)(values) );
}
/* OpenCL 1.2 finally added a memset command, but we're not targeting 1.2 */
kernel void memset_int16( global int16_t *buf, int16_t value )
{
buf[get_global_id( 0 )] = value;
}