12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044 |
- using System.Collections;
- using System.Data;
- using System.Data.SQLite;
- using System.Diagnostics.CodeAnalysis;
- using System.Linq.Expressions;
- using System.Reflection;
- using System.Runtime.Serialization.Formatters.Binary;
- using System.Text;
- using InABox.Core;
- using Microsoft.CodeAnalysis;
- namespace InABox.Database.SQLite
- {
- internal abstract class SQLiteAccessor : IDisposable
- {
- public SQLiteConnection Connection { get; private set; }
- public void Dispose()
- {
- if (Connection != null)
- Connection.Close();
- }
- public SQLiteCommand CreateCommand()
- {
- return new SQLiteCommand(Connection);
- }
- protected void Setup(string url)
- {
- var sb = new SQLiteConnectionStringBuilder();
- sb.DataSource = url;
- sb.Version = 3;
- sb.DateTimeFormat = SQLiteDateFormats.Ticks;
- sb.JournalMode = SQLiteJournalModeEnum.Wal;
- var conn = sb.ToString();
- Connection = new SQLiteConnection(conn);
- Connection.BusyTimeout = Convert.ToInt32(TimeSpan.FromMinutes(2).TotalMilliseconds);
- Connection.Open();
- Connection.SetLimitOption(SQLiteLimitOpsEnum.SQLITE_LIMIT_VARIABLE_NUMBER, 10000);
- }
- }
- internal class SQLiteReadAccessor : SQLiteAccessor
- {
- public SQLiteReadAccessor(string url)
- {
- Setup(url);
- }
- }
- internal class SQLiteWriteAccessor : SQLiteAccessor
- {
- private static readonly object writelock = new();
- public SQLiteWriteAccessor(string url)
- {
- if (Monitor.TryEnter(writelock, new TimeSpan(0, 1, 0)))
- try
- {
- Setup(url);
- }
- finally
- {
- Monitor.Exit(writelock);
- }
- if (Connection == null)
- throw new Exception("Timeout while aqcuiring write lock!");
- }
- public SQLiteTransaction BeginTransaction()
- {
- return Connection.BeginTransaction();
- }
- }
- public class SQLiteProvider : IProvider
- {
- private static object writelock = new();
- private bool bForceRebuild;
- private bool RebuildTriggers = false;
- private SQLiteProvider()
- {
- }
- public SQLiteProvider(string filename)
- {
- var path = Path.GetDirectoryName(filename);
- if (!Directory.Exists(path))
- Directory.CreateDirectory(path);
- URL = filename;
- }
- public string URL { get; set; }
- public event LogEvent? OnLog;
- public Type[] Types { get; set; }
- public void Start()
- {
- var chkfile = Path.ChangeExtension(URL, "chk");
- bForceRebuild = File.Exists(chkfile);
- if (!File.Exists(URL))
- {
- SQLiteConnection.CreateFile(URL);
- }
- else if (bForceRebuild)
- {
- var i = 0;
- while (File.Exists(Path.ChangeExtension(URL, string.Format("{0:D3}", i))))
- i++;
- File.Copy(URL, Path.ChangeExtension(URL, string.Format("{0:D3}", i)));
- }
- using (var access = GetWriteAccess())
- {
- ExecuteSQL(access, "PRAGMA journal_mode=WAL;");
- }
- //using (var access = GetReadAccess())
- //{
- // using (var command = access.CreateCommand())
- // {
- // command.CommandText = "PRAGMA compile_options";
- // using (var reader = command.ExecuteReader())
- // {
- // while (reader.Read())
- // OnLog?.Invoke(LogType.Information,String.Format("{0}",reader.GetValue(0)));
- // }
- // }
- //}
- //ExecuteSQL("PRAGMA foreign_keys = on;");
- // Need to arrange the typelist to ensure that foreign keys
- // refer to tables that already exist
- var ordered = new List<Type>();
- foreach (var type in Types)
- LoadType(type, ordered);
- //Load up the metadata
- var metadata = LoadMetaData();
-
- var table = typeof(CustomProperty).EntityName().Split('.').Last();
- if (!metadata.ContainsKey(table))
- {
- OnLog?.Invoke(LogType.Information, "Creating Table: " + typeof(CustomProperty).EntityName().Split('.').Last());
- using (var access = GetWriteAccess())
- {
- CreateTable(access, typeof(CustomProperty), true, new CustomProperty[] { });
- }
- }
- else
- {
- using (var access = GetWriteAccess())
- {
- CheckFields(access, typeof(CustomProperty), metadata[table].Item1, new CustomProperty[] { });
- }
- }
- var customproperties = Load<CustomProperty>(); // new Filter<CustomProperty>(x => x.Class).IsEqualTo(type.EntityName()))
- metadata = LoadMetaData();
- foreach (var type in ordered)
- {
- if (type.GetCustomAttribute<AutoEntity>() == null)
- {
- table = type.EntityName().Split('.').Last();
- if (!metadata.ContainsKey(table))
- {
- OnLog?.Invoke(LogType.Information, "Creating Table: " + type.EntityName().Split('.').Last());
- using (var access = GetWriteAccess())
- {
- CreateTable(access, type, true, customproperties);
- }
- }
- }
- }
- metadata = LoadMetaData();
- foreach (var type in ordered)
- {
- if (type.GetCustomAttribute<AutoEntity>() == null)
- {
- table = type.EntityName().Split('.').Last();
- using (var access = GetWriteAccess())
- {
- CheckFields(access, type, metadata[table].Item1, customproperties);
- }
- }
- }
- metadata = LoadMetaData();
- foreach (var type in ordered)
- {
- if (type.GetCustomAttribute<AutoEntity>() == null)
- {
- LoadDeletions(type);
- table = type.EntityName().Split('.').Last();
- using (var access = GetWriteAccess())
- {
- CheckTriggers(access, type, metadata[table].Item2);
- }
- }
- }
- metadata = LoadMetaData();
- foreach (var type in ordered)
- {
- if (type.GetCustomAttribute<AutoEntity>() == null)
- {
- table = type.EntityName().Split('.').Last();
- using (var access = GetWriteAccess())
- {
- CheckIndexes(access, type, metadata[table].Item3);
- }
- }
- }
- metadata = LoadMetaData();
-
- foreach (var type in ordered)
- {
- if (type.GetCustomAttribute<AutoEntity>() != null)
- {
- table = type.EntityName().Split('.').Last();
- if (!metadata.ContainsKey(table))
- {
- OnLog?.Invoke(LogType.Information, "Creating Table: " + type.EntityName().Split('.').Last());
- using (var access = GetWriteAccess())
- {
- CreateTable(access, type, true, customproperties);
- }
- }
- else
- {
- using (var access = GetWriteAccess())
- {
- CheckFields(access, type, metadata[table].Item1, customproperties);
- }
- }
- }
- }
- if (bForceRebuild)
- {
- using (var access = GetWriteAccess())
- {
- ExecuteSQL(access, "VACUUM;");
- }
- File.Delete(chkfile);
- }
- }
- public bool IsRelational()
- {
- return true;
- }
- private void Connection_Trace(object sender, TraceEventArgs e)
- {
- var type = LogType.Query;
- string[] updates = { "INSERT ", "UPDATE ", "DELETE ", "ALTER ", "DROP ", "CREATE ", "VACUUM" };
- foreach (var update in updates)
- type = e.Statement.ToUpper().StartsWith(update) ? LogType.Update : type;
- OnLog?.Invoke(type, e.Statement + ";");
- }
- private SQLiteReadAccessor GetReadAccess()
- {
- var result = new SQLiteReadAccessor(URL);
- result.Connection.Trace += Connection_Trace;
- return result;
- }
- private SQLiteWriteAccessor GetWriteAccess()
- {
- var result = new SQLiteWriteAccessor(URL);
- result.Connection.Trace += Connection_Trace;
- return result;
- }
- private int ExecuteSQL(SQLiteWriteAccessor writer, string statement)
- {
- var result = 0;
- try
- {
- using (var command = writer.CreateCommand())
- {
- command.CommandText = statement;
- result = command.ExecuteNonQuery();
- }
- }
- catch (Exception)
- {
- throw;
- }
- return result;
- }
- #region Database Structure Management
- private class MetadataEntry
- {
- public String Name { get; set; }
- public String SQL { get; set; }
- }
- private class Metadata
- {
- public List<MetadataEntry> Tables { get; init; }
- public List<MetadataEntry> Views { get; init; }
- public List<MetadataEntry> Indexes { get; init; }
- public List<MetadataEntry> Triggers { get; init; }
- public Metadata() : base()
- {
- Tables = new List<MetadataEntry>();
- Views = new List<MetadataEntry>();
- Indexes = new List<MetadataEntry>();
- Triggers = new List<MetadataEntry>();
- }
- }
-
- private Dictionary<string, Tuple<Dictionary<string, string>, Dictionary<string, string>, Dictionary<string, string>>> LoadMetaData()
- {
- // Key is table name
- // Item1 = Field Name / Field Type map
- // Item2 = Trigger Name / Trigger SQL
- // Item3 = Index Name / Index SQL
- // Item4 = View Name /View SQL
- var metadata = new Dictionary<string, Tuple<Dictionary<string, string>, Dictionary<string, string>, Dictionary<string, string>>>();
- using (var access = GetReadAccess())
- {
- using (var command = access.CreateCommand())
- {
- command.CommandText = "SELECT tbl_name, sql, type FROM sqlite_master WHERE type='table' or type='view' ORDER BY type;";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- {
- var tblinfo = new Tuple<Dictionary<string, string>, Dictionary<string, string>, Dictionary<string, string>>(
- new Dictionary<string, string>(), new Dictionary<string, string>(), new Dictionary<string, string>());
- var table = reader.GetString(0);
- var sql = reader.GetString(1);
- bool istable = String.Equals(reader.GetString(2),"table");
- if (istable)
- {
- sql = sql.Replace("\"", "")
- .Replace(string.Format("CREATE TABLE {0} (", table), "");
- sql = sql.Remove(sql.Length - 1).Trim();
- var fields = sql.Replace("\n\t", "").Replace("\t", " ").Replace("\"", "").Trim().Split(',');
- var primarykey = "";
- foreach (var fld in fields)
- {
- var field = fld.Trim().Replace("\t", " ").Replace("\"", "").Replace("[", "").Replace("]", "");
- //if (field.ToUpper().StartsWith("CONSTRAINT"))
- // tblinfo.Item2.Add(field);
- if (field.ToUpper().StartsWith("PRIMARY KEY"))
- {
- primarykey = field.Replace("PRIMARY KEY(", "").Replace(")", "");
- }
- else
- {
- var comps = field.Split(' ');
- tblinfo.Item1[comps[0]] = string.Format("{0}{1}", comps[1],
- field.Contains("PRIMARY KEY") ? " PRIMARY KEY" : "");
- }
- }
- if (!string.IsNullOrEmpty(primarykey))
- {
- var pkfld = tblinfo.Item1[primarykey];
- if (!pkfld.ToUpper().Contains("PRIMARY KEY"))
- tblinfo.Item1[primarykey] = string.Format("{0} PRIMARY KEY", pkfld.Trim());
- }
- }
- else
- {
- sql = sql.Replace("\"", "")
- .Replace("DISTINCT ", "");
- sql = sql.Split(new String[] { " AS SELECT " }, StringSplitOptions.TrimEntries).Last();
- sql = sql.Split(new String[] { " FROM " }, StringSplitOptions.TrimEntries).First();
- var fields = sql.Replace("\n\t", "").Replace("\t", " ").Replace("\"", "").Trim().Split(',');
- foreach (var fld in fields)
- {
- var field = fld.Trim()
- .Replace("\t", " ")
- .Replace("\"", "")
- .Replace("[", "").Replace("]", "");
- var parts = field.Split(" as ");
- if(parts.Length == 1)
- {
- tblinfo.Item1[field] = "";
- }
- else if(parts.Length == 2)
- {
- field = parts[1];
- if (parts[0] != "NULL")
- {
- tblinfo.Item1[field] = "";
- }
- }
- }
- }
- metadata[table] = tblinfo;
- }
- reader.Close();
- }
- // Now Load Up all the indexes
- command.CommandText = "select name, tbl_name, sql from sqlite_master where type='index' and sql is not null;";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- {
- var name = reader.GetString(0);
- var table = reader.GetString(1);
- if (metadata.ContainsKey(table))
- {
- var tblInfo = metadata[table];
- var sql = reader.GetString(2);
- tblInfo.Item3[name] = sql;
- }
- }
- }
- // Now Load Up all the triggers
- command.CommandText = "select name, tbl_name, sql from sqlite_master where type='trigger';";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- {
- var name = reader.GetString(0);
- var table = reader.GetString(1);
- if (metadata.ContainsKey(table))
- {
- var tblInfo = metadata[table];
- var sql = reader.GetString(2);
- tblInfo.Item2[name] = sql;
- }
- }
- }
- }
- }
- return metadata;
- }
- private static void LoadType(Type type, List<Type> into)
- {
- if (into.Contains(type))
- return;
- var props = type.GetProperties().Where(x => x.PropertyType.GetInterfaces().Contains(typeof(IEntityLink)));
- if (!props.Any())
- {
- into.Insert(0, type);
- }
- else
- {
- into.Add(type);
- foreach (var prop in props)
- {
- var subtype = prop.PropertyType.BaseType;
- while (subtype != null && !subtype.GetGenericArguments().Any())
- subtype = subtype.BaseType;
- subtype = subtype?.GetGenericArguments().FirstOrDefault();
- if (subtype != null && subtype != type)
- LoadType(subtype, into);
- }
- }
- }
- private string ColumnName(params PropertyInfo[] properties)
- {
- var bits = new List<string>();
- foreach (var property in properties)
- bits.Add(property.Name);
- var result = string.Join(".", bits);
- return result;
- }
- private string ColumnType(Type type)
- {
- if (type.IsOrdinal())
- return "INT";
- if (type.IsEnum)
- return "TEXT";
- if (type == typeof(DateTime))
- return "TEXT";
- if (type == typeof(TimeSpan))
- return "NUM";
- if (type == typeof(string[]))
- return "BLOB";
- if (type == typeof(byte[]))
- return "BLOB";
- if (type.IsFloatingPoint())
- return "NUM";
- if (type.GetInterfaces().Contains(typeof(IPackable)))
- return "BLOB";
- return "TEXT";
- }
- private void LoadFields(Type type, Dictionary<string, string> fields, List<PropertyInfo>? prefixes, CustomProperty[] customproperties)
- {
- if (prefixes == null)
- prefixes = new List<PropertyInfo>();
-
- AutoEntity? view = type.GetCustomAttribute<AutoEntity>();
- Type definition = view?.Generator != null
- ? view.Generator.Definition
- : type;
-
- var properties = CoreUtils.GetInheritedProperties(definition).Where(x =>
- x.GetCustomAttribute<DoNotPersist>() == null
- // We think this is wrong; but who knows? && x.GetCustomAttribute<DoNotSerialize>() == null
- && x.GetCustomAttributes().FirstOrDefault(a => a.GetType().Equals(typeof(AggregateAttribute))) == null
- && x.GetCustomAttributes().FirstOrDefault(a => a.GetType().Equals(typeof(FormulaAttribute))) == null
- && x.GetCustomAttributes().FirstOrDefault(a => a.GetType().Equals(typeof(ConditionAttribute))) == null
- && x.CanWrite
- && x.PropertyType != typeof(UserProperties)
- );
- foreach (var property in properties)
- if (property.PropertyType.GetInterfaces().Contains(typeof(IEnclosedEntity)))
- {
- LoadFields(property.PropertyType, fields, prefixes.Concat(new[] { property }).ToList(), customproperties);
- }
- else if (property.PropertyType.GetInterfaces().Contains(typeof(IEntityLink)))
- {
- var subprop = property.PropertyType.GetProperty("ID")!; // Not-null because IEntityLink has ID
- var subname = ColumnName(prefixes.Concat(new[] { property, subprop }).ToArray());
- var subtype = ColumnType(subprop.PropertyType);
- fields[subname] = subtype;
- }
- else
- {
- var colname = ColumnName(prefixes.Concat(new[] { property }).ToArray());
- var coltype = ColumnType(property.PropertyType);
- fields[colname] = string.Format("{0}{1}", coltype, colname.Equals("ID") ? " PRIMARY KEY" : "");
- }
- // Now add in the Custom Properties (if any exist)
- //CustomProperty[] customprops = Load<CustomProperty>(new Filter<CustomProperty>(x=>x.Class).IsEqualTo(type.EntityName()));
- foreach (var prop in customproperties.Where(x => x.Class.Equals(type.EntityName())))
- fields[prop.Name] = ColumnType(prop.PropertyType);
- }
- private List<string> LoadIndexes(Type type)
- {
- var result = new List<string>();
- var properties = type.GetProperties().Where(x =>
- x.GetCustomAttribute<DoNotSerialize>() == null && x.GetCustomAttribute<DoNotPersist>() == null &&
- x.GetCustomAttributes().FirstOrDefault(a => a.GetType().IsSubclassOf(typeof(AggregateAttribute))) == null && x.CanWrite);
- foreach (var property in properties)
- if (property.PropertyType.GetInterfaces().Contains(typeof(IEntityLink)))
- {
- var subprop = property.PropertyType.GetProperty("ID")!; // Not-null because IEntityLink has ID
- var subname = ColumnName(property, subprop);
- var tablename = type.EntityName().Split('.').Last();
- result.Add(string.Format("CREATE INDEX idx{0}{1} ON {0} ([{2}])", tablename, subname.Replace(".", ""), subname));
- }
- else
- {
- var index = property.GetCustomAttributes<SecondaryIndexAttribute>().FirstOrDefault();
- if (index != null)
- {
- var colname = ColumnName(property);
- var tablename = type.EntityName().Split('.').Last();
- result.Add(string.Format("CREATE INDEX idx{0}{1} ON {0} ([{2}])", tablename, colname.Replace(".", ""), colname));
- }
- }
- return result;
- }
- private List<string> LoadTriggers(Type type)
- {
- var result = new List<string>();
- // Get the EntityLink that is associated with this class
- var linkclass = CoreUtils.TypeList(
- new[] { type.Assembly },
- x => typeof(IEntityLink).GetTypeInfo().IsAssignableFrom(x) && x.GetInheritedGenericTypeArguments().FirstOrDefault() == type
- ).FirstOrDefault();
- // if The entitylink does not exist, we don't need to do anything
- if (linkclass == null)
- return result;
- var actions = new List<string>();
- var childtypes = Types.Where(x => /* (x != type) && */ x.IsSubclassOf(typeof(Entity)) && x.GetCustomAttribute<AutoEntity>() == null);
- foreach (var childtype in childtypes)
- {
- // Get all registererd types for this entitylink
- var fields = new List<string>();
- var bDelete = false;
- var tablename = childtype.EntityName().Split('.').Last();
- // Find any IEntityLink<> properties that refer back to this class
- var childprops = CoreUtils.PropertyList(childtype, x => x.PropertyType == linkclass);
- foreach (var childprop in childprops)
- {
- var fieldname = string.Format("[{0}.ID]", childprop.Name);
- var attr = childprop.GetCustomAttributes(typeof(EntityRelationshipAttribute), true).FirstOrDefault();
- if (attr != null && ((EntityRelationshipAttribute)attr).Action.Equals(DeleteAction.Cascade))
- {
- fields.Clear();
- bDelete = true;
- fields.Add(fieldname);
- break;
- }
- fields.Add(fieldname);
- //actions[childtype] = String.Format("UPDATE {1} SET [{0}.ID] = NULL WHERE [id] = old.[ID];", tablename)
- }
- if (fields.Any())
- {
- if (bDelete)
- actions.Add(string.Format("DELETE FROM {0} WHERE {1} = old.ID;", tablename, fields.First()));
- else
- foreach (var field in fields)
- actions.Add(string.Format("UPDATE {0} SET {1} = NULL WHERE {1} = old.ID;", tablename, field));
- }
- }
- if (actions.Any())
- result.Add(string.Format("CREATE TRIGGER {0}_BEFOREDELETE BEFORE DELETE ON {0} FOR EACH ROW BEGIN {1} END",
- type.EntityName().Split('.').Last(), string.Join(" ", actions)));
- return result;
- }
- public void ForceRecreateViews()
- {
- var ordered = new List<Type>();
- foreach (var type in Types)
- LoadType(type, ordered);
- var customproperties = Load<CustomProperty>();
- var metadata = LoadMetaData();
- foreach (var type in ordered)
- {
- var view = type.GetCustomAttribute<AutoEntity>();
- if (view?.Generator != null)
- {
- var table = type.EntityName().Split('.').Last();
- if (!metadata.ContainsKey(table))
- {
- OnLog?.Invoke(LogType.Information, "Creating Table: " + type.EntityName().Split('.').Last());
- using (var access = GetWriteAccess())
- {
- CreateTable(access, type, true, customproperties);
- }
- }
- else
- {
- var type_fields = new Dictionary<string, string>();
- LoadFields(view.Generator.Definition, type_fields, null, customproperties);
- using (var access = GetWriteAccess())
- {
- RebuildTable(access, type, metadata[table].Item1, type_fields, customproperties);
- }
- }
- }
- }
- }
- private Dictionary<string, object?> CheckDefaultColumns(IAutoEntityGenerator generator)
- {
- var viewfields = new Dictionary<string, string>();
- LoadFields(generator.Definition, viewfields, null, new CustomProperty[] { });
- Dictionary<String, object?> result = new Dictionary<string, object?>();
- if (!viewfields.ContainsKey("ID"))
- result["ID"] = null;
- if (!viewfields.ContainsKey("Deleted"))
- result["Deleted"] = null;
- if (!viewfields.ContainsKey("Created"))
- result["Created"] = null;
- if (!viewfields.ContainsKey("CreatedBy"))
- result["CreatedBy"] = null;
- if (!viewfields.ContainsKey("LastUpdate"))
- result["LastUpdate"] = null;
- if (!viewfields.ContainsKey("LastUpdateBy"))
- result["LastUpdateBy"] = null;
- return result;
- }
-
- private void CreateTable(SQLiteWriteAccessor access, Type type, bool includeconstraints, CustomProperty[] customproperties)
- {
- var ddl = new List<string>();
- var view = type.GetCustomAttribute<AutoEntity>();
- if (view != null)
- {
- using (var command = access.CreateCommand())
- {
- //command.CommandText = String.Format("select name from sqlite_master where type='trigger' and tbl_name='{0}' and sql is not null;", table);
- command.CommandText = "select name from sqlite_master where type='table' and name='" + type.EntityName().Split('.').Last() +
- "' and sql is not null;";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- ExecuteSQL(access,string.Format("DROP VIEW {0}", reader.GetString(0)));
- }
- }
- ddl.Add("CREATE VIEW");
- ddl.Add(type.EntityName().Split('.').Last());
- ddl.Add("AS");
-
- if (view.Generator is IAutoEntityUnionGenerator union)
- {
- List<String> queries = new List<String>();
- foreach (var table in union.Tables)
- {
- var columns = Columns.Create(table.Entity);
- var constants = CheckDefaultColumns(union);
-
- var interfacefields = new Dictionary<string, string>();
- LoadFields(union.Definition, interfacefields, null, new CustomProperty[] { });
-
- var entityfields = new Dictionary<string, string>();
- LoadFields(table.Entity, entityfields, null, new CustomProperty[] { });
- foreach (var field in interfacefields.Keys)
- {
- if (entityfields.ContainsKey(field))
- columns.Add(field);
- else
- {
- var constant = table.Constants.FirstOrDefault(x => String.Equals(x.Mapping.Property, field));
- if (constant != null)
- constants[field] = constant.Value;
- else
- constants[field] = null;
- }
- }
- var filter = Filter.Create<Entity>(table.Entity, x => x.Deleted).IsEqualTo(Guid.Empty);
- if(table.Filter is not null)
- {
- filter.And(table.Filter);
- }
- var query = PrepareSelectNonGeneric(table.Entity, new SQLiteCommand(), 'A',
- filter, columns, null,
- null, constants, int.MaxValue, union.Distinct, false);
-
- queries.Add(query);
- }
- // var viewfields = new Dictionary<string, string>();
- //LoadFields(union.Definition, viewfields, null, new CustomProperty[] { });
- // var fields = viewfields.Keys.Select(x => String.Format("[{0}]", x)).ToList();
- // if (!fields.Contains("[ID]"))
- // fields.Add(String.Format("NULL as [ID]"));
- // if (!fields.Contains("[Deleted]"))
- // fields.Add(String.Format("NULL as [Deleted]"));
- // if (!fields.Contains("[Created]"))
- // fields.Add(String.Format("NULL as [Created]"));
- // if (!fields.Contains("[CreatedBy]"))
- // fields.Add(String.Format("NULL as [CreatedBy]"));
- // if (!fields.Contains("[LastUpdate]"))
- // fields.Add(String.Format("NULL as [LastUpdate]"));
- // if (!fields.Contains("[LastUpdateBy]"))
- // fields.Add(String.Format("NULL as [LastUpdateBy]"));
- //
- // List<String> queries = new List<String>();
- // foreach (var entity in union.Entities)
- // queries.Add(String.Format("SELECT {0} {1} FROM {2} WHERE [Deleted] is NULL",
- // union.Distinct ? "DISTINCT" : "",
- // String.Join(", ", fields),
- // entity.EntityName().Split('.').Last())
- // );
- ddl.Add(String.Join(" UNION ", queries));
- }
- else if ( view.Generator is IAutoEntityCrossGenerator cross)
- {
- List<String> constants = new List<string>();
- foreach (var constant in CheckDefaultColumns(cross))
- constants.Add($"{EscapeValue(constant.Value)} as [{constant.Key}]");
-
- String query = String.Format(
- "SELECT {0} {1}.[{2}] as [{3}], {4}.[{5}] as [{6}], {7} FROM {1}, {4} WHERE {1}.[Deleted] is NULL and {4}.[Deleted] is NULL and {1}.[{8}] = {4}.[{9}]",
- cross.Distinct ? "DISTINCT" : "",
- cross.LeftEntity(),
- cross.LeftProperty(),
- cross.LeftMapping(),
- cross.RightEntity(),
- cross.RightProperty(),
- cross.RightMapping(),
- String.Join(", ", constants),
- cross.LeftLink(),
- cross.RightLink()
- );
-
- ddl.Add(query);
- }
- else if ( view.Generator is IAutoEntityCartesianGenerator cartesian)
- {
- List<String> fields = new List<string>();
- List<String> tables = new List<String>();
- List<String> filters = new List<String>();
- int iTable = 0;
- foreach (var table in cartesian.Tables)
- {
- var filter = Filter.Create<Entity>(table.Type, x => x.Deleted).IsEqualTo(Guid.Empty);
- if (table.Filter is not null)
- {
- filter.And(table.Filter);
- }
- var subQueryText = PrepareSelectNonGeneric(table.Type, new SQLiteCommand(), 'A',
- filter, table.Columns, null,
- null, null, int.MaxValue, cartesian.Distinct, false);
-
- tables.Add($"({subQueryText}) T{iTable}");
-
- foreach (var mapping in table.Mappings)
- fields.Add($"T{iTable}.[{mapping.Column.Property}] as [{mapping.Mapping.Property}]");
-
- iTable++;
- }
- foreach (var constant in cartesian.Constants)
- fields.Add($"{EscapeValue(constant.Constant)} as [{constant.Mapping.Property}]");
-
- foreach (var constant in CheckDefaultColumns(cartesian))
- fields.Add($"{EscapeValue(constant.Value)} as [{constant.Key}]");
- StringBuilder sb = new StringBuilder();
- sb.Append("SELECT ");
- sb.Append(String.Join(", ", fields));
- sb.Append(" FROM ");
- sb.Append(String.Join(", ", tables));
- if (filters.Any())
- sb.Append($" WHERE {String.Join(" AND ", filters)}");
- ddl.Add(sb.ToString());
- }
- ddl.Add(";");
- var viewstatement = string.Join(" ", ddl);
- }
- else
- {
- ddl.Add("CREATE TABLE");
- ddl.Add(type.EntityName().Split('.').Last());
- ddl.Add("(");
- var fields = new Dictionary<string, string>();
- var constraints = new List<string>();
- var indexes = new List<string>();
- LoadFields(type, fields, null, customproperties);
- var defs = new List<string>();
- foreach (var key in fields.Keys)
- defs.Add(string.Format("[{0}] {1}", key, fields[key]));
- if (includeconstraints)
- defs.AddRange(constraints);
- ddl.Add(string.Join(", ", defs));
- ddl.Add(");");
- }
- var statement = string.Join(" ", ddl);
- try
- {
- ExecuteSQL(access, statement);
- }
- catch (Exception e)
- {
- OnLog?.Invoke(LogType.Error, "Unable to Create Table: " + e.Message);
- throw;
- }
- }
- private void RebuildTable(SQLiteWriteAccessor access, Type type, Dictionary<string, string> table_fields,
- Dictionary<string, string> type_fields,
- CustomProperty[] customproperties)
- {
- var table = type.EntityName().Split('.').Last();
- if (type.GetCustomAttribute<AutoEntity>() != null)
- {
- OnLog?.Invoke(LogType.Information, "Recreating View: " + table);
- try
- {
- String drop = "";
- using (var command = access.CreateCommand())
- {
- command.CommandText = "select type from sqlite_master where name='" + table + "' and sql is not null;";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- drop = reader.GetString(0).ToUpper();
- }
- }
- if (!String.IsNullOrWhiteSpace(drop))
- ExecuteSQL(access, string.Format("DROP {0} {1};", drop, table));
- CreateTable(access, type, true, customproperties);
- }
- catch (Exception e)
- {
- OnLog?.Invoke(LogType.Error, string.Format("RebuildTable({0}) [VIEW] failed: {1}\n{2}", table, e.Message, e.StackTrace));
- throw;
- }
- }
- else
- {
-
- OnLog?.Invoke(LogType.Information, "Rebuilding Table: " + table);
- try
- {
- ExecuteSQL(access, "PRAGMA foreign_keys = off;");
- using (var transaction = access.Connection.BeginTransaction())
- {
- var drops = new List<string>();
- using (var command = access.CreateCommand())
- {
-
- //command.CommandText = String.Format("select name from sqlite_master where type='trigger' and tbl_name='{0}' and sql is not null;", table);
- command.CommandText = "select name from sqlite_master where type='view' and sql is not null;";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- drops.Add(string.Format("DROP VIEW {0}", reader.GetString(0)));
- }
-
- //command.CommandText = String.Format("select name from sqlite_master where type='trigger' and tbl_name='{0}' and sql is not null;", table);
- command.CommandText = "select name from sqlite_master where type='trigger' and sql is not null;";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- drops.Add(string.Format("DROP TRIGGER {0}", reader.GetString(0)));
- }
- command.CommandText = string.Format(
- "select name from sqlite_master where type='index' and tbl_name='{0}' and sql is not null;",
- table);
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- drops.Add(string.Format("DROP INDEX {0}", reader.GetString(0)));
- }
- }
- foreach (var drop in drops)
- ExecuteSQL(access, drop);
- ExecuteSQL(access, string.Format("ALTER TABLE {0} RENAME TO _{0}_old;", table));
- CreateTable(access, type, true, customproperties);
- var fields = new List<string>();
- foreach (var field in type_fields.Keys)
- if (table_fields.ContainsKey(field))
- fields.Add("[" + field + "]");
- ExecuteSQL(access, string.Format("INSERT INTO {0} ({1}) SELECT {1} FROM _{0}_old;", table, string.Join(", ", fields)));
- ExecuteSQL(access, string.Format("DROP TABLE _{0}_old;", table));
- transaction.Commit();
- }
- ExecuteSQL(access, "PRAGMA foreign_keys = on;");
- }
- catch (Exception e)
- {
- OnLog?.Invoke(LogType.Error, string.Format("RebuildTable({0}) [TABLE] failed: {1}\n{2}", table, e.Message, e.StackTrace));
- throw;
- }
- }
-
- }
- private void CheckFields(SQLiteWriteAccessor access, Type type, Dictionary<string, string> current_fields, CustomProperty[] customproperties)
- {
- var type_fields = new Dictionary<string, string>();
- var view = type.GetCustomAttribute<AutoEntity>();
- if ((view != null) && (view.Generator != null))
- LoadFields(view.Generator.Definition, type_fields, null, customproperties);
- else
- LoadFields(type, type_fields, null, customproperties);
- var bRebuild = false;
- foreach (var field in type_fields.Keys)
- {
- try
- {
- Type tType;
- var cprop = customproperties.FirstOrDefault(x => string.Equals(x.Name, field));
- if (cprop != null)
- tType = cprop.PropertyType;
- else
- tType = CoreUtils.GetProperty(type, field).PropertyType;
- if ((view == null) && (tType == typeof(TimeSpan)) && current_fields.ContainsKey(field) && !current_fields[field].Equals(type_fields[field]))
- {
- var sql = string.Format(
- "update {0} set [{1}] = cast(substr([{1}],1,2) as double) + cast(substr([{1}],4,2) as double)/60 + cast(substr([{1}],7,2) as double)/3600 where [{1}] like \"%:%:%\"",
- type.Name, field);
- ExecuteSQL(access, sql);
- }
- }
- catch (Exception e)
- {
- Logger.Send(LogType.Error, "", string.Format("*** Unknown Error: {0}\n{1}", e.Message, e.StackTrace));
- }
- if (!current_fields.ContainsKey(field) || (!String.IsNullOrWhiteSpace(current_fields[field])) && (current_fields[field] != type_fields[field]))
- bRebuild = true;
- }
- foreach (var field in current_fields.Keys)
- if (!type_fields.ContainsKey(field))
- bRebuild = true;
- if (bForceRebuild || bRebuild)
- RebuildTable(access, type, current_fields, type_fields, customproperties);
- }
- private void CheckIndexes(SQLiteWriteAccessor access, Type type, Dictionary<string, string> db_indexes)
- {
- var type_indexes = LoadIndexes(type);
- foreach (var index in db_indexes.Keys)
- if (!type_indexes.Contains(db_indexes[index]))
- ExecuteSQL(access, string.Format("DROP INDEX {0}", index));
- foreach (var index in type_indexes)
- if (!db_indexes.ContainsValue(index))
- ExecuteSQL(access, index);
- }
- private void CheckTriggers(SQLiteWriteAccessor access, Type type, Dictionary<string, string> db_triggers)
- {
- /*
- #if PURGE
- foreach (var trigger in db_triggers.Keys)
- ExecuteSQL(access, string.Format("DROP TRIGGER {0}", trigger));
- #else*/
- var type_triggers = LoadTriggers(type);
- foreach (var trigger in db_triggers.Keys)
- if (!type_triggers.Contains(db_triggers[trigger]))
- ExecuteSQL(access, string.Format("DROP TRIGGER {0}", trigger));
- foreach (var trigger in type_triggers)
- if (!db_triggers.ContainsValue(trigger))
- ExecuteSQL(access, trigger);
- //#endif
- }
- // private void CheckViews(SQLiteWriteAccessor access, Type type, Dictionary<String, String> db_views)
- // {
- // var type_view = LoadView(type);
- //
- //
- // if (!type_triggers.Contains(db_triggers[viewname]))
- // ExecuteSQL(access, string.Format("DROP TRIGGER {0}", trigger));
- //
- // if (!db_views.ContainsValue(type_view))
- // ExecuteSQL(access, type_view);
- // }
- #endregion
- #region CRUD Operations
- private static bool IsNull([NotNullWhen(false)] object? o)
- {
- return o == null || o is DBNull;
- }
- public object? Decode(object o, Type type)
- {
- if (IsNull(o))
- return type == typeof(string) ? "" : type.GetDefault();
- if (type == typeof(string[]))
- {
- if (!IsNull(o))
- {
- if (o is byte[] array)
- using (var ms = new MemoryStream(array))
- {
- var deser = new BinaryFormatter().Deserialize(ms);
- return deser as string[];
- }
- return Array.Empty<string>();
- }
- return Array.Empty<string>();
- }
- if (type.GetInterfaces().Contains(typeof(IPackable)))
- {
- var packable = (Activator.CreateInstance(type) as IPackable)!; // Not-null because of above check
- if (!IsNull(o))
- {
- if (o is byte[] array)
- {
- using (var ms = new MemoryStream(array))
- packable.Unpack(new BinaryReader(ms));
- }
- }
- return packable;
- }
- if (type == typeof(DateTime))
- return IsNull(o) || string.IsNullOrEmpty(o.ToString()) ? DateTime.MinValue : DateTime.Parse(o.ToString() ?? "");
- if (type == typeof(TimeSpan))
- {
- if (IsNull(o))
- return TimeSpan.MinValue;
- var oStr = o.ToString() ?? "";
- if (double.TryParse(oStr, out var hrs))
- return TimeSpan.FromHours(hrs);
- if (oStr.Contains(':'))
- return TimeSpan.Parse(oStr);
- }
- if (type == typeof(Guid))
- return IsNull(o) ? Guid.Empty : Guid.Parse(o.ToString() ?? "");
- if (type == typeof(bool))
- {
- var oStr = o.ToString() ?? "";
- return !IsNull(o) && (oStr.Equals("1") || oStr.ToUpper().Equals("TRUE"));
- }
- if (type.IsEnum)
- return Enum.Parse(type, o.ToString() ?? "");
- if (IsNull(o))
- return null;
- if (type == typeof(long))
- return o;
- var result = CoreUtils.ChangeType(o, type);
- return result;
- }
- public static object Encode(object? o, Type? type)
- {
- if (IsNull(o) || type is null)
- return DBNull.Value;
- if (type == typeof(DateTime) && o.GetType() == typeof(string))
- o = DateTime.Parse(o.ToString() ?? "");
- if (type == typeof(double) && o.GetType() == typeof(string))
- o = double.Parse(o.ToString() ?? "");
- if (type == typeof(float) && o.GetType() == typeof(string))
- o = float.Parse(o.ToString() ?? "");
- if (type == typeof(long) && o.GetType() == typeof(string))
- o = long.Parse(o.ToString() ?? "");
- if (type.IsEnum && o.GetType() == typeof(string))
- o = Enum.Parse(type, o.ToString() ?? "");
- if (type == typeof(TimeSpan) && o.GetType() == typeof(string))
- {
- if (o.ToString()?.Contains(':') == true)
- {
- if (TimeSpan.TryParse(o.ToString(), out var time))
- o = time;
- }
- else if (double.TryParse(o.ToString(), out var hrs))
- {
- o = TimeSpan.FromHours(hrs);
- }
- }
- if (type == typeof(bool))
- {
- if (o.GetType() == typeof(string))
- o = bool.Parse(o.ToString() ?? "");
- if (o.Equals(false))
- return DBNull.Value;
- return o;
- }
- if (type == typeof(string) && string.IsNullOrEmpty(o.ToString()))
- return DBNull.Value;
- if (type == typeof(Guid) && o.GetType() == typeof(string))
- o = Guid.Parse(o.ToString() ?? "");
- if (o is string[])
- using (var ms = new MemoryStream())
- {
- new BinaryFormatter().Serialize(ms, o);
- return ms.GetBuffer();
- }
- if (o is IPackable pack)
- {
- using var ms = new MemoryStream();
- using var writer = new BinaryWriter(ms);
- pack.Pack(writer);
- return ms.ToArray();
- }
- if (o.GetType() == typeof(double) && o.Equals(default(double)))
- return DBNull.Value;
- if (o.GetType() == typeof(float) && o.Equals(default(float)))
- return DBNull.Value;
- if (o.GetType() == typeof(int) && o.Equals(default(int)))
- return DBNull.Value;
- if (o.GetType() == typeof(long) && o.Equals(default(long)))
- return DBNull.Value;
- if (o.GetType() == typeof(DateTime))
- {
- if ((DateTime)o == DateTime.MinValue)
- return DBNull.Value;
- return string.Format("{0:yyyy-MM-dd HH:mm:ss.FFFFFFF}", o);
- }
- if (o.GetType() == typeof(TimeSpan))
- {
- if (((TimeSpan)o).Ticks == 0L)
- return DBNull.Value;
- return ((TimeSpan)o).TotalHours;
- }
- if (o.GetType() == typeof(Guid))
- {
- if (o.Equals(Guid.Empty))
- return DBNull.Value;
- return o.ToString() ?? "";
- }
- if (type == typeof(double) && o.GetType() == typeof(string))
- if (double.TryParse((string)o, out var value))
- o = value;
- if (o.GetType().IsEnum)
- return o.ToString() ?? "";
- return o;
- }
- private static readonly Dictionary<Operator, string> operators = new()
- {
- { Operator.IsEqualTo, "{0} = {1}" },
- { Operator.IsNotEqualTo, "{0} != {1}" },
- { Operator.IsGreaterThan, "{0} > {1}" },
- { Operator.IsGreaterThanOrEqualTo, "{0} >= {1}" },
- { Operator.IsLessThan, "{0} < {1}" },
- { Operator.IsLessThanOrEqualTo, "{0} <= {1}" },
- { Operator.BeginsWith, "{0} LIKE {1} || '%'" },
- { Operator.Contains, "{0} LIKE '%' || {1} || '%'" },
- { Operator.EndsWith, "{0} LIKE '%' || {1}" },
- { Operator.InList, "{0} IN ({1})" },
- { Operator.NotInList, "{0} NOT IN ({1})" },
- { Operator.InQuery, "{0} IN ({1})" }
- };
- private static string EscapeValue(object? value)
- {
- if (IsNull(value))
- return "NULL";
- if ((value is string) || (value is Enum) || (value is Guid))
- return string.Format("\'" + "{0}" + "\'", value.ToString()?.Replace("\'", "\'\'"));
- if (value is string[])
- return string.Format("hex({0})", BitConverter.ToString(Encoding.ASCII.GetBytes(value.ToString() ?? "")).Replace("-", string.Empty));
- if (value is IColumn col)
- return $"[{col.Property}]";
- return value.ToString() ?? "";
- }
- private static string GetFilterConstant(FilterConstant constant)
- {
- return constant switch
- {
- FilterConstant.Now => "datetime()",
- FilterConstant.Today => "strftime('%Y-%m-%d 00:00:00')",
- _ => throw new Exception($"FilterConstant.{constant} is not implemented!"),
- };
- }
- private string GetFilterClauseNonGeneric(Type T, SQLiteCommand command, char prefix, IFilter? filter, List<Tuple<string, string, string, string>> tables,
- Dictionary<string, string> fieldmap, List<string> columns, bool useparams)
- {
- if (filter == null || filter.Expression == null)
- return "";
- var result = "";
- if (filter.Operator == Operator.All)
- {
- result = "1 = 1";
- }
- else if (filter.Operator == Operator.None)
- {
- result = "1 = 0";
- }
- else
- {
- string prop;
- if (CoreUtils.TryFindMemberExpression(filter.Expression, out var mexp))
- {
- prop = CoreUtils.GetFullPropertyName(mexp, ".");
- }
- else
- {
- prop = filter.Expression.ToString();
- if (prop.Contains("=>"))
- prop = string.Join(".", prop.Split('.').Skip(1));
- mexp = CoreUtils.GetMemberExpression(T, prop);
- }
- LoadFieldsandTables(command, T, prefix, fieldmap, tables, columns, prop, useparams);
- if (fieldmap.ContainsKey(prop))
- prop = fieldmap[prop];
- if (filter.Operator == Operator.InList || filter.Operator == Operator.NotInList)
- {
- // if, and only if the list contains Guids, we can safely bypass the
- // 1000-parameter limit by using building the string ourselves
- if (filter.Value is Guid[] list)
- {
- result = string.Format("(" + operators[filter.Operator] + ")", prop, string.Format("\"{0}\"", string.Join("\",\"", list)));
- }
- else if (filter.Value is IEnumerable enumerable)
- {
- var paramlist = new List<object>();
- foreach (var item in enumerable)
- {
- var sParam = string.Format("@p{0}", command.Parameters.Count);
- command.Parameters.AddWithValue(sParam, Encode(item, mexp.Type));
- paramlist.Add(sParam);
- }
- result = string.Format("(" + operators[filter.Operator] + ")", prop, string.Join(",", paramlist));
- }
- }
- else if (filter.Operator == Operator.InQuery)
- {
- if(filter.Value is ISubQuery subQuery)
- {
- var subEntityType = subQuery.GetQueryType();
- var subColumns = Columns.Create(subEntityType);
- var subColumn = subQuery.GetColumn();
- subColumns.Add(subColumn);
- var subQueryText = PrepareSelectNonGeneric(subEntityType, command, 'A',
- subQuery.GetFilter(), subColumns, null,
- null, null, int.MaxValue, false, useparams);
- result = string.Format("(" + operators[filter.Operator] + ")", prop, subQueryText);
- }
- }
- else
- {
- if (filter.Value is FilterConstant constant)
- result = string.Format("(" + operators[filter.Operator] + ")", prop, GetFilterConstant(constant));
- else
- {
- var value = Encode(filter.Value, mexp.Type);
- if (IsNull(value) && ((filter.Operator == Operator.IsEqualTo) || (filter.Operator == Operator.IsNotEqualTo)))
- {
- result = string.Format("({0} {1} NULL)", prop,
- filter.Operator == Operator.IsEqualTo
- ? "IS"
- : "IS NOT");
- }
- else
- {
- if (useparams)
- {
- var sParam = string.Format("@p{0}", command.Parameters.Count);
- if (filter.Expression.Type == typeof(string[]))
- {
- var bytes = Encoding.ASCII.GetBytes(value.ToString() ?? "");
- value = BitConverter.ToString(bytes).Replace("-", string.Empty);
- result = string.Format("(" + operators[filter.Operator] + ")", string.Format("hex({0})", prop), sParam);
- }
- else
- {
- result = string.Format("(" + operators[filter.Operator] + ")", prop, sParam);
- }
- command.Parameters.AddWithValue(sParam, value);
- }
- else
- result = string.Format("(" + operators[filter.Operator] + ")", prop, EscapeValue(filter.Value));
- }
- }
- }
- }
- var bChanged = false;
- if (filter.Ands != null && filter.Ands.Count() > 0)
- {
- foreach (var and in filter.Ands)
- {
- var AndResult = GetFilterClauseNonGeneric(T, command, prefix, and, tables, fieldmap, columns, useparams);
- if (!string.IsNullOrEmpty(AndResult))
- {
- result = string.Format("{0} and {1}", result, AndResult);
- bChanged = true;
- }
- }
- if (bChanged)
- result = string.Format("({0})", result);
- }
- bChanged = false;
- if (filter.Ors != null && filter.Ors.Count() > 0)
- {
- foreach (var or in filter.Ors)
- {
- var OrResult = GetFilterClauseNonGeneric(T, command, prefix, or, tables, fieldmap, columns, useparams);
- if (!string.IsNullOrEmpty(OrResult))
- {
- result = string.Format("{0} or {1}", result, OrResult);
- bChanged = true;
- }
- }
- if (bChanged)
- result = string.Format("({0})", result);
- }
- return result;
- }
- private string GetFilterClause<T>(SQLiteCommand command, char prefix, Filter<T>? filter, List<Tuple<string, string, string, string>> tables,
- Dictionary<string, string> fieldmap, List<string> columns, bool useparams) where T : Entity
- => GetFilterClauseNonGeneric(typeof(T), command, prefix, filter, tables, fieldmap, columns, useparams);
- private string GetSortClauseNonGeneric(Type T,
- SQLiteCommand command, ISortOrder? sort, char prefix, List<Tuple<string, string, string, string>> tables,
- Dictionary<string, string> fieldmap, List<string> columns, bool useparams)
- {
- if (sort == null)
- return "";
- var result = "";
- if (sort.Expression != null)
- {
- if (CoreUtils.TryFindMemberExpression(sort.Expression, out var mexp))
- result = CoreUtils.GetFullPropertyName(mexp, ".");
- else
- result = sort.Expression.ToString();
- var prop = CoreUtils.GetProperty(T, result);
- if (prop.GetCustomAttribute<DoNotSerialize>() == null && prop.GetCustomAttribute<DoNotPersist>() == null && prop.CanWrite)
- {
- LoadFieldsandTables(command, T, prefix, fieldmap, tables, columns, result, useparams);
- if (fieldmap.ContainsKey(result))
- result = fieldmap[result];
- if (sort.Expression.Type.Equals(typeof(string)))
- result = string.Format("{0} COLLATE NOCASE", result);
- if (sort.Direction == SortDirection.Ascending)
- result = string.Format("{0} ASC", result);
- else
- result = string.Format("{0} DESC", result);
- }
- else
- {
- result = "";
- }
- }
- foreach (var then in sort.Thens)
- result = result + ", " + GetSortClauseNonGeneric(T, command, then, prefix, tables, fieldmap, columns, useparams);
- return result;
- }
- private string GetSortClause<T>(SQLiteCommand command, SortOrder<T>? sort, char prefix, List<Tuple<string, string, string, string>> tables,
- Dictionary<string, string> fieldmap, List<string> columns, bool useparams)
- => GetSortClauseNonGeneric(typeof(T), command, sort, prefix, tables, fieldmap, columns, useparams);
- private static string GetCalculation(AggregateAttribute attribute, string columnname)
- {
- return attribute.Calculation switch
- {
- AggregateCalculation.Sum => "TOTAL",
- AggregateCalculation.Count => "COUNT",
- AggregateCalculation.Maximum => "MAX",
- AggregateCalculation.Minimum => "MIN",
- AggregateCalculation.Average => "AVERAGE",
- _ => throw new Exception(string.Format("{0}.{1} is not a valid aggregate", columnname, attribute.Calculator.GetType().Name)),
- };
- }
- private string GetFunction(FormulaAttribute attribute, Dictionary<string, string> fieldmap, string columnname)
- {
- if (attribute.Operator == FormulaOperator.None)
- throw new Exception(string.Format("{0}.{1} is not a valid formula", columnname, attribute.Calculator.GetType().Name));
-
- if (attribute.Operator == FormulaOperator.Constant)
- return EscapeValue(attribute.Value);
- if (!fieldmap.ContainsKey(attribute.Value))
- throw new Exception(string.Format("{0}.{1} -> {2} does not exist", columnname, attribute.GetType().Name, attribute.Value));
-
- foreach (var modifier in attribute.Modifiers)
- if (!fieldmap.ContainsKey(modifier))
- throw new Exception(string.Format("{0}.{1} -> {2} does not exist", columnname, attribute.GetType().Name, modifier));
- if (attribute.Operator == FormulaOperator.Add)
- return string.Format("(IFNULL({0},0.00) + {1})", fieldmap[attribute.Value],
- string.Join(" + ", attribute.Modifiers.Select(x => string.Format("IFNULL({0},0.00)", fieldmap[x]))));
- if (attribute.Operator == FormulaOperator.Subtract)
- return string.Format("(IFNULL({0},0.00) - ({1}))", fieldmap[attribute.Value],
- string.Join(" + ", attribute.Modifiers.Select(x => string.Format("IFNULL({0},0.00)", fieldmap[x]))));
- if (attribute.Operator == FormulaOperator.Multiply)
- return string.Format("(IFNULL({0},0.00) * {1})", fieldmap[attribute.Value],
- string.Join(" * ", attribute.Modifiers.Select(x => string.Format("IFNULL({0},0.00)", fieldmap[x]))));
- if (attribute.Operator == FormulaOperator.Divide)
- {
- var result = string.Format("IFNULL({0},0.00)", fieldmap[attribute.Value]);
- foreach (var modifier in attribute.Modifiers)
- result = string.Format("({0} / {1})", result, string.Format("IFNULL({0},1.00)", fieldmap[modifier]));
- return result;
- }
- if (attribute.Operator == FormulaOperator.Maximum)
- {
- var parameters = attribute.Modifiers.Select(m => $"IFNULL({fieldmap[m]},0.00)");
- var result = $"MAX({fieldmap[attribute.Value]}, {String.Join(", ", parameters)})";
- // var result = string.Format(
- // "CASE IFNULL({0},0.00) WHEN IFNULL({0},0.00) < IFNULL({1},0.00) THEN IFNULL({1},0.00) ELSE IFNULL({0},0.00) END",
- // fieldmap[attribute.Value], fieldmap[attribute.Modifiers.First()]);
- return result;
- }
- if (attribute.Operator == FormulaOperator.Minumum)
- {
- var parameters = attribute.Modifiers.Select(m => $"IFNULL({fieldmap[m]},0.00)");
- var result = $"MIN({fieldmap[attribute.Value]}, {String.Join(", ", parameters)})";
- //var result = string.Format(
- // "CASE IFNULL({0},0.00) WHEN IFNULL({0},0.00) > IFNULL({1},0.00) THEN IFNULL({1},0.00) ELSE IFNULL({0},0.00) END",
- // fieldmap[attribute.Value], fieldmap[attribute.Modifiers.First()]);
- return result;
- }
- throw new Exception(string.Format("Calculation Type [{0}.{1}] not found", columnname, attribute.GetType().Name));
- }
- private string GetCondition(ConditionAttribute attribute, Dictionary<string, string> fieldmap, string columnname)
- {
- var intf = attribute.Calculator.GetType().GetInterfaces()
- .FirstOrDefault(x => x.Name.StartsWith("ICondition") && x.GenericTypeArguments.Length.Equals(3));
- if (intf is null)
- throw new Exception($"Attribute calculate {attribute.Calculator} is not an ICondition");
- var valuetype = intf.GenericTypeArguments[1];
- var defvalue = valuetype.GetDefault();
- if (!fieldmap.ContainsKey(attribute.Left))
- throw new Exception(string.Format("{0}.{1} -> {2} does not exist", columnname, attribute.GetType().Name, attribute.Left));
- var condition = "";
- if (attribute.Condition == Condition.Equals)
- condition = "=";
- else if (attribute.Condition == Condition.NotEqual)
- condition = "<>";
- else if (attribute.Condition == Condition.GreaterThan)
- condition = ">";
- else if (attribute.Condition == Condition.GreaterThanOrEqualTo)
- condition = ">=";
- else if (attribute.Condition == Condition.LessThan)
- condition = "<";
- else if (attribute.Condition == Condition.LessThanOrEqualTo)
- condition = "<=";
- else
- throw new Exception(string.Format("{0}.{1} is not a valid condition", columnname, attribute.Calculator.GetType().Name));
- if (!fieldmap.ContainsKey(attribute.Right))
- throw new Exception(string.Format("{0}.{1} -> {2} does not exist", columnname, attribute.GetType().Name, attribute.Right));
- if (!fieldmap.ContainsKey(attribute.True))
- throw new Exception(string.Format("{0}.{1} -> {2} does not exist", columnname, attribute.GetType().Name, attribute.True));
- if (!fieldmap.ContainsKey(attribute.False))
- throw new Exception(string.Format("{0}.{1} -> {2} does not exist", columnname, attribute.GetType().Name, attribute.False));
- return string.Format("CASE WHEN COALESCE({0},{1}) {2} {3} THEN {4} ELSE {5} END", fieldmap[attribute.Left], defvalue, condition,
- fieldmap[attribute.Right], fieldmap[attribute.True], fieldmap[attribute.False]);
- }
-
- //private static List<string> Breadcrumb = new List<string>();
- //Dictionary<String, Tuple<int, TimeSpan>> stopwatch = new Dictionary<string, Tuple<int, TimeSpan>>();
- //Stopwatch sw = new Stopwatch();
- //private void LogReset()
- //{
- // stopwatch = new Dictionary<string, Tuple<int, TimeSpan>>();
- // sw = new Stopwatch();
- //}
- //void LogStart()
- //{
- // if (sw.IsRunning)
- // sw.Restart();
- // else
- // sw.Start();
- //}
- //void LogStop(String msg)
- //{
- // TimeSpan elapsed = sw.Elapsed;
- // if (Breadcrumb.Any())
- // msg = String.Join(".", Breadcrumb) + "." + msg;
- // if (!stopwatch.ContainsKey(msg))
- // stopwatch[msg] = new Tuple<int, TimeSpan>(1,elapsed);
- // else
- // stopwatch[msg] = new Tuple<int, TimeSpan>(stopwatch[msg].Item1 + 1,stopwatch[msg].Item2 + elapsed);
- // sw.Restart();
- //}
- //private void LogPrint(String header)
- //{
- // foreach (var keyvalue in stopwatch.ToArray())
- // OnLog?.Invoke(LogType.Information, String.Format("- {0}: {1} = ({2}) {3,10:0.0000}", header, keyvalue.Key, keyvalue.Value.Item1, keyvalue.Value.Item2.TotalMilliseconds));
- //}
- private void LoadFieldsandTables(SQLiteCommand command, Type type, char prefix, Dictionary<string, string> fieldmap,
- List<Tuple<string, string, string, string>> tables, List<string> columns, string columnname, bool useparams)
- {
- if (fieldmap.ContainsKey(columnname))
- return;
- var newprefix = (char)(prefix + 1);
- // LogStart();
- var property = DatabaseSchema.Property(type, columnname);
- // LogStop("DatabaseSchema.Property");
- if (property != null && property is CustomProperty)
- {
- fieldmap[columnname] = string.Format("{0}1.[{1}]", prefix, columnname);
- }
- else
- {
- var bits = columnname.Split('.');
- if (bits.Length == 1)
- {
- var prop = type.GetProperty(columnname);
- if (prop != null)
- {
- // LogStart();
- var attr = prop.GetCustomAttributes().FirstOrDefault(x => x.GetType().Equals(typeof(AggregateAttribute)));
- // LogStop("GetCustomAttributes(Aggregate)");
- if (attr is AggregateAttribute agg)
- {
- bool internalaggregate = agg.Calculator.GetType().GetInterfaces()
- .Any(x => x.IsGenericType && x.GetGenericTypeDefinition() == typeof(ICoreAggregate<,>));
- if (internalaggregate)
- {
-
- }
- else
- {
- var scols = new Dictionary<string, string> { { agg.Aggregate, GetCalculation(agg, columnname) } };
- var siblings = columns.Where(x => !x.Equals(columnname) && x.Split('.').First().Equals(bits.First()))
- .Select(x => string.Join(".", x.Split('.').Skip(1))).ToList();
- var linkedtype = agg.Source;
- foreach (var sibling in siblings)
- {
- // LogStart();
- var sprop = CoreUtils.GetProperty(type, sibling);
- // LogStop("GetProperty(sibling)");
- // LogStart();
- var sattr = prop.GetCustomAttributes().FirstOrDefault(x => x.GetType().Equals(typeof(AggregateAttribute)));
- // LogStop("GetCustomAttributes(Sibling.Aggregate)");
- if (sattr is AggregateAttribute sagg)
- {
- // LogStart();
- scols[sagg.Aggregate] = GetCalculation(sagg, sibling);
- // LogStop("GetCalculation(Sibling)");
- }
- }
- var subcols = Columns.Create(linkedtype);
- foreach (var key in agg.Links.Keys)
- subcols.Add(key);
- //subcols.Add(agg.Link);
- foreach (var scol in scols.Keys)
- subcols.Add(scol);
- // LogStart();
- var filter = Activator.CreateInstance(typeof(Filter<>).MakeGenericType(linkedtype), "Deleted") as IFilter;
- filter!.Operator = Operator.IsEqualTo;
- filter.Value = Guid.Empty;
- var aggFilter = agg.Filter;
- if(aggFilter is not null)
- {
- List<String> ffs = new List<string>();
- FilterFields(aggFilter, ffs);
- //foreach (var ff in ffs)
- // subcols.Add(ff);
- filter.And(aggFilter);
- }
- var linkedtable = string.Format("({0})",
- PrepareSelectNonGeneric(linkedtype, command, newprefix, filter, subcols, null, scols, null, int.MaxValue, false, useparams));
-
- var alias = tables.Count + 1;
- var link = string.Join(" , ", agg.Links.Keys.Select(x => string.Format("{0}{1}.{2}", prefix, alias, x)));
- var tuple = tables.FirstOrDefault(x =>
- x.Item1.Equals(linkedtable) && x.Item4.Equals(link) && !x.Item2.Equals(string.Format("{0}1", prefix)));
- if (tuple == null)
- {
- var joins = new List<string>();
- foreach (var key in agg.Links.Keys)
- joins.Add(
- string.Format("IFNULL({0}{1}.[{2}],'') = IFNULL({0}1.[{3}],'')", prefix, alias, key, agg.Links[key]));
- var join = string.Format("LEFT OUTER JOIN {0} {1}{2} ON {3}", linkedtable, prefix, alias,
- string.Join(" AND ", joins));
- tuple = new Tuple<string, string, string, string>(linkedtable, prefix + alias.ToString(), join, link);
- //tuple = new Tuple<String, String, String, String>(linkedtable, prefix + alias.ToString(), String.Format("LEFT OUTER JOIN {0} {1}{2} ON {1}{2}.[{3}] = {1}1.[ID]", linkedtable, prefix, alias, agg.Link), link);
- tables.Add(tuple);
- }
- //if (bits.Last().Equals("ID"))
- // fieldmap[columnname] = String.Format("{0}1.[{1}]", prefix, columnname);
- //else
- fieldmap[columnname] = string.Format("{0}.[{1}]", tuple.Item2, agg.Aggregate);
- //LoadFieldsandTables(command, agg.Type, newprefix, fieldmap, tables, columns, columnname);
- //var linkedtable = String.Format("(SELECT [{3}],{0}([{1}]) as [{1}] from {2} group by [{3}])", GetCalculation(agg, columnname), agg.AggregateProperty, agg.Type.EntityName().Split('.').Last(), agg.LinkedProperty);
- //int alias = tables.Count + 1;
- //var tuple = new Tuple<String, String, String, String>(linkedtable, prefix + alias.ToString(), String.Format("LEFT OUTER JOIN {0} {1}{2} ON {1}{2}.[{3}] = {1}1.[ID]", linkedtable, prefix, alias, agg.LinkedProperty), "");
- //tables.Add(tuple);
- //fieldmap[columnname] = String.Format("{0}.[{1}]", tuple.Item2, agg.AggregateProperty);
- }
- }
- else
- {
- // LogStart();
- attr = prop.GetCustomAttributes().FirstOrDefault(x => x.GetType().Equals(typeof(FormulaAttribute)));
- // LogStop("GetAttribute(Formula)");
- if (attr is FormulaAttribute fnc)
- {
-
- // var functionmap = new Dictionary<string, string>();
- // CheckColumn(columns, fnc.Value);
- // LoadFieldsandTables(command, type, prefix, functionmap, tables, columns, fnc.Value, useparams);
- // foreach (var column in fnc.Modifiers)
- // {
- // CheckColumn(columns, column);
- // LoadFieldsandTables(command, type, prefix, functionmap, tables, columns, column, useparams);
- // }
- // fieldmap[columnname] = GetFunction(fnc, functionmap, columnname);
- foreach (var field in fnc.Modifiers.Prepend(fnc.Value))
- {
- CheckColumn(columns, field);
- LoadFieldsandTables(command, type, prefix, fieldmap, tables, columns, field, useparams);
- }
- fieldmap[columnname] = GetFunction(fnc, fieldmap, columnname);
-
- }
- else
- {
- // LogStart();
- attr = prop.GetCustomAttributes().FirstOrDefault(x => x.GetType().Equals(typeof(ConditionAttribute)));
- // LogStop("GetAttribute(Condition)");
- if (attr is ConditionAttribute cnd)
- {
- var cndmap = new Dictionary<string, string>();
- // LogStart();
- CheckColumn(columns, cnd.Left);
- // LogStop("CheckColumn(Left)");
- // LogStart();
- CheckColumn(columns, cnd.Right);
- // LogStop("CheckColumn(Right)");
- // LogStart();
- CheckColumn(columns, cnd.True);
- // LogStop("CheckColumn(True)");
- // LogStart();
- CheckColumn(columns, cnd.False);
- // LogStop("CheckColumn(False)");
- //// LogStart();
- LoadFieldsandTables(command, type, prefix, cndmap, tables, columns, cnd.Left, useparams);
- //// LogStop("LoadFieldsAndTables(Left)");
- //// LogStart();
- LoadFieldsandTables(command, type, prefix, cndmap, tables, columns, cnd.Right, useparams);
- //// LogStop("LoadFieldsAndTables(Right)");
- //// LogStart();
- LoadFieldsandTables(command, type, prefix, cndmap, tables, columns, cnd.True, useparams);
- //// LogStop("LoadFieldsAndTables(True)");
- //// LogStart();
- LoadFieldsandTables(command, type, prefix, cndmap, tables, columns, cnd.False, useparams);
- //// LogStop("LoadFieldsAndTables(False)");
- // LogStart();
- fieldmap[columnname] = GetCondition(cnd, cndmap, columnname);
- // LogStop("GetCondition");
- }
- else
- {
- fieldmap[columnname] = string.Format("{0}1.[{1}]", prefix, columnname);
- }
- }
- }
- }
- else
- {
- //IProperty customprop = DataModel.Property(type, columnname);
- //if (customprop != null)
- // fieldmap[columnname] = String.Format("{0}1.[{1}]", prefix, columnname);
- //else
- fieldmap[columnname] = columnname;
- }
- }
- else
- {
- var prop = type.GetProperty(bits.First());
- if (prop != null)
- {
- var combinecount = 1;
- while (prop.PropertyType.GetInterfaces().Contains(typeof(IEnclosedEntity)))
- {
- combinecount++;
- prop = CoreUtils.GetProperty(type, string.Join(".", bits.Take(combinecount)));
- }
- if (prop.PropertyType.GetInterfaces().Contains(typeof(IEntityLink)))
- {
- var linkedtype = prop.PropertyType.GetInheritedGenericTypeArguments().First();
- var remote = linkedtype.GetProperty(bits.Last());
- // Are there any other properties for this link? These will form the columns for our subquery
- var siblings = columns.Where(x => x.Split('.').First().Equals(bits.First()))
- .Select(x => string.Join(".", x.Split('.').Skip(combinecount))).ToList();
- if (remote != null && !siblings.Contains(remote.Name))
- siblings.Add(remote.Name);
-
- if (siblings.Count.Equals(1) && siblings.First().Equals("ID"))
- fieldmap[columnname] = string.Format("{0}1.[{1}]", prefix, columnname);
-
- // Hmmm.. there must have been a reason why we do this, but...
- // Deleted is not part of parent tables (only ID is), so the same
- // shortcut that limits joining when we are only selecting ID's does
- // not work if we are selecting Deleted's.
-
- //else if (siblings.Count.Equals(2) && siblings.Skip(1).First().Equals("Deleted"))
- // fieldmap[columnname] = string.Format("{0}1.[{1}]", prefix, columnname);
-
- else
- {
- if (!siblings.Contains("ID"))
- siblings.Insert(0, "ID");
- if (!siblings.Contains("Deleted"))
- siblings.Insert(1, "Deleted");
- var subcols = Columns.Create(linkedtype);
- foreach (var sibling in siblings)
- subcols.Add(sibling);
- var filter = Activator.CreateInstance(typeof(Filter<>).MakeGenericType(linkedtype), "Deleted") as IFilter;
- filter!.Operator = Operator.IsEqualTo;
- filter.Value = Guid.Empty;
- var linkedtable = string.Format("({0})",
- PrepareSelectNonGeneric(linkedtype, command, newprefix, filter, subcols, null, null, null, int.MaxValue, false, useparams));
- var link = string.Format("{0}.ID", prop.Name);
- var tuple = tables.FirstOrDefault(x =>
- x.Item1.Equals(linkedtable) && x.Item4.Equals(link) && !x.Item2.Equals(string.Format("{0}1", prefix)));
- if (tuple == null)
- {
- var alias = tables.Count + 1;
- tuple = new Tuple<string, string, string, string>(
- linkedtable,
- prefix + alias.ToString(),
- string.Format(
- "LEFT OUTER JOIN {0} {1}{2} ON {1}{2}.[ID] = {1}1.[{3}.ID]",
- linkedtable,
- prefix,
- alias,
- string.Join(".", bits.Take(combinecount)) //prop.Name
- ),
- link
- );
- tables.Add(tuple);
- }
- //if (bits.Last().Equals("ID"))
- // fieldmap[columnname] = String.Format("{0}1.[{1}]", prefix, columnname);
- //else
- fieldmap[columnname] = string.Format("{0}.[{1}]", tuple.Item2, string.Join(".", bits.Skip(combinecount)));
- foreach (var sibling in siblings)
- {
- var subcol = string.Format("{0}.{1}", string.Join(".", bits.Take(combinecount)), sibling);
- if (!subcol.Equals(columnname))
- fieldmap[subcol] = string.Format("{0}.[{1}]", tuple.Item2, sibling);
- }
- }
- }
- else if (prop.PropertyType.GetInterfaces().Contains(typeof(IEnclosedEntity)))
- {
- fieldmap[columnname] = string.Format("{0}1.[{1}]", prefix, columnname);
- }
- else
- {
- fieldmap[columnname] = string.Format("{0}1.[{1}]", prefix, columnname);
- }
- }
- else
- {
- fieldmap[columnname] = columnname;
- }
- }
- }
- }
- private static void CheckColumn(List<string> columns, string column)
- {
- if (!columns.Contains(column))
- columns.Add(column);
- }
- public void FilterFields(IFilter? filter, List<string> fields)
- {
- if (filter == null)
- return;
- if (filter.Operator != Operator.None && filter.Operator != Operator.All)
- {
- var exp = CoreUtils.GetFullPropertyName(CoreUtils.ExtractMemberExpression(filter.Expression), ".");
- if (!fields.Contains(exp))
- fields.Add(exp);
- }
- foreach (var and in filter.Ands)
- FilterFields(and, fields);
- foreach (var or in filter.Ors)
- FilterFields(or, fields);
- }
- public void SortFields(ISortOrder? sort, List<string> fields)
- {
- if (sort == null)
- return;
- var exp = CoreUtils.GetFullPropertyName(CoreUtils.ExtractMemberExpression(sort.Expression), ".");
- if (!fields.Contains(exp))
- fields.Add(exp);
- foreach (var then in sort.Thens)
- SortFields(then, fields);
- }
- public enum AggregateType
- {
- None,
- Sum,
- Count
- }
- public string PrepareSelectNonGeneric(Type T, SQLiteCommand command, char prefix,
- IFilter? filter, IColumns? columns, ISortOrder? sort,
- Dictionary<string, string>? aggregates, Dictionary<string, object?>? constants, int top, bool distinct, bool useparams)
- {
- var fieldmap = new Dictionary<string, string>();
- var cols = CoreUtils.GetColumns(T, columns);
- var fields = new List<string>();
- fields.AddRange(cols.ColumnNames());
- FilterFields(filter, fields);
- SortFields(sort, fields);
- var tables = new List<Tuple<string, string, string, string>>();
- var condition = "";
- var sortorder = "";
- var entityName = T.EntityName().Split('.').Last();
- tables.Add(new Tuple<string, string, string, string>(
- entityName,
- $"{prefix}1",
- $"{entityName} {prefix}1",
- "")
- );
- foreach (var column in cols.ColumnNames())
- LoadFieldsandTables(command, T, prefix, fieldmap, tables, fields, column, useparams);
- var parameters = new Dictionary<string, object>();
- condition = GetFilterClauseNonGeneric(T, command, prefix, filter, tables, fieldmap, fields, useparams);
- sortorder = GetSortClauseNonGeneric(T, command, sort, prefix, tables, fieldmap, fields, useparams);
- var combined = new SortedDictionary<string, string>();
- fields.Clear();
- foreach (var column in cols.ColumnNames())
- if (fieldmap.ContainsKey(column))
- {
- if (aggregates != null && aggregates.ContainsKey(column))
- combined[constants != null ? column : String.Format("{0:D8}", combined.Keys.Count)] = string.Format("{0}({1}) as [{2}]", aggregates[column], fieldmap[column], column);
- else
- combined[constants != null ? column : String.Format("{0:D8}", combined.Keys.Count)] = string.Format("{0} as [{1}]", fieldmap[column], column);
- }
- if (constants != null)
- {
- foreach(var (column, value) in constants)
- {
- combined[column] = string.Format("{0} as [{1}]", EscapeValue(value), column);
- }
- }
- var result = new List<string>();
- result.Add("SELECT");
- if (distinct)
- result.Add("DISTINCT");
- result.Add(string.Join(", ", combined.Values));
- result.Add("FROM");
- result.AddRange(tables.Select(x => x.Item3));
- if (!string.IsNullOrWhiteSpace(condition))
- {
- result.Add("WHERE");
- result.Add(condition);
- }
- if (!string.IsNullOrWhiteSpace(sortorder))
- {
- result.Add("ORDER BY");
- result.Add(sortorder);
- }
- if (aggregates != null)
- {
- var str = string.Join(", ",
- fieldmap.Where(x => cols.ColumnNames().Contains(x.Key) && !aggregates.ContainsKey(x.Key)).Select(f => f.Value));
- if (!string.IsNullOrWhiteSpace(str))
- {
- result.Add("GROUP BY");
- result.Add(str);
- }
- }
- if (top != int.MaxValue)
- result.Add(String.Format("LIMIT {0}", top));
- //Breadcrumb.Remove(Breadcrumb.Last());
- return string.Join(" ", result);
- }
- public string PrepareSelect<T>(SQLiteCommand command, char prefix, Filter<T>? filter, Columns<T>? columns, SortOrder<T>? sort,
- Dictionary<string, string>? aggregates, Dictionary<string, object?>? constants, int top, bool distinct, bool useparams) where T : Entity
- => PrepareSelectNonGeneric(typeof(T), command, prefix, filter, columns, sort, aggregates, constants, top, distinct, useparams);
- private static void PrepareUpsertNonGeneric(Type T, SQLiteCommand command, Entity item, bool addDelete = false)
- {
- command.CommandText = "";
- command.Parameters.Clear();
- if (item.ID == Guid.Empty)
- item.ID = Guid.NewGuid();
- Dictionary<string, object> insert = item.GetValues(true);
- Dictionary<string, object> update = item.GetValues(false);
- if (addDelete)
- {
- insert.Add("Deleted", item.Deleted);
- if (item.HasOriginalValue("Deleted"))
- update.Add("Deleted", item.Deleted);
- }
- var insertfields = new List<string>();
- var insertvalues = new List<string>();
- var updatecommands = new List<string>();
- var iParam = 0;
- foreach (var key in insert.Keys)
- {
- if (insert[key] is UserProperties)
- continue;
- var sParam = string.Format("@p{0}", iParam++);
- object? value = null;
- try
- {
- value = Encode(insert[key], insert[key]?.GetType());
- }
- catch (Exception e)
- {
- Logger.Send(LogType.Error, "", string.Format("*** Unknown Error: {0}\n{1}", e.Message, e.StackTrace));
- }
- command.Parameters.AddWithValue(sParam, value);
- insertfields.Add(string.Format("[{0}]", key));
- insertvalues.Add(sParam);
- if (update.ContainsKey(key))
- if (!key.Equals("ID"))
- updatecommands.Add(string.Format("[{0}]={1}", key, sParam));
- }
- var particles = new List<string>();
- particles.Add("INSERT INTO");
- particles.Add(T.EntityName().Split('.').Last());
- particles.Add("(");
- particles.Add(string.Join(",", insertfields));
- particles.Add(")");
- particles.Add("VALUES");
- particles.Add("(");
- particles.Add(string.Join(",", insertvalues));
- particles.Add(")");
- if (updatecommands.Any())
- particles.Add("ON CONFLICT([ID]) DO UPDATE SET " + string.Join(", ", updatecommands));
- else
- particles.Add("ON CONFLICT DO NOTHING");
- command.CommandText = string.Join(" ", particles);
- }
- private void PrepareUpsert<T>(SQLiteCommand command, T item, bool addDelete = false) where T : Entity
- => PrepareUpsertNonGeneric(typeof(T), command, item, addDelete);
- public void PrepareDelete<T>(SQLiteCommand command, T item) where T : Entity
- {
- command.CommandText = string.Format("DELETE FROM {0} WHERE [ID] = @p0", typeof(T).EntityName().Split('.').Last());
- command.Parameters.Clear();
- command.Parameters.AddWithValue("@p0", Encode(item.ID, typeof(Guid)));
- }
- #endregion
- #region Schema Handling
- public Dictionary<string, Type> GetSchema()
- {
- var result = new Dictionary<string, Type>();
- return result;
- }
- public void CreateSchema(params Type[] types)
- {
- }
- public void SaveSchema(Dictionary<string, Type> schema)
- {
- }
- public void UpgradeSchema(params Type[] types)
- {
- }
- #endregion
- #region CRUD Operations
-
- public object[] GetValues(IDataReader reader, int count)
- {
- var result = new object[count];
- reader.GetValues(result);
- return result;
- }
- #region Query
- public IEnumerable<object[]> List<T>(Filter<T>? filter = null, Columns<T>? columns = null, SortOrder<T>? sort = null) where T : Entity, new()
- {
- var newFilter = new Filter<T>(x => x.Deleted).IsEqualTo(Guid.Empty);
- if (filter != null)
- newFilter.And(filter);
- filter = newFilter;
- //Dictionary<String, TimeSpan> stopwatch = new Dictionary<string, TimeSpan>();
- //Stopwatch sw = new Stopwatch();
- //sw.Start();
- var cols = CoreUtils.GetColumns(columns);
- //stopwatch["GetColumns"] = new TimeSpan(sw.ElapsedTicks);
- //sw.Restart();
- var result = new List<object[]>();
- //stopwatch["MakeResult"] = new TimeSpan(sw.ElapsedTicks);
- //sw.Restart();
- using (var access = GetReadAccess())
- {
- using (var command = access.CreateCommand())
- {
- var sortorder = sort == null ? LookupFactory.DefineSort<T>() : sort;
- command.CommandText = "";
- command.Parameters.Clear();
- command.CommandText = PrepareSelect(command, 'A', filter, cols, sortorder, null, null, int.MaxValue, false, true) + ";";
- using (var reader = command.ExecuteReader())
- {
- foreach (var row in reader)
- {
- var values = GetValues(reader, cols.Items.Length);
- result.Add(values);
- }
- reader.Close();
- }
- }
- }
- return result;
- }
- private CoreTable DoQueryNonGeneric(Type T, IFilter? filter = null, IColumns? columns = null, ISortOrder? sort = null, int top = int.MaxValue, bool log = false, bool distinct = false)
- {
- var start = DateTime.Now;
- //LogReset();
- //LogStart();
- var cols = CoreUtils.GetColumns(T, columns);
- //LogStop("GetColumns");
- var result = new CoreTable(T.EntityName());
- foreach (var col in cols.GetColumns())
- result.Columns.Add(new CoreColumn { ColumnName = col.Property, DataType = col.Type });
- //LogStop("MakeTable");
- using (var access = GetReadAccess())
- {
- using (var command = access.CreateCommand())
- {
- var sortorder = sort ?? LookupFactory.DefineSort(T);
- command.CommandText = "";
- command.Parameters.Clear();
- //LogStart();
- var sql = PrepareSelectNonGeneric(T, command, 'A', filter, cols, sortorder, null, null, top, distinct, true) + ";";
- command.CommandText = sql;
- try
- {
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- {
- var rows = new List<CoreRow>();
- while (reader.Read())
- {
- var row = result.NewRow();
- for (var i = 0; i < reader.FieldCount; i++)
- try
- {
- var type = result.Columns[i].DataType;
- if (reader.IsDBNull(i))
- {
- row.Values.Add(result.Columns[i].DataType.GetDefault());
- }
- else if (type.IsEnum)
- {
- ReadAndDecodeValue(result, reader, row, i);
- }
- else if (type == typeof(byte))
- {
- row.Values.Add(reader.GetByte(i));
- }
- else if (type == typeof(byte[]))
- {
- ReadAndDecodeValue(result, reader, row, i);
- }
- else if (type == typeof(bool))
- {
- ReadAndDecodeValue(result, reader, row, i);
- }
- else if (type == typeof(short))
- {
- row.Values.Add(reader.GetInt16(i));
- }
- else if (type == typeof(int))
- {
- row.Values.Add(reader.GetInt32(i));
- }
- else if (type == typeof(long))
- {
- row.Values.Add(reader.GetInt64(i));
- }
- else if (type == typeof(float))
- {
- row.Values.Add(reader.GetFloat(i));
- }
- else if (type == typeof(double))
- {
- row.Values.Add(reader.GetDouble(i));
- }
- else if (type == typeof(decimal))
- {
- row.Values.Add(reader.GetDecimal(i));
- }
- else if (type == typeof(string))
- {
- var value = reader.GetString(i);
- row.Values.Add(value != null ? value : "");
- }
- else if (type == typeof(DateTime))
- {
- ReadAndDecodeValue(result, reader, row, i);
- }
- else if (type == typeof(TimeSpan))
- {
- ReadAndDecodeValue(result, reader, row, i);
- }
- else if (type == typeof(Guid))
- {
- row.Values.Add(reader.GetGuid(i));
- }
- else
- {
- ReadAndDecodeValue(result, reader, row, i);
- }
- }
- catch (Exception)
- {
- row.Values.Add(result.Columns[i].DataType.GetDefault());
- }
- result.Rows.Add(row);
- }
- }
- reader.Close();
- }
- }
- catch (Exception e)
- {
- OnLog?.Invoke(LogType.Error, e.Message);
- }
- //LogStop("ReadData");
- //LogPrint(String.Format("Query{0}", typeof(T).Name));
- }
- }
- if (log)
- {
- var duration = DateTime.Now - start;
- Logger.Send(LogType.Information, "",
- string.Format("SQLite::Query<{0}>({1} cols) returns {2} rows in {3}ms", T.Name, cols.Count, result.Rows.Count,
- duration.TotalMilliseconds));
- }
- return result;
- }
- private CoreTable DoQuery<T>(Filter<T>? filter, Columns<T>? columns, SortOrder<T>? sort, int top, bool log, bool distinct)
- where T : Entity, new() => DoQueryNonGeneric(typeof(T), filter, columns, sort, top, log, distinct);
- public CoreTable Query<T>(Filter<T>? filter = null, Columns<T>? columns = null, SortOrder<T>? sort = null, int top = int.MaxValue, bool log = false, bool distinct = false)
- where T : Entity, new()
- {
- var newFilter = new Filter<T>(x => x.Deleted).IsEqualTo(Guid.Empty);
- if (filter != null)
- newFilter.And(filter);
- return DoQuery(newFilter, columns, sort, top, log, distinct);
- }
-
- public CoreTable QueryDeleted<T>(Deletion deletion, Filter<T>? filter = null, Columns<T>? columns = null, SortOrder<T>? sort = null, int top = int.MaxValue, bool log = false)
- where T : Entity, new()
- {
- if (filter != null)
- filter.And(x => x.Deleted).IsEqualTo(deletion.ID);
- else
- filter = new Filter<T>(x => x.Deleted).IsEqualTo(deletion.ID);
- return DoQuery(filter, columns, sort, top, false, false);
- }
- private void ReadAndDecodeValue(CoreTable result, SQLiteDataReader reader, CoreRow row, int i)
- {
- var value = reader.GetValue(i);
- var decoded = Decode(value, result.Columns[i].DataType);
- row.Values.Add(decoded);
- }
- public T[] Load<T>(Filter<T>? filter = null, SortOrder<T>? sort = null) where T : Entity, new()
- {
- var newFilter = new Filter<T>(x => x.Deleted).IsEqualTo(Guid.Empty);
- if (filter != null)
- newFilter.And(filter);
- filter = newFilter;
- var result = new List<T>();
- var cols = CoreUtils.GetColumns<T>(null);
- using (var access = GetReadAccess())
- {
- using (var command = access.CreateCommand())
- {
- try
- {
- command.CommandText = "";
- command.Parameters.Clear();
- command.CommandText = PrepareSelect(command, 'A', filter, cols, sort, null, null, int.MaxValue, false, true) + ";";
- using (var reader = command.ExecuteReader())
- {
- if (reader.HasRows)
- while (reader.Read())
- {
- var entity = new T();
- entity.SetObserving(false);
- for (var i = 0; i < reader.FieldCount; i++)
- {
- object value;
- if (cols.Items[i].Expression.Type == typeof(long) && !reader.IsDBNull(i))
- value = reader.GetInt64(i);
- else
- value = reader.GetValue(i);
- try
- {
- var decoded = Decode(value, cols.Items[i].Expression.Type);
- CoreUtils.SetPropertyValue(entity, cols.Items[i].Property, decoded);
- }
- catch (Exception e)
- {
- Logger.Send(LogType.Error, "", string.Format("*** Unknown Error: {0}\n{1}", e.Message, e.StackTrace));
- }
- }
- entity.SetObserving(true);
- result.Add(entity);
- }
- reader.Close();
- }
- }
- catch (Exception e)
- {
- Logger.Send(LogType.Error, "", string.Format("*** Unknown Error: {0}\n{1}", e.Message, e.StackTrace));
- }
- }
- }
- return result.ToArray();
- }
- #endregion
- #region Save
- private void OnSaveNonGeneric(Type T, IEnumerable<Entity> entities, bool addDelete = false)
- {
- if (!entities.Any())
- return;
- using (var access = GetWriteAccess())
- {
- Exception? error = null;
- using (var transaction = access.BeginTransaction())
- {
- try
- {
- using (var command = access.CreateCommand())
- {
- foreach (var entity in entities)
- {
- PrepareUpsertNonGeneric(T, command, entity, addDelete);
- command.ExecuteNonQuery();
- }
- transaction.Commit();
- }
- }
- catch (Exception e)
- {
- error = e;
- transaction.Rollback();
- }
- }
- if (error != null)
- throw error;
- }
- }
- private void OnSave<T>(IEnumerable<T> entities, bool addDelete = false) where T : Entity
- => OnSaveNonGeneric(typeof(T), entities, addDelete);
- public static bool CanSave<T>()
- {
- if (DbFactory.IsReadOnly)
- {
- if (typeof(T).IsAssignableTo(typeof(License)))
- {
- return true;
- }
- DbFactory.LogReadOnly();
- return false;
- }
- return true;
- }
- public void Save<T>(IEnumerable<T> entities) where T : Entity
- {
- if (!CanSave<T>())
- {
- return;
- }
- OnSave(entities, false);
- }
- private void OnSaveNonGeneric(Type T, Entity entity, bool addDelete = false)
- {
- Exception? error = null;
- using (var access = GetWriteAccess())
- {
- using (var command = access.CreateCommand())
- {
- try
- {
- PrepareUpsertNonGeneric(T, command, entity, addDelete);
- command.ExecuteNonQuery();
- }
- catch (Exception e)
- {
- error = e;
- }
- }
- }
- if (error != null)
- throw error;
- }
- private void OnSave<T>(T entity, bool addDelete = false) where T : Entity
- => OnSaveNonGeneric(typeof(T), entity, addDelete);
- public void Save<T>(T entity) where T : Entity
- {
- if (!CanSave<T>())
- {
- return;
- }
- OnSave(entity, false);
- }
- #endregion
- #region Delete
- public void Purge<T>(T entity) where T : Entity
- {
- using (var access = GetWriteAccess())
- {
- using (var command = access.CreateCommand())
- {
- PrepareDelete(command, entity);
- var rows = command.ExecuteNonQuery();
- }
- }
- }
- public void Purge<T>(IEnumerable<T> entities) where T : Entity
- {
- if (!entities.Any())
- return;
- Exception? error = null;
- using (var access = GetWriteAccess())
- {
- using (var transaction = access.BeginTransaction())
- {
- try
- {
- using (var command = access.CreateCommand())
- {
- foreach (var entity in entities)
- {
- PrepareDelete(command, entity);
- var rows = command.ExecuteNonQuery();
- }
- }
- transaction.Commit();
- }
- catch (Exception e)
- {
- transaction.Rollback();
- error = e;
- }
- }
- }
- if (error != null)
- throw error;
- }
- private Dictionary<Type, List<Tuple<Type, string>>> _cascades = new();
- private Dictionary<Type, List<Tuple<Type, List<string>>>> _setNulls = new();
- private void LoadDeletions(Type type)
- {
- // Get the EntityLink that is associated with this class
- var linkclass = CoreUtils.TypeList(
- new[] { type.Assembly },
- x => typeof(IEntityLink).GetTypeInfo().IsAssignableFrom(x) && x.GetInheritedGenericTypeArguments().FirstOrDefault() == type
- ).FirstOrDefault();
- // if The entitylink does not exist, we don't need to do anything
- if (linkclass == null)
- return;
- var cascades = new List<Tuple<Type, string>>();
- var setNulls = new List<Tuple<Type, List<string>>>();
- var childtypes = Types.Where(x => x.IsSubclassOf(typeof(Entity)) && x.GetCustomAttribute<AutoEntity>() == null);
- foreach (var childtype in childtypes)
- {
- // Get all registered types for this entitylink
- var fields = new List<string>();
- var bDelete = false;
- // Find any IEntityLink<> properties that refer back to this class
- var childprops = CoreUtils.PropertyList(childtype, x => x.PropertyType == linkclass);
- foreach (var childprop in childprops)
- {
- var fieldname = string.Format("{0}.ID", childprop.Name);
- var attr = childprop.GetCustomAttributes(typeof(EntityRelationshipAttribute), true).FirstOrDefault();
- if (attr != null && ((EntityRelationshipAttribute)attr).Action.Equals(DeleteAction.Cascade))
- {
- cascades.Add(new(childtype, fieldname));
- bDelete = true;
- break;
- }
- fields.Add(fieldname);
- }
- if(!bDelete && fields.Any())
- {
- setNulls.Add(new(childtype, fields));
- }
- }
- if(cascades.Count > 0)
- {
- _cascades[type] = cascades;
- }
- if(setNulls.Count > 0)
- {
- _setNulls[type] = setNulls;
- }
- }
- private MethodInfo _deleteEntitiesMethod = typeof(SQLiteProvider).GetMethods(BindingFlags.NonPublic | BindingFlags.Instance)
- .Single(x => x.Name == nameof(DeleteEntity) && x.IsGenericMethod);
- private void DeleteEntity<T>(Guid parentID, string parentField, DeletionData deletionData) where T : Entity, new()
- {
- var columns = DeletionData.DeletionColumns<T>();
- var entities = Query(new Filter<T>(parentField).IsEqualTo(parentID), columns);
- foreach(var row in entities.Rows)
- {
- deletionData.DeleteEntity<T>(row);
- CascadeDelete(typeof(T), row.Get<T, Guid>(x => x.ID), deletionData);
- }
- }
-
- private void DeleteEntity(Type T, Guid parentID, string parentField, DeletionData deletionData)
- {
- _deleteEntitiesMethod.MakeGenericMethod(T).Invoke(this, new object?[] { parentID, parentField, deletionData });
- }
- private MethodInfo _setNullEntityMethod = typeof(SQLiteProvider).GetMethods(BindingFlags.NonPublic | BindingFlags.Instance)
- .Single(x => x.Name == nameof(SetNullEntity) && x.IsGenericMethod);
- private void SetNullEntity<T>(List<string> properties, Guid parentID, DeletionData deletionData) where T : Entity, new()
- {
- foreach(var property in properties)
- {
- var entities = Query(new Filter<T>(property).IsEqualTo(parentID), new Columns<T>(x => x.ID));
- foreach (var row in entities.Rows)
- {
- deletionData.SetNullEntity<T>(row.Get<T, Guid>(x => x.ID), property, parentID);
- }
- }
- }
- private void SetNullEntity(Type T, List<string> properties, Guid parentID, DeletionData deletionData)
- {
- _setNullEntityMethod.MakeGenericMethod(T).Invoke(this, new object?[] { properties, parentID, deletionData });
- }
- private void CascadeDelete(Type type, Guid parentID, DeletionData deletionData)
- {
- if (_cascades.TryGetValue(type, out var cascades))
- {
- foreach (var cascade in cascades)
- {
- DeleteEntity(cascade.Item1, parentID, cascade.Item2, deletionData);
- }
- }
- if(_setNulls.TryGetValue(type, out var setNulls))
- {
- foreach(var setNull in setNulls)
- {
- SetNullEntity(setNull.Item1, setNull.Item2, parentID, deletionData);
- }
- }
- }
- public void Delete<T>(T entity, string userID) where T : Entity, new()
- {
- //#if PURGE
- if (!CanSave<T>())
- {
- return;
- }
- entity = DoQuery(
- new Filter<T>(x => x.ID).IsEqualTo(entity.ID),
- DeletionData.DeletionColumns<T>(),
- null,
- int.MaxValue,
- false,
- false
- ).Rows.First().ToObject<T>();
- var deletionData = new DeletionData();
- deletionData.DeleteEntity(entity);
- CascadeDelete(typeof(T), entity.ID, deletionData);
- var tableName = typeof(T).Name;
- var deletion = new Deletion()
- {
- DeletionDate = DateTime.Now,
- HeadTable = tableName,
- Description = entity.ToString() ?? "",
- DeletedBy = userID,
- Data = Serialization.Serialize(deletionData)
- };
- OnSave(deletion);
- //#else
- Purge(entity);
- //#endif
- }
- public void Delete<T>(IEnumerable<T> entities, string userID) where T : Entity, new()
- {
- //#if PURGE
- if (!CanSave<T>())
- {
- return;
- }
- if (!entities.Any())
- return;
- var ids = entities.Select(x => x.ID).ToArray();
- var entityList = Query(
- new Filter<T>(x => x.ID).InList(ids),
- DeletionData.DeletionColumns<T>()).Rows.Select(x => x.ToObject<T>()).ToList();
- if (!entityList.Any())
- return;
- var deletionData = new DeletionData();
- foreach (var entity in entityList)
- {
- deletionData.DeleteEntity(entity);
- CascadeDelete(typeof(T), entity.ID, deletionData);
- }
- var tableName = typeof(T).Name;
- var deletion = new Deletion()
- {
- DeletionDate = DateTime.Now,
- HeadTable = tableName,
- Description = $"Deleted {entityList.Count} entries",
- DeletedBy = userID,
- Data = Serialization.Serialize(deletionData)
- };
- OnSave(deletion);
- //#else
- Purge(entities);
- //#endif
- }
- private void AddDeletionType(Type type, List<Type> deletions)
- {
- deletions.Add(type);
- if (!_cascades.TryGetValue(type, out var cascades))
- return;
- foreach (var cascade in cascades)
- {
- AddDeletionType(cascade.Item1, deletions);
- }
- }
- private Dictionary<Type, List<Type>> _allCascades = new();
- private List<Type> GetDeletionTypes(Type type)
- {
- if(_allCascades.TryGetValue(type, out var cascades))
- {
- return cascades;
- }
- var deletionTypes = new List<Type>();
- AddDeletionType(type, deletionTypes);
- _allCascades[type] = deletionTypes;
- return deletionTypes;
- }
- /*private void DoSetNull<TChild>(string field, Guid[] parentIDs) where TChild : Entity, new()
- {
- var columns = new Columns<TChild>(x => x.ID);
- columns.Add(field);
- var children = DoQuery(
- new Filter<TChild>(field).InList(parentIDs),
- columns,
- null,
- int.MaxValue,
- true,
- false
- ).Rows.Select(x => x.ToObject<TChild>()).ToList();
- foreach(var child in children)
- {
- CoreUtils.SetPropertyValue(child, field, Guid.Empty);
- }
- OnSave(children);
- }*/
- /*private void PurgeEntityType<T>(Deletion deletion) where T : Entity, new()
- {
- var entities = QueryDeleted(deletion, null, new Columns<T>(x => x.ID)).Rows.Select(x => x.ToObject<T>()).ToList();
- if (_setNulls.TryGetValue(typeof(T), out var setNulls))
- {
- var ids = entities.Select(x => x.ID).ToArray();
- var setNullMethod = typeof(SQLiteProvider).GetMethod(nameof(DoSetNull), BindingFlags.NonPublic | BindingFlags.Instance)!;
- foreach (var (childType, childFields) in setNulls)
- {
- var method = setNullMethod.MakeGenericMethod(childType);
- foreach(var childField in childFields)
- {
- method.Invoke(this, new object[] { childField, ids });
- }
- }
- }
- Purge(entities);
- }*/
- /*private void RecoverEntityType<T>(Deletion deletion) where T : Entity, new()
- {
- var entities = QueryDeleted(deletion, null, new Columns<T>(x => x.ID, x => x.Deleted)).Rows.Select(x => x.ToObject<T>()).ToList();
- foreach (var entity in entities)
- {
- entity.Deleted = Guid.Empty;
- }
- OnSave(entities, true);
- }*/
-
- public void Purge(Deletion deletion)
- {
- /*if(deletion.ID == Guid.Empty)
- {
- Logger.Send(LogType.Error, "", "Empty Deletion ID; Purge cancelled");
- return;
- }
- var entityType = CoreUtils.Entities.FirstOrDefault(x => x.Name == deletion.HeadTable);
- if(entityType is null)
- {
- Logger.Send(LogType.Error, "", $"Entity {deletion.HeadTable} does not exist; Purge cancelled");
- return;
- }
- var deletionTypes = GetDeletionTypes(entityType);
- var purgeMethod = typeof(SQLiteProvider).GetMethod(nameof(PurgeEntityType), BindingFlags.NonPublic | BindingFlags.Instance)!;
- foreach(var type in deletionTypes)
- {
- purgeMethod.MakeGenericMethod(type).Invoke(this, new object[] { deletion });
- }
- */
- Purge<Deletion>(deletion);
- }
- public void Recover(Deletion deletion)
- {
- if (deletion.ID == Guid.Empty)
- {
- Logger.Send(LogType.Error, "", "Empty Deletion ID; Recovery cancelled");
- return;
- }
- var data = Serialization.Deserialize<DeletionData>(deletion.Data);
- if (data is null)
- {
- Logger.Send(LogType.Error, "", "Deletion Data deserialisation failed; Recovery cancelled");
- return;
- }
- foreach (var (entityName, setNulls) in data.SetNulls)
- {
- if (!CoreUtils.TryGetEntity(entityName, out var entityType)) continue;
- var saves = new List<Entity>();
- foreach(var setNull in setNulls)
- {
- var row = DoQueryNonGeneric(
- entityType,
- Filter.Create<Entity>(entityType, x => x.ID).IsEqualTo(setNull.EntityID),
- Columns.Create(entityType)
- .Add<Entity>(x => x.ID)
- .Add(setNull.Property),
- null,
- 1,
- false,
- false
- ).Rows.FirstOrDefault();
- if (row is null) continue;
- var entity = (row.ToObject(entityType) as Entity)!;
- CoreUtils.SetPropertyValue(entity, setNull.Property, setNull.ParentID);
- saves.Add(entity);
- }
- OnSaveNonGeneric(entityType, saves);
- }
- foreach(var (entityName, cascade) in data.Cascades)
- {
- if (!CoreUtils.TryGetEntity(entityName, out var entityType)) continue;
- OnSaveNonGeneric(entityType, cascade.ToObjects(entityType).Cast<Entity>());
- }
- Purge<Deletion>(deletion);
- }
- public List<Type> GetDeletionTypes(Deletion deletion)
- {
- var entityType = CoreUtils.Entities.First(x => x.Name == deletion.HeadTable);
- return GetDeletionTypes(entityType);
- }
- #endregion
- #endregion
- }
- }
|