|
1
by brian
clean slate |
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 |
||
|
77.1.40
by Monty Taylor
More naming changes. |
16 |
#include <my_global.h> |
|
77.1.39
by Monty Taylor
More mysql->drizzle renaming. |
17 |
#include <drizzle.h> |
|
1
by brian
clean slate |
18 |
|
19 |
/* Get the length of next field. Change parameter to point at fieldstart */
|
|
20 |
ulong STDCALL net_field_length(uchar **packet) |
|
21 |
{
|
|
22 |
register uchar *pos= (uchar *)*packet; |
|
23 |
if (*pos < 251) |
|
24 |
{
|
|
25 |
(*packet)++; |
|
26 |
return (ulong) *pos; |
|
27 |
}
|
|
28 |
if (*pos == 251) |
|
29 |
{
|
|
30 |
(*packet)++; |
|
31 |
return NULL_LENGTH; |
|
32 |
}
|
|
33 |
if (*pos == 252) |
|
34 |
{
|
|
35 |
(*packet)+=3; |
|
36 |
return (ulong) uint2korr(pos+1); |
|
37 |
}
|
|
38 |
if (*pos == 253) |
|
39 |
{
|
|
40 |
(*packet)+=4; |
|
41 |
return (ulong) uint3korr(pos+1); |
|
42 |
}
|
|
43 |
(*packet)+=9; /* Must be 254 when here */ |
|
44 |
return (ulong) uint4korr(pos+1); |
|
45 |
}
|
|
46 |
||
47 |
/* The same as above but returns longlong */
|
|
48 |
my_ulonglong net_field_length_ll(uchar **packet) |
|
49 |
{
|
|
50 |
register uchar *pos= *packet; |
|
51 |
if (*pos < 251) |
|
52 |
{
|
|
53 |
(*packet)++; |
|
54 |
return (my_ulonglong) *pos; |
|
55 |
}
|
|
56 |
if (*pos == 251) |
|
57 |
{
|
|
58 |
(*packet)++; |
|
59 |
return (my_ulonglong) NULL_LENGTH; |
|
60 |
}
|
|
61 |
if (*pos == 252) |
|
62 |
{
|
|
63 |
(*packet)+=3; |
|
64 |
return (my_ulonglong) uint2korr(pos+1); |
|
65 |
}
|
|
66 |
if (*pos == 253) |
|
67 |
{
|
|
68 |
(*packet)+=4; |
|
69 |
return (my_ulonglong) uint3korr(pos+1); |
|
70 |
}
|
|
71 |
(*packet)+=9; /* Must be 254 when here */ |
|
72 |
#ifdef NO_CLIENT_LONGLONG
|
|
73 |
return (my_ulonglong) uint4korr(pos+1); |
|
74 |
#else
|
|
75 |
return (my_ulonglong) uint8korr(pos+1); |
|
76 |
#endif
|
|
77 |
}
|
|
78 |
||
79 |
/*
|
|
80 |
Store an integer with simple packing into a output package
|
|
81 |
||
82 |
SYNOPSIS
|
|
83 |
net_store_length()
|
|
84 |
pkg Store the packed integer here
|
|
85 |
length integers to store
|
|
86 |
||
87 |
NOTES
|
|
88 |
This is mostly used to store lengths of strings.
|
|
89 |
We have to cast the result for the LL() becasue of a bug in Forte CC
|
|
90 |
compiler.
|
|
91 |
||
92 |
RETURN
|
|
93 |
Position in 'pkg' after the packed length
|
|
94 |
*/
|
|
95 |
||
96 |
uchar *net_store_length(uchar *packet, ulonglong length) |
|
97 |
{
|
|
|
80.1.1
by Brian Aker
LL() cleanup |
98 |
if (length < (ulonglong) 251LL) |
|
1
by brian
clean slate |
99 |
{
|
100 |
*packet=(uchar) length; |
|
101 |
return packet+1; |
|
102 |
}
|
|
103 |
/* 251 is reserved for NULL */
|
|
|
80.1.1
by Brian Aker
LL() cleanup |
104 |
if (length < (ulonglong) 65536LL) |
|
1
by brian
clean slate |
105 |
{
|
106 |
*packet++=252; |
|
107 |
int2store(packet,(uint) length); |
|
108 |
return packet+2; |
|
109 |
}
|
|
|
80.1.1
by Brian Aker
LL() cleanup |
110 |
if (length < (ulonglong) 16777216LL) |
|
1
by brian
clean slate |
111 |
{
|
112 |
*packet++=253; |
|
113 |
int3store(packet,(ulong) length); |
|
114 |
return packet+3; |
|
115 |
}
|
|
116 |
*packet++=254; |
|
117 |
int8store(packet,length); |
|
118 |
return packet+8; |
|
119 |
}
|
|
120 |