2 * From @(#)rpc_main.c 1.30 89/03/30
4 * Copyright (c) 2010, Oracle America, Inc.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
9 * * Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * * Redistributions in binary form must reproduce the above
12 * copyright notice, this list of conditions and the following
13 * disclaimer in the documentation and/or other materials
14 * provided with the distribution.
15 * * Neither the name of the "Oracle America, Inc." nor the names of its
16 * contributors may be used to endorse or promote products derived
17 * from this software without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
20 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
21 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
22 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
23 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
24 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
26 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
28 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
29 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
30 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 * rpc_main.c, Top level of the RPC protocol compiler.
43 #include <sys/types.h>
44 #include <sys/param.h>
48 #include "rpc_parse.h"
53 #include "../version.h"
54 #define PACKAGE _libc_intl_domainname
56 #define EXTEND 1 /* alias for TRUE */
57 #define DONT_EXTEND 0 /* alias for FALSE */
61 int cflag
; /* xdr C routines */
62 int hflag
; /* header file */
63 int lflag
; /* client side stubs */
64 int mflag
; /* server side stubs */
65 int nflag
; /* netid flag */
66 int sflag
; /* server stubs for the given transport */
67 int tflag
; /* dispatch Table file */
68 int Ssflag
; /* produce server sample code */
69 int Scflag
; /* produce client sample code */
70 int makefileflag
; /* Generate a template Makefile */
71 const char *infile
; /* input module name */
72 const char *outfile
; /* output module name */
76 static const char *cmdname
;
78 #define SVR4_CPP "/usr/ccs/lib/cpp"
79 #define SUNOS_CPP "/lib/cpp"
81 static const char *svcclosetime
= "120";
82 static int cppDefined
; /* explicit path for C preprocessor */
83 static const char *CPP
= SUNOS_CPP
;
84 static const char CPPFLAGS
[] = "-C";
87 static const char *allv
[] =
89 "rpcgen", "-s", "udp", "-s", "tcp"
91 static int allc
= sizeof (allv
) / sizeof (allv
[0]);
92 static const char *allnv
[] =
94 "rpcgen", "-s", "netpath",
96 static int allnc
= sizeof (allnv
) / sizeof (allnv
[0]);
99 * machinations for handling expanding argument list
101 static void addarg (const char *); /* add another argument to the list */
102 static void putarg (int, const char *); /* put argument at specified location */
103 static void clear_args (void); /* clear argument list */
104 static void checkfiles (const char *, const char *);
105 /* check if out file already exists */
107 static void clear_args (void);
108 static char *extendfile (const char *file
, const char *ext
);
109 static void open_output (const char *infile
, const char *outfile
);
110 static void add_warning (void);
111 static void clear_args (void);
112 static void find_cpp (void);
113 static void open_input (const char *infile
, const char *define
);
114 static int check_nettype (const char *name
, const char *list_to_check
[]);
115 static void c_output (const char *infile
, const char *define
,
116 int extend
, const char *outfile
);
117 static void h_output (const char *infile
, const char *define
,
118 int extend
, const char *outfile
);
119 static void s_output (int argc
, const char *argv
[], const char *infile
,
120 const char *define
, int extend
,
121 const char *outfile
, int nomain
, int netflag
);
122 static void l_output (const char *infile
, const char *define
,
123 int extend
, const char *outfile
);
124 static void t_output (const char *infile
, const char *define
,
125 int extend
, const char *outfile
);
126 static void svc_output (const char *infile
, const char *define
,
127 int extend
, const char *outfile
);
128 static void clnt_output (const char *infile
, const char *define
,
129 int extend
, const char *outfile
);
130 static void mkfile_output (struct commandline
*cmd
);
131 static int do_registers (int argc
, const char *argv
[]);
132 static void addarg (const char *cp
);
133 static void putarg (int whereto
, const char *cp
);
134 static void checkfiles (const char *infile
, const char *outfile
);
135 static int parseargs (int argc
, const char *argv
[], struct commandline
*cmd
);
136 static void usage (FILE *stream
, int status
) __attribute__ ((noreturn
));
137 static void options_usage (FILE *stream
, int status
) __attribute__ ((noreturn
));
138 static void print_version (void);
139 static void c_initialize (void);
140 static char *generate_guard (const char *pathname
);
143 #define ARGLISTLEN 20
146 static const char *arglist
[ARGLISTLEN
];
147 static int argcount
= FIXEDARGS
;
150 int nonfatalerrors
; /* errors */
151 int inetdflag
/* = 1 */ ; /* Support for inetd *//* is now the default */
152 int pmflag
; /* Support for port monitors */
153 int logflag
; /* Use syslog instead of fprintf for errors */
154 int tblflag
; /* Support for dispatch table file */
155 int mtflag
; /* Support for MT */
158 /*length at which to start doing an inline */
160 int inlineflag
= INLINE
; /* length at which to start doing an inline. 3 = default
161 if 0, no xdr_inline code */
163 int indefinitewait
; /* If started by port monitors, hang till it wants */
164 int exitnow
; /* If started by port monitors, exit after the call */
165 int timerflag
; /* TRUE if !indefinite && !exitnow */
166 int newstyle
; /* newstyle of passing arguments (by value) */
167 #ifdef __GNU_LIBRARY__
168 int Cflag
= 1; /* ANSI C syntax */
170 int Cflag
; /* ANSI C/C++ syntax */
172 int CCflag
; /* C++ files */
173 static int allfiles
; /* generate all files */
174 #ifdef __GNU_LIBRARY__
175 int tirpcflag
; /* generating code for tirpc, by default */
177 int tirpcflag
= 1; /* generating code for tirpc, by default */
179 xdrfunc
*xdrfunc_head
; /* xdr function list */
180 xdrfunc
*xdrfunc_tail
; /* xdr function list */
183 main (int argc
, const char *argv
[])
185 struct commandline cmd
;
187 (void) memset ((char *) &cmd
, 0, sizeof (struct commandline
));
189 if (!parseargs (argc
, argv
, &cmd
))
192 if (cmd
.cflag
|| cmd
.hflag
|| cmd
.lflag
|| cmd
.tflag
|| cmd
.sflag
||
193 cmd
.mflag
|| cmd
.nflag
|| cmd
.Ssflag
|| cmd
.Scflag
)
195 checkfiles (cmd
.infile
, cmd
.outfile
);
198 checkfiles (cmd
.infile
, NULL
);
201 c_output (cmd
.infile
, "-DRPC_XDR", DONT_EXTEND
, cmd
.outfile
);
203 h_output (cmd
.infile
, "-DRPC_HDR", DONT_EXTEND
, cmd
.outfile
);
205 l_output (cmd
.infile
, "-DRPC_CLNT", DONT_EXTEND
, cmd
.outfile
);
206 else if (cmd
.sflag
|| cmd
.mflag
|| (cmd
.nflag
))
207 s_output (argc
, argv
, cmd
.infile
, "-DRPC_SVC", DONT_EXTEND
,
208 cmd
.outfile
, cmd
.mflag
, cmd
.nflag
);
210 t_output (cmd
.infile
, "-DRPC_TBL", DONT_EXTEND
, cmd
.outfile
);
212 svc_output (cmd
.infile
, "-DRPC_SERVER", DONT_EXTEND
, cmd
.outfile
);
214 clnt_output (cmd
.infile
, "-DRPC_CLIENT", DONT_EXTEND
, cmd
.outfile
);
215 else if (cmd
.makefileflag
)
216 mkfile_output (&cmd
);
219 /* the rescans are required, since cpp may effect input */
220 c_output (cmd
.infile
, "-DRPC_XDR", EXTEND
, "_xdr.c");
222 h_output (cmd
.infile
, "-DRPC_HDR", EXTEND
, ".h");
224 l_output (cmd
.infile
, "-DRPC_CLNT", EXTEND
, "_clnt.c");
226 if (inetdflag
|| !tirpcflag
)
227 s_output (allc
, allv
, cmd
.infile
, "-DRPC_SVC", EXTEND
,
228 "_svc.c", cmd
.mflag
, cmd
.nflag
);
230 s_output (allnc
, allnv
, cmd
.infile
, "-DRPC_SVC",
231 EXTEND
, "_svc.c", cmd
.mflag
, cmd
.nflag
);
235 t_output (cmd
.infile
, "-DRPC_TBL", EXTEND
, "_tbl.i");
240 svc_output (cmd
.infile
, "-DRPC_SERVER", EXTEND
, "_server.c");
242 clnt_output (cmd
.infile
, "-DRPC_CLIENT", EXTEND
, "_client.c");
244 if (allfiles
|| (cmd
.makefileflag
== 1))
247 mkfile_output (&cmd
);
251 return nonfatalerrors
;
255 * add extension to filename
258 extendfile (const char *file
, const char *ext
)
263 res
= alloc (strlen (file
) + strlen (ext
) + 1);
266 p
= strrchr (file
, '.');
268 p
= file
+ strlen (file
);
270 strcpy (res
+ (p
- file
), ext
);
275 * Open output file with given extension
278 open_output (const char *infile
, const char *outfile
)
286 if (infile
!= NULL
&& streq (outfile
, infile
))
288 fprintf (stderr
, _ ("%s: output would overwrite %s\n"), cmdname
,
292 fout
= fopen (outfile
, "w");
295 fprintf (stderr
, _ ("%s: unable to open %s: %m\n"), cmdname
, outfile
);
298 record_open (outfile
);
301 /* Close the output file and check for write errors. */
303 close_output (const char *outfile
)
305 if (fclose (fout
) == EOF
)
307 fprintf (stderr
, _("%s: while writing output %s: %m"), cmdname
,
308 outfile
?: "<stdout>");
316 fprintf (fout
, "/*\n");
317 fprintf (fout
, " * Please do not edit this file.\n");
318 fprintf (fout
, " * It was generated using rpcgen.\n");
319 fprintf (fout
, " */\n\n");
322 /* clear list of arguments */
327 for (i
= FIXEDARGS
; i
< ARGLISTLEN
; ++i
)
329 argcount
= FIXEDARGS
;
332 /* make sure that a CPP exists */
338 if (stat (CPP
, &buf
) < 0)
339 { /* /lib/cpp or explicit cpp does not exist */
342 fprintf (stderr
, _ ("cannot find C preprocessor: %s \n"), CPP
);
346 { /* try the other one */
348 if (stat (CPP
, &buf
) < 0)
349 { /* can't find any cpp */
350 fputs (_ ("cannot find any C preprocessor (cpp)\n"), stdout
);
358 * Open input file with given define for C-preprocessor
361 open_input (const char *infile
, const char *define
)
365 infilename
= (infile
== NULL
) ? "<stdin>" : infile
;
377 putarg (1, CPPFLAGS
);
381 addarg ((char *) NULL
);
385 execv (arglist
[0], (char **) arglist
);
393 fin
= fdopen (pd
[0], "r");
396 fprintf (stderr
, "%s: ", cmdname
);
402 /* Close the connection to the C-preprocessor and check for successfull
410 /* Check the termination status. */
411 if (waitpid (cpp_pid
, &status
, 0) < 0)
416 if (WIFSIGNALED (status
) || WEXITSTATUS (status
) != 0)
418 if (WIFSIGNALED (status
))
419 fprintf (stderr
, _("%s: C preprocessor failed with signal %d\n"),
420 cmdname
, WTERMSIG (status
));
422 fprintf (stderr
, _("%s: C preprocessor failed with exit code %d\n"),
423 cmdname
, WEXITSTATUS (status
));
428 /* valid tirpc nettypes */
429 static const char *valid_ti_nettypes
[] =
443 /* valid inetd nettypes */
444 static const char *valid_i_nettypes
[] =
452 check_nettype (const char *name
, const char *list_to_check
[])
455 for (i
= 0; list_to_check
[i
] != NULL
; i
++)
457 if (strcmp (name
, list_to_check
[i
]) == 0)
462 fprintf (stderr
, _ ("illegal nettype: `%s'\n"), name
);
467 * Compile into an XDR routine output file
471 c_output (const char *infile
, const char *define
, int extend
,
476 const char *outfilename
;
480 open_input (infile
, define
);
481 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
482 open_output (infile
, outfilename
);
484 if (infile
&& (include
= extendfile (infile
, ".h")))
486 fprintf (fout
, "#include \"%s\"\n", include
);
488 /* .h file already contains rpc/rpc.h */
491 fprintf (fout
, "#include <rpc/rpc.h>\n");
493 while ((def
= get_definition ()) != NULL
)
496 if (extend
&& tell
== ftell (fout
))
497 unlink (outfilename
);
499 close_output (outfilename
);
506 /* add all the starting basic types */
509 add_type (1, "long");
510 add_type (1, "short");
511 add_type (1, "bool");
513 add_type (1, "u_int");
514 add_type (1, "u_long");
515 add_type (1, "u_short");
519 char rpcgen_table_dcl
[] = "struct rpcgen_table {\n\
521 xdrproc_t xdr_arg;\n\
523 xdrproc_t xdr_res;\n\
529 generate_guard (const char *pathname
)
531 const char *filename
;
534 filename
= strrchr (pathname
, '/'); /* find last component */
535 filename
= ((filename
== NULL
) ? pathname
: filename
+ 1);
536 guard
= extendfile (filename
, "_H_RPCGEN");
537 /* convert to upper case */
542 *tmp
= toupper (*tmp
);
550 * Compile into an XDR header file
555 h_output (const char *infile
, const char *define
, int extend
,
560 const char *ifilename
;
561 const char *outfilename
;
566 open_input (infile
, define
);
567 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
568 open_output (infile
, outfilename
);
570 ifilename
= (infile
== NULL
) ? "STDIN" : infile
;
571 guard
= generate_guard (outfilename
? outfilename
: ifilename
);
573 fprintf (fout
, "#ifndef _%s\n#define _%s\n\n", guard
,
576 fprintf (fout
, "#include <rpc/rpc.h>\n\n");
580 fprintf (fout
, "#include <pthread.h>\n");
583 /* put the C++ support */
584 if (Cflag
&& !CCflag
)
586 fprintf (fout
, "\n#ifdef __cplusplus\n");
587 fprintf (fout
, "extern \"C\" {\n");
588 fprintf (fout
, "#endif\n\n");
592 /* print data definitions */
593 while ((def
= get_definition ()) != NULL
)
598 /* print function declarations.
599 Do this after data definitions because they might be used as
600 arguments for functions */
601 for (l
= defined
; l
!= NULL
; l
= l
->next
)
603 print_funcdef (l
->val
);
605 /* Now print all xdr func declarations */
606 if (xdrfunc_head
!= NULL
)
608 fprintf (fout
, "\n/* the xdr functions */\n");
611 fprintf (fout
, "\n#ifdef __cplusplus\n");
612 fprintf (fout
, "extern \"C\" {\n");
613 fprintf (fout
, "#endif\n");
617 xdrfuncp
= xdrfunc_head
;
618 while (xdrfuncp
!= NULL
)
620 print_xdr_func_def (xdrfuncp
->name
,
621 xdrfuncp
->pointerp
, 2);
622 xdrfuncp
= xdrfuncp
->next
;
629 for (i
= 1; i
< 3; ++i
)
632 fprintf (fout
, "\n#if defined(__STDC__) || defined(__cplusplus)\n");
634 fprintf (fout
, "\n#else /* K&R C */\n");
636 xdrfuncp
= xdrfunc_head
;
637 while (xdrfuncp
!= NULL
)
639 print_xdr_func_def (xdrfuncp
->name
,
640 xdrfuncp
->pointerp
, i
);
641 xdrfuncp
= xdrfuncp
->next
;
644 fprintf (fout
, "\n#endif /* K&R C */\n");
648 if (extend
&& tell
== ftell (fout
))
650 unlink (outfilename
);
654 fprintf (fout
, rpcgen_table_dcl
);
659 fprintf (fout
, "\n#ifdef __cplusplus\n");
660 fprintf (fout
, "}\n");
661 fprintf (fout
, "#endif\n");
664 fprintf (fout
, "\n#endif /* !_%s */\n", guard
);
667 close_output (outfilename
);
671 * Compile into an RPC service
674 s_output (int argc
, const char *argv
[], const char *infile
, const char *define
,
675 int extend
, const char *outfile
, int nomain
, int netflag
)
679 int foundprogram
= 0;
680 const char *outfilename
;
682 open_input (infile
, define
);
683 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
684 open_output (infile
, outfilename
);
686 if (infile
&& (include
= extendfile (infile
, ".h")))
688 fprintf (fout
, "#include \"%s\"\n", include
);
692 fprintf (fout
, "#include <rpc/rpc.h>\n");
694 fprintf (fout
, "#include <stdio.h>\n");
695 fprintf (fout
, "#include <stdlib.h>\n");
696 fprintf (fout
, "#include <rpc/pmap_clnt.h>\n");
698 fprintf (fout
, "#include <string.h>\n");
699 if (strcmp (svcclosetime
, "-1") == 0)
701 else if (strcmp (svcclosetime
, "0") == 0)
703 else if (inetdflag
|| pmflag
)
705 fprintf (fout
, "#include <signal.h>\n");
709 if (!tirpcflag
&& inetdflag
)
710 #ifdef __GNU_LIBRARY__
711 fprintf (fout
, "#include <sys/ioctl.h> /* ioctl, TIOCNOTTY */\n");
713 fprintf (fout
, "#include <sys/ttycom.h>/* TIOCNOTTY */\n");
715 if (Cflag
&& (inetdflag
|| pmflag
))
717 #ifdef __GNU_LIBRARY__
718 fprintf (fout
, "#include <sys/types.h> /* open */\n");
719 fprintf (fout
, "#include <sys/stat.h> /* open */\n");
720 fprintf (fout
, "#include <fcntl.h> /* open */\n");
721 fprintf (fout
, "#include <unistd.h> /* getdtablesize */\n");
723 fprintf (fout
, "#ifdef __cplusplus\n");
724 fprintf (fout
, "#include <sysent.h> /* getdtablesize, open */\n");
725 fprintf (fout
, "#endif /* __cplusplus */\n");
727 fprintf (fout
, "#include <unistd.h> /* setsid */\n");
730 #ifdef __GNU_LIBRARY__
731 if (tirpcflag
&& !(Cflag
&& (inetdflag
|| pmflag
)))
735 fprintf (fout
, "#include <sys/types.h>\n");
737 fprintf (fout
, "#include <memory.h>\n");
738 #ifndef __GNU_LIBRARY__
739 fprintf (fout
, "#include <stropts.h>\n");
741 if (inetdflag
|| !tirpcflag
)
743 fprintf (fout
, "#include <sys/socket.h>\n");
744 fprintf (fout
, "#include <netinet/in.h>\n");
747 if ((netflag
|| pmflag
) && tirpcflag
&& !nomain
)
749 fprintf (fout
, "#include <netconfig.h>\n");
751 if ( /*timerflag && */ tirpcflag
)
752 fprintf (fout
, "#include <sys/resource.h> /* rlimit */\n");
753 if (logflag
|| inetdflag
|| pmflag
)
755 #ifdef __GNU_LIBRARY__
756 fprintf (fout
, "#include <syslog.h>\n");
758 fprintf (fout
, "#ifdef SYSLOG\n");
759 fprintf (fout
, "#include <syslog.h>\n");
760 fprintf (fout
, "#else\n");
761 fprintf (fout
, "#define LOG_ERR 1\n");
762 fprintf (fout
, "#define openlog(a, b, c)\n");
763 fprintf (fout
, "#endif\n");
769 fprintf (fout
, "\n#ifndef SIG_PF\n#define SIG_PF void(*)(int)\n#endif\n");
771 #ifndef __GNU_LIBRARY__
772 fprintf (fout
, "\n#ifdef DEBUG\n#define RPC_SVC_FG\n#endif\n");
775 fprintf (fout
, "\n#define _RPCSVC_CLOSEDOWN %s\n", svcclosetime
);
776 while ((def
= get_definition ()) != NULL
)
778 foundprogram
|= (def
->def_kind
== DEF_PROGRAM
);
780 if (extend
&& !foundprogram
)
782 unlink (outfilename
);
785 write_most (infile
, netflag
, nomain
);
788 if (!do_registers (argc
, argv
))
791 unlink (outfilename
);
797 close_output (outfilename
);
801 * generate client side stubs
804 l_output (const char *infile
, const char *define
, int extend
,
809 int foundprogram
= 0;
810 const char *outfilename
;
812 open_input (infile
, define
);
813 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
814 open_output (infile
, outfilename
);
817 fprintf (fout
, "#include <memory.h> /* for memset */\n");
818 if (infile
&& (include
= extendfile (infile
, ".h")))
820 fprintf (fout
, "#include \"%s\"\n", include
);
824 fprintf (fout
, "#include <rpc/rpc.h>\n");
825 while ((def
= get_definition ()) != NULL
)
827 foundprogram
|= (def
->def_kind
== DEF_PROGRAM
);
829 if (extend
&& !foundprogram
)
831 unlink (outfilename
);
836 close_output (outfilename
);
840 * generate the dispatch table
843 t_output (const char *infile
, const char *define
, int extend
,
847 int foundprogram
= 0;
848 const char *outfilename
;
850 open_input (infile
, define
);
851 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
852 open_output (infile
, outfilename
);
854 while ((def
= get_definition ()) != NULL
)
856 foundprogram
|= (def
->def_kind
== DEF_PROGRAM
);
858 if (extend
&& !foundprogram
)
860 unlink (outfilename
);
865 close_output (outfilename
);
868 /* sample routine for the server template */
870 svc_output (const char *infile
, const char *define
, int extend
,
875 const char *outfilename
;
878 open_input (infile
, define
);
879 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
880 checkfiles (infile
, outfilename
);
881 /*check if outfile already exists.
882 if so, print an error message and exit */
883 open_output (infile
, outfilename
);
886 if (infile
&& (include
= extendfile (infile
, ".h")))
888 fprintf (fout
, "#include \"%s\"\n", include
);
892 fprintf (fout
, "#include <rpc/rpc.h>\n");
895 while ((def
= get_definition ()) != NULL
)
897 write_sample_svc (def
);
899 if (extend
&& tell
== ftell (fout
))
901 unlink (outfilename
);
904 close_output (outfilename
);
908 /* sample main routine for client */
910 clnt_output (const char *infile
, const char *define
, int extend
,
915 const char *outfilename
;
919 open_input (infile
, define
);
920 outfilename
= extend
? extendfile (infile
, outfile
) : outfile
;
921 checkfiles (infile
, outfilename
);
922 /*check if outfile already exists.
923 if so, print an error message and exit */
925 open_output (infile
, outfilename
);
927 if (infile
&& (include
= extendfile (infile
, ".h")))
929 fprintf (fout
, "#include \"%s\"\n", include
);
933 fprintf (fout
, "#include <rpc/rpc.h>\n");
935 while ((def
= get_definition ()) != NULL
)
937 has_program
+= write_sample_clnt (def
);
941 write_sample_clnt_main ();
943 if (extend
&& tell
== ftell (fout
))
945 unlink (outfilename
);
948 close_output (outfilename
);
951 static const char space
[] = " ";
954 file_name (const char *file
, const char *ext
)
957 temp
= extendfile (file
, ext
);
959 if (access (temp
, F_OK
) != -1)
963 return (char *) space
;
967 mkfile_output (struct commandline
*cmd
)
970 char *clientname
, *clntname
, *xdrname
, *hdrname
;
971 char *servername
, *svcname
, *servprogname
, *clntprogname
;
973 svcname
= file_name (cmd
->infile
, "_svc.c");
974 clntname
= file_name (cmd
->infile
, "_clnt.c");
975 xdrname
= file_name (cmd
->infile
, "_xdr.c");
976 hdrname
= file_name (cmd
->infile
, ".h");
980 servername
= extendfile (cmd
->infile
, "_server.c");
981 clientname
= extendfile (cmd
->infile
, "_client.c");
985 servername
= (char *) space
;
986 clientname
= (char *) space
;
988 servprogname
= extendfile (cmd
->infile
, "_server");
989 clntprogname
= extendfile (cmd
->infile
, "_client");
995 mkfilename
= alloc (strlen ("Makefile.") + strlen (cmd
->infile
) + 1);
996 if (mkfilename
== NULL
)
998 temp
= rindex (cmd
->infile
, '.');
999 cp
= stpcpy (mkfilename
, "Makefile.");
1001 *((char *) stpncpy (cp
, cmd
->infile
, temp
- cmd
->infile
)) = '\0';
1003 stpcpy (cp
, cmd
->infile
);
1007 mkfilename
= (char *) cmd
->outfile
;
1009 checkfiles (NULL
, mkfilename
);
1010 open_output (NULL
, mkfilename
);
1012 fprintf (fout
, "\n# This is a template Makefile generated by rpcgen\n");
1014 f_print (fout
, "\n# Parameters\n\n");
1016 f_print (fout
, "CLIENT = %s\nSERVER = %s\n\n", clntprogname
, servprogname
);
1017 f_print (fout
, "SOURCES_CLNT.c = \nSOURCES_CLNT.h = \n");
1018 f_print (fout
, "SOURCES_SVC.c = \nSOURCES_SVC.h = \n");
1019 f_print (fout
, "SOURCES.x = %s\n\n", cmd
->infile
);
1020 f_print (fout
, "TARGETS_SVC.c = %s %s %s \n",
1021 svcname
, servername
, xdrname
);
1022 f_print (fout
, "TARGETS_CLNT.c = %s %s %s \n",
1023 clntname
, clientname
, xdrname
);
1024 f_print (fout
, "TARGETS = %s %s %s %s %s %s\n\n",
1025 hdrname
, xdrname
, clntname
,
1026 svcname
, clientname
, servername
);
1028 f_print (fout
, "OBJECTS_CLNT = $(SOURCES_CLNT.c:%%.c=%%.o) \
1029 $(TARGETS_CLNT.c:%%.c=%%.o)");
1031 f_print (fout
, "\nOBJECTS_SVC = $(SOURCES_SVC.c:%%.c=%%.o) \
1032 $(TARGETS_SVC.c:%%.c=%%.o)");
1034 f_print (fout
, "\n# Compiler flags \n");
1036 fprintf (fout
, "\nCPPFLAGS += -D_REENTRANT\nCFLAGS += -g \nLDLIBS \
1037 += -lnsl -lpthread \n ");
1039 f_print (fout
, "\nCFLAGS += -g \nLDLIBS += -lnsl\n");
1040 f_print (fout
, "RPCGENFLAGS = \n");
1042 f_print (fout
, "\n# Targets \n\n");
1044 f_print (fout
, "all : $(CLIENT) $(SERVER)\n\n");
1045 f_print (fout
, "$(TARGETS) : $(SOURCES.x) \n");
1046 f_print (fout
, "\trpcgen $(RPCGENFLAGS) $(SOURCES.x)\n\n");
1047 f_print (fout
, "$(OBJECTS_CLNT) : $(SOURCES_CLNT.c) $(SOURCES_CLNT.h) \
1048 $(TARGETS_CLNT.c) \n\n");
1050 f_print (fout
, "$(OBJECTS_SVC) : $(SOURCES_SVC.c) $(SOURCES_SVC.h) \
1051 $(TARGETS_SVC.c) \n\n");
1052 f_print (fout
, "$(CLIENT) : $(OBJECTS_CLNT) \n");
1053 f_print (fout
, "\t$(LINK.c) -o $(CLIENT) $(OBJECTS_CLNT) \
1055 f_print (fout
, "$(SERVER) : $(OBJECTS_SVC) \n");
1056 f_print (fout
, "\t$(LINK.c) -o $(SERVER) $(OBJECTS_SVC) $(LDLIBS)\n\n ");
1057 f_print (fout
, "clean:\n\t $(RM) core $(TARGETS) $(OBJECTS_CLNT) \
1058 $(OBJECTS_SVC) $(CLIENT) $(SERVER)\n\n");
1059 close_output (mkfilename
);
1061 free (clntprogname
);
1062 free (servprogname
);
1063 if (servername
!= space
)
1065 if (clientname
!= space
)
1067 if (mkfilename
!= (char *) cmd
->outfile
)
1069 if (svcname
!= space
)
1071 if (clntname
!= space
)
1073 if (xdrname
!= space
)
1075 if (hdrname
!= space
)
1080 * Perform registrations for service output
1081 * Return 0 if failed; 1 otherwise.
1084 do_registers (int argc
, const char *argv
[])
1088 if (inetdflag
|| !tirpcflag
)
1090 for (i
= 1; i
< argc
; i
++)
1092 if (streq (argv
[i
], "-s"))
1094 if (!check_nettype (argv
[i
+ 1], valid_i_nettypes
))
1096 write_inetd_register (argv
[i
+ 1]);
1103 for (i
= 1; i
< argc
; i
++)
1104 if (streq (argv
[i
], "-s"))
1106 if (!check_nettype (argv
[i
+ 1], valid_ti_nettypes
))
1108 write_nettype_register (argv
[i
+ 1]);
1111 else if (streq (argv
[i
], "-n"))
1113 write_netid_register (argv
[i
+ 1]);
1121 * Add another argument to the arg list
1124 addarg (const char *cp
)
1126 if (argcount
>= ARGLISTLEN
)
1128 fprintf (stderr
, _("rpcgen: too many defines\n"));
1132 arglist
[argcount
++] = cp
;
1136 putarg (int whereto
, const char *cp
)
1138 if (whereto
>= ARGLISTLEN
)
1140 fprintf (stderr
, _("rpcgen: arglist coding error\n"));
1144 arglist
[whereto
] = cp
;
1148 * if input file is stdin and an output file is specified then complain
1149 * if the file already exists. Otherwise the file may get overwritten
1150 * If input file does not exist, exit with an error
1154 checkfiles (const char *infile
, const char *outfile
)
1158 if (infile
) /* infile ! = NULL */
1159 if (stat (infile
, &buf
) < 0)
1166 if (stat (outfile
, &buf
) < 0)
1167 return; /* file does not exist */
1171 /* TRANS: the file will not be removed; this is an
1172 TRANS: informative message. */
1173 _("file `%s' already exists and may be overwritten\n"),
1181 * Parse command line arguments
1184 parseargs (int argc
, const char *argv
[], struct commandline
*cmd
)
1189 char flag
[(1 << 8 * sizeof (char))];
1193 cmd
->infile
= cmd
->outfile
= NULL
;
1211 for (i
= 1; i
< argc
; i
++)
1213 if (argv
[i
][0] != '-')
1218 _("Cannot specify more than one input file!\n"));
1221 cmd
->infile
= argv
[i
];
1223 else if (strcmp (argv
[i
], "--help") == 0)
1225 else if (strcmp (argv
[i
], "--version") == 0)
1229 for (j
= 1; argv
[i
][j
] != 0; j
++)
1247 /* sample flag: Ss or Sc.
1248 Ss means set flag['S'];
1249 Sc means set flag['C'];
1250 Sm means set flag['M']; */
1251 c
= argv
[i
][++j
]; /* get next char */
1265 case 'C': /* ANSI C syntax */
1269 #ifdef __GNU_LIBRARY__
1270 case 'k': /* K&R C syntax */
1275 case 'b': /* turn TIRPC flag off for
1276 generating backward compatible
1281 #ifdef __GNU_LIBRARY__
1282 case '5': /* turn TIRPC flag on for
1283 generating SysVr4 compatible
1302 svcclosetime
= argv
[i
];
1315 inlineflag
= atoi (argv
[i
]);
1320 if (argv
[i
][j
- 1] != '-' ||
1321 argv
[i
][j
+ 1] != 0)
1332 if (!streq (argv
[i
], "udp") &&
1333 !streq (argv
[i
], "tcp"))
1340 cmd
->outfile
= argv
[i
];
1344 if (argv
[i
][j
- 1] != '-')
1352 size_t len
= strlen (argv
[i
]);
1353 pathbuf
= malloc (len
+ 5);
1354 if (pathbuf
== NULL
)
1359 stpcpy (stpcpy (pathbuf
,
1376 cmd
->cflag
= flag
['c'];
1377 cmd
->hflag
= flag
['h'];
1378 cmd
->lflag
= flag
['l'];
1379 cmd
->mflag
= flag
['m'];
1380 cmd
->nflag
= flag
['n'];
1381 cmd
->sflag
= flag
['s'];
1382 cmd
->tflag
= flag
['t'];
1383 cmd
->Ssflag
= flag
['S'];
1384 cmd
->Scflag
= flag
['C'];
1385 cmd
->makefileflag
= flag
['M'];
1387 #ifndef _RPC_THREAD_SAFE_
1388 if (mtflag
|| newstyle
)
1390 /* glibc doesn't support these flags. */
1392 _("This implementation doesn't support newstyle or MT-safe code!\n"));
1398 pmflag
= inetdflag
? 0 : 1; /* pmflag or inetdflag is always TRUE */
1399 if ((inetdflag
&& cmd
->nflag
))
1400 { /* netid not allowed with inetdflag */
1401 fprintf (stderr
, _("Cannot use netid flag with inetd flag!\n"));
1407 pmflag
= 0; /* set pmflag only in tirpcmode */
1408 #ifndef __GNU_LIBRARY__
1409 inetdflag
= 1; /* inetdflag is TRUE by default */
1412 { /* netid needs TIRPC */
1413 f_print (stderr
, _("Cannot use netid flag without TIRPC!\n"));
1418 if (newstyle
&& (tblflag
|| cmd
->tflag
))
1420 f_print (stderr
, _("Cannot use table flags with newstyle!\n"));
1424 /* check no conflicts with file generation flags */
1425 nflags
= cmd
->cflag
+ cmd
->hflag
+ cmd
->lflag
+ cmd
->mflag
+
1426 cmd
->sflag
+ cmd
->nflag
+ cmd
->tflag
+ cmd
->Ssflag
+ cmd
->Scflag
;
1430 if (cmd
->outfile
!= NULL
|| cmd
->infile
== NULL
)
1435 else if (cmd
->infile
== NULL
&&
1436 (cmd
->Ssflag
|| cmd
->Scflag
|| cmd
->makefileflag
))
1439 _("\"infile\" is required for template generation flags.\n"));
1444 fprintf (stderr
, _("Cannot have more than one file generation flag!\n"));
1451 usage (FILE *stream
, int status
)
1453 fprintf (stream
, _("usage: %s infile\n"), cmdname
);
1454 fprintf (stream
, _("\t%s [-abkCLNTM][-Dname[=value]] [-i size] \
1455 [-I [-K seconds]] [-Y path] infile\n"), cmdname
);
1456 fprintf (stream
, _("\t%s [-c | -h | -l | -m | -t | -Sc | -Ss | -Sm] \
1457 [-o outfile] [infile]\n"), cmdname
);
1458 fprintf (stream
, _("\t%s [-s nettype]* [-o outfile] [infile]\n"), cmdname
);
1459 fprintf (stream
, _("\t%s [-n netid]* [-o outfile] [infile]\n"), cmdname
);
1460 options_usage (stream
, status
);
1465 options_usage (FILE *stream
, int status
)
1467 f_print (stream
, _("options:\n"));
1468 f_print (stream
, _("-a\t\tgenerate all files, including samples\n"));
1469 f_print (stream
, _("-b\t\tbackward compatibility mode (generates code for SunOS 4.1)\n"));
1470 f_print (stream
, _("-c\t\tgenerate XDR routines\n"));
1471 f_print (stream
, _("-C\t\tANSI C mode\n"));
1472 f_print (stream
, _("-Dname[=value]\tdefine a symbol (same as #define)\n"));
1473 f_print (stream
, _("-h\t\tgenerate header file\n"));
1474 f_print (stream
, _("-i size\t\tsize at which to start generating inline code\n"));
1475 f_print (stream
, _("-I\t\tgenerate code for inetd support in server (for SunOS 4.1)\n"));
1476 f_print (stream
, _("-K seconds\tserver exits after K seconds of inactivity\n"));
1477 f_print (stream
, _("-l\t\tgenerate client side stubs\n"));
1478 f_print (stream
, _("-L\t\tserver errors will be printed to syslog\n"));
1479 f_print (stream
, _("-m\t\tgenerate server side stubs\n"));
1480 f_print (stream
, _("-M\t\tgenerate MT-safe code\n"));
1481 f_print (stream
, _("-n netid\tgenerate server code that supports named netid\n"));
1482 f_print (stream
, _("-N\t\tsupports multiple arguments and call-by-value\n"));
1483 f_print (stream
, _("-o outfile\tname of the output file\n"));
1484 f_print (stream
, _("-s nettype\tgenerate server code that supports named nettype\n"));
1485 f_print (stream
, _("-Sc\t\tgenerate sample client code that uses remote procedures\n"));
1486 f_print (stream
, _("-Ss\t\tgenerate sample server code that defines remote procedures\n"));
1487 f_print (stream
, _("-Sm \t\tgenerate makefile template \n"));
1488 f_print (stream
, _("-t\t\tgenerate RPC dispatch table\n"));
1489 f_print (stream
, _("-T\t\tgenerate code to support RPC dispatch tables\n"));
1490 f_print (stream
, _("-Y path\t\tdirectory name to find C preprocessor (cpp)\n"));
1492 f_print (stream
, "\n%s", _("\
1493 For bug reporting instructions, please see:\n\
1494 <http://www.gnu.org/software/libc/bugs.html>.\n"));
1499 print_version (void)
1501 printf ("rpcgen (GNU %s) %s\n", PACKAGE
, VERSION
);