Bibliothèque de traitements d'images en virgule flottante.
http://la.buvette.org/photos/cumul/
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
181 lines
4.3 KiB
181 lines
4.3 KiB
/* |
|
* FLOATIMG |
|
* distorsions géométriques - coredumping ? |
|
*/ |
|
|
|
#include <stdio.h> |
|
#include <stdlib.h> |
|
#include <stdint.h> |
|
#include <string.h> |
|
|
|
#include "../floatimg.h" |
|
|
|
extern int verbosity; |
|
|
|
/* --------------------------------------------------------------------- */ |
|
/* |
|
* really crude function, need more work... |
|
*/ |
|
int fimg_halfsize_0(FloatImg *src, FloatImg *dst, int notused) |
|
{ |
|
int wd, hd; |
|
int foo, x, y; |
|
float pixel[3]; |
|
|
|
#if DEBUG_LEVEL |
|
fprintf(stderr, ">>> %s ( %p %p %d )\n", __func__, |
|
src, dst, notused); |
|
#endif |
|
|
|
/* no magic check here ? */ |
|
if (dst->width || dst->height) { |
|
fprintf(stderr, "*** %s: image at %p not empty\n", __func__, dst); |
|
fimg_describe(dst, "destination halfsize 0"); |
|
return -2; |
|
} |
|
|
|
wd = src->width / 2; hd = src->height / 2; |
|
foo = fimg_create(dst, wd, hd, FIMG_TYPE_RGB); |
|
if (foo) { |
|
fprintf(stderr, "%s: err create %d\n", __func__, foo); |
|
return -3; |
|
} |
|
|
|
for (y=0; y<hd; y++) { |
|
for (x=0; x<wd; x++) { |
|
foo = fimg_get_rgb(src, x*2, y*2, pixel); |
|
if (foo) { |
|
fprintf(stderr, "%s: err get %d\n", __func__, foo); |
|
abort(); |
|
} |
|
foo = fimg_plot_rgb(dst, x, y, pixel[0], pixel[1], pixel[2]); |
|
if (foo) { |
|
fprintf(stderr, "%s: err plot %d\n", __func__, foo); |
|
abort(); |
|
} |
|
} |
|
|
|
} |
|
return 0; |
|
} |
|
/* --------------------------------------------------------------------- */ |
|
int fimg_halfsize_1(FloatImg *src, FloatImg *dst, int notused) |
|
{ |
|
int wd, hd; |
|
int foo, x, y, x2, y2; |
|
float ac; |
|
|
|
if (dst->width || dst->height) { |
|
fprintf(stderr, "*** %s: image at %p not empty\n", __func__, dst); |
|
fimg_describe(dst, "destination halfsize 1"); |
|
return -2; |
|
} |
|
|
|
wd = src->width / 2; hd = src->height / 2; |
|
if ( (foo = fimg_create(dst, wd, hd, FIMG_TYPE_RGB)) ) { |
|
fprintf(stderr, "%s: err create %d\n", __func__, foo); |
|
return -3; |
|
} |
|
|
|
#define WS (src->width) |
|
#define WD (dst->width) |
|
|
|
for (y=0; y<hd; y++) { |
|
y2 = y * 2; |
|
for (x=0; x<wd; x++) { |
|
x2 = x * 2; |
|
|
|
ac = src->R[(y2*WS)+x2] + src->R[(y2*WS)+x2+1] + |
|
src->R[((1+y2)*WS)+x2] + src->R[((1+y2)*WS)+x2+1]; |
|
dst->R[y*WD +x] = ac / 4.0; |
|
|
|
ac = src->G[(y2*WS)+x2] + src->G[(y2*WS)+x2+1] + |
|
src->G[((1+y2)*WS)+x2] + src->G[((1+y2)*WS)+x2+1]; |
|
dst->G[y*WD +x] = ac / 4.0; |
|
|
|
ac = src->B[(y2*WS)+x2] + src->B[(y2*WS)+x2+1] + |
|
src->B[((1+y2)*WS)+x2] + src->B[((1+y2)*WS)+x2+1]; |
|
dst->B[y*WD +x] = ac / 4.0; |
|
|
|
} |
|
} |
|
|
|
#undef WS |
|
#undef WD |
|
|
|
return 0; |
|
} |
|
/* --------------------------------------------------------------------- */ |
|
int fimg_extractor(FloatImg *in, FloatImg *out, FimgArea51 *rect) |
|
{ |
|
int foo; |
|
int xs, ys, xd, yd; |
|
int count; |
|
float rgb[3]; |
|
|
|
if (verbosity > 1) { |
|
fimg_describe(in, "extractor: source"); |
|
fimg_describe(out, "extractor: destination"); |
|
// print_rectangle(rect); |
|
} |
|
|
|
count = 0; |
|
for (yd=0; yd<rect->h; yd++) { |
|
ys = yd + rect->y; |
|
if ((ys<0) || (ys>=in->height)) continue; |
|
for (xd=0; xd<rect->w; xd++) { |
|
xs = xd + rect->x; |
|
if ((xs<0) || (xs>=in->width)) continue; |
|
fimg_get_rgb(in, xs, ys, rgb); |
|
fimg_put_rgb(out, xd, yd, rgb); |
|
count++; |
|
} |
|
} |
|
|
|
// fprintf(stderr, "%s: %d pix moved\n", __func__, count); |
|
|
|
return 0; |
|
} |
|
/* --------------------------------------------------------------------- */ |
|
/* ho, btw, you can have a locck at 'incrustator.c' :) */ |
|
/* --------------------------------------------------------------------- */ |
|
int fimg_mirror(FloatImg *src, FloatImg *dst, int notused) |
|
{ |
|
float *fptr; |
|
int line, col, offl; |
|
|
|
#if DEBUG_LEVEL |
|
fprintf(stderr, ">>> %s ( %p %p 0x%04x )\n", __func__, |
|
src, dst, notused); |
|
#endif |
|
|
|
if (fimg_images_not_compatible(src, dst)) { |
|
fprintf(stderr, "bad karma in %s\n", __func__); |
|
return -9; |
|
} |
|
|
|
if (NULL == (fptr=alloca(src->width*sizeof(float)))) { |
|
fprintf(stderr, "%s: no mem available\n", __func__); |
|
#if MUST_ABORT |
|
abort(); |
|
#endif |
|
return -11; |
|
} |
|
|
|
for (line=0; line<src->height; line++) { |
|
offl = line * src->width; |
|
for (col=0; col<src->width; col++) |
|
fptr[(src->width-1) - col] = src->R[offl+col]; |
|
memcpy(dst->R+offl, fptr, src->width*sizeof(float)); |
|
for (col=0; col<src->width; col++) |
|
fptr[(src->width-1) - col] = src->G[offl+col]; |
|
memcpy(dst->G+offl, fptr, src->width*sizeof(float)); |
|
for (col=0; col<src->width; col++) |
|
fptr[(src->width-1) - col] = src->B[offl+col]; |
|
memcpy(dst->B+offl, fptr, src->width*sizeof(float)); |
|
} |
|
|
|
return 0; |
|
} |
|
/* --------------------------------------------------------------------- */ |
|
|
|
|