You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
528 lines
20 KiB
528 lines
20 KiB
#if DEBUG
|
|
|
|
/* 2021.11.28 */
|
|
|
|
using Apewer;
|
|
using System;
|
|
using System.Collections.Generic;
|
|
using System.Data;
|
|
using System.Data.Common;
|
|
using System.Text;
|
|
|
|
using static Apewer.Source.SourceUtility;
|
|
using System.Data.SqlClient;
|
|
|
|
#if NETFRAMEWORK
|
|
using System.Data.Sql;
|
|
#endif
|
|
|
|
namespace Apewer.Source
|
|
{
|
|
|
|
/// <summary></summary>
|
|
[Serializable]
|
|
|
|
public class SqlClientThin : DbClient, IDbClient
|
|
{
|
|
|
|
#region
|
|
|
|
string _str = null;
|
|
|
|
/// <summary>使用连接字符串创建数据库连接实例。</summary>
|
|
public SqlClientThin(string connectionString, Timeout timeout = null) : base(timeout)
|
|
{
|
|
_str = connectionString ?? "";
|
|
}
|
|
|
|
/// <summary>使用连接凭据创建数据库连接实例。</summary>
|
|
public SqlClientThin(string address, string store, string user, string pass, Timeout timeout = null) : base(timeout)
|
|
{
|
|
if (timeout == null) timeout = Timeout.Default;
|
|
|
|
var a = address ?? "";
|
|
var s = store ?? "";
|
|
var u = user ?? "";
|
|
var p = pass ?? "";
|
|
var cs = $"data source = {a}; initial catalog = {s}; ";
|
|
if (string.IsNullOrEmpty(u)) cs += "integrated security = sspi; ";
|
|
else
|
|
{
|
|
cs += $"user id = {u}; ";
|
|
if (!string.IsNullOrEmpty(p)) cs += $"password = {p}; ";
|
|
}
|
|
cs += $"connection timeout = {timeout.Connect}; ";
|
|
|
|
_str = cs;
|
|
}
|
|
|
|
/// <summary>为 Ado 创建连接字符串。</summary>
|
|
protected override string NewConnectionString() => _str;
|
|
|
|
/// <summary>为 Ado 创建 IDbConnection 对象。</summary>
|
|
protected override IDbConnection NewConnection() => new SqlConnection();
|
|
|
|
/// <summary>为 Ado 创建 IDbCommand 对象。</summary>
|
|
protected override IDbCommand NewCommand() => new SqlCommand();
|
|
|
|
/// <summary>为 Ado 创建 IDataAdapter 对象。</summary>
|
|
protected override IDataAdapter NewDataAdapter(IDbCommand command) => new SqlDataAdapter((SqlCommand)command);
|
|
|
|
#endregion
|
|
|
|
#region ORM
|
|
|
|
/// <summary>查询数据库中的所有表名。</summary>
|
|
public override string[] TableNames() => TextColumn("select [name] from [sysobjects] where [type] = 'u' order by [name]; ");
|
|
|
|
/// <summary>查询数据库实例中的所有数据库名。</summary>
|
|
public override string[] StoreNames() => TextColumn("select [name] from [master]..[sysdatabases] order by [name]; ", new string[] { "master", "model", "msdb", "tempdb" });
|
|
|
|
/// <summary>查询表中的所有列名。</summary>
|
|
public override string[] ColumnNames(string tableName) => TextColumn($"select [name] from [syscolumns] where [id] = object_id('{tableName}'); ");
|
|
|
|
/// <summary>获取列信息。</summary>
|
|
public override ColumnInfo[] ColumnsInfo(string tableName)
|
|
{
|
|
if (tableName.IsEmpty()) throw new ArgumentNullException(nameof(tableName));
|
|
var sql = $"select name, xtype, length from syscolumns where id = object_id('{tableName}') ";
|
|
using (var query = Query(sql))
|
|
{
|
|
var ab = new ArrayBuilder<ColumnInfo>();
|
|
for (var i = 0; i < query.Rows; i++)
|
|
{
|
|
var info = new ColumnInfo();
|
|
info.Name = query.Text(i, "name");
|
|
info.Type = XType(query.Int32(i, "xtype"));
|
|
info.Length = query.Int32(i, "length");
|
|
ab.Add(info);
|
|
}
|
|
return ab.Export();
|
|
}
|
|
}
|
|
|
|
/// <summary>创建表,当表不存在时创建表,当现存表中缺少模型中属性对应的列时增加列。成功时返回空字符串,发生异常时返回异常信息。</summary>
|
|
public override string Initialize(Type model)
|
|
{
|
|
var structure = TableStructure.Parse(model);
|
|
if (structure == null) return "无法解析记录模型。";
|
|
|
|
// 连接数据库。
|
|
var connect = Connect();
|
|
if (connect.NotEmpty()) return connect;
|
|
|
|
// 检查现存表。
|
|
var exists = false;
|
|
var tables = TableNames();
|
|
if (tables.Length > 0)
|
|
{
|
|
var lower = structure.Name.ToLower();
|
|
foreach (var table in tables)
|
|
{
|
|
if (TextUtility.IsBlank(table)) continue;
|
|
if (table.ToLower() == lower)
|
|
{
|
|
exists = true;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (exists)
|
|
{
|
|
// 获取已存在的列名。
|
|
var columns = ColumnNames(structure.Name);
|
|
if (columns.Length > 0)
|
|
{
|
|
var lower = new List<string>();
|
|
foreach (var column in columns)
|
|
{
|
|
if (TextUtility.IsBlank(column)) continue;
|
|
lower.Add(column.ToLower());
|
|
}
|
|
columns = lower.ToArray();
|
|
}
|
|
|
|
// 增加列。
|
|
foreach (var column in structure.Columns)
|
|
{
|
|
// 检查 Independent 特性。
|
|
if (structure.Independent && column.Independent) continue;
|
|
|
|
// 去重。
|
|
var lower = column.Field.ToLower();
|
|
if (columns.Contains(lower)) continue;
|
|
|
|
var type = Declaration(column);
|
|
if (string.IsNullOrEmpty(type)) return TextUtility.Merge("类型 ", column.Type.ToString(), " 不受支持。");
|
|
|
|
var sql = TextUtility.Merge("alter table [", structure.Name, "] add ", type, "; ");
|
|
var execute = Execute(sql);
|
|
if (execute.Success == false) return execute.Message;
|
|
}
|
|
return TextUtility.Empty;
|
|
}
|
|
else
|
|
{
|
|
var sqlcolumns = new List<string>();
|
|
foreach (var column in structure.Columns)
|
|
{
|
|
// 检查 Independent 特性。
|
|
if (structure.Independent && column.Independent) continue;
|
|
|
|
var type = Declaration(column);
|
|
if (!column.Independent && column.Property.Name == "Key") type = type + " primary key";
|
|
|
|
if (string.IsNullOrEmpty(type)) return TextUtility.Merge("类型 ", column.Type.ToString(), " 不受支持。");
|
|
sqlcolumns.Add(type);
|
|
}
|
|
var sql = TextUtility.Merge("create table [", structure.Name, "](", string.Join(", ", sqlcolumns.ToArray()), "); ");
|
|
var execute = Execute(sql);
|
|
if (execute.Success) return TextUtility.Empty;
|
|
return execute.Message;
|
|
}
|
|
}
|
|
|
|
/// <summary>插入记录。返回错误信息。</summary>
|
|
public override string Insert(object record, string table = null)
|
|
{
|
|
if (record == null) return "参数无效。";
|
|
FixProperties(record);
|
|
|
|
var structure = TableStructure.Parse(record.GetType());
|
|
if (structure == null) return "无法解析记录模型。";
|
|
if (string.IsNullOrEmpty(table)) table = structure.Name;
|
|
if (string.IsNullOrEmpty(table)) return "表名称无效。";
|
|
|
|
var ps = structure.CreateParameters(record, Parameter, null);
|
|
var psc = ps.Length;
|
|
if (psc < 1) return "数据模型不包含字段。";
|
|
|
|
var names = new List<string>(psc);
|
|
var values = new List<string>(psc);
|
|
foreach (var column in ps)
|
|
{
|
|
//names.Add(TextGenerator.Merge("[", column, "]"));
|
|
names.Add(TextUtility.Merge(column));
|
|
values.Add("@" + column);
|
|
}
|
|
var sb = new StringBuilder();
|
|
sb.Append("insert into [", table, "](", string.Join(", ", names.ToArray()), ") ");
|
|
sb.Append("values(", string.Join(", ", values.ToArray()), "); ");
|
|
var sql = sb.ToString();
|
|
|
|
var execute = Execute(sql, ps);
|
|
if (execute.Success) return TextUtility.Empty;
|
|
return execute.Message;
|
|
}
|
|
|
|
/// <summary>更新记录,实体中的 Key 属性不被更新。返回错误信息。</summary>
|
|
/// <remarks>无法更新带有 Independent 特性的模型(缺少 Key 属性)。</remarks>
|
|
public override string Update(IRecord record, string table = null)
|
|
{
|
|
if (record == null) return "参数无效。";
|
|
FixProperties(record);
|
|
SetUpdated(record);
|
|
|
|
var structure = TableStructure.Parse(record.GetType());
|
|
if (structure == null) return "无法解析记录模型。";
|
|
if (structure.Independent) return "无法更新带有 Independent 特性的模型。";
|
|
if (string.IsNullOrEmpty(table)) table = structure.Name;
|
|
if (string.IsNullOrEmpty(table)) return "表名称无效。";
|
|
|
|
var ps = structure.CreateParameters(record, Parameter, null);
|
|
var psc = ps.Length;
|
|
if (psc < 1) return "数据模型不包含字段。";
|
|
|
|
var items = new List<string>();
|
|
foreach (var p in ps)
|
|
{
|
|
var pn = p.ParameterName;
|
|
items.Add(TextUtility.Merge("[", pn, "] = @", pn));
|
|
}
|
|
var key = record.Key.SafeKey();
|
|
var sql = TextUtility.Merge("update [", table, "] set ", string.Join(", ", items.ToArray()), " where [_key]='", key, "'; ");
|
|
|
|
var execute = Execute(sql, ps);
|
|
if (execute.Success) return TextUtility.Empty;
|
|
return execute.Message;
|
|
}
|
|
|
|
/// <summary>获取记录。</summary>
|
|
public override Result<object[]> Query(Type model, long flag = 0) => SourceUtility.Query(this, model, (tn) =>
|
|
{
|
|
if (flag == 0) return $"select * from [{tn}]; ";
|
|
return $"select * from [{tn}] where _flag={flag}; ";
|
|
});
|
|
|
|
/// <summary>获取记录。</summary>
|
|
public override Result<T[]> Query<T>(long flag = 0) => SourceUtility.Query<T>(this, (tn) =>
|
|
{
|
|
if (flag == 0) return $"select * from [{tn}]; ";
|
|
return $"select * from [{tn}] where _flag={flag}; ";
|
|
});
|
|
|
|
/// <summary>获取具有指定 Key 的记录。</summary>
|
|
public override Result<object> Get(Type model, string key, long flag = 0) => SourceUtility.Get(this, model, key, (tn, sk) =>
|
|
{
|
|
if (flag == 0) return $"select top 1 * from [{tn}] _key='{sk}'; ";
|
|
return $"select top 1 * from [{tn}] where _key='{sk}' and _key='{sk}'; ";
|
|
});
|
|
|
|
/// <summary>获取具有指定 Key 的记录。</summary>
|
|
public override Result<T> Get<T>(string key, long flag = 0) => SourceUtility.Get<T>(this, key, (tn, sk) =>
|
|
{
|
|
if (flag == 0) return $"select top 1 * from [{tn}] _key='{sk}'; ";
|
|
return $"select top 1 * from [{tn}] where _key='{sk}' and _key='{sk}'; ";
|
|
});
|
|
|
|
/// <summary>查询有效的 Key 值。</summary>
|
|
public override Result<string[]> Keys(Type model, long flag = 0) => SourceUtility.Keys(this, model, (tn) =>
|
|
{
|
|
if (flag == 0) return $"select _key from [{tn}]; ";
|
|
return $"select _key from [{tn}] where _flag={flag}; ";
|
|
});
|
|
|
|
/// <summary>查询有效的 Key 值。</summary>
|
|
public override Result<string[]> Keys<T>(long flag = 0) => Keys(typeof(T), flag);
|
|
|
|
#endregion
|
|
|
|
#region public static
|
|
|
|
#if NET20 || NET40
|
|
|
|
/// <summary>枚举本地网络中服务器的名称。</summary>
|
|
public static SqlServerSource[] EnumerateServer()
|
|
{
|
|
var list = new List<SqlServerSource>();
|
|
|
|
// 表中列名:ServerName、InstanceName、IsClustered、Version。
|
|
using (var query = new Query(SqlDataSourceEnumerator.Instance.GetDataSources()))
|
|
{
|
|
for (int i = 0; i < query.Rows; i++)
|
|
{
|
|
var item = new SqlServerSource();
|
|
item.ServerName = query.Text(i, "ServerName");
|
|
list.Add(item);
|
|
}
|
|
}
|
|
return list.ToArray();
|
|
}
|
|
|
|
#endif
|
|
|
|
/// <summary>指定的连接凭据是否符合连接要求,默认指定 master 数据库。</summary>
|
|
public static bool Proven(string address, string user, string pass) => Proven(address, "master", user, pass);
|
|
|
|
/// <summary>指定的连接凭据是否符合连接要求。</summary>
|
|
public static bool Proven(string address, string store, string user, string pass)
|
|
{
|
|
var a = string.IsNullOrEmpty(address);
|
|
var s = string.IsNullOrEmpty(store);
|
|
var u = string.IsNullOrEmpty(user);
|
|
var p = string.IsNullOrEmpty(pass);
|
|
if (a) return false;
|
|
if (s) return false;
|
|
if (u && !p) return false;
|
|
return true;
|
|
}
|
|
|
|
/// <summary>创建参数。</summary>
|
|
/// <exception cref="ArgumentNullException"></exception>
|
|
/// <exception cref="InvalidOperationException"></exception>
|
|
static SqlParameter Parameter(Parameter parameter)
|
|
{
|
|
if (parameter == null) throw new InvalidOperationException("参数无效。");
|
|
return Parameter(parameter.Name, parameter.Type, parameter.Size, parameter.Value);
|
|
}
|
|
|
|
/// <summary>创建参数。</summary>
|
|
public static SqlParameter Parameter(string name, ColumnType type, int size, object value)
|
|
{
|
|
var vname = TextUtility.Trim(name);
|
|
if (TextUtility.IsBlank(vname)) return null;
|
|
|
|
var vtype = SqlDbType.BigInt;
|
|
switch (type)
|
|
{
|
|
case ColumnType.Bytes:
|
|
vtype = SqlDbType.Image;
|
|
break;
|
|
case ColumnType.Integer:
|
|
vtype = SqlDbType.BigInt;
|
|
break;
|
|
case ColumnType.Float:
|
|
vtype = SqlDbType.Float;
|
|
break;
|
|
case ColumnType.DateTime:
|
|
vtype = SqlDbType.DateTime;
|
|
break;
|
|
case ColumnType.VarChar:
|
|
case ColumnType.VarChar191:
|
|
case ColumnType.VarCharMax:
|
|
vtype = SqlDbType.VarChar;
|
|
break;
|
|
case ColumnType.NVarChar:
|
|
case ColumnType.NVarChar191:
|
|
case ColumnType.NVarCharMax:
|
|
vtype = SqlDbType.NVarChar;
|
|
break;
|
|
case ColumnType.Text:
|
|
vtype = SqlDbType.Text;
|
|
break;
|
|
case ColumnType.NText:
|
|
vtype = SqlDbType.NText;
|
|
break;
|
|
default:
|
|
throw new InvalidOperationException(TextUtility.Merge("类型 ", type.ToString(), " 不受支持。"));
|
|
}
|
|
|
|
var vsize = size;
|
|
switch (type)
|
|
{
|
|
case ColumnType.VarChar:
|
|
vsize = NumberUtility.Restrict(vsize, 0, 8000);
|
|
break;
|
|
case ColumnType.NVarChar:
|
|
vsize = NumberUtility.Restrict(vsize, 0, 4000);
|
|
break;
|
|
case ColumnType.VarChar191:
|
|
case ColumnType.NVarChar191:
|
|
vsize = NumberUtility.Restrict(vsize, 0, 191);
|
|
break;
|
|
default:
|
|
vsize = 0;
|
|
break;
|
|
}
|
|
|
|
var vvalue = value;
|
|
if (vvalue is string && vvalue != null && vsize > 0)
|
|
{
|
|
vvalue = TextUtility.Left((string)vvalue, vsize);
|
|
}
|
|
|
|
var parameter = new SqlParameter();
|
|
parameter.ParameterName = vname;
|
|
parameter.SqlDbType = vtype;
|
|
parameter.Value = vvalue;
|
|
if (vsize > 0) parameter.Size = vsize;
|
|
return parameter;
|
|
}
|
|
|
|
/// <summary>创建参数。</summary>
|
|
public static SqlParameter Parameter(string name, SqlDbType type, int size, object value)
|
|
{
|
|
if (value is string && value != null && size > 0)
|
|
{
|
|
value = TextUtility.Left((string)value, (int)size);
|
|
}
|
|
|
|
var p = new SqlParameter();
|
|
p.ParameterName = name ?? "";
|
|
p.SqlDbType = type;
|
|
p.Size = size;
|
|
p.Value = value;
|
|
return p;
|
|
}
|
|
|
|
/// <summary>创建参数。</summary>
|
|
public static SqlParameter Parameter(string name, SqlDbType type, object value)
|
|
{
|
|
var p = new SqlParameter();
|
|
p.ParameterName = name ?? "";
|
|
p.SqlDbType = type;
|
|
p.Value = value;
|
|
return p;
|
|
}
|
|
|
|
static string Declaration(ColumnAttribute column)
|
|
{
|
|
var type = TextUtility.Empty;
|
|
var vcolumn = column;
|
|
var length = Math.Max(0, vcolumn.Length);
|
|
switch (vcolumn.Type)
|
|
{
|
|
case ColumnType.Integer:
|
|
type = "bigint";
|
|
break;
|
|
case ColumnType.Float:
|
|
type = "float";
|
|
break;
|
|
case ColumnType.Bytes:
|
|
type = "image";
|
|
break;
|
|
case ColumnType.DateTime:
|
|
type = "datetime";
|
|
break;
|
|
case ColumnType.VarChar:
|
|
type = TextUtility.Merge("varchar(", Math.Min(8000, length).ToString(), ")");
|
|
break;
|
|
case ColumnType.VarChar191:
|
|
type = TextUtility.Merge("varchar(191)");
|
|
break;
|
|
case ColumnType.VarCharMax:
|
|
type = TextUtility.Merge("varchar(max)");
|
|
break;
|
|
case ColumnType.Text:
|
|
type = TextUtility.Merge("text");
|
|
break;
|
|
case ColumnType.NVarChar:
|
|
type = TextUtility.Merge("nvarchar(", Math.Min(4000, length).ToString(), ")");
|
|
break;
|
|
case ColumnType.NVarChar191:
|
|
type = TextUtility.Merge("nvarchar(191)");
|
|
break;
|
|
case ColumnType.NVarCharMax:
|
|
type = TextUtility.Merge("nvarchar(max)");
|
|
break;
|
|
case ColumnType.NText:
|
|
type = TextUtility.Merge("ntext");
|
|
break;
|
|
default:
|
|
return TextUtility.Empty;
|
|
}
|
|
return TextUtility.Merge("[", vcolumn.Field, "] ", type);
|
|
}
|
|
|
|
static string XType(int xtype)
|
|
{
|
|
switch (xtype)
|
|
{
|
|
case 34: return "image";
|
|
case 35: return "text";
|
|
case 36: return "uniqueidentifier";
|
|
case 48: return "tinyint";
|
|
case 52: return "smallint";
|
|
case 56: return "int";
|
|
case 58: return "smalldatetime";
|
|
case 59: return "real";
|
|
case 60: return "money";
|
|
case 61: return "datetime";
|
|
case 62: return "float";
|
|
case 98: return "sql_variant";
|
|
case 99: return "ntext";
|
|
case 104: return "bit";
|
|
case 106: return "decimal";
|
|
case 108: return "numeric";
|
|
case 122: return "smallmoney";
|
|
case 127: return "bigint";
|
|
case 165: return "varbinary";
|
|
case 167: return "varchar";
|
|
case 173: return "binary";
|
|
case 175: return "char";
|
|
case 189: return "timestamp";
|
|
case 231: return "nvarchar";
|
|
case 239: return "nchar";
|
|
case 241: return "xml";
|
|
}
|
|
return null;
|
|
}
|
|
|
|
#endregion
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
|
|