~drizzle-trunk/drizzle/development

/* - mode: c; c-basic-offset: 2; indent-tabs-mode: nil; -*-

 *  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:

 *

 *  Copyright (C) 2008 Sun Microsystems, Inc.

 *

 *  This program is free software; you can redistribute it and/or modify

 *  it under the terms of the GNU General Public License as published by

 *  the Free Software Foundation; version 2 of the License.

 *

 *  This program is distributed in the hope that it will be useful,

 *  but WITHOUT ANY WARRANTY; without even the implied warranty of

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 *  GNU General Public License for more details.

 *

 *  You should have received a copy of the GNU General Public License

 *  along with this program; if not, write to the Free Software

 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

 */

 

#include <config.h>

#include "libdrizzle_priv.h"

 

#include <libdrizzle/libdrizzle.h>

#include <libdrizzle/pack.h>

#include <libdrizzle/errmsg.h>

#include <stdlib.h>

#include <string.h>

 

/* Borrowed from libicu header */

 

#define U8_IS_SINGLE(c) (((c)&0x80)==0)

#define U8_LENGTH(c) \

    ((uint32_t)(c)<=0x7f ? 1 : \

        ((uint32_t)(c)<=0x7ff ? 2 : \

            ((uint32_t)(c)<=0xd7ff ? 3 : \

                ((uint32_t)(c)<=0xdfff || (uint32_t)(c)>0x10ffff ? 0 : \

                    ((uint32_t)(c)<=0xffff ? 3 : 4)\

                ) \

            ) \

        ) \

    )

 

unsigned int drizzle_port=0;

 

unsigned int drizzle_get_default_port(void)

{

  return drizzle_port;

}

 

void drizzle_set_default_port(unsigned int port)

{

  drizzle_port= port;

}

    int2store(end, (uint16_t) 45); // utf8mb4 number from mystrings/ctype-utf8.c

  (void)simple_command(drizzle,COM_CHANGE_USER, (unsigned char*) buff, (uint32_t) (end-buff), 1);

  return drizzle_real_query(drizzle,query, (uint32_t) strlen(query));

  drizzle->field_count= (uint32_t) query->rows;

  return unpack_fields(query, drizzle->field_count, 1);

  if (simple_command(drizzle, COM_FIELD_LIST, (unsigned char*) buff,

  uint32_t field_count;

  unsigned char *pos;

  pos=(unsigned char*) drizzle->net.read_pos;

  field_count=(uint32_t) net_field_length(&pos);

  if (!(drizzle->fields=unpack_fields(fields, field_count, 0)))

drizzle_shutdown(DRIZZLE *drizzle)

  return(simple_command(drizzle, COM_SHUTDOWN, 0, 0, 0));

drizzle_refresh(DRIZZLE *drizzle, uint32_t options)

  unsigned char bits[1];

  bits[0]= (unsigned char) options;

  unsigned char buff[4];

  unsigned char buff[2];

  int2store(buff, (uint32_t) option);

    drizzle_set_error(drizzle, CR_WRONG_HOST_INFO, sqlstate_get_unknown());

uint32_t

  return (char*) VERSION;

  return drizzle ? drizzle->net.sqlstate : sqlstate_get_cant_connect();

  net->max_packet=   (uint32_t) net_buffer_length;

  net->max_packet_size= (net_buffer_length > max_allowed_packet) ?

    net_buffer_length : max_allowed_packet;

  encoded string, not including the terminating null character.  The return value does not contain any leading 0x or a leading X' and

  const char *to_start= to;

  const char *end, *to_end=to_start + 2*length;

  bool overflow= false;

  for (end= from + length; from < end; from++)

    uint32_t tmp_length;

    char escape= 0;

    if (!U8_IS_SINGLE(*from))

      tmp_length= U8_LENGTH(*from);

      if (to + tmp_length > to_end)

      {

        overflow= true;

        break;

      }

      while (tmp_length--)

        *to++= *from++;

      from--;

    switch (*from) {

    case 0:                             /* Must be escaped for 'mysql' */

      escape= '0';

      break;

    case '\n':                          /* Must be escaped for logs */

      escape= 'n';

      break;

    case '\r':

      escape= 'r';

      break;

    case '\\':

      escape= '\\';

      break;

    case '\'':

      escape= '\'';

      break;

    case '"':                           /* Better safe than sorry */

      escape= '"';

      break;

    case '\032':                        /* This gives problems on Win32 */

      escape= 'Z';

      break;

    }

    if (escape)

    {

      if (to + 2 > to_end)

      {

        overflow= true;

        break;

      }

      *to++= '\\';

      *to++= escape;

    }

    else

    {

      if (to + 1 > to_end)

      {

        overflow= true;

        break;

      }

      *to++= *from;

    }

  *to= 0;

  return overflow ? (size_t) -1 : (size_t) (to - to_start);

    drizzle_set_error(drizzle, CR_COMMANDS_OUT_OF_SYNC, sqlstate_get_unknown());