Jump to content
Sign in to follow this  
nullschritt

Save INI data to exe. (while open)

Recommended Posts

nullschritt

Hello all, this script(wrapper) uses Alternative Data Streams to store INI formatted data in the active executable even while it is running. This is great for standalone executables, or storing data you don't want a user being able to edit!

There are four simple commands:

Func _iniwrite($section, $key, $value, $stream = "DEFAULT")
    return IniWrite(@ScriptFullPath&":"&$stream, $section, $key, $value)
EndFunc

Func _iniread($section, $key, $default = "", $stream = "DEFAULT")
    return IniRead(@ScriptFullPath&":"&$stream, $section, $key, $default)
EndFunc

Func _inidelete($section, $key = "", $stream = "DEFAULT")
    if $key <> "" Then
    Return IniDelete(@ScriptFullPath&":"&$stream, $section, $key)
Else
    Return IniDelete(@ScriptFullPath&":"&$stream, $section)
    EndIf
EndFunc

Func _inirenamesection($section, $newsection, $flag = 0, $stream = "DEFAULT")
    return IniRenameSection(@ScriptFullPath&":"&$stream, $section, $newsection, $flag)
EndFunc

Simply copy and paste these functions into your script!

Edited by nullschritt
  • Like 3

Share this post


Link to post
Share on other sites
nullschritt

Struggling here to think of a use.

To me, you might as well use regular variables.

Unless I'm missing something.

I personally use the method to store product keys of programs which require an active subscription to work.

Not to mention it quite literally associates the data with the exe, so programs that store user data can be made completley standalone, and still have redundant setting storage.

And there's also the fact that the user can't delete or edit the data directly, so as not to cause any errors by invalid config settings.

I know it's a really simple wrapper, but it does have practical uses.

Share this post


Link to post
Share on other sites
guinness

Of course this has its limitations.


UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Share this post


Link to post
Share on other sites
nullschritt

Of course this has its limitations.

Yes, Alternative Data Streams only work with NTFS file system (which is can be a positive as well as a negative) [data is lost when the file is copied to another pc] *(under MOST conditions)

But that's the only "limitation" I can think of (:

Share this post


Link to post
Share on other sites
stealthmsgr

Thanks for submitting this. I have used INI's off and on. I have hidden them within the OS or create a temp INI and then kill if off. This makes it much more straightforward.

Cheers.

Share this post


Link to post
Share on other sites
joseLB

As I know nothing about Alternative Data Streams, if the idea is what I think it is, it could be a great and simple way to store .ini at the .exe

1- how do I embeb my ini lines at the .exe, supposing I have a previous .ini? This data becomes part of the .exe?

2- once embebed it will stay there? Even betwen runs?

3- if I copy this .exe to another PC, you told that the data will not be at the other PC. Can you tell why?

Thanks

Jose

Share this post


Link to post
Share on other sites
jchd

joseLB,

googling "Alternative Data Streams" would answer all your 3 questions, and more.


This wonderful site allows debugging and testing regular expressions (many flavors available). An absolute must have in your bookmarks.
Another excellent RegExp tutorial. Don't forget downloading your copy of up-to-date pcretest.exe and pcregrep.exe here
RegExp tutorial: enough to get started
PCRE v8.33 regexp documentation latest available release and currently implemented in AutoIt beta.

SQLitespeed is another feature-rich premier SQLite manager (includes import/export). Well worth a try.
SQLite Expert (freeware Personal Edition or payware Pro version) is a very useful SQLite database manager.
An excellent eBook covering almost every aspect of SQLite3: a must-read for anyone doing serious work.
SQL tutorial (covers "generic" SQL, but most of it applies to SQLite as well)
A work-in-progress SQLite3 tutorial. Don't miss other LxyzTHW pages!
SQLite official website with full documentation (may be newer than the SQLite library that comes standard with AutoIt)

Share this post


Link to post
Share on other sites
nullschritt

As I know nothing about Alternative Data Streams, if the idea is what I think it is, it could be a great and simple way to store .ini at the .exe

1- how do I embeb my ini lines at the .exe, supposing I have a previous .ini? This data becomes part of the .exe?

2- once embebed it will stay there? Even betwen runs?

3- if I copy this .exe to another PC, you told that the data will not be at the other PC. Can you tell why?

Thanks

Jose

1)If you want to copy a previous INI to the exe, you will have to write a code to read the previous ini file then write then to current exe using some sort of loop. The data is not actually stored inside the executable code, but rather along side it.

2)Yes the data is persistent between runs.

3)The data is only lost when the exe file is copied to a filesystem which doesnt support Alternative Data Streams (webservers, most flash drives, and discs)

Ex: Copying from point A to point B on the same pc wouldnt cause data loss, but coping from pc1 to pc2 would.

Hope this helps!

Edited by nullschritt

Share this post


Link to post
Share on other sites
JohnOne

2)Yes the data is persistent between runs.

Now that's a decent use for this.

EDIT:

For example if you wanted to invisibly keep track of how many times a user runs your script.

Edited by JohnOne

AutoIt Absolute Beginners    Require a serial    Pause Script    Video Tutorials by Morthawt   ipify 

Monkey's are, like, natures humans.

Share this post


Link to post
Share on other sites
FireFox

Nice idea :)


 

OS : Win XP SP2 (32 bits) / Win 7 SP1 (64 bits) / Win 8 (64 bits) | Autoit version: latest stable / beta.
Hardware : Intel(R) Core(TM) i5-2400 CPU @ 3.10Ghz / 8 GiB RAM DDR3.

My UDFs : Skype UDF | TrayIconEx UDF | GUI Panel UDF | Excel XML UDF | Is_Pressed_UDF

My Projects : YouTube Multi-downloader | FTP Easy-UP | Lock'n | WinKill | AVICapture | Skype TM | Tap Maker | ShellNew | Scriptner | Const Replacer | FT_Pocket | Chrome theme maker

My Examples : Capture toolIP Camera | Crosshair | Draw Captured Region | Picture Screensaver | Jscreenfix | Drivetemp | Picture viewer

My Snippets : Basic TCP | Systray_GetIconIndex | Intercept End task | Winpcap various | Advanced HotKeySet | Transparent Edit control

 

Share this post


Link to post
Share on other sites
joseLB

1)If you want to copy a previous INI to the exe, you will have to write a code to read the previous ini file then write then to current exe using some sort of loop. The data is not actually stored inside the executable code, but rather along side it.

2)Yes the data is persistent between runs.

3)The data is only lost when the exe file is copied to a filesystem which doesnt support Alternative Data Streams (webservers, most flash drives, and discs)

Ex: Copying from point A to point B on the same pc wouldnt cause data loss, but coping from pc1 to pc2 would.

Hope this helps!

Thanks nullscritt, it become clear

Do you think there is a way to include the .ini, and also images/icons, (used in gui´s for example) and even sounds in the .exe?

I mean, to have just one file (.exe) with all these items, so if I send this .exe file, for example, zipped thru an email, it will work?

Better, if I do not have to modify my gui created with Koda, for example

Thanks

Jose

Share this post


Link to post
Share on other sites
Synix

Sorry about me posting in this old thread but... wow I never knew about this, thanks for sharing!

Here is my more complete version of it, also supporting non-NTFS filesystems through a fallback routine:

#include <WinAPIFiles.au3>

Func _StreamIniDelete($sSection = "", $sKey = Default, $sStream = "DEFAULT")
    If $sSection = "" Then
        ;completely delete ini file stream through winapi (built in filedelete doesn't support it)
        Return _WinAPI_DeleteFile(_StreamIniPath($sStream, 1))
    Else
        Return IniDelete(_StreamIniPath($sStream, 1), $sSection, $sKey)
    EndIf
EndFunc

Func _StreamIniRead($sSection, $sKey, $sDefault, $sStream = "DEFAULT")
    Return IniRead(_StreamIniPath($sStream, 1), $sSection, $sKey, $sDefault)
EndFunc

Func _StreamIniReadSection($sSection, $sStream = "DEFAULT")
    Return IniReadSection(_StreamIniPath($sStream, 1), $sSection)
EndFunc

Func _StreamIniReadSectionNames($sStream = "DEFAULT")
    Return IniReadSectionNames(_StreamIniPath($sStream, 1))
EndFunc

Func _StreamIniRenameSection($sSection, $sNewSection, $iFlag = 0, $sStream = "DEFAULT")
    Return IniRenameSection(_StreamIniPath($sStream), $sSection, $sNewSection, $iFlag)
EndFunc

Func _StreamIniWrite($sSection, $sKey, $sValue, $sStream = "DEFAULT")
    Return IniWrite(_StreamIniPath($sStream), $sSection, $sKey, $sValue)
EndFunc

Func _StreamIniWriteSection($sSection, $vData, $iIndex = 1, $sStream = "DEFAULT")
    Return IniWriteSection(_StreamIniPath($sStream), $sSection, $vData, $iIndex)
EndFunc

Func _StreamIniPath($sStream = "DEFAULT", $iRead = 0)
    Local Static $sBase = ""
    Local $sPath = ""

    If StringLen($sStream) Then
        If $sBase = "" Then
            If DriveGetFileSystem(StringLeft(@ScriptDir, 2)) = "NTFS" Then
                ;current drive is NTFS (supports streams)
                $sBase = @ScriptFullPath
            Else
                ;current drive is not NTFS (no stream support)
                ;fallback to regular path
                $sBase = @TempDir & "\" & @ScriptName
            EndIf
        EndIf
        If $sBase = @ScriptFullPath Then
            $sPath = $sBase & ":" & $sStream
        Else
            ;create directory if necessary
            If Not $iRead And DirGetSize($sBase) = -1 Then DirCreate($sBase)
            $sPath = $sBase & "\" & $sStream & ".ini"
        EndIf
    EndIf

    Return $sPath
EndFunc

One really cool thing is, FileWrite and InetGet also support writing to these alternate data streams, so you could use _StreamIniPath to load a remote standard config directly into your .au3/.exe :D

Edited by Synix
  • Like 2

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Similar Content

    • TheSaint
      By TheSaint
      Here is a simple program that some of you might appreciate.
      It is a more full fleshed out version of something I worked on a while back as a proof of concept.
      I will just quote the information found in the Program Information dialog.

      INItoSQL DB.zip
      INItoSQL DB v1.1.zip  (see Post #3 for update details)
      Program requires the sqlite3.dll, not included, but easily enough obtained.
      I have also included the beginnings of a new UDF (SimpleSQL_UDF) I am working, which you can use with the included 'Check conversion.au3' file to check a resulting conversion ... just modify the values for a few variables to suit your situation.
      I've not yet gotten around to coding a testing/checking results script, so I recommend the following open source program, which I have been using for some time. It was here, but is now here at GitHub - DB Browser for SQLite
    • TheSaint
      By TheSaint
      Here is the bare bones of a UDF I have started work on.
      Mostly just a proof of concept at this stage, and still need to add some functions and dress the UDF up a bit ... to look like a UDF ... though it has my own distinct styling, especially as I have never really developed a UDF before now .... used plenty and modified plenty though. I've even invented my own UDF variable naming convention, which I am sure some of you will be aghast at. I work with what feels best for me, but others are free to adapt if they wish.
      The idea is to emulate the simplicity of INI files, but gain the benefits of SQL.
      Two scripts are provided.
      (1) The UDF, a work in progress - SimpleSQL_UDF.au3
      (2) An example or testing script - UDF_Test.au3
      Another first for me, is creating a 2D array from scratch, never done that before, that I can recall ... never had a need, and even for 1 dimension arrays, for a long time now, I have just used _StringSplit to create them. So I needed a bit of a refresher course, which my good buddy @TheDcoder assisted me with ... not without some angst I might add. LOL
      SimpleSQL_UDF.zip
      Program requires the sqlite3.dll, not included, but easily enough obtained.
      Hopefully the usage is self-evident ... just change the Job number variable in the UDF_Test.au3 file to check the existing functions out.
      Enjoy!
      P.S. This is also related to a new program I have just finished and uploaded - INItoSQL DB
    • nacerbaaziz
      By nacerbaaziz
      hi dears
      am using an ini files as a History
      Sometimes the file size is be larger to 5 MB
      AutoIt does not recognize the full content of the file
      When I did a search to find out why, I discovered that INI files could not be read if they size larger than 64 KB.
      for that I preferred to ask here if is there any way to bypass this obstacle.
      The contents of the file are  as follows
      [filesList]
      c:\...\...\f1.mp3=00:15:20
      c:\...\...\f2.mp3=00:10:20
      c:\...\...\f3.wav=00:59:20
      ....... Etc
      This is the section for reading the file (adapted from my main script)

      case $continue     Local $aArray = IniReadSection($WaitingListFile, StringEncrypt(true, "filesList", $MyPassword))     If Not @error Then Opt("GUICloseOnESC", 1) _GUICtrlListView_DeleteAllItems($scList)         For $i = 1 To $aArray[0][0] $path = path_list(StringEncrypt(false, $aArray[$i][0], $MyPassWord), 1) if FileExists(StringEncrypt(false, $aArray[$i][0], $MyPassWord)) then GUICtrlCreateListViewItem(_GetFileName(FileGetLongName(StringEncrypt(false, $aArray[$i][0], $MyPassWord))) & Opt("GUIDataSeparatorChar") & " : " & Opt("GUIDataSeparatorChar") & FileGetLongName(StringEncrypt(false, $aArray[$i][0], $MyPassWord)), $scList) else $path = $path endIf         Next GUISetState(@sw_disable, $hGUI) GUISetState(@sw_show, $hGUI2) GUICtrlSetState($SClist, $GUI_FOCUS) else if $accessibilitymode = 1 then speak(str("listEmpty")) endIf endIf
      Is there any way to solve this problem, please?
      am waiting your answers...
      Greetings to All
    • AndreasNWWWWW
      By AndreasNWWWWW
      Hi, i'm just curious is there a way to sort an ini file after largest first?
      my inifiles writes itself like this
      14=500
      13=GREY
      12=500
      11=600
      10=600
      9=600
      8=700
      7=700
      5=600
      3=600
      2=800
      1=700
      15=GREY
      4=GREY
       
      but is there a way so i can get it sortet 
      15
      14
      13
      12 
      etc?
    • AndreasNWWWWW
      By AndreasNWWWWW
      Hi, i'm curious if this is even possible, i want to do an action if the ini file contains current values under a section.
      for my test i'm looking for 100,200,300,400,500
      and if any of those excits i want to pop a msgbox with the number in the section.
      i can in my example find one, but it does not check everyone. why?  what am i missing?
      Local $iscore810[5] = [100,200,300,400,500] Local $iMax800 = 5 While 1 ;~     Send("{pause}") ;;func les ini fil     $var = IniReadSection("Area.ini", "modus")     If @error Then         MsgBox(4096, "Error", "Unable to read section.")     Else          For $number = 1 To $var[0][0] If $var[$number][1] == $iscore810[3] Then       MsgBox($MB_SYSTEMMODAL, "FAnt den på", $var[$number][0], 5) EndIf                       Next     EndIf     exit WEnd  
×