FFmpeg
vf_avgblur_vulkan.c
Go to the documentation of this file.
1 /*
2  * Copyright (c) Lynne
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20 
21 #include "libavutil/random_seed.h"
22 #include "libavutil/opt.h"
23 #include "vulkan_filter.h"
24 #include "vulkan_spirv.h"
25 #include "internal.h"
26 #include "video.h"
27 
28 typedef struct AvgBlurVulkanContext {
30 
34  VkSampler sampler;
37 
38  /* Push constants / options */
39  struct {
40  float filter_norm[4];
42  } opts;
43 
44  int size_x;
45  int size_y;
46  int planes;
48 
49 static const char blur_kernel[] = {
50  C(0, void distort(const ivec2 pos, const int idx) )
51  C(0, { )
52  C(1, vec4 sum = vec4(0); )
53  C(1, for (int y = -filter_len.y; y <= filter_len.y; y++) )
54  C(1, for (int x = -filter_len.x; x <= filter_len.x; x++) )
55  C(2, sum += texture(input_img[idx], pos + ivec2(x, y)); )
56  C(0, )
57  C(1, imageStore(output_img[idx], pos, sum * filter_norm); )
58  C(0, } )
59 };
60 
62 {
63  int err;
64  uint8_t *spv_data;
65  size_t spv_len;
66  void *spv_opaque = NULL;
67  AvgBlurVulkanContext *s = ctx->priv;
68  FFVulkanContext *vkctx = &s->vkctx;
69  const int planes = av_pix_fmt_count_planes(s->vkctx.output_format);
70  FFVkSPIRVShader *shd;
71  FFVkSPIRVCompiler *spv;
73 
74  spv = ff_vk_spirv_init();
75  if (!spv) {
76  av_log(ctx, AV_LOG_ERROR, "Unable to initialize SPIR-V compiler!\n");
77  return AVERROR_EXTERNAL;
78  }
79 
80  ff_vk_qf_init(vkctx, &s->qf, VK_QUEUE_COMPUTE_BIT);
81  RET(ff_vk_exec_pool_init(vkctx, &s->qf, &s->e, s->qf.nb_queues*4, 0, 0, 0, NULL));
82  RET(ff_vk_init_sampler(vkctx, &s->sampler, 1, VK_FILTER_LINEAR));
83  RET(ff_vk_shader_init(&s->pl, &s->shd, "avgblur_compute",
84  VK_SHADER_STAGE_COMPUTE_BIT, 0));
85  shd = &s->shd;
86 
87  ff_vk_shader_set_compute_sizes(shd, 32, 1, 1);
88 
90  {
91  .name = "input_img",
92  .type = VK_DESCRIPTOR_TYPE_COMBINED_IMAGE_SAMPLER,
93  .dimensions = 2,
94  .elems = planes,
95  .stages = VK_SHADER_STAGE_COMPUTE_BIT,
96  .samplers = DUP_SAMPLER(s->sampler),
97  },
98  {
99  .name = "output_img",
100  .type = VK_DESCRIPTOR_TYPE_STORAGE_IMAGE,
101  .mem_layout = ff_vk_shader_rep_fmt(s->vkctx.output_format),
102  .mem_quali = "writeonly",
103  .dimensions = 2,
104  .elems = planes,
105  .stages = VK_SHADER_STAGE_COMPUTE_BIT,
106  },
107  };
108 
109  RET(ff_vk_pipeline_descriptor_set_add(vkctx, &s->pl, shd, desc, 2, 0, 0));
110 
111  GLSLC(0, layout(push_constant, std430) uniform pushConstants { );
112  GLSLC(1, vec4 filter_norm; );
113  GLSLC(1, ivec2 filter_len; );
114  GLSLC(0, }; );
115  GLSLC(0, );
116 
117  ff_vk_add_push_constant(&s->pl, 0, sizeof(s->opts),
118  VK_SHADER_STAGE_COMPUTE_BIT);
119 
120  GLSLD( blur_kernel );
121  GLSLC(0, void main() );
122  GLSLC(0, { );
123  GLSLC(1, ivec2 size; );
124  GLSLC(1, const ivec2 pos = ivec2(gl_GlobalInvocationID.xy); );
125  for (int i = 0; i < planes; i++) {
126  GLSLC(0, );
127  GLSLF(1, size = imageSize(output_img[%i]); ,i);
128  GLSLC(1, if (!IS_WITHIN(pos, size)) );
129  GLSLC(2, return; );
130  if (s->planes & (1 << i)) {
131  GLSLF(1, distort(pos, %i); ,i);
132  } else {
133  GLSLF(1, vec4 res = texture(input_img[%i], pos); ,i);
134  GLSLF(1, imageStore(output_img[%i], pos, res); ,i);
135  }
136  }
137  GLSLC(0, } );
138 
139  RET(spv->compile_shader(spv, ctx, &s->shd, &spv_data, &spv_len, "main",
140  &spv_opaque));
141  RET(ff_vk_shader_create(vkctx, &s->shd, spv_data, spv_len, "main"));
142 
143  RET(ff_vk_init_compute_pipeline(vkctx, &s->pl, &s->shd));
144  RET(ff_vk_exec_pipeline_register(vkctx, &s->e, &s->pl));
145 
146  s->initialized = 1;
147  s->opts.filter_len[0] = s->size_x - 1;
148  s->opts.filter_len[1] = s->size_y - 1;
149 
150  s->opts.filter_norm[0] = s->opts.filter_len[0]*2 + 1;
151  s->opts.filter_norm[0] = 1.0/(s->opts.filter_norm[0]*s->opts.filter_norm[0]);
152  s->opts.filter_norm[1] = s->opts.filter_norm[0];
153  s->opts.filter_norm[2] = s->opts.filter_norm[0];
154  s->opts.filter_norm[3] = s->opts.filter_norm[0];
155 
156 fail:
157  if (spv_opaque)
158  spv->free_shader(spv, &spv_opaque);
159  if (spv)
160  spv->uninit(&spv);
161 
162  return err;
163 }
164 
166 {
167  int err;
168  AVFrame *out = NULL;
169  AVFilterContext *ctx = link->dst;
170  AvgBlurVulkanContext *s = ctx->priv;
171  AVFilterLink *outlink = ctx->outputs[0];
172 
173  out = ff_get_video_buffer(outlink, outlink->w, outlink->h);
174  if (!out) {
175  err = AVERROR(ENOMEM);
176  goto fail;
177  }
178 
179  if (!s->initialized)
180  RET(init_filter(ctx, in));
181 
182  RET(ff_vk_filter_process_simple(&s->vkctx, &s->e, &s->pl,
183  out, in, s->sampler, &s->opts, sizeof(s->opts)));
184 
185  err = av_frame_copy_props(out, in);
186  if (err < 0)
187  goto fail;
188 
189  av_frame_free(&in);
190 
191  return ff_filter_frame(outlink, out);
192 
193 fail:
194  av_frame_free(&in);
195  av_frame_free(&out);
196  return err;
197 }
198 
200 {
201  AvgBlurVulkanContext *s = avctx->priv;
202  FFVulkanContext *vkctx = &s->vkctx;
203  FFVulkanFunctions *vk = &vkctx->vkfn;
204 
205  ff_vk_exec_pool_free(vkctx, &s->e);
206  ff_vk_pipeline_free(vkctx, &s->pl);
207  ff_vk_shader_free(vkctx, &s->shd);
208 
209  if (s->sampler)
210  vk->DestroySampler(vkctx->hwctx->act_dev, s->sampler,
211  vkctx->hwctx->alloc);
212 
213  ff_vk_uninit(&s->vkctx);
214 
215  s->initialized = 0;
216 }
217 
218 #define OFFSET(x) offsetof(AvgBlurVulkanContext, x)
219 #define FLAGS (AV_OPT_FLAG_FILTERING_PARAM | AV_OPT_FLAG_VIDEO_PARAM)
221  { "sizeX", "Set horizontal radius", OFFSET(size_x), AV_OPT_TYPE_INT, { .i64 = 3 }, 1, 32, .flags = FLAGS },
222  { "sizeY", "Set vertical radius", OFFSET(size_y), AV_OPT_TYPE_INT, { .i64 = 3 }, 1, 32, .flags = FLAGS },
223  { "planes", "Set planes to filter (bitmask)", OFFSET(planes), AV_OPT_TYPE_INT, {.i64 = 0xF}, 0, 0xF, .flags = FLAGS },
224  { NULL },
225 };
226 
227 AVFILTER_DEFINE_CLASS(avgblur_vulkan);
228 
230  {
231  .name = "default",
232  .type = AVMEDIA_TYPE_VIDEO,
233  .filter_frame = &avgblur_vulkan_filter_frame,
234  .config_props = &ff_vk_filter_config_input,
235  },
236 };
237 
239  {
240  .name = "default",
241  .type = AVMEDIA_TYPE_VIDEO,
242  .config_props = &ff_vk_filter_config_output,
243  },
244 };
245 
247  .name = "avgblur_vulkan",
248  .description = NULL_IF_CONFIG_SMALL("Apply avgblur mask to input video"),
249  .priv_size = sizeof(AvgBlurVulkanContext),
255  .priv_class = &avgblur_vulkan_class,
256  .flags_internal = FF_FILTER_FLAG_HWFRAME_AWARE,
257  .flags = AVFILTER_FLAG_HWDEVICE,
258 };
ff_get_video_buffer
AVFrame * ff_get_video_buffer(AVFilterLink *link, int w, int h)
Request a picture buffer with a specific set of permissions.
Definition: video.c:108
ff_vk_pipeline_free
void ff_vk_pipeline_free(FFVulkanContext *s, FFVulkanPipeline *pl)
Definition: vulkan.c:1863
AvgBlurVulkanContext
Definition: vf_avgblur_vulkan.c:28
AVERROR
Filter the word “frame” indicates either a video frame or a group of audio as stored in an AVFrame structure Format for each input and each output the list of supported formats For video that means pixel format For audio that means channel sample they are references to shared objects When the negotiation mechanism computes the intersection of the formats supported at each end of a all references to both lists are replaced with a reference to the intersection And when a single format is eventually chosen for a link amongst the remaining all references to the list are updated That means that if a filter requires that its input and output have the same format amongst a supported all it has to do is use a reference to the same list of formats query_formats can leave some formats unset and return AVERROR(EAGAIN) to cause the negotiation mechanism toagain later. That can be used by filters with complex requirements to use the format negotiated on one link to set the formats supported on another. Frame references ownership and permissions
opt.h
FLAGS
#define FLAGS
Definition: vf_avgblur_vulkan.c:219
avgblur_vulkan_outputs
static const AVFilterPad avgblur_vulkan_outputs[]
Definition: vf_avgblur_vulkan.c:238
out
FILE * out
Definition: movenc.c:54
FF_FILTER_FLAG_HWFRAME_AWARE
#define FF_FILTER_FLAG_HWFRAME_AWARE
The filter is aware of hardware frames, and any hardware frame context should not be automatically pr...
Definition: internal.h:364
avgblur_vulkan_inputs
static const AVFilterPad avgblur_vulkan_inputs[]
Definition: vf_avgblur_vulkan.c:229
ff_filter_frame
int ff_filter_frame(AVFilterLink *link, AVFrame *frame)
Send a frame of data to the next filter.
Definition: avfilter.c:978
ff_vk_qf_init
int ff_vk_qf_init(FFVulkanContext *s, FFVkQueueFamilyCtx *qf, VkQueueFlagBits dev_family)
Chooses a QF and loads it into a context.
Definition: vulkan.c:225
av_frame_free
void av_frame_free(AVFrame **frame)
Free the frame and any dynamically allocated objects in it, e.g.
Definition: frame.c:100
AVFrame
This structure describes decoded (raw) audio or video data.
Definition: frame.h:340
ff_vk_filter_init
int ff_vk_filter_init(AVFilterContext *avctx)
General lavfi IO functions.
Definition: vulkan_filter.c:214
ff_vk_shader_create
int ff_vk_shader_create(FFVulkanContext *s, FFVkSPIRVShader *shd, uint8_t *spirv, size_t spirv_size, const char *entrypoint)
Definition: vulkan.c:1408
AVOption
AVOption.
Definition: opt.h:251
AvgBlurVulkanContext::pl
FFVulkanPipeline pl
Definition: vf_avgblur_vulkan.c:35
ff_vf_avgblur_vulkan
const AVFilter ff_vf_avgblur_vulkan
Definition: vf_avgblur_vulkan.c:246
ff_vk_uninit
void ff_vk_uninit(FFVulkanContext *s)
Frees main context.
Definition: vulkan.c:1892
FFVkSPIRVCompiler::uninit
void(* uninit)(struct FFVkSPIRVCompiler **ctx)
Definition: vulkan_spirv.h:33
AVFilter::name
const char * name
Filter name.
Definition: avfilter.h:170
ff_vk_pipeline_descriptor_set_add
int ff_vk_pipeline_descriptor_set_add(FFVulkanContext *s, FFVulkanPipeline *pl, FFVkSPIRVShader *shd, FFVulkanDescriptorSetBinding *desc, int nb, int read_only, int print_to_shader_only)
Add descriptor to a pipeline.
Definition: vulkan.c:1458
avgblur_vulkan_uninit
static void avgblur_vulkan_uninit(AVFilterContext *avctx)
Definition: vf_avgblur_vulkan.c:199
ff_vk_shader_set_compute_sizes
void ff_vk_shader_set_compute_sizes(FFVkSPIRVShader *shd, int x, int y, int z)
Definition: vulkan.c:1366
AvgBlurVulkanContext::initialized
int initialized
Definition: vf_avgblur_vulkan.c:31
AvgBlurVulkanContext::sampler
VkSampler sampler
Definition: vf_avgblur_vulkan.c:34
blur_kernel
static const char blur_kernel[]
Definition: vf_avgblur_vulkan.c:49
video.h
AVFILTER_DEFINE_CLASS
AVFILTER_DEFINE_CLASS(avgblur_vulkan)
AV_PIX_FMT_VULKAN
@ AV_PIX_FMT_VULKAN
Vulkan hardware images.
Definition: pixfmt.h:376
av_pix_fmt_count_planes
int av_pix_fmt_count_planes(enum AVPixelFormat pix_fmt)
Definition: pixdesc.c:2976
AVVulkanDeviceContext::alloc
const VkAllocationCallbacks * alloc
Custom memory allocator, else NULL.
Definition: hwcontext_vulkan.h:48
ff_vk_add_push_constant
int ff_vk_add_push_constant(FFVulkanPipeline *pl, int offset, int size, VkShaderStageFlagBits stage)
Add/update push constants for execution.
Definition: vulkan.c:1138
AvgBlurVulkanContext::filter_norm
float filter_norm[4]
Definition: vf_avgblur_vulkan.c:40
AVFilterContext::priv
void * priv
private data for use by the filter
Definition: avfilter.h:412
fail
#define fail()
Definition: checkasm.h:138
vulkan_filter.h
avgblur_vulkan_options
static const AVOption avgblur_vulkan_options[]
Definition: vf_avgblur_vulkan.c:220
AVFilterPad
A filter pad used for either input or output.
Definition: internal.h:47
C
s EdgeDetect Foobar g libavfilter vf_edgedetect c libavfilter vf_foobar c edit libavfilter and add an entry for foobar following the pattern of the other filters edit libavfilter allfilters and add an entry for foobar following the pattern of the other filters configure make j< whatever > ffmpeg ffmpeg i you should get a foobar png with Lena edge detected That s your new playground is ready Some little details about what s going which in turn will define variables for the build system and the C
Definition: writing_filters.txt:58
AV_LOG_ERROR
#define AV_LOG_ERROR
Something went wrong and cannot losslessly be recovered.
Definition: log.h:180
av_cold
#define av_cold
Definition: attributes.h:90
s
#define s(width, name)
Definition: cbs_vp9.c:198
init
int(* init)(AVBSFContext *ctx)
Definition: dts2pts_bsf.c:365
ctx
AVFormatContext * ctx
Definition: movenc.c:48
FFVkSPIRVCompiler::compile_shader
int(* compile_shader)(struct FFVkSPIRVCompiler *ctx, void *avctx, struct FFVkSPIRVShader *shd, uint8_t **data, size_t *size, const char *entrypoint, void **opaque)
Definition: vulkan_spirv.h:29
ff_vk_exec_pool_free
void ff_vk_exec_pool_free(FFVulkanContext *s, FFVkExecPool *pool)
Definition: vulkan.c:256
FILTER_INPUTS
#define FILTER_INPUTS(array)
Definition: internal.h:192
link
Filter the word “frame” indicates either a video frame or a group of audio as stored in an AVFrame structure Format for each input and each output the list of supported formats For video that means pixel format For audio that means channel sample they are references to shared objects When the negotiation mechanism computes the intersection of the formats supported at each end of a link
Definition: filter_design.txt:23
AvgBlurVulkanContext::e
FFVkExecPool e
Definition: vf_avgblur_vulkan.c:32
NULL
#define NULL
Definition: coverity.c:32
av_frame_copy_props
int av_frame_copy_props(AVFrame *dst, const AVFrame *src)
Copy only "metadata" fields from src to dst.
Definition: frame.c:736
GLSLD
#define GLSLD(D)
Definition: vulkan.h:60
AvgBlurVulkanContext::qf
FFVkQueueFamilyCtx qf
Definition: vf_avgblur_vulkan.c:33
OFFSET
#define OFFSET(x)
Definition: vf_avgblur_vulkan.c:218
ff_vk_filter_config_output
int ff_vk_filter_config_output(AVFilterLink *outlink)
Definition: vulkan_filter.c:191
ff_vk_init_compute_pipeline
int ff_vk_init_compute_pipeline(FFVulkanContext *s, FFVulkanPipeline *pl, FFVkSPIRVShader *shd)
Definition: vulkan.c:1804
AvgBlurVulkanContext::size_y
int size_y
Definition: vf_avgblur_vulkan.c:45
ff_vk_exec_pool_init
int ff_vk_exec_pool_init(FFVulkanContext *s, FFVkQueueFamilyCtx *qf, FFVkExecPool *pool, int nb_contexts, int nb_queries, VkQueryType query_type, int query_64bit, const void *query_create_pnext)
Allocates/frees an execution pool.
Definition: vulkan.c:296
FFVulkanContext
Definition: vulkan.h:228
FFVulkanPipeline
Definition: vulkan.h:132
AvgBlurVulkanContext::filter_len
int32_t filter_len[2]
Definition: vf_avgblur_vulkan.c:41
ff_vk_shader_init
int ff_vk_shader_init(FFVulkanPipeline *pl, FFVkSPIRVShader *shd, const char *name, VkShaderStageFlags stage, uint32_t required_subgroup_size)
Shader management.
Definition: vulkan.c:1340
main
int main(int argc, char **argv)
Definition: avio_http_serve_files.c:99
AvgBlurVulkanContext::planes
int planes
Definition: vf_avgblur_vulkan.c:46
FFVulkanDescriptorSetBinding
Definition: vulkan.h:84
NULL_IF_CONFIG_SMALL
#define NULL_IF_CONFIG_SMALL(x)
Return NULL if CONFIG_SMALL is true, otherwise the argument without modification.
Definition: internal.h:106
AVFILTER_FLAG_HWDEVICE
#define AVFILTER_FLAG_HWDEVICE
The filter can create hardware frames using AVFilterContext.hw_device_ctx.
Definition: avfilter.h:138
size
int size
Definition: twinvq_data.h:10344
FFVkQueueFamilyCtx
Definition: vulkan.h:111
planes
static const struct @362 planes[]
AvgBlurVulkanContext::vkctx
FFVulkanContext vkctx
Definition: vf_avgblur_vulkan.c:29
init_filter
static av_cold int init_filter(AVFilterContext *ctx, AVFrame *in)
Definition: vf_avgblur_vulkan.c:61
AVERROR_EXTERNAL
#define AVERROR_EXTERNAL
Generic error in an external library.
Definition: error.h:59
internal.h
ff_vk_filter_process_simple
int ff_vk_filter_process_simple(FFVulkanContext *vkctx, FFVkExecPool *e, FFVulkanPipeline *pl, AVFrame *out_f, AVFrame *in_f, VkSampler sampler, void *push_src, size_t push_size)
Submit a compute shader with a zero/one input and single out for execution.
Definition: vulkan_filter.c:223
FFVkSPIRVCompiler
Definition: vulkan_spirv.h:27
layout
Filter the word “frame” indicates either a video frame or a group of audio as stored in an AVFrame structure Format for each input and each output the list of supported formats For video that means pixel format For audio that means channel layout
Definition: filter_design.txt:18
FILTER_SINGLE_PIXFMT
#define FILTER_SINGLE_PIXFMT(pix_fmt_)
Definition: internal.h:182
i
#define i(width, name, range_min, range_max)
Definition: cbs_h2645.c:244
DUP_SAMPLER
#define DUP_SAMPLER(x)
Definition: vulkan.h:74
ff_vk_shader_rep_fmt
const char * ff_vk_shader_rep_fmt(enum AVPixelFormat pixfmt)
Returns the format to use for images in shaders.
Definition: vulkan.c:1202
AvgBlurVulkanContext::size_x
int size_x
Definition: vf_avgblur_vulkan.c:44
vulkan_spirv.h
AVFilterPad::name
const char * name
Pad name.
Definition: internal.h:53
GLSLF
#define GLSLF(N, S,...)
Definition: vulkan.h:55
FFVkSPIRVCompiler::free_shader
void(* free_shader)(struct FFVkSPIRVCompiler *ctx, void **opaque)
Definition: vulkan_spirv.h:32
AVFilter
Filter definition.
Definition: avfilter.h:166
FFVulkanContext::vkfn
FFVulkanFunctions vkfn
Definition: vulkan.h:231
FFVkExecPool
Definition: vulkan.h:210
pos
unsigned int pos
Definition: spdifenc.c:413
random_seed.h
FFVkSPIRVShader
Definition: vulkan.h:76
AV_OPT_TYPE_INT
@ AV_OPT_TYPE_INT
Definition: opt.h:225
AVFilterContext
An instance of a filter.
Definition: avfilter.h:397
avgblur_vulkan_filter_frame
static int avgblur_vulkan_filter_frame(AVFilterLink *link, AVFrame *in)
Definition: vf_avgblur_vulkan.c:165
desc
const char * desc
Definition: libsvtav1.c:83
GLSLC
#define GLSLC(N, S)
Definition: vulkan.h:45
ff_vk_filter_config_input
int ff_vk_filter_config_input(AVFilterLink *inlink)
Definition: vulkan_filter.c:160
AVMEDIA_TYPE_VIDEO
@ AVMEDIA_TYPE_VIDEO
Definition: avutil.h:201
FFVulkanContext::hwctx
AVVulkanDeviceContext * hwctx
Definition: vulkan.h:253
AVVulkanDeviceContext::act_dev
VkDevice act_dev
Active device.
Definition: hwcontext_vulkan.h:70
FILTER_OUTPUTS
#define FILTER_OUTPUTS(array)
Definition: internal.h:193
ff_vk_init_sampler
int ff_vk_init_sampler(FFVulkanContext *s, VkSampler *sampler, int unnorm_coords, VkFilter filt)
Create a sampler.
Definition: vulkan.c:1158
ff_vk_exec_pipeline_register
int ff_vk_exec_pipeline_register(FFVulkanContext *s, FFVkExecPool *pool, FFVulkanPipeline *pl)
Register a pipeline with an exec pool.
Definition: vulkan.c:1572
int32_t
int32_t
Definition: audioconvert.c:56
av_log
#define av_log(a,...)
Definition: tableprint_vlc.h:27
uninit
static av_cold int uninit(AVCodecContext *avctx)
Definition: crystalhd.c:285
AvgBlurVulkanContext::opts
struct AvgBlurVulkanContext::@247 opts
ff_vk_shader_free
void ff_vk_shader_free(FFVulkanContext *s, FFVkSPIRVShader *shd)
Definition: vulkan.c:1399
AvgBlurVulkanContext::shd
FFVkSPIRVShader shd
Definition: vf_avgblur_vulkan.c:36
RET
#define RET(x)
Definition: vulkan.h:68
FFVulkanFunctions
Definition: vulkan_functions.h:226