bin/sh/mknodes.c

218 	FILE *cfile;
229 	if ((cfile = fopen("nodes.c", "w")) == NULL)
262 	fputs(writer, cfile);
266 			outsizes(cfile);
268 			outfunc(cfile, 1);
270 			outfunc(cfile, 0);
272 			fputs(line, cfile);
275 	if (ferror(cfile))
277 	if (fclose(cfile))
284 outsizes(FILE *cfile)
288 	fprintf(cfile, "static const short nodesize[%d] = {\n", ntypes);
290 		fprintf(cfile, "      ALIGN(sizeof (struct %s)),\n", nodestr[i]->tag);
292 	fprintf(cfile, "};\n");
297 outfunc(FILE *cfile, int calcsize)
303 	fputs("      if (n == NULL)\n", cfile);
305 		fputs("	    return;\n", cfile);
307 		fputs("	    return NULL;\n", cfile);
309 		fputs("      result->blocksize += nodesize[n->type];\n", cfile);
311 		fputs("      new = state->block;\n", cfile);
312 		fputs("      state->block = (char *)state->block + nodesize[n->type];\n", cfile);
314 	fputs("      switch (n->type) {\n", cfile);
318 				fprintf(cfile, "      case %s:\n", nodename[i]);
325 					indent(12, cfile);
326 					fprintf(cfile, "calcsize(n->%s.%s, result);\n",
329 					indent(12, cfile);
330 					fprintf(cfile, "new->%s.%s = copynode(n->%s.%s, state);\n",
336 					indent(12, cfile);
337 					fprintf(cfile, "sizenodelist(n->%s.%s, result);\n",
340 					indent(12, cfile);
341 					fprintf(cfile, "new->%s.%s = copynodelist(n->%s.%s, state);\n",
347 					indent(12, cfile);
348 					fprintf(cfile, "result->stringsize += strlen(n->%s.%s) + 1;\n",
351 					indent(12, cfile);
352 					fprintf(cfile, "new->%s.%s = nodesavestr(n->%s.%s, state);\n",
359 					indent(12, cfile);
360 					fprintf(cfile, "new->%s.%s = n->%s.%s;\n",
366 		indent(12, cfile);
367 		fputs("break;\n", cfile);
369 	fputs("      };\n", cfile);
371 		fputs("      new->type = n->type;\n", cfile);