LXR linux/lib/ts

   1/*
   2 * lib/ts_fsm.c    A naive finite state machine text search approach
   3 *
   4 *              This program is free software; you can redistribute it and/or
   5 *              modify it under the terms of the GNU General Public License
   6 *              as published by the Free Software Foundation; either version
   7 *              2 of the License, or (at your option) any later version.
   8 *
   9 * Authors:     Thomas Graf <tgraf@suug.ch>
  10 *
  11 * ==========================================================================
  12 *
  13 *   A finite state machine consists of n states (struct ts_fsm_token)
  14 *   representing the pattern as a finite automation. The data is read
  15 *   sequentially on an octet basis. Every state token specifies the number
  16 *   of recurrences and the type of value accepted which can be either a
  17 *   specific character or ctype based set of characters. The available
  18 *   type of recurrences include 1, (0|1), [0 n], and [1 n].
  19 *
  20 *   The algorithm differs between strict/non-strict mode specifying
  21 *   whether the pattern has to start at the first octet. Strict mode
  22 *   is enabled by default and can be disabled by inserting
  23 *   TS_FSM_HEAD_IGNORE as the first token in the chain.
  24 *
  25 *   The runtime performance of the algorithm should be around O(n),
  26 *   however while in strict mode the average runtime can be better.
  27 */
  28
  29#include <linux/module.h>
  30#include <linux/types.h>
  31#include <linux/string.h>
  32#include <linux/ctype.h>
  33#include <linux/textsearch.h>
  34#include <linux/textsearch_fsm.h>
  35
  36struct ts_fsm
  37{
  38        unsigned int            ntokens;
  39        struct ts_fsm_token     tokens[0];
  40};
  41
  42/* other values derived from ctype.h */
  43#define _A              0x100 /* ascii */
  44#define _W              0x200 /* wildcard */
  45
  46/* Map to _ctype flags and some magic numbers */
  47static const u16 token_map[TS_FSM_TYPE_MAX+1] = {
  48        [TS_FSM_SPECIFIC] = 0,
  49        [TS_FSM_WILDCARD] = _W,
  50        [TS_FSM_CNTRL]    = _C,
  51        [TS_FSM_LOWER]    = _L,
  52        [TS_FSM_UPPER]    = _U,
  53        [TS_FSM_PUNCT]    = _P,
  54        [TS_FSM_SPACE]    = _S,
  55        [TS_FSM_DIGIT]    = _D,
  56        [TS_FSM_XDIGIT]   = _D | _X,
  57        [TS_FSM_ALPHA]    = _U | _L,
  58        [TS_FSM_ALNUM]    = _U | _L | _D,
  59        [TS_FSM_PRINT]    = _P | _U | _L | _D | _SP,
  60        [TS_FSM_GRAPH]    = _P | _U | _L | _D,
  61        [TS_FSM_ASCII]    = _A,
  62};
  63
  64static const u16 token_lookup_tbl[256] = {
  65_W|_A|_C,      _W|_A|_C,     _W|_A|_C,     _W|_A|_C,            /*   0-  3 */
  66_W|_A|_C,      _W|_A|_C,     _W|_A|_C,     _W|_A|_C,            /*   4-  7 */
  67_W|_A|_C,      _W|_A|_C|_S,  _W|_A|_C|_S,  _W|_A|_C|_S,         /*   8- 11 */
  68_W|_A|_C|_S,   _W|_A|_C|_S,  _W|_A|_C,     _W|_A|_C,            /*  12- 15 */
  69_W|_A|_C,      _W|_A|_C,     _W|_A|_C,     _W|_A|_C,            /*  16- 19 */
  70_W|_A|_C,      _W|_A|_C,     _W|_A|_C,     _W|_A|_C,            /*  20- 23 */
  71_W|_A|_C,      _W|_A|_C,     _W|_A|_C,     _W|_A|_C,            /*  24- 27 */
  72_W|_A|_C,      _W|_A|_C,     _W|_A|_C,     _W|_A|_C,            /*  28- 31 */
  73_W|_A|_S|_SP,  _W|_A|_P,     _W|_A|_P,     _W|_A|_P,            /*  32- 35 */
  74_W|_A|_P,      _W|_A|_P,     _W|_A|_P,     _W|_A|_P,            /*  36- 39 */
  75_W|_A|_P,      _W|_A|_P,     _W|_A|_P,     _W|_A|_P,            /*  40- 43 */
  76_W|_A|_P,      _W|_A|_P,     _W|_A|_P,     _W|_A|_P,            /*  44- 47 */
  77_W|_A|_D,      _W|_A|_D,     _W|_A|_D,     _W|_A|_D,            /*  48- 51 */
  78_W|_A|_D,      _W|_A|_D,     _W|_A|_D,     _W|_A|_D,            /*  52- 55 */
  79_W|_A|_D,      _W|_A|_D,     _W|_A|_P,     _W|_A|_P,            /*  56- 59 */
  80_W|_A|_P,      _W|_A|_P,     _W|_A|_P,     _W|_A|_P,            /*  60- 63 */
  81_W|_A|_P,      _W|_A|_U|_X,  _W|_A|_U|_X,  _W|_A|_U|_X,         /*  64- 67 */
  82_W|_A|_U|_X,   _W|_A|_U|_X,  _W|_A|_U|_X,  _W|_A|_U,            /*  68- 71 */
  83_W|_A|_U,      _W|_A|_U,     _W|_A|_U,     _W|_A|_U,            /*  72- 75 */
  84_W|_A|_U,      _W|_A|_U,     _W|_A|_U,     _W|_A|_U,            /*  76- 79 */
  85_W|_A|_U,      _W|_A|_U,     _W|_A|_U,     _W|_A|_U,            /*  80- 83 */
  86_W|_A|_U,      _W|_A|_U,     _W|_A|_U,     _W|_A|_U,            /*  84- 87 */
  87_W|_A|_U,      _W|_A|_U,     _W|_A|_U,     _W|_A|_P,            /*  88- 91 */
  88_W|_A|_P,      _W|_A|_P,     _W|_A|_P,     _W|_A|_P,            /*  92- 95 */
  89_W|_A|_P,      _W|_A|_L|_X,  _W|_A|_L|_X,  _W|_A|_L|_X,         /*  96- 99 */
  90_W|_A|_L|_X,   _W|_A|_L|_X,  _W|_A|_L|_X,  _W|_A|_L,            /* 100-103 */
  91_W|_A|_L,      _W|_A|_L,     _W|_A|_L,     _W|_A|_L,            /* 104-107 */
  92_W|_A|_L,      _W|_A|_L,     _W|_A|_L,     _W|_A|_L,            /* 108-111 */
  93_W|_A|_L,      _W|_A|_L,     _W|_A|_L,     _W|_A|_L,            /* 112-115 */
  94_W|_A|_L,      _W|_A|_L,     _W|_A|_L,     _W|_A|_L,            /* 116-119 */
  95_W|_A|_L,      _W|_A|_L,     _W|_A|_L,     _W|_A|_P,            /* 120-123 */
  96_W|_A|_P,      _W|_A|_P,     _W|_A|_P,     _W|_A|_C,            /* 124-127 */
  97_W,            _W,           _W,           _W,                  /* 128-131 */
  98_W,            _W,           _W,           _W,                  /* 132-135 */
  99_W,            _W,           _W,           _W,                  /* 136-139 */
 100_W,            _W,           _W,           _W,                  /* 140-143 */
 101_W,            _W,           _W,           _W,                  /* 144-147 */
 102_W,            _W,           _W,           _W,                  /* 148-151 */
 103_W,            _W,           _W,           _W,                  /* 152-155 */
 104_W,            _W,           _W,           _W,                  /* 156-159 */
 105_W|_S|_SP,     _W|_P,        _W|_P,        _W|_P,               /* 160-163 */
 106_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 164-167 */
 107_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 168-171 */
 108_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 172-175 */
 109_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 176-179 */
 110_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 180-183 */
 111_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 184-187 */
 112_W|_P,         _W|_P,        _W|_P,        _W|_P,               /* 188-191 */
 113_W|_U,         _W|_U,        _W|_U,        _W|_U,               /* 192-195 */
 114_W|_U,         _W|_U,        _W|_U,        _W|_U,               /* 196-199 */
 115_W|_U,         _W|_U,        _W|_U,        _W|_U,               /* 200-203 */
 116_W|_U,         _W|_U,        _W|_U,        _W|_U,               /* 204-207 */
 117_W|_U,         _W|_U,        _W|_U,        _W|_U,               /* 208-211 */
 118_W|_U,         _W|_U,        _W|_U,        _W|_P,               /* 212-215 */
 119_W|_U,         _W|_U,        _W|_U,        _W|_U,               /* 216-219 */
 120_W|_U,         _W|_U,        _W|_U,        _W|_L,               /* 220-223 */
 121_W|_L,         _W|_L,        _W|_L,        _W|_L,               /* 224-227 */
 122_W|_L,         _W|_L,        _W|_L,        _W|_L,               /* 228-231 */
 123_W|_L,         _W|_L,        _W|_L,        _W|_L,               /* 232-235 */
 124_W|_L,         _W|_L,        _W|_L,        _W|_L,               /* 236-239 */
 125_W|_L,         _W|_L,        _W|_L,        _W|_L,               /* 240-243 */
 126_W|_L,         _W|_L,        _W|_L,        _W|_P,               /* 244-247 */
 127_W|_L,         _W|_L,        _W|_L,        _W|_L,               /* 248-251 */
 128_W|_L,         _W|_L,        _W|_L,        _W|_L};              /* 252-255 */
 129
 130static inline int match_token(struct ts_fsm_token *t, u8 d)
 131{
 132        if (t->type)
 133                return (token_lookup_tbl[d] & t->type) != 0;
 134        else
 135                return t->value == d;
 136}
 137
 138static unsigned int fsm_find(struct ts_config *conf, struct ts_state *state)
 139{
 140        struct ts_fsm *fsm = ts_config_priv(conf);
 141        struct ts_fsm_token *cur = NULL, *next;
 142        unsigned int match_start, block_idx = 0, tok_idx;
 143        unsigned block_len = 0, strict, consumed = state->offset;
 144        const u8 *data;
 145
 146#define GET_NEXT_BLOCK()                \
 147({      consumed += block_idx;          \
 148        block_idx = 0;                  \
 149        block_len = conf->get_next_block(consumed, &data, conf, state); })
 150
 151#define TOKEN_MISMATCH()                \
 152        do {                            \
 153                if (strict)             \
 154                        goto no_match;  \
 155                block_idx++;            \
 156                goto startover;         \
 157        } while(0)
 158
 159#define end_of_data() unlikely(block_idx >= block_len && !GET_NEXT_BLOCK())
 160
 161        if (end_of_data())
 162                goto no_match;
 163
 164        strict = fsm->tokens[0].recur != TS_FSM_HEAD_IGNORE;
 165
 166startover:
 167        match_start = consumed + block_idx;
 168
 169        for (tok_idx = 0; tok_idx < fsm->ntokens; tok_idx++) {
 170                cur = &fsm->tokens[tok_idx];
 171
 172                if (likely(tok_idx < (fsm->ntokens - 1)))
 173                        next = &fsm->tokens[tok_idx + 1];
 174                else
 175                        next = NULL;
 176
 177                switch (cur->recur) {
 178                case TS_FSM_SINGLE:
 179                        if (end_of_data())
 180                                goto no_match;
 181
 182                        if (!match_token(cur, data[block_idx]))
 183                                TOKEN_MISMATCH();
 184                        break;
 185
 186                case TS_FSM_PERHAPS:
 187                        if (end_of_data() ||
 188                            !match_token(cur, data[block_idx]))
 189                                continue;
 190                        break;
 191
 192                case TS_FSM_MULTI:
 193                        if (end_of_data())
 194                                goto no_match;
 195
 196                        if (!match_token(cur, data[block_idx]))
 197                                TOKEN_MISMATCH();
 198
 199                        block_idx++;
 200                        /* fall through */
 201
 202                case TS_FSM_ANY:
 203                        if (next == NULL)
 204                                goto found_match;
 205
 206                        if (end_of_data())
 207                                continue;
 208
 209                        while (!match_token(next, data[block_idx])) {
 210                                if (!match_token(cur, data[block_idx]))
 211                                        TOKEN_MISMATCH();
 212                                block_idx++;
 213                                if (end_of_data())
 214                                        goto no_match;
 215                        }
 216                        continue;
 217
 218                /*
 219                 * Optimization: Prefer small local loop over jumping
 220                 * back and forth until garbage at head is munched.
 221                 */
 222                case TS_FSM_HEAD_IGNORE:
 223                        if (end_of_data())
 224                                continue;
 225
 226                        while (!match_token(next, data[block_idx])) {
 227                                /*
 228                                 * Special case, don't start over upon
 229                                 * a mismatch, give the user the
 230                                 * chance to specify the type of data
 231                                 * allowed to be ignored.
 232                                 */
 233                                if (!match_token(cur, data[block_idx]))
 234                                        goto no_match;
 235
 236                                block_idx++;
 237                                if (end_of_data())
 238                                        goto no_match;
 239                        }
 240
 241                        match_start = consumed + block_idx;
 242                        continue;
 243                }
 244
 245                block_idx++;
 246        }
 247
 248        if (end_of_data())
 249                goto found_match;
 250
 251no_match:
 252        return UINT_MAX;
 253
 254found_match:
 255        state->offset = consumed + block_idx;
 256        return match_start;
 257}
 258
 259static struct ts_config *fsm_init(const void *pattern, unsigned int len,
 260                                     gfp_t gfp_mask)
 261{
 262        int i, err = -EINVAL;
 263        struct ts_config *conf;
 264        struct ts_fsm *fsm;
 265        struct ts_fsm_token *tokens = (struct ts_fsm_token *) pattern;
 266        unsigned int ntokens = len / sizeof(*tokens);
 267        size_t priv_size = sizeof(*fsm) + len;
 268
 269        if (len  % sizeof(struct ts_fsm_token) || ntokens < 1)
 270                goto errout;
 271
 272        for (i = 0; i < ntokens; i++) {
 273                struct ts_fsm_token *t = &tokens[i];
 274
 275                if (t->type > TS_FSM_TYPE_MAX || t->recur > TS_FSM_RECUR_MAX)
 276                        goto errout;
 277
 278                if (t->recur == TS_FSM_HEAD_IGNORE &&
 279                    (i != 0 || i == (ntokens - 1)))
 280                        goto errout;
 281        }
 282
 283        conf = alloc_ts_config(priv_size, gfp_mask);
 284        if (IS_ERR(conf))
 285                return conf;
 286
 287        fsm = ts_config_priv(conf);
 288        fsm->ntokens = ntokens;
 289        memcpy(fsm->tokens, pattern, len);
 290
 291        for (i = 0; i < fsm->ntokens; i++) {
 292                struct ts_fsm_token *t = &fsm->tokens[i];
 293                t->type = token_map[t->type];
 294        }
 295
 296        return conf;
 297
 298errout:
 299        return ERR_PTR(err);
 300}
 301
 302static void *fsm_get_pattern(struct ts_config *conf)
 303{
 304        struct ts_fsm *fsm = ts_config_priv(conf);
 305        return fsm->tokens;
 306}
 307
 308static unsigned int fsm_get_pattern_len(struct ts_config *conf)
 309{
 310        struct ts_fsm *fsm = ts_config_priv(conf);
 311        return fsm->ntokens * sizeof(struct ts_fsm_token);
 312}
 313
 314static struct ts_ops fsm_ops = {
 315        .name             = "fsm",
 316        .find             = fsm_find,
 317        .init             = fsm_init,
 318        .get_pattern      = fsm_get_pattern,
 319        .get_pattern_len  = fsm_get_pattern_len,
 320        .owner            = THIS_MODULE,
 321        .list             = LIST_HEAD_INIT(fsm_ops.list)
 322};
 323
 324static int __init init_fsm(void)
 325{
 326        return textsearch_register(&fsm_ops);
 327}
 328
 329static void __exit exit_fsm(void)
 330{
 331        textsearch_unregister(&fsm_ops);
 332}
 333
 334MODULE_LICENSE("GPL");
 335
 336module_init(init_fsm);
 337module_exit(exit_fsm);
 338