Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F117752632
mssql.php
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Flag For Later
Award Token
Authored By
Unknown
Size
17 KB
Referenced Files
None
Subscribers
None
mssql.php
View Options
<?php
// vim: set et ts=4 sw=4 fdm=marker:
// +----------------------------------------------------------------------+
// | PHP versions 4 and 5 |
// +----------------------------------------------------------------------+
// | Copyright (c) 1998-2007 Manuel Lemos, Tomas V.V.Cox, |
// | Stig. S. Bakken, Lukas Smith |
// | All rights reserved. |
// +----------------------------------------------------------------------+
// | MDB2 is a merge of PEAR DB and Metabases that provides a unified DB |
// | API as well as database abstraction for PHP applications. |
// | This LICENSE is in the BSD license style. |
// | |
// | Redistribution and use in source and binary forms, with or without |
// | modification, are permitted provided that the following conditions |
// | are met: |
// | |
// | Redistributions of source code must retain the above copyright |
// | notice, this list of conditions and the following disclaimer. |
// | |
// | Redistributions in binary form must reproduce the above copyright |
// | notice, this list of conditions and the following disclaimer in the |
// | documentation and/or other materials provided with the distribution. |
// | |
// | Neither the name of Manuel Lemos, Tomas V.V.Cox, Stig. S. Bakken, |
// | Lukas Smith nor the names of his contributors may be used to endorse |
// | or promote products derived from this software without specific prior|
// | written permission. |
// | |
// | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
// | "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT |
// | LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS |
// | FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE |
// | REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, |
// | INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, |
// | BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS|
// | OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED |
// | AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
// | LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY|
// | WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
// | POSSIBILITY OF SUCH DAMAGE. |
// +----------------------------------------------------------------------+
// | Authors: Lukas Smith <smith@pooteeweet.org> |
// | Daniel Convissor <danielc@php.net> |
// +----------------------------------------------------------------------+
//
// $Id: mssql.php 295587 2010-02-28 17:16:38Z quipo $
//
require_once
'MDB2/Driver/Datatype/Common.php'
;
/**
* MDB2 MS SQL driver
*
* @package MDB2
* @category Database
* @author Lukas Smith <smith@pooteeweet.org>
*/
class
MDB2_Driver_Datatype_mssql
extends
MDB2_Driver_Datatype_Common
{
// {{{ _baseConvertResult()
/**
* general type conversion method
*
* @param mixed $value refernce to a value to be converted
* @param string $type specifies which type to convert to
* @param boolean $rtrim [optional] when TRUE [default], apply rtrim() to text
* @return object a MDB2 error on failure
* @access protected
*/
function
_baseConvertResult
(
$value
,
$type
,
$rtrim
=
true
)
{
if
(
null
===
$value
)
{
return
null
;
}
switch
(
$type
)
{
case
'boolean'
:
return
$value
==
'1'
;
case
'date'
:
if
(
strlen
(
$value
)
>
10
)
{
$value
=
substr
(
$value
,
0
,
10
);
}
return
$value
;
case
'time'
:
if
(
strlen
(
$value
)
>
8
)
{
$value
=
substr
(
$value
,
11
,
8
);
}
return
$value
;
}
return
parent
::
_baseConvertResult
(
$value
,
$type
,
$rtrim
);
}
// }}}
// {{{ _getCollationFieldDeclaration()
/**
* Obtain DBMS specific SQL code portion needed to set the COLLATION
* of a field declaration to be used in statements like CREATE TABLE.
*
* @param string $collation name of the collation
*
* @return string DBMS specific SQL code portion needed to set the COLLATION
* of a field declaration.
*/
function
_getCollationFieldDeclaration
(
$collation
)
{
return
'COLLATE '
.
$collation
;
}
// }}}
// {{{ getTypeDeclaration()
/**
* Obtain DBMS specific SQL code portion needed to declare an text type
* field to be used in statements like CREATE TABLE.
*
* @param array $field associative array with the name of the properties
* of the field being declared as array indexes. Currently, the types
* of supported field properties are as follows:
*
* length
* Integer value that determines the maximum length of the text
* field. If this argument is missing the field should be
* declared to have the longest length allowed by the DBMS.
*
* default
* Text value to be used as default for this field.
*
* notnull
* Boolean flag that indicates whether this field is constrained
* to not be set to null.
* @return string DBMS specific SQL code portion that should be used to
* declare the specified field.
* @access public
*/
function
getTypeDeclaration
(
$field
)
{
$db
=
$this
->
getDBInstance
();
if
(
PEAR
::
isError
(
$db
))
{
return
$db
;
}
switch
(
$field
[
'type'
])
{
case
'text'
:
$length
=
!
empty
(
$field
[
'length'
])
?
$field
[
'length'
]
:
false
;
$fixed
=
!
empty
(
$field
[
'fixed'
])
?
$field
[
'fixed'
]
:
false
;
return
$fixed
?
(
$length
?
'CHAR('
.
$length
.
')'
:
'CHAR('
.
$db
->
options
[
'default_text_field_length'
].
')'
)
:
(
$length
?
'VARCHAR('
.
$length
.
')'
:
'TEXT'
);
case
'clob'
:
if
(!
empty
(
$field
[
'length'
]))
{
$length
=
$field
[
'length'
];
if
(
$length
<=
8000
)
{
return
'VARCHAR('
.
$length
.
')'
;
}
}
return
'TEXT'
;
case
'blob'
:
if
(!
empty
(
$field
[
'length'
]))
{
$length
=
$field
[
'length'
];
if
(
$length
<=
8000
)
{
return
"VARBINARY($length)"
;
}
}
return
'IMAGE'
;
case
'integer'
:
return
'INT'
;
case
'boolean'
:
return
'BIT'
;
case
'date'
:
return
'CHAR ('
.
strlen
(
'YYYY-MM-DD'
).
')'
;
case
'time'
:
return
'CHAR ('
.
strlen
(
'HH:MM:SS'
).
')'
;
case
'timestamp'
:
return
'CHAR ('
.
strlen
(
'YYYY-MM-DD HH:MM:SS'
).
')'
;
case
'float'
:
return
'FLOAT'
;
case
'decimal'
:
$length
=
!
empty
(
$field
[
'length'
])
?
$field
[
'length'
]
:
18
;
$scale
=
!
empty
(
$field
[
'scale'
])
?
$field
[
'scale'
]
:
$db
->
options
[
'decimal_places'
];
return
'DECIMAL('
.
$length
.
','
.
$scale
.
')'
;
}
return
''
;
}
// }}}
// {{{ _getIntegerDeclaration()
/**
* Obtain DBMS specific SQL code portion needed to declare an integer type
* field to be used in statements like CREATE TABLE.
*
* @param string $name name the field to be declared.
* @param string $field associative array with the name of the properties
* of the field being declared as array indexes.
* Currently, the types of supported field
* properties are as follows:
*
* unsigned
* Boolean flag that indicates whether the field
* should be declared as unsigned integer if
* possible.
*
* default
* Integer value to be used as default for this
* field.
*
* notnull
* Boolean flag that indicates whether this field is
* constrained to not be set to null.
* @return string DBMS specific SQL code portion that should be used to
* declare the specified field.
* @access protected
*/
function
_getIntegerDeclaration
(
$name
,
$field
)
{
$db
=
$this
->
getDBInstance
();
if
(
PEAR
::
isError
(
$db
))
{
return
$db
;
}
$notnull
=
empty
(
$field
[
'notnull'
])
?
' NULL'
:
' NOT NULL'
;
$default
=
$autoinc
=
''
;
if
(!
empty
(
$field
[
'autoincrement'
]))
{
$autoinc
=
' IDENTITY PRIMARY KEY'
;
}
elseif
(
array_key_exists
(
'default'
,
$field
))
{
if
(
$field
[
'default'
]
===
''
)
{
$field
[
'default'
]
=
0
;
}
if
(
null
===
$field
[
'default'
])
{
$default
=
' DEFAULT (null)'
;
}
else
{
$default
=
' DEFAULT ('
.
$this
->
quote
(
$field
[
'default'
],
'integer'
)
.
')'
;
}
}
if
(!
empty
(
$field
[
'unsigned'
]))
{
$db
->
warnings
[]
=
"unsigned integer field
\"
$name
\"
is being declared as signed integer"
;
}
$name
=
$db
->
quoteIdentifier
(
$name
,
true
);
return
$name
.
' '
.
$this
->
getTypeDeclaration
(
$field
).
$notnull
.
$default
.
$autoinc
;
}
// }}}
// {{{ _getCLOBDeclaration()
/**
* Obtain DBMS specific SQL code portion needed to declare an character
* large object type field to be used in statements like CREATE TABLE.
*
* @param string $name name the field to be declared.
* @param array $field associative array with the name of the properties
* of the field being declared as array indexes. Currently, the types
* of supported field properties are as follows:
*
* length
* Integer value that determines the maximum length of the large
* object field. If this argument is missing the field should be
* declared to have the longest length allowed by the DBMS.
*
* notnull
* Boolean flag that indicates whether this field is constrained
* to not be set to null.
* @return string DBMS specific SQL code portion that should be used to
* declare the specified field.
* @access public
*/
function
_getCLOBDeclaration
(
$name
,
$field
)
{
$db
=
$this
->
getDBInstance
();
if
(
PEAR
::
isError
(
$db
))
{
return
$db
;
}
$notnull
=
empty
(
$field
[
'notnull'
])
?
' NULL'
:
' NOT NULL'
;
$name
=
$db
->
quoteIdentifier
(
$name
,
true
);
return
$name
.
' '
.
$this
->
getTypeDeclaration
(
$field
).
$notnull
;
}
// }}}
// {{{ _getBLOBDeclaration()
/**
* Obtain DBMS specific SQL code portion needed to declare an binary large
* object type field to be used in statements like CREATE TABLE.
*
* @param string $name name the field to be declared.
* @param array $field associative array with the name of the properties
* of the field being declared as array indexes. Currently, the types
* of supported field properties are as follows:
*
* length
* Integer value that determines the maximum length of the large
* object field. If this argument is missing the field should be
* declared to have the longest length allowed by the DBMS.
*
* notnull
* Boolean flag that indicates whether this field is constrained
* to not be set to null.
* @return string DBMS specific SQL code portion that should be used to
* declare the specified field.
* @access protected
*/
function
_getBLOBDeclaration
(
$name
,
$field
)
{
$db
=
$this
->
getDBInstance
();
if
(
PEAR
::
isError
(
$db
))
{
return
$db
;
}
$notnull
=
empty
(
$field
[
'notnull'
])
?
' NULL'
:
' NOT NULL'
;
$name
=
$db
->
quoteIdentifier
(
$name
,
true
);
return
$name
.
' '
.
$this
->
getTypeDeclaration
(
$field
).
$notnull
;
}
// }}}
// {{{ _quoteBLOB()
/**
* Convert a text value into a DBMS specific format that is suitable to
* compose query statements.
*
* @param string $value text string value that is intended to be converted.
* @param bool $quote determines if the value should be quoted and escaped
* @param bool $escape_wildcards if to escape escape wildcards
* @return string text string that represents the given argument value in
* a DBMS specific format.
* @access protected
*/
function
_quoteBLOB
(
$value
,
$quote
,
$escape_wildcards
)
{
if
(!
$quote
)
{
return
$value
;
}
$value
=
'0x'
.
bin2hex
(
$this
->
_readFile
(
$value
));
return
$value
;
}
// }}}
// {{{ matchPattern()
/**
* build a pattern matching string
*
* @access public
*
* @param array $pattern even keys are strings, odd are patterns (% and _)
* @param string $operator optional pattern operator (LIKE, ILIKE and maybe others in the future)
* @param string $field optional field name that is being matched against
* (might be required when emulating ILIKE)
*
* @return string SQL pattern
*/
function
matchPattern
(
$pattern
,
$operator
=
null
,
$field
=
null
)
{
$db
=
$this
->
getDBInstance
();
if
(
PEAR
::
isError
(
$db
))
{
return
$db
;
}
$match
=
''
;
if
(
null
!==
$operator
)
{
$field
=
(
null
===
$field
)
?
''
:
$field
.
' '
;
$operator
=
strtoupper
(
$operator
);
switch
(
$operator
)
{
// case insensitive
case
'ILIKE'
:
$match
=
$field
.
'LIKE '
;
break
;
case
'NOT ILIKE'
:
$match
=
$field
.
'NOT LIKE '
;
break
;
// case sensitive
case
'LIKE'
:
$match
=
$field
.
'LIKE '
;
break
;
case
'NOT LIKE'
:
$match
=
$field
.
'NOT LIKE '
;
break
;
default
:
return
$db
->
raiseError
(
MDB2_ERROR_UNSUPPORTED
,
null
,
null
,
'not a supported operator type:'
.
$operator
,
__FUNCTION__
);
}
}
$match
.=
"'"
;
foreach
(
$pattern
as
$key
=>
$value
)
{
if
(
$key
%
2
)
{
$match
.=
$value
;
}
else
{
$match
.=
$db
->
escapePattern
(
$db
->
escape
(
$value
));
}
}
$match
.=
"'"
;
$match
.=
$this
->
patternEscapeString
();
return
$match
;
}
// }}}
// {{{ _mapNativeDatatype()
/**
* Maps a native array description of a field to a MDB2 datatype and length
*
* @param array $field native field description
* @return array containing the various possible types, length, sign, fixed
* @access public
*/
function
_mapNativeDatatype
(
$field
)
{
// todo: handle length of various int variations
$db_type
=
preg_replace
(
'/
\d
/'
,
''
,
strtolower
(
$field
[
'type'
]));
$length
=
$field
[
'length'
];
$type
=
array
();
// todo: unsigned handling seems to be missing
$unsigned
=
$fixed
=
null
;
switch
(
$db_type
)
{
case
'bit'
:
$type
[
0
]
=
'boolean'
;
break
;
case
'tinyint'
:
$type
[
0
]
=
'integer'
;
$length
=
1
;
break
;
case
'smallint'
:
$type
[
0
]
=
'integer'
;
$length
=
2
;
break
;
case
'int'
:
$type
[
0
]
=
'integer'
;
$length
=
4
;
break
;
case
'bigint'
:
$type
[
0
]
=
'integer'
;
$length
=
8
;
break
;
case
'smalldatetime'
:
case
'datetime'
:
$type
[
0
]
=
'timestamp'
;
break
;
case
'float'
:
case
'real'
:
case
'numeric'
:
$type
[
0
]
=
'float'
;
break
;
case
'decimal'
:
case
'money'
:
$type
[
0
]
=
'decimal'
;
$length
=
$field
[
'numeric_precision'
].
','
.
$field
[
'numeric_scale'
];
break
;
case
'text'
:
case
'ntext'
:
case
'varchar'
:
case
'nvarchar'
:
$fixed
=
false
;
case
'char'
:
case
'nchar'
:
$type
[
0
]
=
'text'
;
if
(
$length
==
'1'
)
{
$type
[]
=
'boolean'
;
if
(
preg_match
(
'/^(is|has)/'
,
$field
[
'name'
]))
{
$type
=
array_reverse
(
$type
);
}
}
elseif
(
strstr
(
$db_type
,
'text'
))
{
$type
[]
=
'clob'
;
$type
=
array_reverse
(
$type
);
}
if
(
$fixed
!==
false
)
{
$fixed
=
true
;
}
break
;
case
'image'
:
case
'varbinary'
:
$type
[]
=
'blob'
;
$length
=
null
;
break
;
default
:
$db
=
$this
->
getDBInstance
();
if
(
PEAR
::
isError
(
$db
))
{
return
$db
;
}
return
$db
->
raiseError
(
MDB2_ERROR_UNSUPPORTED
,
null
,
null
,
'unknown database attribute type: '
.
$db_type
,
__FUNCTION__
);
}
if
((
int
)
$length
<=
0
)
{
$length
=
null
;
}
return
array
(
$type
,
$length
,
$unsigned
,
$fixed
);
}
// }}}
}
?>
File Metadata
Details
Attached
Mime Type
text/x-php
Expires
Sat, Apr 4, 4:25 AM (1 d, 43 m)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
18752175
Default Alt Text
mssql.php (17 KB)
Attached To
Mode
R113 roundcubemail
Attached
Detach File
Event Timeline