|
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 |
||
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 |