diff options
author | scuri <scuri> | 2009-08-20 12:35:06 +0000 |
---|---|---|
committer | scuri <scuri> | 2009-08-20 12:35:06 +0000 |
commit | 5d735255ddd3cb2f547abd3d03969af3fb7eb04e (patch) | |
tree | 8fb66510bc625bb1b08ccb41f1b83fb0f7cb8f19 /src/fftw3/api/mapflags.c | |
parent | 35733b87eed86e5228f12fa10c98a3d9d22a6073 (diff) |
*** empty log message ***
Diffstat (limited to 'src/fftw3/api/mapflags.c')
-rw-r--r-- | src/fftw3/api/mapflags.c | 115 |
1 files changed, 0 insertions, 115 deletions
diff --git a/src/fftw3/api/mapflags.c b/src/fftw3/api/mapflags.c deleted file mode 100644 index abb4e6b..0000000 --- a/src/fftw3/api/mapflags.c +++ /dev/null @@ -1,115 +0,0 @@ -/* - * Copyright (c) 2003 Matteo Frigo - * Copyright (c) 2003 Massachusetts Institute of Technology - * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA - * - */ - -#include "api.h" - -/* a flag operation: x is either a flag, in which case xm == 0, or - a mask, in which case xm == x; using this we can compactly code - the various bit operations via (flags & x) ^ xm or (flags | x) ^ xm. */ -typedef struct { - unsigned x, xm; -} flagmask; - -typedef struct { - flagmask flag; - flagmask op; -} flagop; - -#define FLAGP(f, msk)(((f) & (msk).x) ^ (msk).xm) -#define OP(f, msk)(((f) | (msk).x) ^ (msk).xm) - -#define YES(x) {x, 0} -#define NO(x) {x, x} -#define IMPLIES(predicate, consequence) { predicate, consequence } -#define EQV(a, b) IMPLIES(YES(a), YES(b)), IMPLIES(NO(a), NO(b)) -#define NEQV(a, b) IMPLIES(YES(a), NO(b)), IMPLIES(NO(a), YES(b)) - -static void map_flags(unsigned *iflags, unsigned *oflags, - const flagop flagmap[], int nmap) -{ - int i; - for (i = 0; i < nmap; ++i) - if (FLAGP(*iflags, flagmap[i].flag)) - *oflags = OP(*oflags, flagmap[i].op); -} - -#define NELEM(array)(sizeof(array) / sizeof((array)[0])) - -void X(mapflags)(planner *plnr, unsigned flags) -{ - unsigned tmpflags; - - /* map of api flags -> api flags, to implement consistency rules - and combination flags */ - const flagop self_flagmap[] = { - /* in some cases (notably for halfcomplex->real transforms), - DESTROY_INPUT is the default, so we need to support - an inverse flag to disable it: */ - IMPLIES(YES(FFTW_PRESERVE_INPUT), NO(FFTW_DESTROY_INPUT)), - - IMPLIES(YES(FFTW_EXHAUSTIVE), YES(FFTW_PATIENT)), - - IMPLIES(YES(FFTW_ESTIMATE), NO(FFTW_PATIENT)), - IMPLIES(YES(FFTW_ESTIMATE), - YES(FFTW_ESTIMATE_PATIENT | FFTW_NO_INDIRECT_OP)), - - /* a canonical set of fftw2-like impatience flags */ - IMPLIES(NO(FFTW_PATIENT), - YES(FFTW_NO_VRECURSE - | FFTW_NO_RANK_SPLITS - | FFTW_NO_VRANK_SPLITS - | FFTW_NONTHREADED_ICKY - | FFTW_DFT_R2HC_ICKY - | FFTW_BELIEVE_PCOST)) - }; - - /* map of (processed) api flags to internal problem/planner flags */ - const flagop problem_flagmap[] = { - EQV(FFTW_DESTROY_INPUT, DESTROY_INPUT), - EQV(FFTW_NO_SIMD, NO_SIMD), - EQV(FFTW_CONSERVE_MEMORY, CONSERVE_MEMORY) - }; - const flagop planner_flagmap[] = { - NEQV(FFTW_EXHAUSTIVE, NO_EXHAUSTIVE), - - /* the following are undocumented, "beyond-guru" flags that - require some understanding of FFTW internals */ - EQV(FFTW_ESTIMATE_PATIENT, ESTIMATE), - EQV(FFTW_BELIEVE_PCOST, BELIEVE_PCOST), - EQV(FFTW_DFT_R2HC_ICKY, DFT_R2HC_ICKY), - EQV(FFTW_NONTHREADED_ICKY, NONTHREADED_ICKY), - EQV(FFTW_NO_BUFFERING, NO_BUFFERING), - EQV(FFTW_NO_INDIRECT_OP, NO_INDIRECT_OP), - NEQV(FFTW_ALLOW_LARGE_GENERIC, NO_LARGE_GENERIC), - EQV(FFTW_NO_RANK_SPLITS, NO_RANK_SPLITS), - EQV(FFTW_NO_VRANK_SPLITS, NO_VRANK_SPLITS), - EQV(FFTW_NO_VRECURSE, NO_VRECURSE) - }; - - map_flags(&flags, &flags, self_flagmap, NELEM(self_flagmap)); - - tmpflags = 0; - map_flags(&flags, &tmpflags, problem_flagmap, NELEM(problem_flagmap)); - plnr->problem_flags = tmpflags; - - tmpflags = 0; - map_flags(&flags, &tmpflags, planner_flagmap, NELEM(planner_flagmap)); - plnr->planner_flags = tmpflags; -} |