~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to examples/server.c

  • Committer: Brian Aker
  • Date: 2009-08-06 15:04:21 UTC
  • mfrom: (1093.1.52 captain)
  • Revision ID: brian@gaz-20090806150421-w8yrasl1m8exorxs
Merge Jay

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/*
2
 
 * Drizzle Client & Protocol Library
3
 
 *
4
 
 * Copyright (C) 2008 Eric Day (eday@oddments.org)
5
 
 * All rights reserved.
6
 
 *
7
 
 * Redistribution and use in source and binary forms, with or without
8
 
 * modification, are permitted provided that the following conditions are
9
 
 * met:
10
 
 *
11
 
 *     * Redistributions of source code must retain the above copyright
12
 
 * notice, this list of conditions and the following disclaimer.
13
 
 *
14
 
 *     * Redistributions in binary form must reproduce the above
15
 
 * copyright notice, this list of conditions and the following disclaimer
16
 
 * in the documentation and/or other materials provided with the
17
 
 * distribution.
18
 
 *
19
 
 *     * The names of its contributors may not be used to endorse or
20
 
 * promote products derived from this software without specific prior
21
 
 * written permission.
22
 
 *
23
 
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
24
 
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
25
 
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
26
 
 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
27
 
 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
28
 
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
29
 
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30
 
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31
 
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32
 
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
33
 
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34
 
 *
35
 
 */
36
 
 
37
 
 
38
 
#include <errno.h>
39
 
#include <stdio.h>
40
 
#include <stdlib.h>
41
 
#include <unistd.h>
42
 
 
43
 
#include <libdrizzle/drizzle_server.h>
44
 
 
45
 
#define DRIZZLE_FIELD_MAX 32
46
 
#define DRIZZLE_RESULT_ROWS 20
47
 
 
48
 
#define DRIZZLE_RETURN_CHECK(__ret, __function, __drizzle) \
49
 
{ \
50
 
  if ((__ret) != DRIZZLE_RETURN_OK) \
51
 
    DRIZZLE_RETURN_ERROR(__function, __drizzle) \
52
 
}
53
 
 
54
 
#define DRIZZLE_RETURN_ERROR(__function, __drizzle) \
55
 
{ \
56
 
  printf(__function ":%s\n", drizzle_error(__drizzle)); \
57
 
  return; \
58
 
}
59
 
 
60
 
static void server(drizzle_st *drizzle, drizzle_con_st *con,
61
 
                   drizzle_result_st *result, drizzle_column_st *column);
62
 
 
63
 
int main(int argc, char *argv[])
64
 
{
65
 
  int c;
66
 
  uint32_t count= 0;
67
 
  const char *host= NULL;
68
 
  bool mysql= false;
69
 
  in_port_t port= 0;
70
 
  drizzle_verbose_t verbose= DRIZZLE_VERBOSE_NEVER;
71
 
  drizzle_return_t ret;
72
 
  drizzle_st drizzle;
73
 
  drizzle_con_st *con_listen= (drizzle_con_st*)malloc(sizeof(drizzle_con_st));
74
 
  drizzle_con_st *con= (drizzle_con_st*)malloc(sizeof(drizzle_con_st));
75
 
  drizzle_result_st result;
76
 
  drizzle_column_st column;
77
 
 
78
 
  while((c = getopt(argc, argv, "c:h:mp:v")) != -1)
79
 
  {
80
 
    switch(c)
81
 
    {
82
 
    case 'c':
83
 
      count= (uint32_t)atoi(optarg);
84
 
      break;
85
 
 
86
 
    case 'h':
87
 
      host= optarg;
88
 
      break;
89
 
 
90
 
    case 'm':
91
 
      mysql= true;
92
 
      break;
93
 
 
94
 
    case 'p':
95
 
      port= (in_port_t)atoi(optarg);
96
 
      break;
97
 
 
98
 
    case 'v':
99
 
      switch(verbose)
100
 
      {
101
 
      case DRIZZLE_VERBOSE_NEVER:
102
 
        verbose= DRIZZLE_VERBOSE_FATAL;
103
 
        break;
104
 
      case DRIZZLE_VERBOSE_FATAL:
105
 
        verbose= DRIZZLE_VERBOSE_ERROR;
106
 
        break;
107
 
      case DRIZZLE_VERBOSE_ERROR:
108
 
        verbose= DRIZZLE_VERBOSE_INFO;
109
 
        break;
110
 
      case DRIZZLE_VERBOSE_INFO:
111
 
        verbose= DRIZZLE_VERBOSE_DEBUG;
112
 
        break;
113
 
      case DRIZZLE_VERBOSE_DEBUG:
114
 
        verbose= DRIZZLE_VERBOSE_CRAZY;
115
 
        break;
116
 
      case DRIZZLE_VERBOSE_CRAZY:
117
 
      case DRIZZLE_VERBOSE_MAX:
118
 
        break;
119
 
      }
120
 
      break;
121
 
 
122
 
    default:
123
 
      printf("\nusage: %s [-c <count>] [-h <host>] [-m] [-p <port>] [-v]\n",
124
 
             argv[0]);
125
 
      printf("\t-c <count> - Number of connections to accept before exiting\n");
126
 
      printf("\t-h <host>  - Host to listen on\n");
127
 
      printf("\t-m         - Use the MySQL protocol\n");
128
 
      printf("\t-p <port>  - Port to listen on\n");
129
 
      printf("\t-v         - Increase verbosity level\n");
130
 
      return 1;
131
 
    }
132
 
  }
133
 
 
134
 
  if (drizzle_create(&drizzle) == NULL)
135
 
  {
136
 
    printf("drizzle_create:NULL\n");
137
 
    return 1;
138
 
  }
139
 
 
140
 
  drizzle_add_options(&drizzle, DRIZZLE_FREE_OBJECTS);
141
 
  drizzle_set_verbose(&drizzle, verbose);
142
 
 
143
 
  if (drizzle_con_create(&drizzle, con_listen) == NULL)
144
 
  {
145
 
    printf("drizzle_con_create:NULL\n");
146
 
    return 1;
147
 
  }
148
 
 
149
 
  drizzle_con_add_options(con_listen, DRIZZLE_CON_LISTEN);
150
 
  drizzle_con_set_tcp(con_listen, host, port);
151
 
 
152
 
  if (mysql)
153
 
    drizzle_con_add_options(con_listen, DRIZZLE_CON_MYSQL);
154
 
 
155
 
  if (drizzle_con_listen(con_listen) != DRIZZLE_RETURN_OK)
156
 
  {
157
 
    printf("drizzle_con_listen:%s\n", drizzle_error(&drizzle));
158
 
    return 1;
159
 
  }
160
 
 
161
 
  while (1)
162
 
  {
163
 
    (void)drizzle_con_accept(&drizzle, con, &ret);
164
 
    if (ret != DRIZZLE_RETURN_OK)
165
 
    {
166
 
      printf("drizzle_con_accept:%s\n", drizzle_error(&drizzle));
167
 
      return 1;
168
 
    }
169
 
 
170
 
    server(&drizzle, con, &result, &column);
171
 
 
172
 
    drizzle_con_free(con);
173
 
 
174
 
    if (count > 0)
175
 
    {
176
 
      count--;
177
 
 
178
 
      if (count == 0)
179
 
        break;
180
 
    }
181
 
  }
182
 
 
183
 
  drizzle_con_free(con_listen);
184
 
  drizzle_free(&drizzle);
185
 
 
186
 
  free(con);
187
 
  free(con_listen);
188
 
 
189
 
  return 0;
190
 
}
191
 
 
192
 
static void server(drizzle_st *drizzle, drizzle_con_st *con,
193
 
                   drizzle_result_st *result, drizzle_column_st *column)
194
 
{
195
 
  drizzle_return_t ret;
196
 
  drizzle_command_t command;
197
 
  uint8_t *data= NULL;
198
 
  size_t total;
199
 
  char *field[2];
200
 
  char field1[DRIZZLE_FIELD_MAX];
201
 
  char field2[DRIZZLE_FIELD_MAX];
202
 
  size_t size[2];
203
 
  uint64_t x;
204
 
 
205
 
  field[0]= field1;
206
 
  field[1]= field2;
207
 
 
208
 
  /* Handshake packets. */
209
 
  drizzle_con_set_protocol_version(con, 10);
210
 
  drizzle_con_set_server_version(con, "libdrizzle example 1.2.3");
211
 
  drizzle_con_set_thread_id(con, 1);
212
 
  drizzle_con_set_scramble(con, (const uint8_t *)"ABCDEFGHIJKLMNOPQRST");
213
 
  drizzle_con_set_capabilities(con, DRIZZLE_CAPABILITIES_NONE);
214
 
  drizzle_con_set_charset(con, 8);
215
 
  drizzle_con_set_status(con, DRIZZLE_CON_STATUS_NONE);
216
 
  drizzle_con_set_max_packet_size(con, DRIZZLE_MAX_PACKET_SIZE);
217
 
 
218
 
  ret= drizzle_handshake_server_write(con);
219
 
  DRIZZLE_RETURN_CHECK(ret, "drizzle_handshake_server_write", drizzle)
220
 
 
221
 
  ret= drizzle_handshake_client_read(con);
222
 
  DRIZZLE_RETURN_CHECK(ret, "drizzle_handshake_client_read", drizzle)
223
 
 
224
 
  if (drizzle_result_create(con, result) == NULL)
225
 
    DRIZZLE_RETURN_ERROR("drizzle_result_create", drizzle)
226
 
 
227
 
  ret= drizzle_result_write(con, result, true);
228
 
  DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
229
 
 
230
 
  /* Command loop. */
231
 
  while (1)
232
 
  {
233
 
    drizzle_result_free(result);
234
 
    if (data != NULL)
235
 
      free(data);
236
 
 
237
 
    data= (uint8_t *)drizzle_con_command_buffer(con, &command, &total, &ret);
238
 
    if (ret == DRIZZLE_RETURN_LOST_CONNECTION ||
239
 
        (ret == DRIZZLE_RETURN_OK && command == DRIZZLE_COMMAND_QUIT))
240
 
    {
241
 
      if (data != NULL)
242
 
        free(data);
243
 
      return;
244
 
    }
245
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_con_command_buffer", drizzle)
246
 
 
247
 
    if (drizzle_result_create(con, result) == NULL)
248
 
      DRIZZLE_RETURN_ERROR("drizzle_result_create", drizzle)
249
 
 
250
 
    if (command != DRIZZLE_COMMAND_QUERY)
251
 
    {
252
 
      ret= drizzle_result_write(con, result, true);
253
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
254
 
      continue;
255
 
    }
256
 
 
257
 
    drizzle_result_set_column_count(result, 2);
258
 
 
259
 
    ret= drizzle_result_write(con, result, false);
260
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
261
 
 
262
 
    /* Columns. */
263
 
    if (drizzle_column_create(result, column) == NULL)
264
 
      DRIZZLE_RETURN_ERROR("drizzle_column_create", drizzle)
265
 
 
266
 
    drizzle_column_set_catalog(column, "default");
267
 
    drizzle_column_set_db(column, "drizzle_test_db");
268
 
    drizzle_column_set_table(column, "drizzle_test_table");
269
 
    drizzle_column_set_orig_table(column, "drizzle_test_table");
270
 
    drizzle_column_set_name(column, "test_column_1");
271
 
    drizzle_column_set_orig_name(column, "test_column_1");
272
 
    drizzle_column_set_charset(column, 8);
273
 
    drizzle_column_set_size(column, DRIZZLE_FIELD_MAX);
274
 
    drizzle_column_set_type(column, DRIZZLE_COLUMN_TYPE_VARCHAR);
275
 
 
276
 
    ret= drizzle_column_write(result, column);
277
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_column_write", drizzle)
278
 
 
279
 
    drizzle_column_set_name(column, "test_column_2");
280
 
    drizzle_column_set_orig_name(column, "test_column_2");
281
 
 
282
 
    ret= drizzle_column_write(result, column);
283
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_column_write", drizzle)
284
 
 
285
 
    drizzle_column_free(column);
286
 
 
287
 
    drizzle_result_set_eof(result, true);
288
 
 
289
 
    ret= drizzle_result_write(con, result, false);
290
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
291
 
 
292
 
    /* Rows. */
293
 
    for (x= 0; x < DRIZZLE_RESULT_ROWS; x++)
294
 
    {
295
 
      size[0]= (size_t)snprintf(field[0], DRIZZLE_FIELD_MAX,
296
 
                                "field %" PRIu64 "-1", x);
297
 
      if (size[0] >= DRIZZLE_FIELD_MAX)
298
 
        size[0]= DRIZZLE_FIELD_MAX - 1;
299
 
 
300
 
      size[1]= (size_t)snprintf(field[1], DRIZZLE_FIELD_MAX,
301
 
                                "field %" PRIu64 "-2", x);
302
 
      if (size[1] >= DRIZZLE_FIELD_MAX)
303
 
        size[1]= DRIZZLE_FIELD_MAX - 1;
304
 
 
305
 
      /* This is needed for MySQL and old Drizzle protocol. */
306
 
      drizzle_result_calc_row_size(result, (drizzle_field_t *)field, size);
307
 
 
308
 
      ret= drizzle_row_write(result);
309
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_row_write", drizzle)
310
 
 
311
 
      /* Fields. */
312
 
      ret= drizzle_field_write(result, (drizzle_field_t)field[0], size[0],
313
 
                               size[0]);
314
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_field_write", drizzle)
315
 
 
316
 
      ret= drizzle_field_write(result, (drizzle_field_t)field[1], size[1],
317
 
                               size[1]);
318
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_field_write", drizzle)
319
 
    }
320
 
 
321
 
    ret= drizzle_result_write(con, result, true);
322
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
323
 
  }
324
 
}