public FormWinapi()
{
InitializeComponent();
_db = EdDatabases.OpenWinapi();
_eName.TextChanged += _eName_TextChanged;
_bOK.Click += (unu, sed) => {
string s = _code.Text;
if (!s.NE())
{
Clipboard.SetText(s);
}
};
}
/// <summary>
/// Calls sqlite3_prepare16_v3.
/// </summary>
/// <param name="db"></param>
/// <param name="sql">Single SQL statement.</param>
/// <param name="persistent">Use flag SQLITE_PREPARE_PERSISTENT.</param>
/// <exception cref="ArgumentNullException">db is null.</exception>
/// <exception cref="SLException">Failed.</exception>
/// <exception cref="NotSupportedException">sql contains more than single SQL statement.</exception>
public ASqliteStatement(ASqlite db, string sql, bool persistent = false)
{
_db = db ?? throw new ArgumentNullException();
int flags = persistent ? 1 : 0; //SQLITE_PREPARE_PERSISTENT
fixed(char *p = sql)
{
char *tail = null;
_Err(SLApi.sqlite3_prepare16_v3(db, p, sql.Length * 2, flags, ref _st, &tail), "sqlite3_prepare");
if (tail != null && tail - p != sql.Length)
{
throw new NotSupportedException("sql contains more than single SQL statement");
}
}
}
/// <summary>
/// Creates SQLite database containing Windows API declarations.
/// </summary>
public static void CreateWinapi(string csDir = @"Q:\app\Au\Other\Api", string dataDir = @"Q:\app\Au\Other\Data")
{
Cursor.Current = Cursors.WaitCursor;
string dbFile = dataDir + @"\winapi.db";
AFile.Delete(dbFile);
string s = File.ReadAllText(csDir + @"\Api.cs");
using var d = new ASqlite(dbFile);
using var trans = d.Transaction();
d.Execute("CREATE TABLE api (name TEXT, def TEXT)"); //note: no PRIMARY KEY. Don't need index.
using var statInsert = d.Statement("INSERT INTO api VALUES (?, ?)");
string rxType = @"(?ms)^(?:\[[^\r\n]+\r\n)*internal (?:struct|enum|interface|class) (\w+)[^\r\n\{]+\{(?:\}$|.+?^\})";
string rxFunc = @"(?m)^(?:\[[^\r\n]+\r\n)*internal (?:static extern|delegate) \w+\** (\w+)\(.+;$";
string rxVarConst = @"(?m)^internal (?:const|readonly|static) \w+ (\w+) =.+;$";
foreach (var m in s.RegexFindAll(rxType))
{
_Add(m);
}
foreach (var m in s.RegexFindAll(rxFunc))
{
_Add(m);
}
foreach (var m in s.RegexFindAll(rxVarConst))
{
_Add(m);
}
void _Add(RXMatch m)
{
statInsert.Bind(1, m[1].Value);
statInsert.Bind(2, m.Value);
statInsert.Step();
statInsert.Reset();
}
trans.Commit();
d.Execute("VACUUM");
Program.Settings.db_copy_winapi = dbFile;
AOutput.Write("CreateWinapi done.");
Cursor.Current = Cursors.Arrow;
}
static void _CreateRef(string dbFile, string dir1, string dir2)
{
AFile.Delete(dbFile);
using var d = new ASqlite(dbFile);
using var trans = d.Transaction();
d.Execute("CREATE TABLE ref (name TEXT PRIMARY KEY, data BLOB)");
using var statInsert = d.Statement("INSERT OR REPLACE INTO ref VALUES (?, ?)");
_AddDir(dir1, "WindowsBase", "System.Drawing");
_AddDir(dir2);
trans.Commit();
d.Execute("VACUUM");
AOutput.Write("Created " + dbFile);
void _AddDir(string dir, params string[] skip)
{
foreach (var f in AFile.EnumDirectory(dir))
{
if (f.IsDirectory)
{
continue;
}
if (!f.Name.Ends(".dll", true))
{
continue;
}
var asmName = f.Name.RemoveSuffix(4);
if (skip.Contains(asmName))
{
continue;
}
_AddFile(asmName, f.FullPath);
//break;
}
}
void _AddFile(string asmName, string asmFile)
{
//AOutput.Write(asmName);
statInsert.Bind(1, asmName);
statInsert.Bind(2, File.ReadAllBytes(asmFile));
statInsert.Step();
statInsert.Reset();
}
}
void _Dispose()
{
_db?.Dispose();
_db = null;
}
/// <summary>
/// Creates documentation provider for assembly <i>asmPath</i>.
/// Returns null if its xml file does not exist.
/// Returns _DocumentationProvider if xml file is big and found or successfully created and successfully loaded database for it.
/// Else returns XmlDocumentationProvider.
/// </summary>
public static DocumentationProvider Create(string asmPath)
{
if (s_d.TryGetValue(asmPath, out var dp))
{
return(dp);
}
var xmlPath = Path.ChangeExtension(asmPath, "xml");
if (!AFile.GetProperties(xmlPath, out var px))
{
return(null);
}
if (px.Size >= 10_000)
{
var md5 = new Au.Util.AHash.MD5(); md5.Add(xmlPath.Lower());
var dbPath = AFolders.ThisAppTemp + md5.Hash.ToString() + ".db";
try {
if (!AFile.GetProperties(dbPath, out var pd) || pd.LastWriteTimeUtc != px.LastWriteTimeUtc)
{
//ADebug.Print($"creating db: {asmPath} -> {dbPath}");
AFile.Delete(dbPath);
using (var d = new ASqlite(dbPath)) {
using var trans = d.Transaction();
d.Execute("CREATE TABLE doc (name TEXT PRIMARY KEY, xml TEXT)");
using var statInsert = d.Statement("INSERT INTO doc VALUES (?, ?)");
var xr = AExtXml.LoadElem(xmlPath);
foreach (var e in xr.Descendants("member"))
{
var name = e.Attr("name");
//remove <remarks> and <example>.
foreach (var v in e.Descendants("remarks").ToArray())
{
v.Remove();
}
foreach (var v in e.Descendants("example").ToArray())
{
v.Remove();
}
using var reader = e.CreateReader();
reader.MoveToContent();
var xml = reader.ReadInnerXml();
//AOutput.Write(name, xml);
statInsert.BindAll(name, xml).Step();
statInsert.Reset();
}
trans.Commit();
d.Execute("VACUUM");
}
File.SetLastWriteTimeUtc(dbPath, px.LastWriteTimeUtc);
}
var db = new ASqlite(dbPath, SLFlags.SQLITE_OPEN_READONLY); //never mind: we don't dispose it on process exit
s_d[asmPath] = dp = new _DocumentationProvider {
_db = db
};
return(dp);
}
catch (Exception ex) { ADebug.Print(ex.ToStringWithoutStack()); }
}
return(XmlDocumentationProvider.CreateFromFile(xmlPath));
}
static void _CreateDoc(string dbFile, string dir1, string dir2)
{
AFile.Delete(dbFile);
using var d = new ASqlite(dbFile, sql: "PRAGMA page_size = 8192;"); //8192 makes file smaller by 2-3 MB.
using var trans = d.Transaction();
d.Execute("CREATE TABLE doc (name TEXT PRIMARY KEY, xml TEXT)");
using var statInsert = d.Statement("INSERT INTO doc VALUES (?, ?)");
using var statDupl = d.Statement("SELECT xml FROM doc WHERE name=?");
var haveRefs = new List <string>();
var uniq = new Dictionary <string, string>(); //name -> asmName
//using var textFile = File.CreateText(Path.ChangeExtension(dbFile, "txt")); //test. Compresses almost 2 times better than db.
_AddDir(dir1, "WindowsBase");
_AddDir(dir2);
statInsert.BindAll(".", string.Join("\n", haveRefs)).Step();
trans.Commit();
d.Execute("VACUUM");
AOutput.Write("Created " + dbFile);
void _AddDir(string dir, params string[] skip)
{
foreach (var f in AFile.EnumDirectory(dir))
{
if (f.IsDirectory)
{
continue;
}
if (!f.Name.Ends(".xml", true))
{
continue;
}
var asmName = f.Name.RemoveSuffix(4);
if (skip.Contains(asmName))
{
continue;
}
if (!AFile.ExistsAsFile(dir + asmName + ".dll"))
{
AOutput.Write("<><c 0x808080>" + f.Name + "</c>");
continue;
}
_AddFile(asmName, f.FullPath);
//break;
}
}
void _AddFile(string asmName, string xmlFile)
{
//AOutput.Write(asmName);
haveRefs.Add(asmName);
var xr = AExtXml.LoadElem(xmlFile);
foreach (var e in xr.Descendants("member"))
{
var name = e.Attr("name");
//remove <remarks> and <example>. Does not save much space, because .NET xmls don't have it.
foreach (var v in e.Descendants("remarks").ToArray())
{
v.Remove();
}
foreach (var v in e.Descendants("example").ToArray())
{
v.Remove();
}
using var reader = e.CreateReader();
reader.MoveToContent();
var xml = reader.ReadInnerXml();
//AOutput.Write(name, xml);
//textFile.WriteLine(name); textFile.WriteLine(xml); textFile.WriteLine("\f");
if (uniq.TryGetValue(name, out var prevRef))
{
if (!statDupl.Bind(1, name).Step())
{
throw new AuException();
}
var prev = statDupl.GetText(0);
if (xml != prev && asmName != "System.Linq")
{
AOutput.Write($"<>\t{name} already defined in {prevRef}\r\n<c 0xc000>{prev}</c>\r\n<c 0xff0000>{xml}</c>");
}
statDupl.Reset();
}
else
{
statInsert.BindAll(name, xml).Step();
uniq.Add(name, asmName);
}
statInsert.Reset();
}
}
}
