← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to examples/server.c

  • Committer: Monty Taylor
  • Date: 2009-04-25 20:29:54 UTC
  • mto: (997.2.5 mordred)
  • mto: This revision was merged to the branch mainline in revision 1003.
  • Revision ID: mordred@inaugust.com-20090425202954-slopmkjj7vxal5lk
Migrated archive.

Show diffs side-by-side

added added

removed removed

Lines of Context:
examples/server.c
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
 
      verbose++;
100
 
      break;
101
 
 
102
 
    default:
103
 
      printf("\nusage: %s [-c <count>] [-h <host>] [-m] [-p <port>] [-v]\n",
104
 
             argv[0]);
105
 
      printf("\t-c <count> - Number of connections to accept before exiting\n");
106
 
      printf("\t-h <host>  - Host to listen on\n");
107
 
      printf("\t-m         - Use the MySQL protocol\n");
108
 
      printf("\t-p <port>  - Port to listen on\n");
109
 
      printf("\t-v         - Increase verbosity level\n");
110
 
      return 1;
111
 
    }
112
 
  }
113
 
 
114
 
  if (drizzle_create(&drizzle) == NULL)
115
 
  {
116
 
    printf("drizzle_create:NULL\n");
117
 
    return 1;
118
 
  }
119
 
 
120
 
  drizzle_add_options(&drizzle, DRIZZLE_FREE_OBJECTS);
121
 
  drizzle_set_verbose(&drizzle, verbose);
122
 
 
123
 
  if (drizzle_con_create(&drizzle, con_listen) == NULL)
124
 
  {
125
 
    printf("drizzle_con_create:NULL\n");
126
 
    return 1;
127
 
  }
128
 
 
129
 
  drizzle_con_add_options(con_listen, DRIZZLE_CON_LISTEN);
130
 
  drizzle_con_set_tcp(con_listen, host, port);
131
 
 
132
 
  if (mysql)
133
 
    drizzle_con_add_options(con_listen, DRIZZLE_CON_MYSQL);
134
 
 
135
 
  if (drizzle_con_listen(con_listen) != DRIZZLE_RETURN_OK)
136
 
  {
137
 
    printf("drizzle_con_listen:%s\n", drizzle_error(&drizzle));
138
 
    return 1;
139
 
  }
140
 
 
141
 
  while (1)
142
 
  {
143
 
    (void)drizzle_con_accept(&drizzle, con, &ret);
144
 
    if (ret != DRIZZLE_RETURN_OK)
145
 
    {
146
 
      printf("drizzle_con_accept:%s\n", drizzle_error(&drizzle));
147
 
      return 1;
148
 
    }
149
 
 
150
 
    server(&drizzle, con, &result, &column);
151
 
 
152
 
    drizzle_con_free(con);
153
 
 
154
 
    if (count > 0)
155
 
    {
156
 
      count--;
157
 
 
158
 
      if (count == 0)
159
 
        break;
160
 
    }
161
 
  }
162
 
 
163
 
  drizzle_con_free(con_listen);
164
 
  drizzle_free(&drizzle);
165
 
 
166
 
  free(con);
167
 
  free(con_listen);
168
 
 
169
 
  return 0;
170
 
}
171
 
 
172
 
static void server(drizzle_st *drizzle, drizzle_con_st *con,
173
 
                   drizzle_result_st *result, drizzle_column_st *column)
174
 
{
175
 
  drizzle_return_t ret;
176
 
  drizzle_command_t command;
177
 
  uint8_t *data= NULL;
178
 
  size_t total;
179
 
  char *field[2];
180
 
  char field1[DRIZZLE_FIELD_MAX];
181
 
  char field2[DRIZZLE_FIELD_MAX];
182
 
  size_t size[2];
183
 
  uint64_t x;
184
 
 
185
 
  field[0]= field1;
186
 
  field[1]= field2;
187
 
 
188
 
  /* Handshake packets. */
189
 
  drizzle_con_set_protocol_version(con, 10);
190
 
  drizzle_con_set_server_version(con, "libdrizzle example 1.2.3");
191
 
  drizzle_con_set_thread_id(con, 1);
192
 
  drizzle_con_set_scramble(con, (const uint8_t *)"ABCDEFGHIJKLMNOPQRST");
193
 
  drizzle_con_set_capabilities(con, DRIZZLE_CAPABILITIES_NONE);
194
 
  drizzle_con_set_charset(con, 8);
195
 
  drizzle_con_set_status(con, DRIZZLE_CON_STATUS_NONE);
196
 
  drizzle_con_set_max_packet_size(con, DRIZZLE_MAX_PACKET_SIZE);
197
 
 
198
 
  ret= drizzle_handshake_server_write(con);
199
 
  DRIZZLE_RETURN_CHECK(ret, "drizzle_handshake_server_write", drizzle)
200
 
 
201
 
  ret= drizzle_handshake_client_read(con);
202
 
  DRIZZLE_RETURN_CHECK(ret, "drizzle_handshake_client_read", drizzle)
203
 
 
204
 
  if (drizzle_result_create(con, result) == NULL)
205
 
    DRIZZLE_RETURN_ERROR("drizzle_result_create", drizzle)
206
 
 
207
 
  ret= drizzle_result_write(con, result, true);
208
 
  DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
209
 
 
210
 
  /* Command loop. */
211
 
  while (1)
212
 
  {
213
 
    drizzle_result_free(result);
214
 
    if (data != NULL)
215
 
      free(data);
216
 
 
217
 
    data= drizzle_con_command_buffer(con, &command, &total, &ret);
218
 
    if (ret == DRIZZLE_RETURN_LOST_CONNECTION ||
219
 
        (ret == DRIZZLE_RETURN_OK && command == DRIZZLE_COMMAND_QUIT))
220
 
    {
221
 
      if (data != NULL)
222
 
        free(data);
223
 
      return;
224
 
    }
225
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_con_command_buffer", drizzle)
226
 
 
227
 
    if (drizzle_result_create(con, result) == NULL)
228
 
      DRIZZLE_RETURN_ERROR("drizzle_result_create", drizzle)
229
 
 
230
 
    if (command != DRIZZLE_COMMAND_QUERY)
231
 
    {
232
 
      ret= drizzle_result_write(con, result, true);
233
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
234
 
      continue;
235
 
    }
236
 
 
237
 
    drizzle_result_set_column_count(result, 2);
238
 
 
239
 
    ret= drizzle_result_write(con, result, false);
240
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
241
 
 
242
 
    /* Columns. */
243
 
    if (drizzle_column_create(result, column) == NULL)
244
 
      DRIZZLE_RETURN_ERROR("drizzle_column_create", drizzle)
245
 
 
246
 
    drizzle_column_set_catalog(column, "default");
247
 
    drizzle_column_set_db(column, "drizzle_test_db");
248
 
    drizzle_column_set_table(column, "drizzle_test_table");
249
 
    drizzle_column_set_orig_table(column, "drizzle_test_table");
250
 
    drizzle_column_set_name(column, "test_column_1");
251
 
    drizzle_column_set_orig_name(column, "test_column_1");
252
 
    drizzle_column_set_charset(column, 8);
253
 
    drizzle_column_set_size(column, DRIZZLE_FIELD_MAX);
254
 
    drizzle_column_set_type(column, DRIZZLE_COLUMN_TYPE_VARCHAR);
255
 
 
256
 
    ret= drizzle_column_write(result, column);
257
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_column_write", drizzle)
258
 
 
259
 
    drizzle_column_set_name(column, "test_column_2");
260
 
    drizzle_column_set_orig_name(column, "test_column_2");
261
 
 
262
 
    ret= drizzle_column_write(result, column);
263
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_column_write", drizzle)
264
 
 
265
 
    drizzle_column_free(column);
266
 
 
267
 
    drizzle_result_set_eof(result, true);
268
 
 
269
 
    ret= drizzle_result_write(con, result, false);
270
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
271
 
 
272
 
    /* Rows. */
273
 
    for (x= 0; x < DRIZZLE_RESULT_ROWS; x++)
274
 
    {
275
 
      size[0]= (size_t)snprintf(field[0], DRIZZLE_FIELD_MAX,
276
 
                                "field %" PRIu64 "-1", x);
277
 
      if (size[0] >= DRIZZLE_FIELD_MAX)
278
 
        size[0]= DRIZZLE_FIELD_MAX - 1;
279
 
 
280
 
      size[1]= (size_t)snprintf(field[1], DRIZZLE_FIELD_MAX,
281
 
                                "field %" PRIu64 "-2", x);
282
 
      if (size[1] >= DRIZZLE_FIELD_MAX)
283
 
        size[1]= DRIZZLE_FIELD_MAX - 1;
284
 
 
285
 
      /* This is needed for MySQL and old Drizzle protocol. */
286
 
      drizzle_result_calc_row_size(result, (drizzle_field_t *)field, size);
287
 
 
288
 
      ret= drizzle_row_write(result);
289
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_row_write", drizzle)
290
 
 
291
 
      /* Fields. */
292
 
      ret= drizzle_field_write(result, (drizzle_field_t)field[0], size[0],
293
 
                               size[0]);
294
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_field_write", drizzle)
295
 
 
296
 
      ret= drizzle_field_write(result, (drizzle_field_t)field[1], size[1],
297
 
                               size[1]);
298
 
      DRIZZLE_RETURN_CHECK(ret, "drizzle_field_write", drizzle)
299
 
    }
300
 
 
301
 
    ret= drizzle_result_write(con, result, true);
302
 
    DRIZZLE_RETURN_CHECK(ret, "drizzle_result_write", drizzle)
303
 
  }
304
 
}