usr.bin/rpcgen/rpc_cout.c

120 	f_print(fout, "\n");
121 	f_print(fout, "bool_t\n");
122 	f_print(fout, "xdr_%s(", procname);
123 	f_print(fout, "XDR *xdrs, ");
124 	f_print(fout, "%s ", procname);
126 		f_print(fout, "*");
127 	f_print(fout, "objp)\n{\n\n");
142 	f_print(fout, "\tregister long *buf;\n\n");
154 	f_print(fout, "\treturn (TRUE);\n");
155 	f_print(fout, "}\n");
162 	tabify(fout, indent);
163 	f_print(fout, "if (!xdr_%s(xdrs", name);
169 	f_print(fout, ", %s", arg);
176 		f_print(fout, ",\n");
177 		tabify(fout, indent);
179 		f_print(fout, ", ");
182 		f_print(fout, "sizeof (bool_t), (xdrproc_t) xdr_bool");
184 		f_print(fout, "sizeof (");
186 			f_print(fout, "%s ", prefix);
188 		f_print(fout, "%s), (xdrproc_t) xdr_%s", type, type);
195 	f_print(fout, "))\n");
196 	tabify(fout, indent);
197 	f_print(fout, "\treturn (FALSE);\n");
199 		f_print(fout, "\t}\n");
212 		f_print(fout, "\t{\n");
213 		f_print(fout, "\t%s **pp = %s;\n", type, objname);
216 		f_print(fout, "pp");
231 			f_print(fout, "%s", objname);
255 				f_print(fout, "%s.%s_val, (u_int *) %s.%s_len",
258 				f_print(fout,
316 	f_print(fout, "\tswitch (objp->%s) {\n", def->def.un.enum_decl.name);
319 		f_print(fout, "\tcase %s:\n", cl->case_name);
337 		f_print(fout, "\t\tbreak;\n");
342 			f_print(fout, "\tdefault:\n");
356 			f_print(fout, "\t\tbreak;\n");
358 			f_print(fout, "\tdefault:\n");
359 			f_print(fout, "\t\tbreak;\n");
362 		f_print(fout, "\tdefault:\n");
363 		f_print(fout, "\t\treturn (FALSE);\n");
366 	f_print(fout, "\t}\n");
383 		f_print(fout, "\n\tif (xdrs->x_op == XDR_ENCODE) {\n");
385 		f_print(fout, "\t\treturn (TRUE);\n\t} else if (xdrs->x_op == XDR_DECODE) {\n");
442 					tabify(fout, indent + 1);
444 						f_print(fout, "buf = XDR_INLINE(xdrs, %d * BYTES_PER_XDR_UNIT);",
448 							f_print(fout,
452 							f_print(fout,
457 					f_print(fout, "\n");
458 					tabify(fout, indent + 1);
459 					f_print(fout,
468 					f_print(fout, "\n\t\t} else {\n");
476 					tabify(fout, indent + 1);
477 					f_print(fout, "}\n");
498 				f_print(fout, "\t\tbuf = XDR_INLINE(xdrs, %d * BYTES_PER_XDR_UNIT);",
502 					f_print(fout,
506 					f_print(fout,
510 			f_print(fout, "\n\t\tif (buf == NULL) {\n");
516 			f_print(fout, "\t\t} else {\n");
523 			f_print(fout, "\t\t}\n");
546 			f_print(fout, "\tint i;\n");
589 	f_print(fout, "\t\treturn (TRUE);\n\t}\n\n");
637 		tabify(fout, indent);
638 		f_print(fout, "{\n");
639 		tabify(fout, indent + 1);
640 		f_print(fout, "%s *genp;\n\n", decl->type);
641 		tabify(fout, indent + 1);
642 		f_print(fout,
644 		tabify(fout, indent + 2);
645 		f_print(fout, "i < %s; i++) {\n", decl->array_max);
647 		tabify(fout, indent + 1);
648 		f_print(fout, "}\n");
649 		tabify(fout, indent);
650 		f_print(fout, "}\n");
662 	tabify(fout, indent);
664 		f_print(fout, "IXDR_PUT_");
667 			f_print(fout, "objp->%s = IXDR_GET_", decl->name);
669 			f_print(fout, "*genp++ = IXDR_GET_");
687 			f_print(fout,
690 			f_print(fout, "%s(buf, *genp++);\n", upp_case);
693 		f_print(fout, "%s(buf);\n", upp_case);