1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
/*
* filters.c
*
* Image filtering
*
* (c) 2006-2010 Thomas White <taw@physics.org>
*
* Part of CrystFEL - crystallography with a FEL
*
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <stdlib.h>
#include <stdio.h>
#include <math.h>
#include <string.h>
#include <assert.h>
#include <gsl/gsl_statistics_int.h>
#include "image.h"
static int compare_vals(const void *ap, const void *bp)
{
const signed int a = *(signed int *)ap;
const signed int b = *(signed int *)bp;
if ( a > b ) return 1;
if ( a < b ) return -1;
return 0;
}
static void clean_panel(struct image *image, int sx, int sy)
{
int x, y;
const int s = sizeof(signed int);
for ( x=0; x<512; x++ ) {
signed int vals[128];
double m;
for ( y=0; y<128; y++ ) {
vals[y] = image->data[(x+sx)+(y+sy)*image->width];
}
qsort(&vals[0], 128, s, compare_vals);
m = gsl_stats_int_median_from_sorted_data(vals, 1, 128);
for ( y=0; y<128; y++ ) {
image->data[(x+sx)+(y+sy)*image->width] -= m;
}
}
}
/* Pre-processing to make life easier */
void filter_cm(struct image *image)
{
int px, py;
if ( (image->width != 1024) || (image->height != 1024) ) return;
for ( px=0; px<2; px++ ) {
for ( py=0; py<8; py++ ) {
clean_panel(image, 512*px, 128*py);
}
}
}
void filter_noise(struct image *image, float *old)
{
int x, y;
for ( x=0; x<image->width; x++ ) {
for ( y=0; y<image->height; y++ ) {
int dx, dy;
int val = image->data[x+image->width*y];
if ( old != NULL ) old[x+image->width*y] = val;
/* FIXME: This isn't really the right thing to do
* at the edges. */
if ( (x==0) || (x==image->width-1)
|| (y==0) || (y==image->height-1) ) {
if ( val < 0 ) val = 0;
continue;
}
for ( dx=-1; dx<=+1; dx++ ) {
for ( dy=-1; dy<=+1; dy++ ) {
int val2;
val2 = image->data[(x+dx)+image->width*(y+dy)];
if ( val2 < 0 ) val = 0;
}
}
image->data[x+image->width*y] = val;
}
}
}
|
