Initial commit of vpp code.
[vpp.git] / vlib-api / vlibsocket / sockclnt_vlib.c
1 /* 
2  *------------------------------------------------------------------
3  * sockclnt_vlib.c
4  *
5  * Copyright (c) 2009 Cisco and/or its affiliates.
6  * Licensed under the Apache License, Version 2.0 (the "License");
7  * you may not use this file except in compliance with the License.
8  * You may obtain a copy of the License at:
9  *
10  *     http://www.apache.org/licenses/LICENSE-2.0
11  *
12  * Unless required by applicable law or agreed to in writing, software
13  * distributed under the License is distributed on an "AS IS" BASIS,
14  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15  * See the License for the specific language governing permissions and
16  * limitations under the License.
17  *------------------------------------------------------------------
18  */
19
20 #include <sys/types.h> 
21 #include <sys/socket.h>
22 #include <unistd.h>
23 #include <netinet/in.h>
24 #include <sys/ioctl.h>
25 #include <vppinfra/byte_order.h>
26 #include <netdb.h>
27
28 #include <fcntl.h>
29 #include <sys/stat.h>
30
31 #include <vlibmemory/api.h>
32 #include <vlibsocket/api.h>
33
34 #include <vlibsocket/vl_socket_msg_enum.h>
35
36 #define vl_typedefs             /* define message structures */
37 #include <vlibsocket/vl_socket_api_h.h>
38 #undef vl_typedefs
39
40 /* instantiate all the print functions we know about */
41 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
42 #define vl_printfun
43 #include <vlibsocket/vl_socket_api_h.h>
44 #undef vl_printfun
45
46 /* instantiate all the endian swap functions we know about */
47 #define vl_endianfun
48 #include <vlibsocket/vl_socket_api_h.h>
49 #undef vl_endianfun
50
51 static void vl_api_sockclnt_create_reply_t_handler (
52     vl_api_sockclnt_create_reply_t *mp)
53 {
54     vl_api_registration_t *rp = socket_main.current_rp;
55
56     rp->server_handle = mp->handle;
57     rp->server_index = mp->index;
58 }        
59
60 static void vl_api_sockclnt_delete_reply_t_handler (
61     vl_api_sockclnt_delete_reply_t *mp)
62 {
63     unix_main_t *um = &unix_main;
64     unix_file_t *uf = socket_main.current_uf;
65     vl_api_registration_t *rp = socket_main.current_rp;
66
67     unix_file_del (um, uf);
68     vl_free_socket_registration_index (rp->vl_api_registration_pool_index);
69 }        
70
71 u32 sockclnt_open_index (char *client_name, char *hostname, int port)
72 {
73     vl_api_registration_t * rp;
74     unix_main_t * um = &unix_main;
75     unix_file_t template = {0};
76     int sockfd;
77     int one = 1;
78     int rv;
79     struct sockaddr_in serv_addr;
80     struct hostent *server;
81     vl_api_sockclnt_create_t *mp;
82     char my_hostname[64];
83
84     server = gethostbyname(hostname);
85     if (server == NULL) {
86         clib_warning("Couldn't translate server name %s", hostname);
87         return ~0;
88     }
89
90     /* Set up non-blocking server socket on CLIENT_API_SERVER_PORT */
91     sockfd = socket(AF_INET, SOCK_STREAM, 0);
92
93     if (sockfd < 0) {
94         clib_unix_warning ("socket");
95         return ~0;
96     }
97
98     bzero((char *) &serv_addr, sizeof(serv_addr));
99     serv_addr.sin_family = AF_INET;
100     bcopy((char *)server->h_addr, 
101           (char *)&serv_addr.sin_addr.s_addr,
102           server->h_length);
103     serv_addr.sin_port = htons(port);
104     
105     if (connect(sockfd,(const void *)&serv_addr,sizeof(serv_addr)) < 0) {
106         clib_unix_warning("Connect failure to (%s, %d)", 
107                           hostname, port);
108         return ~0;
109     }
110
111     rv = ioctl (sockfd, FIONBIO, &one);
112     if (rv < 0) {
113         clib_unix_warning ("FIONBIO");
114         return ~0;
115     }
116
117     pool_get (socket_main.registration_pool, rp);
118     memset(rp, 0, sizeof(*rp));
119     rp->registration_type = REGISTRATION_TYPE_SOCKET_CLIENT;
120     rp->vl_api_registration_pool_index = rp - socket_main.registration_pool;
121
122     template.read_function = vl_socket_read_ready;
123     template.write_function = vl_socket_write_ready;
124     template.file_descriptor = sockfd;
125     template.private_data = rp - socket_main.registration_pool;
126     
127     rp->unix_file_index = unix_file_add (um, &template);
128     rp->name = format(0, "%s:%d", hostname, port);
129
130     mp = vl_msg_api_alloc (sizeof (*mp));
131     mp->_vl_msg_id = ntohs(VL_API_SOCKCLNT_CREATE);
132     mp->context = rp - socket_main.registration_pool;
133
134     if (gethostname(my_hostname, sizeof (my_hostname)) < 0) {
135         clib_unix_warning("gethostname");
136         strncpy (my_hostname, "unknown!", sizeof(my_hostname)-1);
137     }
138     strncpy ((char *)mp->name, my_hostname, sizeof (mp->name)-1);
139
140     vl_msg_api_send (rp, (u8 *)mp);
141     return rp - socket_main.registration_pool;
142 }
143
144 void sockclnt_close_index (u32 index)
145 {
146     vl_api_sockclnt_delete_t *mp;
147     vl_api_registration_t *rp;
148
149     /* Don't crash / assert if fed garbage */
150     if (pool_is_free_index (socket_main.registration_pool, index)) {
151         clib_warning ("registration_pool index %d already free", index);
152         return;
153     }
154     rp = pool_elt_at_index(socket_main.registration_pool, index);
155
156     mp = vl_msg_api_alloc (sizeof (*mp));
157     mp->_vl_msg_id = ntohs(VL_API_SOCKCLNT_DELETE);
158     mp->handle = rp->server_handle;
159     mp->index = rp->server_index;
160     vl_msg_api_send (rp, (u8 *)mp);
161 }
162
163 vl_api_registration_t *sockclnt_get_registration (u32 index)
164 {
165     return pool_elt_at_index (socket_main.registration_pool, index);
166 }
167
168 /*
169  * Both rx and tx msgs MUST be initialized, or we'll have
170  * precisely no idea how many bytes to write into the API trace... 
171  */
172 #define foreach_sockclnt_api_msg                        \
173 _(SOCKCLNT_CREATE_REPLY, sockclnt_create_reply)         \
174 _(SOCKCLNT_DELETE_REPLY, sockclnt_delete_reply)   
175
176
177 static clib_error_t *
178 sockclnt_vlib_api_init (vlib_main_t *vm)
179 {
180 #define _(N,n)                                                  \
181     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
182                            vl_api_##n##_t_handler,              \
183                            vl_noop_handler,                     \
184                            vl_api_##n##_t_endian,               \
185                            vl_api_##n##_t_print,                \
186                            sizeof(vl_api_##n##_t), 1); 
187     foreach_sockclnt_api_msg;
188 #undef _
189     return 0;
190 }    
191
192 VLIB_API_INIT_FUNCTION(sockclnt_vlib_api_init);