[Solved]Is it possible for a console program, to detect if being run as 'su'?!?

[cdbc]

Hi
Is there any way, a console program can detect if it's being run as 'superuser'?
If so, how?
This question is mainly about Linux, but could be interesting to about winders too...
Regards Benny

[Zvoni]

Maybe here?
https://serverfault.com/questions/568627/can-a-program-tell-it-is-being-run-under-sudo

[cdbc]

Hi
Thanks @Zvoni 
...and the answer is:

Code: Pascal  [Select][+][-]

1. uses ..., baseunix;
2.   ...
3.   IsRoot:= (FpGetuid = 0);
4.   ...
5.  

Regards Benny

[myisjwj]

https://www.cnblogs.com/jwjss/p/17914594.html

[Thaddy]

Windows is a bit more cumbersome:

Code: Pascal  [Select][+][-]

1. {$mode objfpc}
2. uses windows;
3.  
4. function IsRunningAsAdmin: Boolean;
5. var
6.   hToken: THandle = 0;
7.   pElevation: TOKEN_ELEVATION;
8.   dwSize: DWORD = SizeOf(TOKEN_ELEVATION);
9. begin
10.   Result := False;
11.   if OpenProcessToken(GetCurrentProcess, TOKEN_QUERY, hToken) then
12.     if GetTokenInformation(hToken, TokenElevation, @pElevation, dwSize, dwSize) then
13.     begin  
14.       Result := pElevation.TokenIsElevated <> 0;
15.       CloseHandle(hToken);
16.     end;
17. end;
18. begin
19.   writeln(isrunningasadmin);
20. end.

[marcov]

Windows is a bit more cumbersome:

Code: Pascal  [Select][+][-]

1. [/quote]
2.  
3. No it is not.
4.  
5. [code=pascal]
6. uses winutils;
7.  
8. begin
9.   result:=IsWindowsAdmin();
10. end;
11.  

[Thaddy]

Maybe, but my code is much more concise than the convoluted code in winutils.
Has also less dependencies.
It is also a straight port from C on msdn.

[Kays]

You should not “detect” whether your console program is su’d, but simply access the resources that require elevated privileges. Specifically Linux has capabilities(7) that allow non‑root users to perform certain administrative tasks, so testing for a zero UID may give false negatives. Or it just may happen that the file permissions mode is very liberal, so being root isn’t required at all.