// запхнуть свежую версию библиотечки в табличку скриптов
public static void export(Cred cred, string dllFileName)
{
//string dllFileName = cred.cwd + "/" + cred.assm + ".dll";
if (!File.Exists(dllFileName))
{
throw new DllNotFoundException(dllFileName);
}
byte[] bytes = File.ReadAllBytes(dllFileName);
Assembly assm = System.Reflection.Assembly.ReflectionOnlyLoad(bytes);
string name = assm.FullName;
SqlConnection con = new SqlConnection(cred.connectionString());
con.Open();
using (SqlCommand cmd = con.CreateCommand())
{
/// ms sql merge очень крив, читаем потом insert или update
cmd.CommandText = @"SELECT iddocscript FROM docscript WHERE name = @name";
cmd.Parameters.Clear();
cmd.Parameters.AddWithValue("@name", name);
int id;
object o = cmd.ExecuteScalar();
if (o != null && int.TryParse(o.ToString(), out id))
{
// update
cmd.CommandText = @"UPDATE docscript SET dll = @dll, dtcompile=@date WHERE iddocscript = @id";
cmd.Parameters.Clear();
cmd.Parameters.AddWithValue("@id", id);
cmd.Parameters.AddWithValue("@dll", bytes);
cmd.Parameters.AddWithValue("@date", DateTime.Now);
int n = cmd.ExecuteNonQuery();
}
else
{
//get newid from underground
cmd.CommandText = @"SELECT ISNULL(min(iddocscript),-1) FROM docscript WHERE iddocscript <0";
cmd.Parameters.Clear();
id = (int)cmd.ExecuteScalar();
// insert
cmd.CommandText = @"insert docscript(iddocscript, name, dll, dtcompile) VALUES(@id, @name, @dll, @date)";
cmd.Parameters.Clear();
cmd.Parameters.AddWithValue("@id", id);
cmd.Parameters.AddWithValue("@name", name);
cmd.Parameters.AddWithValue("@dll", bytes);
cmd.Parameters.AddWithValue("@date", DateTime.Now);
int n = cmd.ExecuteNonQuery();
}
}
}
public static void inject(Cred cred)
{
try
{
SqlConnection con = new SqlConnection(cred.connectionString());
con.Open();
using (SqlCommand command = con.CreateCommand())
{
command.CommandText = @"select name from orderevent where name ='Системные события.Запуск'";
object have = command.ExecuteScalar();
if (have == null)
{
command.CommandText = @"select top 1 idordereventgroup from ordereventgroup where isactive = 1";
object o = command.ExecuteScalar();
int idgroup = (int)o;
int id = 0; /// todo xxx
byte[] bytes = Resources.temp;
command.CommandText = @"insert orderevent(idorderevent,name,dll,compiled,idordereventgroup) values(@idorderevent,@name,@dll,@compiled,@idordereventgroup)";
command.Parameters.Clear();
command.Parameters.Add("idorderevent", SqlDbType.Int).Value = id;
command.Parameters.Add("name", SqlDbType.VarChar, 128).Value = "Системные события.Запуск";
command.Parameters.Add("dll", SqlDbType.VarBinary, bytes.Length).Value = bytes;
command.Parameters.Add("compiled", SqlDbType.SmallInt).Value = 1;
command.Parameters.Add("idordereventgroup", SqlDbType.Int).Value = idgroup;
command.ExecuteNonQuery();
}
else
{
throw new InjectOcuped();
}
}
con.Close();
}
catch (Exception ex)
{
throw new InjectEx();
}
//throw new NotImplementedException();
}
public static void get(Cred cred, bool force = false)
{
// fetch scripts from db to local disc
string connectionString = cred.connectionString();
SqlConnection con = new SqlConnection(connectionString);
// update hook = select * where (sql.file.sha1 != work_directory.file.sha1)
SHA1 sha1 = SHA1.Create();
//
using (SqlCommand command = con.CreateCommand())
{
SqlDataAdapter adapter = new SqlDataAdapter(command);
foreach (string tableName in tableNames)
{
DataTable scriptTable = new DataTable(tableName);
//command.CommandText = "SELECT name, codescript, guid FROM " + tableName + " where deleted is null";
command.CommandText = "SELECT name, codescript FROM " + tableName + " where deleted is null";
adapter.Fill(scriptTable);
DataRow[] dataRows = scriptTable.Select();
//
Dictionary <string, string> scripts = new Dictionary <string, string>();
foreach (DataRow row in dataRows)
{
string name = row["name"].ToString();
string code = row["codescript"].ToString();
string valid = Script.ValidScriptName(name);
if (scripts.ContainsKey(valid))
{
throw new DuplicateScriptNameException(tableName + "/" + name + " -> " + valid + "<-" + scripts[valid]);
}
scripts.Add(valid, name);
Script script = new Script(code, tableName, name);
string fileName = cred.cwd + "/" + script.FileName;
// проверить sha
string code0 = "";
try
{
code0 = File.ReadAllText(fileName);
}
catch {}
byte[] hash1 = sha1.ComputeHash(Encoding.UTF8.GetBytes(script.VisualCode));
byte[] hash0 = sha1.ComputeHash(Encoding.UTF8.GetBytes(code0));
if (force || !bytesEqual(hash0, hash1))
{
Directory.CreateDirectory(cred.cwd + "/" + script.NameSpace);
File.WriteAllText(fileName, script.VisualCode); // 65001
Console.WriteLine(script.NameSpace + "." + script.ScriptName); // non comm il faut
}
}
}
}
}
private static Script compile(Cred cred, string code)
{
if (string.IsNullOrEmpty(code))
{
return(null);
}
// populate list of external refs = dependancess
List <string> refList = new List <string>();
TextReader refReader = new StreamReader(Path.Combine(cred.windraw, @"scripts\ref"));
string refName;
while ((refName = refReader.ReadLine()) != null)
{
if (refName.StartsWith("System"))
{
refList.Add(refName); // системные идут AS IS
}
else
{
refList.Add(Path.Combine(cred.windraw, refName)); // добавить путь к своим
}
}
// добавить пользовательскую библиотеку, а системный скрипт ????
string systemUserLibrary = Path.Combine(cred.windraw, "Atechnology.ecad.Calc.SystemUserLibrary.dll");
if (!refList.Contains(systemUserLibrary) && File.Exists(systemUserLibrary))
{
refList.Add(systemUserLibrary);
}
// поднять объекты
Script script = new Script(code);
//CompilerResults compilerResults = myCompiler.Compile(script.MirrowSource, script.MirrowDLL, refList.ToArray()); ///***
CompilerResults compilerResults = script.Compile(cred.cwd, refList.ToArray());
if (compilerResults.Errors.Count > 0)
{
throw new CompileExcexption(compilerResults);
}
// читаем dll
string dllFileName = compilerResults.PathToAssembly;
byte[] dll;
using (FileStream fs = new FileStream(dllFileName, FileMode.Open))
{
dll = new byte[fs.Length];
fs.Read(dll, 0, (int)fs.Length);
}
SqlConnection con = new SqlConnection(cred.connectionString());
con.Open();
string name = null;
// поднять исходное имя скрипта
using (SqlCommand cmd = con.CreateCommand())
{
cmd.CommandText = "select name from " + script.TableName;
SqlDataReader reader = cmd.ExecuteReader();
while (reader.Read())
{
name = reader[0].ToString();
if (Script.ValidScriptName(name).Equals(script.ScriptName))
{
break;
}
}
reader.Close();
reader.Dispose();
}
// прорихтовать базу если нашли
if (name != null)
{
using (SqlCommand cmd = con.CreateCommand())
{
cmd.CommandText = @"update " + script.TableName + " set codescript = @pureCode, dll = @dll, dtcompile = @dtcompile where name = @name";
cmd.Parameters.AddWithValue("@pureCode", script.PureCode);
byte[] zip = Atechnology.Components.ZipArchiver.Zip(dll);
cmd.Parameters.AddWithValue("@dll", zip);
cmd.Parameters.AddWithValue("@dtcompile", DateTime.Now);
cmd.Parameters.AddWithValue("@name", name);
int ret = cmd.ExecuteNonQuery();
cmd.Dispose();
}
}
con.Close();
return(script);
}