lfg.c
Go to the documentation of this file.
1 /*
2  * Lagged Fibonacci PRNG
3  * Copyright (c) 2008 Michael Niedermayer
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21 
22 #include <inttypes.h>
23 #include <limits.h>
24 #include <math.h>
25 #include "lfg.h"
26 #include "md5.h"
27 #include "intreadwrite.h"
28 #include "attributes.h"
29 
30 av_cold void av_lfg_init(AVLFG *c, unsigned int seed)
31 {
32  uint8_t tmp[16] = { 0 };
33  int i;
34 
35  for (i = 8; i < 64; i += 4) {
36  AV_WL32(tmp, seed);
37  tmp[4] = i;
38  av_md5_sum(tmp, tmp, 16);
39  c->state[i ] = AV_RL32(tmp);
40  c->state[i + 1] = AV_RL32(tmp + 4);
41  c->state[i + 2] = AV_RL32(tmp + 8);
42  c->state[i + 3] = AV_RL32(tmp + 12);
43  }
44  c->index = 0;
45 }
46 
47 void av_bmg_get(AVLFG *lfg, double out[2])
48 {
49  double x1, x2, w;
50 
51  do {
52  x1 = 2.0 / UINT_MAX * av_lfg_get(lfg) - 1.0;
53  x2 = 2.0 / UINT_MAX * av_lfg_get(lfg) - 1.0;
54  w = x1 * x1 + x2 * x2;
55  } while (w >= 1.0);
56 
57  w = sqrt((-2.0 * log(w)) / w);
58  out[0] = x1 * w;
59  out[1] = x2 * w;
60 }
61 
62 #ifdef TEST
63 #include "log.h"
64 #include "timer.h"
65 
66 int main(void)
67 {
68  int x = 0;
69  int i, j;
70  AVLFG state;
71 
72  av_lfg_init(&state, 0xdeadbeef);
73  for (j = 0; j < 10000; j++) {
75  for (i = 0; i < 624; i++) {
76  //av_log(NULL, AV_LOG_ERROR, "%X\n", av_lfg_get(&state));
77  x += av_lfg_get(&state);
78  }
79  STOP_TIMER("624 calls of av_lfg_get");
80  }
81  av_log(NULL, AV_LOG_ERROR, "final value:%X\n", x);
82 
83  /* BMG usage example */
84  {
85  double mean = 1000;
86  double stddev = 53;
87 
88  av_lfg_init(&state, 42);
89 
90  for (i = 0; i < 1000; i += 2) {
91  double bmg_out[2];
92  av_bmg_get(&state, bmg_out);
94  "%f\n%f\n",
95  bmg_out[0] * stddev + mean,
96  bmg_out[1] * stddev + mean);
97  }
98  }
99 
100  return 0;
101 }
102 #endif
Definition: lfg.h:25
int index
Definition: lfg.h:27
x1
Definition: genspecsines3.m:7
output residual component w
Macro definitions for various function/variable attributes.
#define AV_WL32(p, darg)
Definition: intreadwrite.h:282
uint8_t
#define av_cold
Definition: attributes.h:78
integer sqrt
Definition: avutil.txt:2
void av_md5_sum(uint8_t *dst, const uint8_t *src, const int len)
Definition: md5.c:173
void av_bmg_get(AVLFG *lfg, double out[2])
Get the next two numbers generated by a Box-Muller Gaussian generator using the random numbers issued...
Definition: lfg.c:47
Discrete Time axis x
void av_log(void *avcl, int level, const char *fmt,...)
Definition: log.c:246
#define AV_RL32
NULL
Definition: eval.c:55
#define START_TIMER
Definition: timer.h:74
static unsigned int seed
Definition: videogen.c:78
#define AV_LOG_ERROR
Something went wrong and cannot losslessly be recovered.
Definition: log.h:148
static unsigned int av_lfg_get(AVLFG *c)
Get the next random unsigned 32-bit number using an ALFG.
Definition: lfg.h:38
x2
Definition: genspecsines3.m:8
synthesis window for stochastic i
av_cold void av_lfg_init(AVLFG *c, unsigned int seed)
Definition: lfg.c:30
static uint32_t state
Definition: trasher.c:27
unsigned int state[64]
Definition: lfg.h:26
static double c[64]
#define STOP_TIMER(id)
Definition: timer.h:75
#define AV_LOG_INFO
Definition: log.h:156
uint8_t pi<< 24) CONV_FUNC_GROUP(AV_SAMPLE_FMT_FLT, float, AV_SAMPLE_FMT_U8, uint8_t,(*(const uint8_t *) pi-0x80)*(1.0f/(1<< 7))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_DBL, double, AV_SAMPLE_FMT_U8, uint8_t,(*(const uint8_t *) pi-0x80)*(1.0/(1<< 7))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_U8, uint8_t, AV_SAMPLE_FMT_S16, int16_t,(*(const int16_t *) pi >> 8)+0x80) CONV_FUNC_GROUP(AV_SAMPLE_FMT_FLT, float, AV_SAMPLE_FMT_S16, int16_t,*(const int16_t *) pi *(1.0f/(1<< 15))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_DBL, double, AV_SAMPLE_FMT_S16, int16_t,*(const int16_t *) pi *(1.0/(1<< 15))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_U8, uint8_t, AV_SAMPLE_FMT_S32, int32_t,(*(const int32_t *) pi >> 24)+0x80) CONV_FUNC_GROUP(AV_SAMPLE_FMT_FLT, float, AV_SAMPLE_FMT_S32, int32_t,*(const int32_t *) pi *(1.0f/(1U<< 31))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_DBL, double, AV_SAMPLE_FMT_S32, int32_t,*(const int32_t *) pi *(1.0/(1U<< 31))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_U8, uint8_t, AV_SAMPLE_FMT_FLT, float, av_clip_uint8(lrintf(*(const float *) pi *(1<< 7))+0x80)) CONV_FUNC_GROUP(AV_SAMPLE_FMT_S16, int16_t, AV_SAMPLE_FMT_FLT, float, av_clip_int16(lrintf(*(const float *) pi *(1<< 15)))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_S32, int32_t, AV_SAMPLE_FMT_FLT, float, av_clipl_int32(llrintf(*(const float *) pi *(1U<< 31)))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_U8, uint8_t, AV_SAMPLE_FMT_DBL, double, av_clip_uint8(lrint(*(const double *) pi *(1<< 7))+0x80)) CONV_FUNC_GROUP(AV_SAMPLE_FMT_S16, int16_t, AV_SAMPLE_FMT_DBL, double, av_clip_int16(lrint(*(const double *) pi *(1<< 15)))) CONV_FUNC_GROUP(AV_SAMPLE_FMT_S32, int32_t, AV_SAMPLE_FMT_DBL, double, av_clipl_int32(llrint(*(const double *) pi *(1U<< 31))))#define SET_CONV_FUNC_GROUP(ofmt, ifmt) static void set_generic_function(AudioConvert *ac){}void ff_audio_convert_free(AudioConvert **ac){if(!*ac) return;ff_dither_free(&(*ac) ->dc);av_freep(ac);}AudioConvert *ff_audio_convert_alloc(AVAudioResampleContext *avr, enum AVSampleFormat out_fmt, enum AVSampleFormat in_fmt, int channels, int sample_rate, int apply_map){AudioConvert *ac;int in_planar, out_planar;ac=av_mallocz(sizeof(*ac));if(!ac) return NULL;ac->avr=avr;ac->out_fmt=out_fmt;ac->in_fmt=in_fmt;ac->channels=channels;ac->apply_map=apply_map;if(avr->dither_method!=AV_RESAMPLE_DITHER_NONE &&av_get_packed_sample_fmt(out_fmt)==AV_SAMPLE_FMT_S16 &&av_get_bytes_per_sample(in_fmt) > 2){ac->dc=ff_dither_alloc(avr, out_fmt, in_fmt, channels, sample_rate, apply_map);if(!ac->dc){av_free(ac);return NULL;}return ac;}in_planar=av_sample_fmt_is_planar(in_fmt);out_planar=av_sample_fmt_is_planar(out_fmt);if(in_planar==out_planar){ac->func_type=CONV_FUNC_TYPE_FLAT;ac->planes=in_planar?ac->channels:1;}else if(in_planar) ac->func_type=CONV_FUNC_TYPE_INTERLEAVE;else ac->func_type=CONV_FUNC_TYPE_DEINTERLEAVE;set_generic_function(ac);if(ARCH_ARM) ff_audio_convert_init_arm(ac);if(ARCH_X86) ff_audio_convert_init_x86(ac);return ac;}int ff_audio_convert(AudioConvert *ac, AudioData *out, AudioData *in){int use_generic=1;int len=in->nb_samples;int p;if(ac->dc){av_dlog(ac->avr,"%d samples - audio_convert: %s to %s (dithered)\n", len, av_get_sample_fmt_name(ac->in_fmt), av_get_sample_fmt_name(ac->out_fmt));return ff_convert_dither(ac-> out
int main(int argc, char **argv)
Definition: main.c:22