184 lines
4.0 KiB
C
184 lines
4.0 KiB
C
/*
|
|
* contrast.c - part of libfloatimg
|
|
* --------------------------------
|
|
*
|
|
* you can see some use in 'tools/fimgfx.c', so you can thing
|
|
* about the 'maxval' parameter. It was touchy :)
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <stdint.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
#include <math.h>
|
|
|
|
#include "../floatimg.h"
|
|
|
|
extern int verbosity;
|
|
|
|
/* ---------------------------------------------------------------- */
|
|
int fimg_id_contraste(char *str)
|
|
{
|
|
|
|
if (!strcmp(str, "none")) return CONTRAST_NONE;
|
|
if (!strcmp(str, "sqrt")) return CONTRAST_SQRT;
|
|
if (!strcmp(str, "pow2")) return CONTRAST_POW2;
|
|
if (!strcmp(str, "cos01")) return CONTRAST_COS01;
|
|
if (!strcmp(str, "cos010")) return CONTRAST_COS010;
|
|
if (!strcmp(str, "xper")) return CONTRAST_XPER;
|
|
|
|
#if DEBUG_LEVEL
|
|
fprintf(stderr, "%s: unknow contrast name '%s'\n", __func__, str);
|
|
#endif
|
|
|
|
return -1;
|
|
}
|
|
/* ---------------------------------------------------------------- */
|
|
/*
|
|
* if the second parameter is NULL, operate 'in-place'
|
|
*/
|
|
int fimg_square_root(FloatImg *s, FloatImg *d, double maxval)
|
|
{
|
|
int nbre, idx;
|
|
double dval;
|
|
|
|
if (s->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s: type %d invalide\n",
|
|
__func__, s->type);
|
|
return -4;
|
|
}
|
|
|
|
if (NULL==d) { d = s; }
|
|
else {
|
|
if (d->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s: dst type %d invalide\n",
|
|
__func__, d->type);
|
|
return -4;
|
|
}
|
|
}
|
|
|
|
nbre = s->width * s->height;
|
|
|
|
for (idx=0; idx<nbre; idx++) {
|
|
dval = s->R[idx] / maxval;
|
|
d->R[idx] = maxval * sqrt(dval);
|
|
dval = s->G[idx] / maxval;
|
|
d->G[idx] = maxval * sqrt(dval);
|
|
dval = s->B[idx] / maxval;
|
|
d->B[idx] = maxval * sqrt(dval);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
/* ---------------------------------------------------------------- */
|
|
int fimg_power_2(FloatImg *s, FloatImg *d, double maxval)
|
|
{
|
|
int nbre, idx;
|
|
double dval;
|
|
|
|
if (s->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s: src type %d invalide\n",
|
|
__func__, s->type);
|
|
return -4;
|
|
}
|
|
|
|
if (NULL==d) { d = s; }
|
|
else {
|
|
if (d->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s: dst type %d invalide\n",
|
|
__func__, d->type);
|
|
return -4;
|
|
}
|
|
}
|
|
|
|
nbre = s->width * s->height;
|
|
|
|
for (idx=0; idx<nbre; idx++) {
|
|
dval = s->R[idx] / maxval;
|
|
d->R[idx] = maxval * dval * dval;
|
|
dval = s->G[idx] / maxval;
|
|
d->G[idx] = maxval * dval * dval;
|
|
dval = s->B[idx] / maxval;
|
|
d->B[idx] = maxval * dval * dval;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
/* ---------------------------------------------------------------- */
|
|
/*
|
|
#macro Cos_01( X )
|
|
(0.5-0.5*cos( 3.141592654 * X))
|
|
#end
|
|
*/
|
|
int fimg_cos_01(FloatImg *s, FloatImg *d, double maxval)
|
|
{
|
|
int nbre, idx;
|
|
double dval;
|
|
|
|
if (s->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s: type %d invalide\n",
|
|
__func__, s->type);
|
|
return -4;
|
|
}
|
|
|
|
if (NULL==d) { d = s; }
|
|
else {
|
|
if (d->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s: dst type %d invalide\n",
|
|
__func__, d->type);
|
|
return -4;
|
|
}
|
|
}
|
|
|
|
nbre = s->width * s->height;
|
|
|
|
for (idx=0; idx<nbre; idx++) {
|
|
dval = s->R[idx] / maxval;
|
|
d->R[idx] = maxval * (0.5 - 0.5 * cos(3.141592654*dval));
|
|
dval = s->G[idx] / maxval;
|
|
d->G[idx] = maxval * (0.5 - 0.5 * cos(3.141592654*dval));
|
|
dval = s->B[idx] / maxval;
|
|
d->B[idx] = maxval * (0.5 - 0.5 * cos(3.141592654*dval));
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
/* ---------------------------------------------------------------- */
|
|
int fimg_cos_010(FloatImg *s, FloatImg *d, double maxval)
|
|
{
|
|
int nbre, idx;
|
|
double dval;
|
|
|
|
if (s->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s : type %d invalide\n",
|
|
__func__, s->type);
|
|
return -4;
|
|
}
|
|
|
|
if (NULL==d) { d = s; }
|
|
else {
|
|
if (d->type != FIMG_TYPE_RGB) {
|
|
fprintf(stderr, "%s : dst type %d invalide\n",
|
|
__func__, d->type);
|
|
return -4;
|
|
}
|
|
}
|
|
|
|
nbre = s->width * s->height;
|
|
|
|
for (idx=0; idx<nbre; idx++) {
|
|
dval = s->R[idx] / maxval;
|
|
d->R[idx] = maxval * (0.5 - 0.5 * cos(2*3.141592654*dval));
|
|
dval = s->G[idx] / maxval;
|
|
d->G[idx] = maxval * (0.5 - 0.5 * cos(2*3.141592654*dval));
|
|
dval = s->B[idx] / maxval;
|
|
d->B[idx] = maxval * (0.5 - 0.5 * cos(2*3.141592654*dval));
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* ---------------------------------------------------------------- */
|
|
|