| Guido van Rossum | f70e43a | 1991-02-19 12:39:46 +0000 | [diff] [blame] | 1 |  | 
| Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 2 | /* List a node on a file */ | 
|  | 3 |  | 
| Pablo Galindo | f2cf1e3 | 2019-04-13 17:05:14 +0100 | [diff] [blame] | 4 | #include "Python.h" | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 5 | #include "pycore_pystate.h" | 
| Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 6 | #include "token.h" | 
|  | 7 | #include "node.h" | 
|  | 8 |  | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 9 | /* Forward */ | 
| Tim Peters | dbd9ba6 | 2000-07-09 03:09:57 +0000 | [diff] [blame] | 10 | static void list1node(FILE *, node *); | 
|  | 11 | static void listnode(FILE *, node *); | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 12 |  | 
|  | 13 | void | 
| Thomas Wouters | 23c9e00 | 2000-07-22 19:20:54 +0000 | [diff] [blame] | 14 | PyNode_ListTree(node *n) | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 15 | { | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 16 | listnode(stdout, n); | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 17 | } | 
|  | 18 |  | 
| Guido van Rossum | 9e90a67 | 1993-06-24 11:10:19 +0000 | [diff] [blame] | 19 | static void | 
| Thomas Wouters | 23c9e00 | 2000-07-22 19:20:54 +0000 | [diff] [blame] | 20 | listnode(FILE *fp, node *n) | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 21 | { | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 22 | PyInterpreterState *interp = _PyInterpreterState_GET_UNSAFE(); | 
|  | 23 |  | 
|  | 24 | interp->parser.listnode.level = 0; | 
|  | 25 | interp->parser.listnode.atbol = 1; | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 26 | list1node(fp, n); | 
| Guido van Rossum | 3f5da24 | 1990-12-20 15:06:42 +0000 | [diff] [blame] | 27 | } | 
|  | 28 |  | 
| Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 29 | static void | 
| Thomas Wouters | 23c9e00 | 2000-07-22 19:20:54 +0000 | [diff] [blame] | 30 | list1node(FILE *fp, node *n) | 
| Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 31 | { | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 32 | PyInterpreterState *interp; | 
|  | 33 |  | 
| Serhiy Storchaka | 0b3ec19 | 2017-03-23 17:53:47 +0200 | [diff] [blame] | 34 | if (n == NULL) | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 35 | return; | 
|  | 36 | if (ISNONTERMINAL(TYPE(n))) { | 
|  | 37 | int i; | 
|  | 38 | for (i = 0; i < NCH(n); i++) | 
|  | 39 | list1node(fp, CHILD(n, i)); | 
|  | 40 | } | 
|  | 41 | else if (ISTERMINAL(TYPE(n))) { | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 42 | interp = _PyInterpreterState_GET_UNSAFE(); | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 43 | switch (TYPE(n)) { | 
|  | 44 | case INDENT: | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 45 | interp->parser.listnode.level++; | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 46 | break; | 
|  | 47 | case DEDENT: | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 48 | interp->parser.listnode.level--; | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 49 | break; | 
|  | 50 | default: | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 51 | if (interp->parser.listnode.atbol) { | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 52 | int i; | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 53 | for (i = 0; i < interp->parser.listnode.level; ++i) | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 54 | fprintf(fp, "\t"); | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 55 | interp->parser.listnode.atbol = 0; | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 56 | } | 
|  | 57 | if (TYPE(n) == NEWLINE) { | 
|  | 58 | if (STR(n) != NULL) | 
|  | 59 | fprintf(fp, "%s", STR(n)); | 
|  | 60 | fprintf(fp, "\n"); | 
| Vinay Sajip | 9def81a | 2019-11-07 10:08:58 +0000 | [diff] [blame^] | 61 | interp->parser.listnode.atbol = 1; | 
| Antoine Pitrou | f95a1b3 | 2010-05-09 15:52:27 +0000 | [diff] [blame] | 62 | } | 
|  | 63 | else | 
|  | 64 | fprintf(fp, "%s ", STR(n)); | 
|  | 65 | break; | 
|  | 66 | } | 
|  | 67 | } | 
|  | 68 | else | 
|  | 69 | fprintf(fp, "? "); | 
| Guido van Rossum | 85a5fbb | 1990-10-14 12:07:46 +0000 | [diff] [blame] | 70 | } |