lex.functions.c

Go to the documentation of this file.

void my_init_extra(yyscan_t backup_scanner, YY_EXTRA_TYPE user_defined, yyscan_t scanner)
{
        *((struct yyguts_t *) scanner) = *((struct yyguts_t *) backup_scanner);
        yyset_extra(user_defined, scanner);

}

inline void my_switch_to_buffer(YY_BUFFER_STATE new_buffer, yyscan_t yyscanner)
{
        static struct yy_buffer_state *buffer_stack;
        struct yyguts_t *yyg = (struct yyguts_t *)yyscanner;

        yyg->yy_buffer_stack = &buffer_stack;

        YY_CURRENT_BUFFER_LVALUE = new_buffer;
        yy_load_buffer_state(yyscanner);
}

inline char YY_GET_EOF_CHAR()
{
    return YY_END_OF_BUFFER_CHAR;
}

inline YY_BUFFER_STATE my_scan_buffer(char *base, yy_size_t size, yyscan_t yyscanner)
{
        static struct yy_buffer_state b;

        if (size < 2 || base[size - 2] != YY_END_OF_BUFFER_CHAR || base[size - 1] != YY_END_OF_BUFFER_CHAR)
                /* They forgot to leave room for the EOB's. */
                return 0;

        b.yy_buf_size = size - 2;                               /* "- 2" to take care of EOB's */
        b.yy_buf_pos = b.yy_ch_buf = base;
        b.yy_is_our_buffer = 0;
        b.yy_input_file = 0;
        b.yy_n_chars = b.yy_buf_size;
        b.yy_is_interactive = 0;
        b.yy_at_bol = 1;
        b.yy_fill_buffer = 0;
        b.yy_buffer_status = YY_BUFFER_NEW;

        my_switch_to_buffer(&b, yyscanner);

        return &b;
}

YY_BUFFER_STATE my_scan_bytes(yyconst char *yybytes, yy_size_t _yybytes_len, yyscan_t yyscanner)
{
        YY_BUFFER_STATE b;
        char   *buf;
        yy_size_t n;

        /* Get memory for full buffer, including space for trailing EOB's. */
        n = _yybytes_len + 2;
        buf = (char *)yyalloc(n, yyscanner);
        if (!buf)
                YY_FATAL_ERROR("out of dynamic memory in yy_scan_bytes()");

        strncpy(buf, yybytes, _yybytes_len);

        buf[_yybytes_len] = buf[_yybytes_len + 1] = YY_END_OF_BUFFER_CHAR;

        b = my_scan_buffer(buf, n, yyscanner);
        if (!b)
                YY_FATAL_ERROR("bad buffer in yy_scan_bytes()");

        /* It's okay to grow etc. this buffer, and we should throw it
         * away when we're done.
         */
        b->yy_is_our_buffer = 1;

        return b;
}

void my_delete_buffer(YY_BUFFER_STATE b, yyscan_t yyscanner)
{
        struct yyguts_t *yyg = (struct yyguts_t *)yyscanner;

        if (!b)
                return;

        if (b == YY_CURRENT_BUFFER)                             /* Not sure if we should pop here. */
                YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;

        if (b->yy_is_our_buffer)
                yyfree((void *)b->yy_ch_buf, yyscanner);
}