]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * $Source$ | |
3 | * $Author$ | |
4 | * $Header$ | |
5 | * | |
6 | * Copyright (C) 1987, 1990 by the Massachusetts Institute of Technology | |
7 | * For copying and distribution information, please see the file | |
8 | * <mit-copyright.h>. | |
9 | * | |
10 | * This routine is part of the client library. It handles | |
11 | * creating a connection to the mr server. | |
12 | */ | |
13 | ||
14 | #ifndef lint | |
15 | static char *rcsid_sms_connect_c = "$Header$"; | |
16 | #endif | |
17 | ||
18 | #include <mit-copyright.h> | |
19 | #include "mr_private.h" | |
20 | #include <moira_site.h> | |
21 | #include <string.h> | |
22 | #include <stdlib.h> | |
23 | #include <hesiod.h> | |
24 | ||
25 | static char *mr_server_host = 0; | |
26 | ||
27 | /* | |
28 | * Open a connection to the mr server. Looks for the server name | |
29 | * 1) passed as an argument, 2) in environment variable, 3) by hesiod | |
30 | * 4) compiled in default (from sms_app.h). | |
31 | */ | |
32 | ||
33 | int mr_connect(server) | |
34 | char *server; | |
35 | { | |
36 | extern int errno; | |
37 | char *p, **pp, sbuf[256]; | |
38 | ||
39 | if (!mr_inited) mr_init(); | |
40 | if (_mr_conn) return MR_ALREADY_CONNECTED; | |
41 | ||
42 | if (!server || (strlen(server) == 0)) { | |
43 | server = getenv("MOIRASERVER"); | |
44 | } | |
45 | ||
46 | #ifdef HESIOD | |
47 | if (!server || (strlen(server) == 0)) { | |
48 | pp = hes_resolve("moira", "sloc"); | |
49 | if (pp) server = *pp; | |
50 | } | |
51 | #endif | |
52 | ||
53 | if (!server || (strlen(server) == 0)) { | |
54 | server = MOIRA_SERVER; | |
55 | } | |
56 | ||
57 | if (!strchr(server, ':')) { | |
58 | p = strchr(MOIRA_SERVER, ':'); | |
59 | p++; | |
60 | sprintf(sbuf, "%s:%s", server, p); | |
61 | server = sbuf; | |
62 | } | |
63 | ||
64 | errno = 0; | |
65 | _mr_conn = start_server_connection(server, ""); | |
66 | if (_mr_conn == NULL) | |
67 | return errno; | |
68 | if (connection_status(_mr_conn) == CON_STOPPED) { | |
69 | register status = connection_errno(_mr_conn); | |
70 | if (!status) status = MR_CANT_CONNECT; | |
71 | mr_disconnect(); | |
72 | return status; | |
73 | } | |
74 | ||
75 | /* | |
76 | * stash hostname for later use | |
77 | */ | |
78 | ||
79 | mr_server_host = strsave(server); | |
80 | if (p = strchr(mr_server_host, ':')) | |
81 | *p = 0; | |
82 | mr_server_host = canonicalize_hostname(mr_server_host); | |
83 | return 0; | |
84 | } | |
85 | ||
86 | int mr_disconnect() | |
87 | { | |
88 | CHECK_CONNECTED; | |
89 | _mr_conn = sever_connection(_mr_conn); | |
90 | free(mr_server_host); | |
91 | mr_server_host = 0; | |
92 | return 0; | |
93 | } | |
94 | ||
95 | int mr_host(host, size) | |
96 | char *host; | |
97 | int size; | |
98 | { | |
99 | CHECK_CONNECTED; | |
100 | ||
101 | /* If we are connected, mr_server_host points to a valid string. */ | |
102 | strncpy(host, mr_server_host, size); | |
103 | return(0); | |
104 | } | |
105 | ||
106 | int mr_noop() | |
107 | { | |
108 | int status; | |
109 | mr_params param_st; | |
110 | struct mr_params *params = NULL; | |
111 | struct mr_params *reply = NULL; | |
112 | ||
113 | CHECK_CONNECTED; | |
114 | params = ¶m_st; | |
115 | params->mr_version_no = sending_version_no; | |
116 | params->mr_procno = MR_NOOP; | |
117 | params->mr_argc = 0; | |
118 | params->mr_argl = NULL; | |
119 | params->mr_argv = NULL; | |
120 | ||
121 | if ((status = mr_do_call(params, &reply)) == 0) | |
122 | status = reply->mr_status; | |
123 | ||
124 | mr_destroy_reply(reply); | |
125 | ||
126 | return status; | |
127 | } |