; Module/File:     System_GetNamedProcessId.pb
; Function:        Get the ID(s) of a named, running process - Linux
; Author:          Omi
; Date:            Aug. 25, 2015
; Version:         0.2
; Target Compiler: PureBasic 5.22/5.31/5.4/5.6
; Target OS:       Linux: (X/K/L)ubuntu, Mint, 32/64, Ascii/Uni
;--------------------------------------------------------------


Global.i ProgramID
Global.s ProgramOutput, NamedProcess= "PB5.46";"purebasic"

Global ProgramID = RunProgram("pidof", NamedProcess, "", #PB_Program_Open | #PB_Program_Read)

If ProgramID
	While ProgramRunning(ProgramID)
		If AvailableProgramOutput(ProgramID)
			ProgramOutput + ReadProgramString(ProgramID) + #CR$
		EndIf
	Wend
	
	CloseProgram(ProgramID)
	
	Debug "ID(s) of " + NamedProcess + " = " + ProgramOutput
	Debug "Instances of " + NamedProcess + ": " + Str(CountString(ProgramOutput, " ")+ 1)
EndIf
; IDE Options = PureBasic 5.46 LTS (Linux - x86)
; CursorPosition = 4
; EnableUnicode
; EnableXP