次のようなヘッダファイルがあるとします。
/* time_prot.h */
#include <rpc/rpc.h>
#include <rpc/types.h>
struct timev {
int second;
int minute;
int hour;
};
typedef struct timev timev;
bool_t xdr_timev();
#define TIME_PROG 0x40000001
#define TIME_VERS 1
#define TIME_GET 1
次に、クライアント側の、トップレベルのサービスルーチンを使用する簡単な日時表示プログラムを示します。トランスポートタイプはプログラムを起動するときの引数で指定します。
#include <stdio.h>
#include "time_prot.h"
#define TOTAL (30)
/*
* 時刻を返すサービスを呼び出すプログラム
* 使用方法: calltime ホスト名
*/
main(argc, argv)
int argc;
char *argv[];
{
struct timeval time_out;
CLIENT *client;
enum clnt_stat stat;
struct timev timev;
char *nettype;
if (argc != 2 && argc != 3) {
fprintf(stderr,”usage:%s host[nettype]\n”
,argv[0]);
exit(1);
}
if (argc == 2)
nettype = "netpath"; /* デフォルト */
else
nettype = argv[2];
client = clnt_create(argv[1], TIME_PROG,
TIME_VERS, nettype);
if (client == (CLIENT *) NULL) {
clnt_pcreateerror(“Couldn't create client”);
exit(1);
}
time_out.tv_sec = TOTAL;
time_out.tv_usec = 0;
stat = clnt_call( client, TIME_GET,
xdr_void, (caddr_t)NULL,
xdr_timev, (caddr_t)&timev,
time_out);
if (stat != RPC_SUCCESS) {
clnt_perror(client, "Call failed");
exit(1);
}
fprintf(stderr,"%s: %02d:%02d:%02d GMT\n",
nettype timev.hour, timev.minute,
timev.second);
(void) clnt_destroy(client);
exit(0);
}
|
プログラムを起動するときに nettype を指定しなかった場合は、代わりに 「netpath」という文字列が使用されます。RPC ライブラリルーチンは、この文字列を見つけると、環境変数 NETPATH 値によって使用するトランスポートを決めます。
クライアントハンドルが作成できない場合は、clnt_pcreateerror() でエラー原因を表示します。または、グローバル変数 rpc_createerr の値としてエラーステータスを取り出します。
クライアントハンドルが作成できたら、clnt_call() を使用してリモート呼び出しを行います。clnt_call() の引数は、クライアントハンドル、リモートプロシージャ番号、入力引数に対する XDR フィルタ、引数へのポインタ、戻り値に対する XDR フィルタ、戻り値へのポインタ、呼び出しのタイムアウト値です。この例では、リモートプロシージャに渡す引数はないので、XDR ルーチンとしては xdr_void() を指定しています。最後に clnt_destroy() を使用して使用済みメモリーを解放します。
上記の例でプログラマがクライアントハンドル作成に許される時間を30 秒に設定したいとすると、次のコード例の一部のように、clnt_create() への呼び出しは clnt_create_timed() への呼び出しに替わります。
struct timeval timeout; timeout.tv_sec = 30; /* 30 秒 */ timeout.tv_usec = 0; client = clnt_create_timed(argv[1], TIME_PROG, TIME_VERS, nettype, &timeout); |
次に、トップレベルのサービスルーチンを使用したサーバー側プログラムを示します。
#include <stdio.h>
#include <rpc/rpc.h>
#include "time_prot.h"
static void time_prog();
main(argc,argv)
int argc;
char *argv[];
{
int transpnum;
char *nettype;
if (argc> 2) {
fprintf(stderr, "usage: %s [nettype]\n",
argv[0]);
exit(1);
}
if (argc == 2)
nettype = argv[1];
else
nettype = "netpath"; /* デフォルト */
transpnum =
svc_create(time_prog,TIME_PROG,TIME_VERS,nettype);
if (transpnum == 0) {
fprintf(stderr,”%s: cannot create %s service.\n”,
argv[0], nettype);
exit(1);
}
svc_run();
}
/*
* サーバーのディスパッチ関数
*/
static void
time_prog(rqstp, transp)
struct svc_req *rqstp;
SVCXPRT *transp;
{
struct timev rslt;
time_t thetime;
switch(rqstp->rq_proc) {
case NULLPROC:
svc_sendreply(transp, xdr_void, NULL);
return;
case TIME_GET:
break;
default:
svcerr_noproc(transp);
return;
}
thetime = time((time_t *) 0);
rslt.second = thetime % 60;
thetime /= 60;
rslt.minute = thetime % 60;
thetime /= 60;
rslt.hour = thetime % 24;
if (!svc_sendreply( transp, xdr_timev, &rslt)) {
svcerr_systemerr(transp);
}
}
|
svc_create() は、サーバーハンドルを作成したトランスポートの個数を返します。サービス関数 time_prog() は、対応するプログラム番号とバージョン番号を指定したサービス要求がきたときに svc_run() に呼び出されます。サーバーは、svc_sendreply() を使用して戻り値をクライアントに返します。
rpcgen を使用してディスパッチ関数を生成する場合は、 svc_sendreply() は手続きが戻り値を返してから呼び出されます。そのため、戻り値 (この例では rslt) は実際の手続き内で static 宣言しなければなりません。この例では、svc_sendreply() はディスパッチ関数の中で呼び出されているので、rslt は static で宣言されていません。
この例では、リモートプロシージャには引数がありません。引数を渡す必要がある場合は次の 2 つの関数を呼び出して、引数を取り出し、デシリアライズ (XDR 形式から復号化) し、解放します。
svc_getargs( SVCXPRT_handle, XDR_filter, argument_pointer); svc_freeargs( SVCXPRT_handle, XDR_filter argument_pointer );