← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to sql-common/pack.c

  • Committer: brian
  • Date: 2008-06-25 05:29:13 UTC
  • Revision ID: brian@localhost.localdomain-20080625052913-6upwo0jsrl4lnapl
clean slate

Show diffs side-by-side

added added

removed removed

Lines of Context:
sql-common/pack.c
 
1
/* Copyright (C) 2000-2003 MySQL AB
 
2
 
 
3
   This program is free software; you can redistribute it and/or modify
 
4
   it under the terms of the GNU General Public License as published by
 
5
   the Free Software Foundation; version 2 of the License.
 
6
 
 
7
   This program is distributed in the hope that it will be useful,
 
8
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
9
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
10
   GNU General Public License for more details.
 
11
 
 
12
   You should have received a copy of the GNU General Public License
 
13
   along with this program; if not, write to the Free Software
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
 
16
#include <my_global.h>
 
17
#include <mysql_com.h>
 
18
#include <mysql.h>
 
19
 
 
20
/* Get the length of next field. Change parameter to point at fieldstart */
 
21
ulong STDCALL net_field_length(uchar **packet)
 
22
{
 
23
  register uchar *pos= (uchar *)*packet;
 
24
  if (*pos < 251)
 
25
  {
 
26
    (*packet)++;
 
27
    return (ulong) *pos;
 
28
  }
 
29
  if (*pos == 251)
 
30
  {
 
31
    (*packet)++;
 
32
    return NULL_LENGTH;
 
33
  }
 
34
  if (*pos == 252)
 
35
  {
 
36
    (*packet)+=3;
 
37
    return (ulong) uint2korr(pos+1);
 
38
  }
 
39
  if (*pos == 253)
 
40
  {
 
41
    (*packet)+=4;
 
42
    return (ulong) uint3korr(pos+1);
 
43
  }
 
44
  (*packet)+=9;                                 /* Must be 254 when here */
 
45
  return (ulong) uint4korr(pos+1);
 
46
}
 
47
 
 
48
/* The same as above but returns longlong */
 
49
my_ulonglong net_field_length_ll(uchar **packet)
 
50
{
 
51
  register uchar *pos= *packet;
 
52
  if (*pos < 251)
 
53
  {
 
54
    (*packet)++;
 
55
    return (my_ulonglong) *pos;
 
56
  }
 
57
  if (*pos == 251)
 
58
  {
 
59
    (*packet)++;
 
60
    return (my_ulonglong) NULL_LENGTH;
 
61
  }
 
62
  if (*pos == 252)
 
63
  {
 
64
    (*packet)+=3;
 
65
    return (my_ulonglong) uint2korr(pos+1);
 
66
  }
 
67
  if (*pos == 253)
 
68
  {
 
69
    (*packet)+=4;
 
70
    return (my_ulonglong) uint3korr(pos+1);
 
71
  }
 
72
  (*packet)+=9;                                 /* Must be 254 when here */
 
73
#ifdef NO_CLIENT_LONGLONG
 
74
  return (my_ulonglong) uint4korr(pos+1);
 
75
#else
 
76
  return (my_ulonglong) uint8korr(pos+1);
 
77
#endif
 
78
}
 
79
 
 
80
/*
 
81
  Store an integer with simple packing into a output package
 
82
 
 
83
  SYNOPSIS
 
84
    net_store_length()
 
85
    pkg                 Store the packed integer here
 
86
    length              integers to store
 
87
 
 
88
  NOTES
 
89
    This is mostly used to store lengths of strings.
 
90
    We have to cast the result for the LL() becasue of a bug in Forte CC
 
91
    compiler.
 
92
 
 
93
  RETURN
 
94
   Position in 'pkg' after the packed length
 
95
*/
 
96
 
 
97
uchar *net_store_length(uchar *packet, ulonglong length)
 
98
{
 
99
  if (length < (ulonglong) LL(251))
 
100
  {
 
101
    *packet=(uchar) length;
 
102
    return packet+1;
 
103
  }
 
104
  /* 251 is reserved for NULL */
 
105
  if (length < (ulonglong) LL(65536))
 
106
  {
 
107
    *packet++=252;
 
108
    int2store(packet,(uint) length);
 
109
    return packet+2;
 
110
  }
 
111
  if (length < (ulonglong) LL(16777216))
 
112
  {
 
113
    *packet++=253;
 
114
    int3store(packet,(ulong) length);
 
115
    return packet+3;
 
116
  }
 
117
  *packet++=254;
 
118
  int8store(packet,length);
 
119
  return packet+8;
 
120
}
 
121