Comment puis-je détecter si j'installe sur un serveur Terminal Server dans un script InnoSetup?

Question

Mon installation doit se comporter légèrement différemment lorsque le programme est installé sur un serveur Terminal Server. Je sais environ GetSystemMetrics(SM_REMOTESESSION) mais pour autant que j'ai compris cela me dira seulement si je cours dans une session RDP. Il ne serait pas attraper le cas où l'administrateur du serveur est connecté localement pour installer le logiciel, ou le ferait-il?

La vérification du service Terminal Server ne semble pas viable, car elle s'exécute également sur les postes de travail lorsque le Bureau à distance a été activé. J'ai besoin de différencier cela d'un vrai TS qui permet plusieurs sessions d'ouverture de session simultanées.

N'existe-t-il aucun autre service ou clé de registre que je vérifie?

Answer 1

Grâce au lien fourni par Magnus Skog, j'ai découvert que InnoSetup supporte déjà la fonction API GetWindowsVersionEx.Par conséquent, tout ce que je devais faire était le suivant:

function IsRunningOnTS: Boolean; 
var 
    lWinVer: TWindowsVersion; 
begin 
    GetWindowsVersionEx(lWinVer); 
    Result := (lWinVer.SuiteMask and VER_SUITE_TERMINAL) <> 0; 
end; 

Je l'ai testé avec succès ce pour les scénarios suivants:

• connecté localement à un poste de travail de XP avec RDP activé (retours False)
• connecté à distance à un Terminal Server via RDP (renvoie True)
• connecté à distance à un poste de travail via RDP (renvoie False)

Je n'ai pas encore eu l'occasion de tester en étant connecté localement sur un TS. Mettra à jour ce poste quand je l'ai.

Answer 2

C'est exactement ce dont vous avez besoin:

Detecting Whether Terminal Services Is Installed

Notez que, en plus de cela, vous pouvez utiliser pour déterminer la valeur de GetVersion() si vous êtes du tout en cours d'exécution NT. Si ce n'est pas NT puis renflouer.

// Are we running Windows NT? 
DWORD dwVersion = GetVersion(); 
if (!(dwVersion & 0x80000000)) { 
    // Is it Windows 2000 or greater? 
    if (LOBYTE(LOWORD(dwVersion)) > 4) { 
     // Check with VerSetConditionMask() and VerifyVersionInfo() 
     return ..; 
    } 
    else { 
     // Windows NT 4.0 or earlier. Check ProductSuite value in 
     // HKLM\\System\\CurrentControlSet\\Control\\ProductOptions 
     return ..; 
    } 
} 

return false; 

Le lien montre le code que vous devez interroger si la version est Win2K ou plus tard

Answer 3

Je devine que cette question a un potentiel pour de nombreuses réponses, toutes sembleront peu satisfaisante.

Par exemple, quels sont les scénarios possibles:

• Workstation, avec RDP activé (par exemple XP avec l'aide à distance activée.)
• Server, avec RDP activé (faciles à distinguer d'un poste de travail en cochant la Type d'OS)

Toutefois, qu'en est-il d'un serveur sur lequel l'option RDP est activée, mais qui n'est pas utilisée? Que pensez-vous d'un serveur sur lequel l'option RDP est activée, mais l'administrateur installe votre logiciel sur la console, à une heure de la journée où personne n'est connecté via RDP? Vous ne seriez pas en mesure de déterminer si le serveur est réellement utilisé, RDP-sage, ou pas.

La meilleure façon de vous donner une réponse concrète est de vous demander pourquoi vous devez le déterminer? Quel type de fonctionnalité allez-vous activer ou désactiver si vous étiez en mesure de détecter de manière fiable cela?