/src/cpython/Parser/tokenizer/helpers.c

Source
#include "Python.h"
#include "errcode.h"
#include "pycore_runtime.h"       // _Py_ID()
#include "pycore_token.h"
#include "pycore_tuple.h"         // _PyTuple_FromPair

#include "../lexer/state.h"


/* ############## ERRORS ############## */

static int
_syntaxerror_range(struct tok_state *tok, const char *format,
                   int col_offset, int end_col_offset,
                   va_list vargs)
{
    // In release builds, we don't want to overwrite a previous error, but in debug builds we
    // want to fail if we are not doing it so we can fix it.
    assert(tok->done != E_ERROR);
    if (tok->done == E_ERROR) {
        return ERRORTOKEN;
    }
    PyObject *errmsg, *errtext, *args;
    errmsg = PyUnicode_FromFormatV(format, vargs);
    if (!errmsg) {
        goto error;
    }

    errtext = PyUnicode_DecodeUTF8(tok->line_start, tok->cur - tok->line_start,
                                   "replace");
    if (!errtext) {
        goto error;
    }

    if (col_offset == -1) {
        col_offset = (int)PyUnicode_GET_LENGTH(errtext);
    }
    if (end_col_offset == -1) {
        end_col_offset = col_offset;
    }

    Py_ssize_t line_len = strcspn(tok->line_start, "\n");
    if (line_len != tok->cur - tok->line_start) {
        Py_DECREF(errtext);
        errtext = PyUnicode_DecodeUTF8(tok->line_start, line_len,
                                       "replace");
    }
    if (!errtext) {
        goto error;
    }

    args = Py_BuildValue("(O(OiiNii))", errmsg,
                         tok->filename ? tok->filename : Py_None,
                         tok->lineno, col_offset, errtext,
                         tok->lineno, end_col_offset);
    if (args) {
        PyErr_SetObject(PyExc_SyntaxError, args);
        Py_DECREF(args);
    }

error:
    Py_XDECREF(errmsg);
    tok->done = E_ERROR;
    return ERRORTOKEN;
}

int
_PyTokenizer_syntaxerror(struct tok_state *tok, const char *format, ...)
{
    // These errors are cleaned on startup. Todo: Fix it.
    va_list vargs;
    va_start(vargs, format);
    int ret = _syntaxerror_range(tok, format, -1, -1, vargs);
    va_end(vargs);
    return ret;
}

int
_PyTokenizer_syntaxerror_known_range(struct tok_state *tok,
                        int col_offset, int end_col_offset,
                        const char *format, ...)
{
    va_list vargs;
    va_start(vargs, format);
    int ret = _syntaxerror_range(tok, format, col_offset, end_col_offset, vargs);
    va_end(vargs);
    return ret;
}

int
_PyTokenizer_indenterror(struct tok_state *tok)
{
    tok->done = E_TABSPACE;
    tok->cur = tok->inp;
    return ERRORTOKEN;
}

char *
_PyTokenizer_error_ret(struct tok_state *tok) /* XXX */
{
    tok->decoding_erred = 1;
    if ((tok->fp != NULL || tok->readline != NULL) && tok->buf != NULL) {/* see _PyTokenizer_Free */
        PyMem_Free(tok->buf);
    }
    tok->buf = tok->cur = tok->inp = NULL;
    tok->start = NULL;
    tok->end = NULL;
    tok->done = E_DECODE;
    return NULL;                /* as if it were EOF */
}

int
_PyTokenizer_warn_invalid_escape_sequence(struct tok_state *tok, int first_invalid_escape_char)
{
    if (!tok->report_warnings) {
        return 0;
    }

    PyObject *msg = PyUnicode_FromFormat(
        "\"\\%c\" is an invalid escape sequence. "
        "Such sequences will not work in the future. "
        "Did you mean \"\\\\%c\"? A raw string is also an option.",
        (char) first_invalid_escape_char,
        (char) first_invalid_escape_char
    );

    if (msg == NULL) {
        return -1;
    }

    if (PyErr_WarnExplicitObject(PyExc_SyntaxWarning, msg, tok->filename,
                                 tok->lineno, tok->module, NULL) < 0) {
        Py_DECREF(msg);

        if (PyErr_ExceptionMatches(PyExc_SyntaxWarning)) {
            /* Replace the SyntaxWarning exception with a SyntaxError
               to get a more accurate error report */
            PyErr_Clear();

            return _PyTokenizer_syntaxerror(tok,
                "\"\\%c\" is an invalid escape sequence. "
                "Did you mean \"\\\\%c\"? A raw string is also an option.",
                (char) first_invalid_escape_char,
                (char) first_invalid_escape_char);
        }

        return -1;
    }

    Py_DECREF(msg);
    return 0;
}

void
_PyTokenizer_raise_init_error(PyObject *filename)
{
    if (!(PyErr_ExceptionMatches(PyExc_LookupError)
          || PyErr_ExceptionMatches(PyExc_SyntaxError)
          || PyErr_ExceptionMatches(PyExc_ValueError)
          || PyErr_ExceptionMatches(PyExc_UnicodeDecodeError))) {
        return;
    }
    PyObject *errstr = NULL;
    PyObject *tuple = NULL;
    PyObject *type;
    PyObject *value;
    PyObject *tback;
    PyErr_Fetch(&type, &value, &tback);
    if (PyErr_GivenExceptionMatches(value, PyExc_SyntaxError)) {
        if (PyObject_SetAttr(value, &_Py_ID(filename), filename)) {
            goto error;
        }
        PyErr_Restore(type, value, tback);
        return;
    }
    errstr = PyObject_Str(value);
    if (!errstr) {
        goto error;
    }

    PyObject *tmp = Py_BuildValue("(OiiO)", filename, 0, -1, Py_None);
    if (!tmp) {
        goto error;
    }

    tuple = _PyTuple_FromPair(errstr, tmp);
    Py_DECREF(tmp);
    if (!tuple) {
        goto error;
    }
    PyErr_SetObject(PyExc_SyntaxError, tuple);

error:
    Py_XDECREF(type);
    Py_XDECREF(value);
    Py_XDECREF(tback);
    Py_XDECREF(errstr);
    Py_XDECREF(tuple);
}

int
_PyTokenizer_parser_warn(struct tok_state *tok, PyObject *category, const char *format, ...)
{
    if (!tok->report_warnings) {
        return 0;
    }

    PyObject *errmsg;
    va_list vargs;
    va_start(vargs, format);
    errmsg = PyUnicode_FromFormatV(format, vargs);
    va_end(vargs);
    if (!errmsg) {
        goto error;
    }

    if (PyErr_WarnExplicitObject(category, errmsg, tok->filename,
                                 tok->lineno, tok->module, NULL) < 0) {
        if (PyErr_ExceptionMatches(category)) {
            /* Replace the DeprecationWarning exception with a SyntaxError
               to get a more accurate error report */
            PyErr_Clear();
            _PyTokenizer_syntaxerror(tok, "%U", errmsg);
        }
        goto error;
    }
    Py_DECREF(errmsg);
    return 0;

error:
    Py_XDECREF(errmsg);
    tok->done = E_ERROR;
    return -1;
}


/* ############## STRING MANIPULATION ############## */

char *
_PyTokenizer_new_string(const char *s, Py_ssize_t len, struct tok_state *tok)
{
    char* result = (char *)PyMem_Malloc(len + 1);
    if (!result) {
        tok->done = E_NOMEM;
        PyErr_NoMemory();
        return NULL;
    }
    memcpy(result, s, len);
    result[len] = '\0';
    return result;
}

PyObject *
_PyTokenizer_translate_into_utf8(const char* str, const char* enc) {
    PyObject *utf8;
    PyObject* buf = PyUnicode_Decode(str, strlen(str), enc, NULL);
    if (buf == NULL)
        return NULL;
    utf8 = PyUnicode_AsUTF8String(buf);
    Py_DECREF(buf);
    return utf8;
}

char *
_PyTokenizer_translate_newlines(const char *s, int exec_input, int preserve_crlf,
                   struct tok_state *tok) {
    int skip_next_lf = 0;
    size_t needed_length = strlen(s) + 2, final_length;
    char *buf, *current;
    char c = '\0';
    buf = PyMem_Malloc(needed_length);
    if (buf == NULL) {
        tok->done = E_NOMEM;
        PyErr_NoMemory();
        return NULL;
    }
    for (current = buf; *s; s++, current++) {
        c = *s;
        if (skip_next_lf) {
            skip_next_lf = 0;
            if (c == '\n') {
                c = *++s;
                if (!c)
                    break;
            }
        }
        if (!preserve_crlf && c == '\r') {
            skip_next_lf = 1;
            c = '\n';
        }
        *current = c;
    }
    /* If this is exec input, add a newline to the end of the string if
       there isn't one already. */
    if (exec_input && c != '\n' && c != '\0') {
        *current = '\n';
        current++;
    }
    *current = '\0';
    final_length = current - buf + 1;
    if (final_length < needed_length && final_length) {
        /* should never fail */
        char* result = PyMem_Realloc(buf, final_length);
        if (result == NULL) {
            PyMem_Free(buf);
        }
        buf = result;
    }
    return buf;
}

/* ############## ENCODING STUFF ############## */


/* See whether the file starts with a BOM. If it does,
   invoke the set_readline function with the new encoding.
   Return 1 on success, 0 on failure.  */
int
_PyTokenizer_check_bom(int get_char(struct tok_state *),
          void unget_char(int, struct tok_state *),
          int set_readline(struct tok_state *, const char *),
          struct tok_state *tok)
{
    int ch1, ch2, ch3;
    ch1 = get_char(tok);
    tok->decoding_state = STATE_SEEK_CODING;
    if (ch1 == EOF) {
        return 1;
    } else if (ch1 == 0xEF) {
        ch2 = get_char(tok);
        if (ch2 != 0xBB) {
            unget_char(ch2, tok);
            unget_char(ch1, tok);
            return 1;
        }
        ch3 = get_char(tok);
        if (ch3 != 0xBF) {
            unget_char(ch3, tok);
            unget_char(ch2, tok);
            unget_char(ch1, tok);
            return 1;
        }
    } else {
        unget_char(ch1, tok);
        return 1;
    }
    if (tok->encoding != NULL)
        PyMem_Free(tok->encoding);
    tok->encoding = _PyTokenizer_new_string("utf-8", 5, tok);
    if (!tok->encoding)
        return 0;
    /* No need to set_readline: input is already utf-8 */
    return 1;
}

static const char *
get_normal_name(const char *s)  /* for utf-8 and latin-1 */
{
    char buf[13];
    int i;
    for (i = 0; i < 12; i++) {
        int c = s[i];
        if (c == '\0')
            break;
        else if (c == '_')
            buf[i] = '-';
        else
            buf[i] = Py_TOLOWER(c);
    }
    buf[i] = '\0';
    if (strcmp(buf, "utf-8") == 0 ||
        strncmp(buf, "utf-8-", 6) == 0)
        return "utf-8";
    else if (strcmp(buf, "latin-1") == 0 ||
             strcmp(buf, "iso-8859-1") == 0 ||
             strcmp(buf, "iso-latin-1") == 0 ||
             strncmp(buf, "latin-1-", 8) == 0 ||
             strncmp(buf, "iso-8859-1-", 11) == 0 ||
             strncmp(buf, "iso-latin-1-", 12) == 0)
        return "iso-8859-1";
    else
        return s;
}

/* Return the coding spec in S, or NULL if none is found.  */
static int
get_coding_spec(const char *s, char **spec, Py_ssize_t size, struct tok_state *tok)
{
    Py_ssize_t i;
    *spec = NULL;
    /* Coding spec must be in a comment, and that comment must be
     * the only statement on the source code line. */
    for (i = 0; i < size - 6; i++) {
        if (s[i] == '#')
            break;
        if (s[i] != ' ' && s[i] != '\t' && s[i] != '\014')
            return 1;
    }
    for (; i < size - 6; i++) { /* XXX inefficient search */
        const char* t = s + i;
        if (memcmp(t, "coding", 6) == 0) {
            const char* begin = NULL;
            t += 6;
            if (t[0] != ':' && t[0] != '=')
                continue;
            do {
                t++;
            } while (t[0] == ' ' || t[0] == '\t');

            begin = t;
            while (Py_ISALNUM(t[0]) ||
                   t[0] == '-' || t[0] == '_' || t[0] == '.')
                t++;

            if (begin < t) {
                char* r = _PyTokenizer_new_string(begin, t - begin, tok);
                const char* q;
                if (!r)
                    return 0;
                q = get_normal_name(r);
                if (r != q) {
                    PyMem_Free(r);
                    r = _PyTokenizer_new_string(q, strlen(q), tok);
                    if (!r)
                        return 0;
                }
                *spec = r;
                break;
            }
        }
    }
    return 1;
}

/* Check whether the line contains a coding spec. If it does,
   invoke the set_readline function for the new encoding.
   This function receives the tok_state and the new encoding.
   Return 1 on success, 0 on failure.  */
int
_PyTokenizer_check_coding_spec(const char* line, Py_ssize_t size, struct tok_state *tok,
                  int set_readline(struct tok_state *, const char *))
{
    char *cs;
    if (tok->cont_line) {
        /* It's a continuation line, so it can't be a coding spec. */
        tok->decoding_state = STATE_NORMAL;
        return 1;
    }
    if (!get_coding_spec(line, &cs, size, tok)) {
        return 0;
    }
    if (!cs) {
        Py_ssize_t i;
        for (i = 0; i < size; i++) {
            if (line[i] == '#' || line[i] == '\n' || line[i] == '\r')
                break;
            if (line[i] != ' ' && line[i] != '\t' && line[i] != '\014') {
                /* Stop checking coding spec after a line containing
                 * anything except a comment. */
                tok->decoding_state = STATE_NORMAL;
                break;
            }
        }
        return 1;
    }
    tok->decoding_state = STATE_NORMAL;
    if (tok->encoding == NULL) {
        assert(tok->decoding_readline == NULL);
        if (strcmp(cs, "utf-8") != 0 && !set_readline(tok, cs)) {
            _PyTokenizer_raise_init_error(tok->filename);
            _PyTokenizer_error_ret(tok);
            PyMem_Free(cs);
            return 0;
        }
        tok->encoding = cs;
    } else {                /* then, compare cs with BOM */
        if (strcmp(tok->encoding, cs) != 0) {
            tok->line_start = line;
            tok->cur = (char *)line;
            assert(size <= INT_MAX);
            _PyTokenizer_syntaxerror_known_range(tok, 0, (int)size,
                        "encoding problem: %s with BOM", cs);
            PyMem_Free(cs);
            _PyTokenizer_error_ret(tok);
            return 0;
        }
        PyMem_Free(cs);
    }
    return 1;
}

/* Check whether the characters at s start a valid
   UTF-8 sequence. Return the number of characters forming
   the sequence if yes, 0 if not.  The special cases match
   those in stringlib/codecs.h:utf8_decode.
*/
static int
valid_utf8(const unsigned char* s)
{
    int expected = 0;
    int length;
    if (*s < 0x80) {
        /* single-byte code */
        return 1;
    }
    else if (*s < 0xE0) {
        /* \xC2\x80-\xDF\xBF -- 0080-07FF */
        if (*s < 0xC2) {
            /* invalid sequence
               \x80-\xBF -- continuation byte
               \xC0-\xC1 -- fake 0000-007F */
            return 0;
        }
        expected = 1;
    }
    else if (*s < 0xF0) {
        /* \xE0\xA0\x80-\xEF\xBF\xBF -- 0800-FFFF */
        if (*s == 0xE0 && *(s + 1) < 0xA0) {
            /* invalid sequence
               \xE0\x80\x80-\xE0\x9F\xBF -- fake 0000-0800 */
            return 0;
        }
        else if (*s == 0xED && *(s + 1) >= 0xA0) {
            /* Decoding UTF-8 sequences in range \xED\xA0\x80-\xED\xBF\xBF
               will result in surrogates in range D800-DFFF. Surrogates are
               not valid UTF-8 so they are rejected.
               See https://www.unicode.org/versions/Unicode5.2.0/ch03.pdf
               (table 3-7) and http://www.rfc-editor.org/rfc/rfc3629.txt */
            return 0;
        }
        expected = 2;
    }
    else if (*s < 0xF5) {
        /* \xF0\x90\x80\x80-\xF4\x8F\xBF\xBF -- 10000-10FFFF */
        if (*(s + 1) < 0x90 ? *s == 0xF0 : *s == 0xF4) {
            /* invalid sequence -- one of:
               \xF0\x80\x80\x80-\xF0\x8F\xBF\xBF -- fake 0000-FFFF
               \xF4\x90\x80\x80- -- 110000- overflow */
            return 0;
        }
        expected = 3;
    }
    else {
        /* invalid start byte */
        return 0;
    }
    length = expected + 1;
    for (int i = 1; i <= expected; i++) {
        if (s[i] < 0x80 || s[i] >= 0xC0) {
            return 0;
        }
    }
    return length;
}

int
_PyTokenizer_ensure_utf8(const char *line, struct tok_state *tok, int lineno)
{
    const char *badchar = NULL;
    const char *c;
    int length;
    int col_offset = 0;
    const char *line_start = line;
    for (c = line; *c; c += length) {
        if (!(length = valid_utf8((const unsigned char *)c))) {
            badchar = c;
            break;
        }
        col_offset++;
        if (*c == '\n') {
            lineno++;
            col_offset = 0;
            line_start = c + 1;
        }
    }
    if (badchar) {
        tok->lineno = lineno;
        tok->line_start = line_start;
        tok->cur = (char *)badchar;
        _PyTokenizer_syntaxerror_known_range(tok,
                col_offset + 1, col_offset + 1,
                "Non-UTF-8 code starting with '\\x%.2x'"
                "%s%V on line %i, "
                "but no encoding declared; "
                "see https://peps.python.org/pep-0263/ for details",
                (unsigned char)*badchar,
                tok->filename ? " in file " : "", tok->filename, "",
                lineno);
        return 0;
    }
    return 1;
}


/* ############## DEBUGGING STUFF ############## */

#ifdef Py_DEBUG
void
_PyTokenizer_print_escape(FILE *f, const char *s, Py_ssize_t size)
{
    if (s == NULL) {
        fputs("NULL", f);
        return;
    }
    putc('"', f);
    while (size-- > 0) {
        unsigned char c = *s++;
        switch (c) {
            case '\n': fputs("\\n", f); break;
            case '\r': fputs("\\r", f); break;
            case '\t': fputs("\\t", f); break;
            case '\f': fputs("\\f", f); break;
            case '\'': fputs("\\'", f); break;
            case '"': fputs("\\\"", f); break;
            default:
                if (0x20 <= c && c <= 0x7f)
                    putc(c, f);
                else
                    fprintf(f, "\\x%02x", c);
        }
    }
    putc('"', f);
}

void
_PyTokenizer_tok_dump(int type, char *start, char *end)
{
    fprintf(stderr, "%s", _PyParser_TokenNames[type]);
    if (type == NAME || type == NUMBER || type == STRING || type == OP)
        fprintf(stderr, "(%.*s)", (int)(end - start), start);
}
#endif

Coverage Report

Created: 2026-07-14 06:16

Line	Count	Source
1		#include "Python.h"
2		#include "errcode.h"
3		#include "pycore_runtime.h" // _Py_ID()
4		#include "pycore_token.h"
5		#include "pycore_tuple.h" // _PyTuple_FromPair
6
7		#include "../lexer/state.h"
8
9
10		/* ############## ERRORS ############## */
11
12		static int
13		_syntaxerror_range(struct tok_state tok, const char format,
14		int col_offset, int end_col_offset,
15		va_list vargs)
16	3.13k	{
17		// In release builds, we don't want to overwrite a previous error, but in debug builds we
18		// want to fail if we are not doing it so we can fix it.
19	3.13k	assert(tok->done != E_ERROR);
20	3.13k	if (tok->done == E_ERROR) {
21	0	return ERRORTOKEN;
22	0	}
23	3.13k	PyObject errmsg, errtext, *args;
24	3.13k	errmsg = PyUnicode_FromFormatV(format, vargs);
25	3.13k	if (!errmsg) {
26	0	goto error;
27	0	}
28
29	3.13k	errtext = PyUnicode_DecodeUTF8(tok->line_start, tok->cur - tok->line_start,
30	3.13k	"replace");
31	3.13k	if (!errtext) {
32	0	goto error;
33	0	}
34
35	3.13k	if (col_offset == -1) {
36	2.49k	col_offset = (int)PyUnicode_GET_LENGTH(errtext);
37	2.49k	}
38	3.13k	if (end_col_offset == -1) {
39	2.49k	end_col_offset = col_offset;
40	2.49k	}
41
42	3.13k	Py_ssize_t line_len = strcspn(tok->line_start, "\n");
43	3.13k	if (line_len != tok->cur - tok->line_start) {
44	2.38k	Py_DECREF(errtext);
45	2.38k	errtext = PyUnicode_DecodeUTF8(tok->line_start, line_len,
46	2.38k	"replace");
47	2.38k	}
48	3.13k	if (!errtext) {
49	0	goto error;
50	0	}
51
52	3.13k	args = Py_BuildValue("(O(OiiNii))", errmsg,
53	3.13k	tok->filename ? tok->filename : Py_None,
54	3.13k	tok->lineno, col_offset, errtext,
55	3.13k	tok->lineno, end_col_offset);
56	3.13k	if (args) {
57	3.13k	PyErr_SetObject(PyExc_SyntaxError, args);
58	3.13k	Py_DECREF(args);
59	3.13k	}
60
61	3.13k	error:
62	3.13k	Py_XDECREF(errmsg);
63	3.13k	tok->done = E_ERROR;
64	3.13k	return ERRORTOKEN;
65	3.13k	}
66
67		int
68		_PyTokenizer_syntaxerror(struct tok_state tok, const char format, ...)
69	2.49k	{
70		// These errors are cleaned on startup. Todo: Fix it.
71	2.49k	va_list vargs;
72	2.49k	va_start(vargs, format);
73	2.49k	int ret = _syntaxerror_range(tok, format, -1, -1, vargs);
74	2.49k	va_end(vargs);
75	2.49k	return ret;
76	2.49k	}
77
78		int
79		_PyTokenizer_syntaxerror_known_range(struct tok_state *tok,
80		int col_offset, int end_col_offset,
81		const char *format, ...)
82	643	{
83	643	va_list vargs;
84	643	va_start(vargs, format);
85	643	int ret = _syntaxerror_range(tok, format, col_offset, end_col_offset, vargs);
86	643	va_end(vargs);
87	643	return ret;
88	643	}
89
90		int
91		_PyTokenizer_indenterror(struct tok_state *tok)
92	3	{
93	3	tok->done = E_TABSPACE;
94	3	tok->cur = tok->inp;
95	3	return ERRORTOKEN;
96	3	}
97
98		char *
99		_PyTokenizer_error_ret(struct tok_state tok) / XXX */
100	2.70k	{
101	2.70k	tok->decoding_erred = 1;
102	2.70k	if ((tok->fp != NULL \|\| tok->readline != NULL) && tok->buf != NULL) {/* see _PyTokenizer_Free */
103	0	PyMem_Free(tok->buf);
104	0	}
105	2.70k	tok->buf = tok->cur = tok->inp = NULL;
106	2.70k	tok->start = NULL;
107	2.70k	tok->end = NULL;
108	2.70k	tok->done = E_DECODE;
109	2.70k	return NULL; /* as if it were EOF */
110	2.70k	}
111
112		int
113		_PyTokenizer_warn_invalid_escape_sequence(struct tok_state *tok, int first_invalid_escape_char)
114	673	{
115	673	if (!tok->report_warnings) {
116	0	return 0;
117	0	}
118
119	673	PyObject *msg = PyUnicode_FromFormat(
120	673	"\"\\%c\" is an invalid escape sequence. "
121	673	"Such sequences will not work in the future. "
122	673	"Did you mean \"\\\\%c\"? A raw string is also an option.",
123	673	(char) first_invalid_escape_char,
124	673	(char) first_invalid_escape_char
125	673	);
126
127	673	if (msg == NULL) {
128	0	return -1;
129	0	}
130
131	673	if (PyErr_WarnExplicitObject(PyExc_SyntaxWarning, msg, tok->filename,
132	673	tok->lineno, tok->module, NULL) < 0) {
133	0	Py_DECREF(msg);
134
135	0	if (PyErr_ExceptionMatches(PyExc_SyntaxWarning)) {
136		/* Replace the SyntaxWarning exception with a SyntaxError
137		to get a more accurate error report */
138	0	PyErr_Clear();
139
140	0	return _PyTokenizer_syntaxerror(tok,
141	0	"\"\\%c\" is an invalid escape sequence. "
142	0	"Did you mean \"\\\\%c\"? A raw string is also an option.",
143	0	(char) first_invalid_escape_char,
144	0	(char) first_invalid_escape_char);
145	0	}
146
147	0	return -1;
148	0	}
149
150	673	Py_DECREF(msg);
151	673	return 0;
152	673	}
153
154		void
155		_PyTokenizer_raise_init_error(PyObject *filename)
156	2.70k	{
157	2.70k	if (!(PyErr_ExceptionMatches(PyExc_LookupError)
158	2.50k	\|\| PyErr_ExceptionMatches(PyExc_SyntaxError)
159	1.89k	\|\| PyErr_ExceptionMatches(PyExc_ValueError)
160	64	\|\| PyErr_ExceptionMatches(PyExc_UnicodeDecodeError))) {
161	64	return;
162	64	}
163	2.64k	PyObject *errstr = NULL;
164	2.64k	PyObject *tuple = NULL;
165	2.64k	PyObject *type;
166	2.64k	PyObject *value;
167	2.64k	PyObject *tback;
168	2.64k	PyErr_Fetch(&type, &value, &tback);
169	2.64k	if (PyErr_GivenExceptionMatches(value, PyExc_SyntaxError)) {
170	608	if (PyObject_SetAttr(value, &_Py_ID(filename), filename)) {
171	0	goto error;
172	0	}
173	608	PyErr_Restore(type, value, tback);
174	608	return;
175	608	}
176	2.03k	errstr = PyObject_Str(value);
177	2.03k	if (!errstr) {
178	0	goto error;
179	0	}
180
181	2.03k	PyObject *tmp = Py_BuildValue("(OiiO)", filename, 0, -1, Py_None);
182	2.03k	if (!tmp) {
183	0	goto error;
184	0	}
185
186	2.03k	tuple = _PyTuple_FromPair(errstr, tmp);
187	2.03k	Py_DECREF(tmp);
188	2.03k	if (!tuple) {
189	0	goto error;
190	0	}
191	2.03k	PyErr_SetObject(PyExc_SyntaxError, tuple);
192
193	2.03k	error:
194	2.03k	Py_XDECREF(type);
195	2.03k	Py_XDECREF(value);
196	2.03k	Py_XDECREF(tback);
197	2.03k	Py_XDECREF(errstr);
198	2.03k	Py_XDECREF(tuple);
199	2.03k	}
200
201		int
202		_PyTokenizer_parser_warn(struct tok_state tok, PyObject category, const char *format, ...)
203	10.1k	{
204	10.1k	if (!tok->report_warnings) {
205	0	return 0;
206	0	}
207
208	10.1k	PyObject *errmsg;
209	10.1k	va_list vargs;
210	10.1k	va_start(vargs, format);
211	10.1k	errmsg = PyUnicode_FromFormatV(format, vargs);
212	10.1k	va_end(vargs);
213	10.1k	if (!errmsg) {
214	0	goto error;
215	0	}
216
217	10.1k	if (PyErr_WarnExplicitObject(category, errmsg, tok->filename,
218	10.1k	tok->lineno, tok->module, NULL) < 0) {
219	0	if (PyErr_ExceptionMatches(category)) {
220		/* Replace the DeprecationWarning exception with a SyntaxError
221		to get a more accurate error report */
222	0	PyErr_Clear();
223	0	_PyTokenizer_syntaxerror(tok, "%U", errmsg);
224	0	}
225	0	goto error;
226	0	}
227	10.1k	Py_DECREF(errmsg);
228	10.1k	return 0;
229
230	0	error:
231	0	Py_XDECREF(errmsg);
232	0	tok->done = E_ERROR;
233	0	return -1;
234	10.1k	}
235
236
237		/* ############## STRING MANIPULATION ############## */
238
239		char *
240		_PyTokenizer_new_string(const char s, Py_ssize_t len, struct tok_state tok)
241	85.5k	{
242	85.5k	char* result = (char *)PyMem_Malloc(len + 1);
243	85.5k	if (!result) {
244	0	tok->done = E_NOMEM;
245	0	PyErr_NoMemory();
246	0	return NULL;
247	0	}
248	85.5k	memcpy(result, s, len);
249	85.5k	result[len] = '\0';
250	85.5k	return result;
251	85.5k	}
252
253		PyObject *
254	4.42k	_PyTokenizer_translate_into_utf8(const char* str, const char* enc) {
255	4.42k	PyObject *utf8;
256	4.42k	PyObject* buf = PyUnicode_Decode(str, strlen(str), enc, NULL);
257	4.42k	if (buf == NULL)
258	2.03k	return NULL;
259	2.39k	utf8 = PyUnicode_AsUTF8String(buf);
260	2.39k	Py_DECREF(buf);
261	2.39k	return utf8;
262	4.42k	}
263
264		char *
265		_PyTokenizer_translate_newlines(const char *s, int exec_input, int preserve_crlf,
266	105k	struct tok_state *tok) {
267	105k	int skip_next_lf = 0;
268	105k	size_t needed_length = strlen(s) + 2, final_length;
269	105k	char buf, current;
270	105k	char c = '\0';
271	105k	buf = PyMem_Malloc(needed_length);
272	105k	if (buf == NULL) {
273	0	tok->done = E_NOMEM;
274	0	PyErr_NoMemory();
275	0	return NULL;
276	0	}
277	7.81M	for (current = buf; *s; s++, current++) {
278	7.71M	c = *s;
279	7.71M	if (skip_next_lf) {
280	11.0k	skip_next_lf = 0;
281	11.0k	if (c == '\n') {
282	652	c = *++s;
283	652	if (!c)
284	9	break;
285	652	}
286	11.0k	}
287	7.71M	if (!preserve_crlf && c == '\r') {
288	11.1k	skip_next_lf = 1;
289	11.1k	c = '\n';
290	11.1k	}
291	7.71M	*current = c;
292	7.71M	}
293		/* If this is exec input, add a newline to the end of the string if
294		there isn't one already. */
295	105k	if (exec_input && c != '\n' && c != '\0') {
296	102k	*current = '\n';
297	102k	current++;
298	102k	}
299	105k	*current = '\0';
300	105k	final_length = current - buf + 1;
301	105k	if (final_length < needed_length && final_length) {
302		/* should never fail */
303	3.25k	char* result = PyMem_Realloc(buf, final_length);
304	3.25k	if (result == NULL) {
305	0	PyMem_Free(buf);
306	0	}
307	3.25k	buf = result;
308	3.25k	}
309	105k	return buf;
310	105k	}
311
312		/* ############## ENCODING STUFF ############## */
313
314
315		/* See whether the file starts with a BOM. If it does,
316		invoke the set_readline function with the new encoding.
317		Return 1 on success, 0 on failure. */
318		int
319		_PyTokenizer_check_bom(int get_char(struct tok_state *),
320		void unget_char(int, struct tok_state *),
321		int set_readline(struct tok_state , const char ),
322		struct tok_state *tok)
323	21.9k	{
324	21.9k	int ch1, ch2, ch3;
325	21.9k	ch1 = get_char(tok);
326	21.9k	tok->decoding_state = STATE_SEEK_CODING;
327	21.9k	if (ch1 == EOF) {
328	0	return 1;
329	21.9k	} else if (ch1 == 0xEF) {
330	59	ch2 = get_char(tok);
331	59	if (ch2 != 0xBB) {
332	46	unget_char(ch2, tok);
333	46	unget_char(ch1, tok);
334	46	return 1;
335	46	}
336	13	ch3 = get_char(tok);
337	13	if (ch3 != 0xBF) {
338	5	unget_char(ch3, tok);
339	5	unget_char(ch2, tok);
340	5	unget_char(ch1, tok);
341	5	return 1;
342	5	}
343	21.8k	} else {
344	21.8k	unget_char(ch1, tok);
345	21.8k	return 1;
346	21.8k	}
347	8	if (tok->encoding != NULL)
348	0	PyMem_Free(tok->encoding);
349	8	tok->encoding = _PyTokenizer_new_string("utf-8", 5, tok);
350	8	if (!tok->encoding)
351	0	return 0;
352		/* No need to set_readline: input is already utf-8 */
353	8	return 1;
354	8	}
355
356		static const char *
357		get_normal_name(const char s) / for utf-8 and latin-1 */
358	4.43k	{
359	4.43k	char buf[13];
360	4.43k	int i;
361	28.9k	for (i = 0; i < 12; i++) {
362	28.7k	int c = s[i];
363	28.7k	if (c == '\0')
364	4.20k	break;
365	24.5k	else if (c == '_')
366	645	buf[i] = '-';
367	23.8k	else
368	23.8k	buf[i] = Py_TOLOWER(c);
369	28.7k	}
370	4.43k	buf[i] = '\0';
371	4.43k	if (strcmp(buf, "utf-8") == 0 \|\|
372	4.43k	strncmp(buf, "utf-8-", 6) == 0)
373	4	return "utf-8";
374	4.43k	else if (strcmp(buf, "latin-1") == 0 \|\|
375	4.42k	strcmp(buf, "iso-8859-1") == 0 \|\|
376	4.42k	strcmp(buf, "iso-latin-1") == 0 \|\|
377	4.42k	strncmp(buf, "latin-1-", 8) == 0 \|\|
378	4.41k	strncmp(buf, "iso-8859-1-", 11) == 0 \|\|
379	4.41k	strncmp(buf, "iso-latin-1-", 12) == 0)
380	15	return "iso-8859-1";
381	4.41k	else
382	4.41k	return s;
383	4.43k	}
384
385		/* Return the coding spec in S, or NULL if none is found. */
386		static int
387		get_coding_spec(const char s, char spec, Py_ssize_t size, struct tok_state tok)
388	22.5k	{
389	22.5k	Py_ssize_t i;
390	22.5k	*spec = NULL;
391		/* Coding spec must be in a comment, and that comment must be
392		* the only statement on the source code line. */
393	24.0k	for (i = 0; i < size - 6; i++) {
394	19.4k	if (s[i] == '#')
395	4.61k	break;
396	14.7k	if (s[i] != ' ' && s[i] != '\t' && s[i] != '\014')
397	13.2k	return 1;
398	14.7k	}
399	274k	for (; i < size - 6; i++) { /* XXX inefficient search */
400	269k	const char* t = s + i;
401	269k	if (memcmp(t, "coding", 6) == 0) {
402	5.10k	const char* begin = NULL;
403	5.10k	t += 6;
404	5.10k	if (t[0] != ':' && t[0] != '=')
405	357	continue;
406	5.49k	do {
407	5.49k	t++;
408	5.49k	} while (t[0] == ' ' \|\| t[0] == '\t');
409
410	4.74k	begin = t;
411	40.6k	while (Py_ISALNUM(t[0]) \|\|
412	7.95k	t[0] == '-' \|\| t[0] == '_' \|\| t[0] == '.')
413	35.9k	t++;
414
415	4.74k	if (begin < t) {
416	4.43k	char* r = _PyTokenizer_new_string(begin, t - begin, tok);
417	4.43k	const char* q;
418	4.43k	if (!r)
419	0	return 0;
420	4.43k	q = get_normal_name(r);
421	4.43k	if (r != q) {
422	19	PyMem_Free(r);
423	19	r = _PyTokenizer_new_string(q, strlen(q), tok);
424	19	if (!r)
425	0	return 0;
426	19	}
427	4.43k	*spec = r;
428	4.43k	break;
429	4.43k	}
430	4.74k	}
431	269k	}
432	9.23k	return 1;
433	9.23k	}
434
435		/* Check whether the line contains a coding spec. If it does,
436		invoke the set_readline function for the new encoding.
437		This function receives the tok_state and the new encoding.
438		Return 1 on success, 0 on failure. */
439		int
440		_PyTokenizer_check_coding_spec(const char* line, Py_ssize_t size, struct tok_state *tok,
441		int set_readline(struct tok_state , const char ))
442	22.5k	{
443	22.5k	char *cs;
444	22.5k	if (tok->cont_line) {
445		/* It's a continuation line, so it can't be a coding spec. */
446	0	tok->decoding_state = STATE_NORMAL;
447	0	return 1;
448	0	}
449	22.5k	if (!get_coding_spec(line, &cs, size, tok)) {
450	0	return 0;
451	0	}
452	22.5k	if (!cs) {
453	18.0k	Py_ssize_t i;
454	19.7k	for (i = 0; i < size; i++) {
455	19.4k	if (line[i] == '#' \|\| line[i] == '\n' \|\| line[i] == '\r')
456	470	break;
457	18.9k	if (line[i] != ' ' && line[i] != '\t' && line[i] != '\014') {
458		/* Stop checking coding spec after a line containing
459		* anything except a comment. */
460	17.2k	tok->decoding_state = STATE_NORMAL;
461	17.2k	break;
462	17.2k	}
463	18.9k	}
464	18.0k	return 1;
465	18.0k	}
466	4.43k	tok->decoding_state = STATE_NORMAL;
467	4.43k	if (tok->encoding == NULL) {
468	4.42k	assert(tok->decoding_readline == NULL);
469	4.42k	if (strcmp(cs, "utf-8") != 0 && !set_readline(tok, cs)) {
470	0	_PyTokenizer_raise_init_error(tok->filename);
471	0	_PyTokenizer_error_ret(tok);
472	0	PyMem_Free(cs);
473	0	return 0;
474	0	}
475	4.42k	tok->encoding = cs;
476	4.42k	} else { /* then, compare cs with BOM */
477	6	if (strcmp(tok->encoding, cs) != 0) {
478	5	tok->line_start = line;
479	5	tok->cur = (char *)line;
480	5	assert(size <= INT_MAX);
481	5	_PyTokenizer_syntaxerror_known_range(tok, 0, (int)size,
482	5	"encoding problem: %s with BOM", cs);
483	5	PyMem_Free(cs);
484	5	_PyTokenizer_error_ret(tok);
485	5	return 0;
486	5	}
487	1	PyMem_Free(cs);
488	1	}
489	4.43k	return 1;
490	4.43k	}
491
492		/* Check whether the characters at s start a valid
493		UTF-8 sequence. Return the number of characters forming
494		the sequence if yes, 0 if not. The special cases match
495		those in stringlib/codecs.h:utf8_decode.
496		*/
497		static int
498		valid_utf8(const unsigned char* s)
499	4.39M	{
500	4.39M	int expected = 0;
501	4.39M	int length;
502	4.39M	if (*s < 0x80) {
503		/* single-byte code */
504	4.38M	return 1;
505	4.38M	}
506	9.63k	else if (*s < 0xE0) {
507		/* \xC2\x80-\xDF\xBF -- 0080-07FF */
508	3.92k	if (*s < 0xC2) {
509		/* invalid sequence
510		\x80-\xBF -- continuation byte
511		\xC0-\xC1 -- fake 0000-007F */
512	146	return 0;
513	146	}
514	3.77k	expected = 1;
515	3.77k	}
516	5.71k	else if (*s < 0xF0) {
517		/* \xE0\xA0\x80-\xEF\xBF\xBF -- 0800-FFFF */
518	2.44k	if (s == 0xE0 && (s + 1) < 0xA0) {
519		/* invalid sequence
520		\xE0\x80\x80-\xE0\x9F\xBF -- fake 0000-0800 */
521	18	return 0;
522	18	}
523	2.43k	else if (s == 0xED && (s + 1) >= 0xA0) {
524		/* Decoding UTF-8 sequences in range \xED\xA0\x80-\xED\xBF\xBF
525		will result in surrogates in range D800-DFFF. Surrogates are
526		not valid UTF-8 so they are rejected.
527		See https://www.unicode.org/versions/Unicode5.2.0/ch03.pdf
528		(table 3-7) and http://www.rfc-editor.org/rfc/rfc3629.txt */
529	16	return 0;
530	16	}
531	2.41k	expected = 2;
532	2.41k	}
533	3.26k	else if (*s < 0xF5) {
534		/* \xF0\x90\x80\x80-\xF4\x8F\xBF\xBF -- 10000-10FFFF */
535	3.22k	if ((s + 1) < 0x90 ? s == 0xF0 : *s == 0xF4) {
536		/* invalid sequence -- one of:
537		\xF0\x80\x80\x80-\xF0\x8F\xBF\xBF -- fake 0000-FFFF
538		\xF4\x90\x80\x80- -- 110000- overflow */
539	41	return 0;
540	41	}
541	3.18k	expected = 3;
542	3.18k	}
543	39	else {
544		/* invalid start byte */
545	39	return 0;
546	39	}
547	9.37k	length = expected + 1;
548	26.9k	for (int i = 1; i <= expected; i++) {
549	17.8k	if (s[i] < 0x80 \|\| s[i] >= 0xC0) {
550	343	return 0;
551	343	}
552	17.8k	}
553	9.03k	return length;
554	9.37k	}
555
556		int
557		_PyTokenizer_ensure_utf8(const char line, struct tok_state tok, int lineno)
558	17.8k	{
559	17.8k	const char *badchar = NULL;
560	17.8k	const char *c;
561	17.8k	int length;
562	17.8k	int col_offset = 0;
563	17.8k	const char *line_start = line;
564	4.41M	for (c = line; *c; c += length) {
565	4.39M	if (!(length = valid_utf8((const unsigned char *)c))) {
566	603	badchar = c;
567	603	break;
568	603	}
569	4.39M	col_offset++;
570	4.39M	if (*c == '\n') {
571	191k	lineno++;
572	191k	col_offset = 0;
573	191k	line_start = c + 1;
574	191k	}
575	4.39M	}
576	17.8k	if (badchar) {
577	603	tok->lineno = lineno;
578	603	tok->line_start = line_start;
579	603	tok->cur = (char *)badchar;
580	603	_PyTokenizer_syntaxerror_known_range(tok,
581	603	col_offset + 1, col_offset + 1,
582	603	"Non-UTF-8 code starting with '\\x%.2x'"
583	603	"%s%V on line %i, "
584	603	"but no encoding declared; "
585	603	"see https://peps.python.org/pep-0263/ for details",
586	603	(unsigned char)*badchar,
587	603	tok->filename ? " in file " : "", tok->filename, "",
588	603	lineno);
589	603	return 0;
590	603	}
591	17.2k	return 1;
592	17.8k	}
593
594
595		/* ############## DEBUGGING STUFF ############## */
596
597		#ifdef Py_DEBUG
598		void
599		_PyTokenizer_print_escape(FILE f, const char s, Py_ssize_t size)
600		{
601		if (s == NULL) {
602		fputs("NULL", f);
603		return;
604		}
605		putc('"', f);
606		while (size-- > 0) {
607		unsigned char c = *s++;
608		switch (c) {
609		case '\n': fputs("\\n", f); break;
610		case '\r': fputs("\\r", f); break;
611		case '\t': fputs("\\t", f); break;
612		case '\f': fputs("\\f", f); break;
613		case '\'': fputs("\\'", f); break;
614		case '"': fputs("\\\"", f); break;
615		default:
616		if (0x20 <= c && c <= 0x7f)
617		putc(c, f);
618		else
619		fprintf(f, "\\x%02x", c);
620		}
621		}
622		putc('"', f);
623		}
624
625		void
626		_PyTokenizer_tok_dump(int type, char start, char end)
627		{
628		fprintf(stderr, "%s", _PyParser_TokenNames[type]);
629		if (type == NAME \|\| type == NUMBER \|\| type == STRING \|\| type == OP)
630		fprintf(stderr, "(%.*s)", (int)(end - start), start);
631		}
632		#endif