/// <summary>
/// Check the correctness of the parameter 'key'
/// </summary>
/// <param name="key">The name of a key in the INI file. (Can't be: null; empty; spaces.)</param>
/// <param name="fileName">The full path of the INI file where write data.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>True if 'section' passes the checks. False otherwise and the callback 'onWarning' is called also.</returns>
internal static bool CheckKey(string key, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
if (key == null)
{
onWarning("key", "Parameter 'key' can't be null. (Use DeleteKey instead.)", fileName);
return(false);
}
else if (key == "")
{
onWarning("key", "Parameter 'key' can't be the empty string. (Use DeleteKey instead.)", fileName);
return(false);
}
else if (key.Trim() == "")
{
onWarning("key", "Parameter 'key' can't be a string of spaces.", fileName);
return(false);
}
else
{
return(true);
}
}
/// <summary>
/// Check the correctness of the parameter 'value' (when it is an array of integer.)
/// </summary>
/// <param name="value">The name of a key in the INI file. (Can't be: null.)</param>
/// <param name="fileName">The full path of the INI file where write data.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>True if 'section' passes the checks. False otherwise and the callback 'onWarning' is called also.</returns>
internal static bool CheckValues(int[] value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
if (value == null)
{
onWarning("value", "Parameter 'value' can't be null. (Use DeleteKey instead).", fileName);
return(false);
}
return(true);
}
/// <summary>
/// Deletes all the keys in a session, without deleting the session.
/// </summary>
/// <param name="section">The name of the section to clear from its keys. (The section will not be removed.)</param>
/// <param name="fileName">The full path of the INI file.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void DeleteKeys(string section, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
try
{
Vi.Profile.Static.DeleteSection(section, fileName, onWarning);
Vi.Profile.Static.Write(section, "Fake", "To bin", fileName, onWarning);
Vi.Profile.Static.DeleteKey(section, "Fake", fileName, onWarning);
}
catch (System.Exception se)
{
onWarning("DeleteKey", se.Message, fileName);
}
}
/// <summary>
/// Deletes everything. (Clears the INI file)
/// </summary>
/// <param name="fileName">The full path of the INI file to clear.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void DeleteAll(string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
try
{
var filenameOK = Vi.Profile.Static.CheckFileName(fileName, onWarning);
if (filenameOK)
{
//Vi.API.Kernel32.WritePrivateProfileString(null, null, null, fileName);
System.IO.File.WriteAllText(fileName, System.String.Empty, Encoding.Unicode);
}
}
catch (System.Exception se)
{
onWarning("FileName", se.Message, fileName);
}
}
/// <summary>
/// Deletes an entire section (all its keys and the section itself) from the INI file.
/// </summary>
/// <param name="section">The name of the section to totally remove from the 'INI file..</param>
/// <param name="fileName">The full path of the INI file.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void DeleteSection(string section, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
try
{
var parametersOk =
Vi.Profile.Static.CheckSection(section, fileName, onWarning) &&
Vi.Profile.Static.CheckFileName(fileName, onWarning);
if (parametersOk)
{
Vi.API.Kernel32.WritePrivateProfileString(section, null, null, fileName);
}
}
catch (System.Exception se)
{
onWarning("DeleteKey", se.Message, fileName);
}
}
/// <summary>
/// Check the correctness of the parameter 'filename' (when it is an array of integer.)
/// </summary>
/// <param name="fileName">The full path of the INI file where write data. Must be a valid full file path and the file must exist.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>True if 'section' passes the checks. False otherwise and the callback 'onWarning' is called also.</returns>
internal static bool CheckFileName(string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
if (fileName == null)
{
onWarning("fileName", "The 'fileName' can't be null.", fileName);
return(false);
}
else if (fileName.IsEmpty())
{
onWarning("fileName", "The 'fileName' can't be the empty string.", fileName);
return(false);
}
else if (fileName.IsSpaces())
{
onWarning("fileName", "The 'fileName' can't be a string of spaces.", fileName);
return(false);
}
if (System.IO.File.Exists(fileName))
{
var isValidExtention =
fileName.EndsWith(".ini", StringComparison.OrdinalIgnoreCase) ||
fileName.EndsWith(".txt", StringComparison.OrdinalIgnoreCase);
if (isValidExtention)
{
return(true);
}
else
{
onWarning("fileName", "The extention of the file: " + fileName + " must be a '.ini / *.txt'.", fileName);
return(false);
}
}
else
{
//System.IO.File.WriteAllText(fileName, String.Empty, System.Text.Encoding.Unicode);
onWarning("fileName", "The File: " + fileName + " has been created.", fileName);
return(true);
}
}
/// <summary>
/// Check the correctness of the parameter 'section'
/// </summary>
/// <param name="section">The name of a section in the INI file. (Can't be: null; empty; spaces.)</param>
/// <param name="fileName">The full path of the INI file where write data.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>True if 'section' passes the checks. False otherwise and the callback 'onWarning' is called also.</returns>
internal static bool CheckSection(string section, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
if (section == null)
{
onWarning("section", "Parameter 'section' can't be null. (Use DeleteSection instead.)", fileName);
return(false);
}
if (section == "")
{
onWarning("section", "Parameter 'section' can't be the empty string. (Use DeleteSection instead.)", fileName);
return(false);
}
if (section.Trim() == "")
{
onWarning("section", "Parameter 'section' can't be a strink of spaces.", fileName);
return(false);
}
return(true);
}
/// <summary>
/// Check the correctness of the parameter 'value' (When it is a string)
/// </summary>
/// <param name="value">The name of a key in the INI file. (Can't be: null; empty; spaces. Any Chr(0) will be removed)</param>
/// <param name="fileName">The full path of the INI file where write data.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>True if 'section' passes the checks. False otherwise and the callback 'onWarning' is called also.</returns>
internal static bool CheckValue(ref string value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
if (value == null)
{
onWarning("value", "Parameter 'value' can't be null. (Use 'DeleteKey' instead.)", fileName);
}
// ===================================================================================== //
// 'WritePrivateProfileString' accepts to write a string of spaces, but
// 'GetPrivateProfileString' does not read key values with spaces. For
// this consistency reason a string of spaces is not accepted (and trimmed).
value = ("" + value).Trim();
// ===================================================================================== //
if (value.IndexOf('\0') > 0)
{
value = value.Replace("\0", " ");
onWarning("value", @"Parameter 'value' contains the 'Chr(0)'. Each 'Chr(0)' has been replaced with a 'space'.", fileName);
}
;
return(true);
}
/// <summary>
/// Writes a 'boolean' in the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void Write(string section, string key, bool value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
Vi.Profile.Static.Write <bool>(section, key, value, fileName, onWarning);
}
/// <summary>
/// Writes a 'System.Drawing.Size' (as an array of integer) in the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void Write(string section, string key, System.Drawing.Size value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
Vi.Profile.Static.Write(section, key, new int[] { value.Width, value.Height }, fileName, onWarning);
}
/// <summary>
/// Reads a DateTime from the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
public static System.DateTime Read(string section, string key, System.DateTime @default, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
return(Vi.Profile.Static.Read(section, key, System.String.Empty, fileName, onWarning).Split(';')[0].ToLong(@default.Ticks).ToDateTime(@default));
}
/// <summary>
/// Writes 'DateTime.Ticks' in the INI file, (Writes also the date in the format "yyyy-MM-dd HH:mm:ss.fff" only to make it human readable. This is ignored.)
/// </summary>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void Write(string section, string key, System.DateTime value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
// {0} contains the value we want to store
// {1} contains the human readable format (will be ignored!)
var text = System.String.Format(@"{0}; {1}", value.Ticks, value.ToString("yyyy-MM-dd HH:mm:ss.fff"));
Vi.Profile.Static.Write <string>(section, key, text, fileName, onWarning);
}
/// <summary>
/// Reads data from the 'INI' using the method 'GetPrivateProfileString'
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="bufferSize">The number of bytes fetched by the method 'GetPrivateProfileString'. If the buffer is not enough to contain all the data. 'GetPrivateProfileString' is acalled again.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
internal static string Read(string section, string key, string @default, int bufferSize, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
try
{
var SUCCESS = -2147024896;
var lengthMax = bufferSize - 2;
char[] characters = new char[bufferSize];
var length = Vi.API.Kernel32.GetPrivateProfileString(section, key, System.String.Empty, characters, characters.Length, fileName);
if (length == 0)
{
var lastError = Marshal.GetHRForLastWin32Error();
if (lastError == SUCCESS)
{
return(System.String.Empty);
}
else
{
var message = System.String.Format("Error: {0} executing 'GetPrivateProfileString' for section = {1}, key {2}.", lastError, section, key);
onWarning("key", message, fileName);
return(@default);
}
//else { Marshal.ThrowExceptionForHR(lastError); }
}
else if (length > 0 && length < lengthMax)
{
int _length = (int)Math.Min(length, int.MaxValue);
return(new string(characters, 0, _length));
}
else //if (length >= lengthMax && length < bufferSize)
{
return(Vi.Profile.Static.Read(section, key, @default, bufferSize * 2, fileName, onWarning));
}
}
catch (System.Exception se)
{
onWarning("method", se.Message, fileName);
return(@default);
}
}
/// <summary>
/// Writes a 'string' in the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void Write(string section, string key, string value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
// Checks if value is null and removes chr(0) from the string.
Vi.Profile.Static.CheckValue(ref value, fileName, onWarning);
// 'Comments' are not allowed when the value is a string.
Vi.Profile.Static.Write <string>(section, key, value, fileName, onWarning);
}
/// <summary>
/// This is the 'method' used by all the other version of the method 'Write'
/// </summary>
/// <typeparam name="T">Can by any type with the method 'ToString'.</typeparam>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
private static void Write <T>(string section, string key, T value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
var parametersOk =
Vi.Profile.Static.CheckSection(section, fileName, onWarning) &&
Vi.Profile.Static.CheckKey(key, fileName, onWarning) &&
Vi.Profile.Static.CheckFileName(fileName, onWarning);
if (parametersOk)
{
// ==================================================================================== //
// The function 'Vi.API.Kernel32.WritePrivateProfileString' a strange
// behaviour: spaces at the end of the value spaces are not removed.
// If you write 3 time the string "abc " ('abc' plus 2 spaces) you
// got in the 'INI' file the string "abc " ('abc' plus 6 spaces).
//
// To correct this behaviour the key is removed every time an assignment is made.
Vi.Profile.Static.DeleteKey(section, key, fileName, onWarning);
// ==================================================================================== //
Vi.API.Kernel32.WritePrivateProfileString(section, key, value.ToString(), fileName);
}
}
/// <summary>
/// Reads a 'System.Drawing.Point' from the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
public static System.Drawing.Size Read(string section, string key, System.Drawing.Size @default, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
var values = Vi.Profile.Static.Read(section, key, new int[2] {
@default.Width, @default.Height
}, fileName, onWarning);
return(new System.Drawing.Size(values[0], values[1]));
}
/// <summary>
/// Reads a 'System.Drawing.Point' from the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
public static System.Drawing.Point Read(string section, string key, System.Drawing.Point @default, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
var values = Vi.Profile.Static.Read(section, key, new int[2] {
@default.X, @default.Y
}, fileName, onWarning);
return(new System.Drawing.Point(values[0], values[1]));
}
/// <summary>
/// Reads an array of integer from the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
public static int[] Read(string section, string key, int[] @default, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
return(Vi.Profile.Static.Read(section, key, System.String.Empty, fileName, onWarning).ToInt(separator: ':', @default));
}
/// <summary>
/// Writes an array of integer separated by ';' in the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void Write(string section, string key, int[] values, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
Vi.Profile.Static.Write <string>(section, key, System.String.Join(":", values), fileName, onWarning);
}
/// <summary>
/// Writes a 'System.Drawing.Point' (as an array of integer) in the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be writed. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="value">The value to write in the INI file.</param>
/// <param name="fileName">The full path of the INI file where write data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
public static void Write(string section, string key, System.Drawing.Point value, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
Vi.Profile.Static.Write(section, key, new int[] { value.X, value.Y }, fileName, onWarning);
}
/// <summary>
/// Reads a string from the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
public static string Read(string section, string key, string @default, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
var parametersOk =
Vi.Profile.Static.CheckSection(section, fileName, onWarning) &&
Vi.Profile.Static.CheckKey(key, fileName, onWarning);
int bufferSize = 64;
return((parametersOk) ? Vi.Profile.Static.Read(section, key, @default, bufferSize, fileName, onWarning) : @default);
}
/// <summary>
/// Reads a long from the INI file.
/// </summary>
/// <param name="section">The name of the section to which the string will be read. If null the callback 'onWarning' will be called.</param>
/// <param name="key">The name of the 'key' (in a 'section') from where read data. If null the callback 'onWarning' will be called.</param>
/// <param name="default">The return value in case something goes wrong.</param>
/// <param name="fileName">The full path of the INI file from which read data. If null the callback 'onWarning' will be called.</param>
/// <param name="onWarning">The callback used to manage exceptions.</param>
/// <returns>The data read from the INI file. '@default' if something whent wrong. (This method should't raise any exception).</returns>
public static long Read(string section, string key, long @default, string fileName, Vi.Profile.Static.WarningDelegate onWarning)
{
return(Vi.Profile.Static.Read(section, key, System.String.Empty, fileName, onWarning).ToLong(@default));
}
