Jump to content

Remove elements from array with arraysearch


Recommended Posts

Hi, i'm currently facing problems with understanding how arrays work, or atleast a few commands that alter arrays.

My current situation is:

1. I'm taking the process list and putting it all in an array
2. I want to remove the boring common windows processes
3. Profit

And i'm currently stuck on step 2, while i already found this thread it dosn't seem that i can make it do what i want.

Current code:

Local $PList = ProcessList()
Local $RL[6] = ["smss.exe", "csrss.exe", "svchost.exe", "iexplore.exe", "chrome.exe", "conhost.exe"]
Sleep(1)
For $i=1 To Ubound($RL)-1
   Sleep(1)
   While Not @Error
   $iIndex = _ArraySearch($PList, $RL[$i], 1, 0, 0, 1)
   _ArrayDelete($PList, $iIndex)
   WEnd
Next

It seems to remove all but smss.exe from the array list unless i have it two times in the array.

 

Note: The sleep(1) is there to clear the error else the command wont fire for the rest of the array, any other way of doing it?

Link to post
Share on other sites

Also, you should do it this way instead.

For $i=Ubound($RL)-1 to 0 Step -1

Otherwise,  you'll find out you're deleting the wrong elements very quickly.

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Link to post
Share on other sites
13 hours ago, BrewManNH said:

Also, you should do it this way instead.

For $i=Ubound($RL)-1 to 0 Step -1

Otherwise,  you'll find out you're deleting the wrong elements very quickly.

Thanks, i found out that it's going to be a hassel to remove all the processes i don't want in my array. So i was thinking if there is there a way to remove everything in my array that dosn't match another array?

Link to post
Share on other sites

Try this:

Local $PList = ProcessList()
;~ _ArrayDisplay($PList)
Local $RL = ["smss", "csrss", "svchost", "iexplore.exe", "chrome", "conhost"]
Local $sTabooP = "(?i)((?:" & _ArrayToString($RL) & ")(?:\.exe)?\*?)"
Local $sProc
For $i = 1 To UBound($PList) - 2
    $sProc &= $PList[$i][0] & '*'       ; use * as séparator
Next
$sProc &= $PList[$i][0]     ; no final séparator

Local $sUserP = StringRegExpReplace($sProc, $sTabooP, "")
Local $aUserP = StringSplit($sUserP, '*', 2)
_ArrayDisplay($aUserP)

 

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)

Link to post
Share on other sites
13 minutes ago, jchd said:

Try this:

Local $PList = ProcessList()
;~ _ArrayDisplay($PList)
Local $RL = ["smss", "csrss", "svchost", "iexplore.exe", "chrome", "conhost"]
Local $sTabooP = "(?i)((?:" & _ArrayToString($RL) & ")(?:\.exe)?\*?)"
Local $sProc
For $i = 1 To UBound($PList) - 2
    $sProc &= $PList[$i][0] & '*'       ; use * as séparator
Next
$sProc &= $PList[$i][0]     ; no final séparator

Local $sUserP = StringRegExpReplace($sProc, $sTabooP, "")
Local $aUserP = StringSplit($sUserP, '*', 2)
_ArrayDisplay($aUserP)

 

This looks kind of caotic, mind explaining what to expect from this?

Link to post
Share on other sites

You asked for a solution to your problem and I provided a fairly good one. Did you at least bother to run it?

The idea is to avoid O(n*m) array lookup and m*ArrayDelete. First a list of processes is grabbed, then we build a string of process names delimited by * which can't be found in process names. The list of processes you don't want to see is also converted into a string, each being separated by |which is suited for a regexp pattern. It even makes the .exe suffix optional in taboo list, as you would have noticed if you had taken a few seconds to look at the code.

We now use the power of a regular expression to remove any taboo name from the process list, convert what remains back to an array and display it.

So care to explain what is "caotic" there?

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)

Link to post
Share on other sites

@jcHD You are already using _ArrayToString why not for plist as well?

#include <array.au3>
;Local $PList = ProcessList()
;Local $sProc
;~ _ArrayDisplay($PList)
Local $RL = ["smss", "csrss", "svchost", "iexplore.exe", "chrome", "conhost"]
Local $sTabooP = "(?i)((?:" & _ArrayToString($RL) & ")(?:\.exe)?\*?)"
Local $sProc = _ArrayToString(ProcessList(),"|",1, Default,"*",0,0)
#cs
For $i = 1 To UBound($PList) - 2
    $sProc &= $PList[$i][0] & '*'       ; use * as séparator
Next
$sProc &= $PList[$i][0]     ; no final séparator
#ce
Local $sUserP = StringRegExpReplace($sProc, $sTabooP, "")
Local $aUserP = StringSplit($sUserP, '*', 2)
_ArrayDisplay($aUserP)
#include <array.au3>
Local $RL = ["smss", "csrss", "svchost", "iexplore.exe", "chrome", "conhost"]
Local $sTabooP = "(?i)((?:" & _ArrayToString($RL) & ")(?:\.exe)?\*?)"
Local $sProc = _ArrayToString(ProcessList(),"|",1, Default,"*",0,0)
Local $sUserP = StringRegExpReplace($sProc, $sTabooP, "")
Local $aUserP = StringSplit($sUserP, '*', 2)
_ArrayDisplay($aUserP)

 

Edited by Bilgus
Link to post
Share on other sites

Because the process list is a 2D array, with process name and PID. I've examplified how to obtain the list on non-taboo process names only, but it's a trivial change to obtain both the names and their PID. I didn't have AutoIt handy to check which parameters to pass to _ArrayToString to obtain the same result.

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)

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
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By TheAlienDoctor
      Hi, I was looking into creating a script that would detect if a file exists, then move it (and in some cases rename it, depending on the file) as well as write to a log file.
      The issue is, there is a lot of files that need to be moved, sometimes some files will exist and others won't depending on the use-case. However if a file does exist, it will always be going into the same directory with the same name.
      Currently I have an array nested inside of the array, with each array inside that array having both the old and new directory, and then a For loop to actually run through and do the file transferring. The issue I am having is how to call the Array inside of the array, because how do I specify  which the old directory is and which the new is?
      Global $FileTransfer[2000] = [Global $Dir1[2] = ["original dir 1", "new dir 1"], Global $Dir2[2] = ["original dir 2", "new dir 2"]] For $FileTransfer = [0] To [1] Step +1 If FileExists({original dir}) Then FileMove({original dir}, new dir, 1) FileOpen("log.latest.txt", 1) FileWrite("log.latest.txt", "{original dir} found, moved it to new dir." & @CRLF) FileClose("log.latest.txt") Else FileOpen("log_latest.txt", 1) FileWrite("log_latest.txt", "{original dir} not found, ignoreing it." & @CRLF) FileClose("log_latest.txt") EndIf Next I have put what I want the old and new directory to be for each array in {}, so hopefully its easier to tell which part is working and whats not.

      I am still reasonably new to AutoIT, any help is appreciated. Thankyou
    • By arunkw
      I have a spreadsheet - daily routine which has two columns: activity and time as shown here
      | Activity             | Time     | |----------------------|----------| | Sleep               |  6:00 am | | Toilet              |  6:15 am | | Get ready for gym  |  6:30 am | | Exercise            |  7:50 am | | ... more things      |  9:00 pm | | ... still more       | 10:45 pm | | Sleep               |  6:00 am |   I wanted to find out, say in C1 which activity is current for me using now() I.e., if it’s 6:45am on my watch, it should show me Exercise  in C1 Thanks to Adam D. PE, this formula works like magic to get the result =VLOOKUP(MOD(NOW(),1),{B2:B,A2:A},2,1)   Now, I want to reproduce same result in autoit, how to do that? To have easy solution say, I copy-paste spreadsheet data in array directly in code, right? Use for loop and run the above vlookup function and show the answer using tooltip. How to achieve this? please help.  
    • By goku200
      I have an Autoit script that lists files from a folder into an array list. Is there a way to separate the filenames by an underscore and include the id, version, name and date into separate columns in Excel.
      Example of filename:
      12345_v1.0_TEST Name [12345]_01.01.2022.html
      12345 would be in one column
      v1.0 would be in another column
      TEST Name [12345] would be in another column
      01.01.2022 would be in another column
      .html would be in another column
      Note: filenames always change each day.
      Here is my code that lists the files into column C and then writes the column Headers into Column D, E, F, G. Just need some help with separating them into columns by the _ delimiter
       
    • By mLipok
      Usually when I collect data from DataBase I need to give EndUser a possibility to select rows which should be taken in the processing loop.
      I was searching on the forum and I'm not able to find any UDF or even example of how to select data from array.
      I have my own solutions but I think they are not worth posting on the forum as it is very old code and I am looking for a better solution.

      Could anybody point me to some examples/solutions ?

      Thank you in advance.
      @mLipok
    • By EmilyLove
      I have a string containing the full path of an executable and an array of executables without their paths. I am trying to compare the string to the list in the array and if a match is found, remove it from the array. The entry get removed from the array successfully, and after checking its return result, uses it to update the ubound if it succeeded, but it doesn't want to update to the new value. Any ideas what I am doing wrong? It acts like it is read-only.
      #include <Array.au3> #include <File.au3> Local $sApp_Exe = "F:\App\Nextcloud\nextcloud.exe" Local $aWaitForEXEX = [3, "Nextcloud.exe", "nextcloudcmd.exe", "QtWebEngineProcess.exe"] For $h = 1 To $aWaitForEXEX[0] If StringInStr($sApp_Exe, $aWaitForEXEX[$h]) <> 0 Then $iRet = _ArrayDelete($aWaitForEXEX, $h) If $iRet <> -1 Then $aWaitForEXEX[0] = $iRet ;this line doesn't work. $aWaitForEXEX[0] doesn't update and shortly gives Error: Array variable has incorrect number of subscripts or subscript dimension range exceeded.: _ArrayDisplay($aWaitForEXEX) EndIf Next  
×
×
  • Create New...