possible de fixer un nom de machine par DHCP ?

possible de fixer un nom de machine par DHCP ? - Réseaux - Réseaux grand public / SoHo

Marsh Posté le 30-03-2007 à 15:21:12    

'lut
 
Je cherche à savoir si c'est possible de fixer un nom de machine par DHCP, de la même manière que l'on fixe une adresse IP.
Sous Win 2k serveur, dans les options de DHCP, il y a "012 nom de l'hôte - nom d'hôte pour client". J'ai testé mais sans succès...
 
Sinon, comment changer le nom de machine via la BdR ? Je suppose que c'est possible, mais quelle est la clé exactement, j'ai bien entendu fait une recherche, mais plusieurs clés correspondent au nom de la machine. Avant de faire différents tests, et très certainement de mettre en vrac la machine-test de mon réseau, qqun peut-il m'aider un peu ? :)
 
Merci d'avance.
 
Ps: Réseau Win 2k advanced server sous AD avec machines Win 2k liées au domaine.


---------------
TReVoR - http://dev.arqendra.net - http://info.arqendra.net
Reply

Marsh Posté le 30-03-2007 à 15:21:12   

Reply

Marsh Posté le 30-03-2007 à 15:22:04    

sous windows je ne crois pas sous Linux oui c'est très facile...
 

Reply

Marsh Posté le 31-03-2007 à 22:27:02    

Bon, la solution "via DHCP" semblait ne pas être possible (ou alors détrompez-moi), j'ai commencé mes investigations via une solution batch.
 
Après scan du registre, petit coup de regmon (merci sysinternals.com !!) et qqes recherches googlesques, j'ai isolé 3 clés de la BdR permettant à priori de changer le nom de la machine.
J'ai fais plusieurs tests, et ai comparé avec un changement classique (via Panneau de configuration > Système > Nom de l'ordinateur) et mon batch fait à priori exactement les mêmes modifs.
 
Dans l'optique d'automatiser tout ça, j'ai inclus un reboot :

Code :
  1. @echo off
  3. set clt-pre=CLT
  5. echo No du client :
  6. set /p clt-no=
  8. echo ::::: Modification du nom de l'ordinateur...
  9. reg add "HKLM\SYSTEM\ControlSet001\Services\Tcpip\Parameters" /v Hostname /d %clt-pre%%clt-no% /f > NUL
  10. reg add "HKLM\SYSTEM\ControlSet001\Services\Tcpip\Parameters" /v "NV Hostname" /d %clt-pre%%clt-no% /f > NUL
  11. reg add "HKLM\SYSTEM\ControlSet001\Control\ComputerName\ComputerName" /v ComputerName /d %clt-pre%%clt-no% /f > NUL
  13. echo ::::: Redémarrage de l'ordinateur...
  14. shutdown -r -t 10 -c "Redemarrage de l'ordinateur - Nouveau nom : "%clt-pre%%clt-no% -f


 
... en oubliant pas, pour win2k de récupérer reg.exe et shutdown.exe dans le toolkit 2k.
 
Bon en tout cas, cela marche pour une machine sans domaine (groupe de travail donc), je testerai dans la semaine avec une machine client sous AD.
 
L'idée étant notamment de méga-automatiser :
- récupérer l'IP (attribuée par DHCP)
- extraire le dernier octet pour en faire le "clt-no" (numéro de machine cliente)
 
Par la suite:
- vérifier que le hostname actuel est différent du hostname "pseudo"-automatisé ("CLTxxx avec xxx de son ip A.B.C.xxx)
- si oui alors faires les modifs, sinon ne rien faire
 
Et puis enfin, l'intégrer en script d'ouverture de machine ou de session.
 
Quand je serai grand et que j'aurai le courage, je tenterai de le faire en WSH, ça me donnera une raison de regarder à quoi ça ressemble.
 
A ceux qui se demandent (peut-être) à quoi cela va me servir, l'idée est simplement d'éviter de passer 4 plombes à passer sur chaque machine de mon AD pour la renommer après que j'ai passé tout mon (petit) réseau avec UDPCast.
 
Nb: Oui je sais, il y a certainement des tas de super-solutions professionnelles qui m'éviteraient d'avoir à me faire chier comme ça, mais les dites solutions sont certainement payantes, et je doute que ma "boite" (l'éduc nat) accepte de raquer des softs pour les amusements du prof qui gère la section info. ;)

Message cité 1 fois
Message édité par trevor le 31-03-2007 à 22:29:33

---------------
TReVoR - http://dev.arqendra.net - http://info.arqendra.net
Reply

Marsh Posté le 15-05-2007 à 16:02:35    

Hello,  
 
Le DHCP fixe les adresses IP.  
C'est le DNS qui fixes les nom des machines.
 
A+

Message cité 1 fois
Reply

Marsh Posté le 15-05-2007 à 20:00:36    

m3z a écrit :

Hello,  
 
Le DHCP fixe les adresses IP.  
C'est le DNS qui fixes les nom des machines.
 
A+


 
 
 [:xp1700]

Reply

Marsh Posté le 15-05-2007 à 20:02:28    

trevor a écrit :

Bon, la solution "via DHCP" semblait ne pas être possible (ou alors détrompez-moi), j'ai commencé mes investigations via une solution batch.
 
Après scan du registre, petit coup de regmon (merci sysinternals.com !!) et qqes recherches googlesques, j'ai isolé 3 clés de la BdR permettant à priori de changer le nom de la machine.
J'ai fais plusieurs tests, et ai comparé avec un changement classique (via Panneau de configuration > Système > Nom de l'ordinateur) et mon batch fait à priori exactement les mêmes modifs.
 
Dans l'optique d'automatiser tout ça, j'ai inclus un reboot :

Code :
  1. @echo off
  3. set clt-pre=CLT
  5. echo No du client :
  6. set /p clt-no=
  8. echo ::::: Modification du nom de l'ordinateur...
  9. reg add "HKLM\SYSTEM\ControlSet001\Services\Tcpip\Parameters" /v Hostname /d %clt-pre%%clt-no% /f > NUL
  10. reg add "HKLM\SYSTEM\ControlSet001\Services\Tcpip\Parameters" /v "NV Hostname" /d %clt-pre%%clt-no% /f > NUL
  11. reg add "HKLM\SYSTEM\ControlSet001\Control\ComputerName\ComputerName" /v ComputerName /d %clt-pre%%clt-no% /f > NUL
  13. echo ::::: Redémarrage de l'ordinateur...
  14. shutdown -r -t 10 -c "Redemarrage de l'ordinateur - Nouveau nom : "%clt-pre%%clt-no% -f


 
... en oubliant pas, pour win2k de récupérer reg.exe et shutdown.exe dans le toolkit 2k.
 
Bon en tout cas, cela marche pour une machine sans domaine (groupe de travail donc), je testerai dans la semaine avec une machine client sous AD.
 
L'idée étant notamment de méga-automatiser :
- récupérer l'IP (attribuée par DHCP)
- extraire le dernier octet pour en faire le "clt-no" (numéro de machine cliente)
 
Par la suite:
- vérifier que le hostname actuel est différent du hostname "pseudo"-automatisé ("CLTxxx avec xxx de son ip A.B.C.xxx)
- si oui alors faires les modifs, sinon ne rien faire
 
Et puis enfin, l'intégrer en script d'ouverture de machine ou de session.
 
Quand je serai grand et que j'aurai le courage, je tenterai de le faire en WSH, ça me donnera une raison de regarder à quoi ça ressemble.
 
A ceux qui se demandent (peut-être) à quoi cela va me servir, l'idée est simplement d'éviter de passer 4 plombes à passer sur chaque machine de mon AD pour la renommer après que j'ai passé tout mon (petit) réseau avec UDPCast.
 
Nb: Oui je sais, il y a certainement des tas de super-solutions professionnelles qui m'éviteraient d'avoir à me faire chier comme ça, mais les dites solutions sont certainement payantes, et je doute que ma "boite" (l'éduc nat) accepte de raquer des softs pour les amusements du prof qui gère la section info. ;)


 
 
Le problème dans un domaine, c'est qu'en changeant le nom de la machine, tu doives la rentrer de nouveau dans AD :/
 
Pourquoi ne pas modifier plutôt le champ "description" de la machine ?
T'as combien de postes à changer comme ça ?

Reply

Marsh Posté le 02-07-2007 à 11:31:23    

Bonjour...
 
Je remonte ce topic, après qqes semaines, car j'ai pu résoudre mon pb.
Après diverses recherches, je suis tombé sur diverses solutions (sysprep notamment, bien trop complexe pour mes besoins, et à priori selon certains "pros" pas très optimales), et justement la solution "newsid" de sysinternals.
Mixé avec un script wsh et qqes exemples du site de jc bellamy, je vous livre ici le code, pas très complexe :

Code :
  1. Dim AdrIp
  2. Dim Network
  3. Dim Shell
  4. Dim Message
  5. Dim Computer
  6. Dim HostName
  8. HostName = "Poste"
  9. BaseName = "Domain_"
  11. Set Network = Wscript.CreateObject("WScript.Network" )
  12. Set Shell = Wscript.CreateObject("WScript.Shell" )
  14. wscript.echo "::: Traitement post-Ghost :::" & VBCRLF
  17. computer = Network.ComputerName
  18. 'Computer = "localhost"
  21. wscript.echo "(1/7) Récupération de l'adresse IP" & VBCRLF
  22. on error resume next
  23. set IPConfigSet = GetObject("winmgmts:{impersonationLevel=impersonate}!//" & Computer).ExecQuery _
  24.     ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled=TRUE" )
  26. for each IPConfig in IPConfigSet
  27. AdrIp=IPConfig.IPAddress(0)
  28. 'wscript.echo "  " & IPConfig.Description
  29. wscript.echo "    adresse  MAC   : "  & IPConfig.MACAddress
  30. wscript.echo "    adresse  IP    : " & AdrIp
  31. 'wscript.echo "    passerelle     : "  & IPConfig.DefaultIPGateway
  32. 'wscript.echo "    masque         : "  & IPConfig.IPSubnet
  33. 'wscript.echo "    DNSHostName    : "  & IPConfig.DNSHostName
  34. 'wscript.echo "    serveur DNS    : " & IPConfig.DNSServerSearchOrder(min)
  35. next
  36. wscript.echo VBCRLF
  38. wscript.echo "(2/7) Création d'un nouveau nom à partir de l'adresse IP" & VBCRLF
  39. HostName = HostName & Right(AdrIp, Len(AdrIp) - InStrRev(AdrIp, "." ))
  40. wscript.echo "    nouveau nom d'hôte     : " & HostName
  41. wscript.echo VBCRLF
  43. wscript.echo "(3/7) Modification du nom de machine affiché dans l'écran de veille" & VBCRLF
  44. shell.Run "reg add HKCU\Software\Microsoft\Screensavers\Text3D /v DisplayString /d " & BaseName & HostName & " /f", 0
  45. wscript.echo VBCRLF
  47. wscript.echo "(4/7) Création d'un nouvel SID aléatoire" & VBCRLF
  48. wscript.echo "(5/7) Modification du SID" & VBCRLF
  49. wscript.echo "(6/7) Modification du nom de machine" & VBCRLF
  50. shell.Run "newsid /a /d 10 " & HostName, 1, true
  51. wscript.echo VBCRLF
  53. wscript.echo "(7/7) Redémarrage" & VBCRLF
  54. wscript.echo VBCRLF


En résumé : ce script récupère l'@ IP affectée par DHCP, et l'utilise pour créer un nouveau nom de machine (PosteXX). Accessoirement, je l'utilise aussi pour modifier le texte de l'écran de veille (Domain_PosteXX).
 
Le script peut être amélioré, avec notamment un test primaire global entre l'IP et le nom actuel de la machine afin de faire ou pas les modifs (tjs dans l'idée de l'intégrer à un script d'ouverture de session machine). Il faut quand même éviter de modifier le SID de la machine trop de fois (d'après sysinternals, le changement de SID laisse d'anciennes clefs dans le registre).
 
NB: Je ne suis pas sur que le script fonctionne si la machine possède plusieurs @s IP...
 
 
A lancer dans un .bat avec la commande

Code :
  1. cscript hostname.vbs


afin d'éviter l'affichage des boites de dialogue lorsqu'exécuté avec un wscript (comportement par défaut sous win, mais modifiable, voir le site de jc bellamy)
 
 
m3z : DNS fixe les noms ? :)... va falloir réviser un peu plus sérieusement
 
ShonGail : Ta remarque était très juste, car j'avais justement testé mon précédent script dans mon domaine en observant qu'effectivement ça ne marchait à cause de ce côté "intégration au AD"
Sinon j'avais finalement très peu de machines (<15) mais je trouvais sympa de me confronter au pb et d'essayer de trouver une solution pertinente plutôt que de faire le gros boeuf passif qui répète la même opération bêtement.


Message édité par trevor le 02-07-2007 à 11:33:57

---------------
TReVoR - http://dev.arqendra.net - http://info.arqendra.net
Reply

Marsh Posté le 06-09-2007 à 14:14:09    

Petites majs :
- La clé de l'économiseur d'écran texte3d n'est pas la même sous w2k ou wXP, paramétrable ici sous forme de mise en commentaire
- Afin d'avoir toujours le même nombre de caractère au nom de machine basé sur l'IP donc un numéro, on rajoute un '0' si le numéro est < 10, ainsi on aura '05' et pas '5'. A modifier si le parc machines fait plus de 100 machines en '00' bien entendu.
 

Code :
  1. Dim AdrIp
  2. Dim Network
  3. Dim Shell
  4. Dim Message
  5. Dim Computer
  6. Dim HostName
  7. Dim HostNameSuffix
  8. Dim ScreenSaver3DTextRegKey
  9. Dim ScreenSaver3DTextRegKeyValue
  11. HostName = "Poste"
  12. BaseName = "Domaine_"
  13. 'Windows XP
  14. 'ScreenSaver3DTextRegKey = "HKCU\Software\Microsoft\Screensavers\Text3D"
  15. 'ScreenSaver3DTextRegKeyValue = "DisplayString"
  16. 'Windows 2000
  17. ScreenSaver3DTextRegKey = "HKCU\Control Panel\Screen Saver.3DText"
  18. ScreenSaver3DTextRegKeyValue = "Texte"
  20. Set Network = Wscript.CreateObject("WScript.Network" )
  21. Set Shell = Wscript.CreateObject("WScript.Shell" )
  23. wscript.echo "::: Traitement post-Ghost :::" & VBCRLF
  26. computer = Network.ComputerName
  27. 'Computer = "localhost"
  30. wscript.echo "(1/7) Récupération de l'adresse IP" & VBCRLF
  31. on error resume next
  32. set IPConfigSet = GetObject("winmgmts:{impersonationLevel=impersonate}!//" & Computer).ExecQuery _
  33.     ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled=TRUE" )
  35. for each IPConfig in IPConfigSet
  36. AdrIp=IPConfig.IPAddress(0)
  37. 'wscript.echo "  " & IPConfig.Description
  38. wscript.echo "    adresse  MAC   : "  & IPConfig.MACAddress
  39. wscript.echo "    adresse  IP    : " & AdrIp
  40. 'wscript.echo "    passerelle     : "  & IPConfig.DefaultIPGateway
  41. 'wscript.echo "    masque         : "  & IPConfig.IPSubnet
  42. 'wscript.echo "    DNSHostName    : "  & IPConfig.DNSHostName
  43. 'wscript.echo "    serveur DNS    : " & IPConfig.DNSServerSearchOrder(min)
  44. next
  45. wscript.echo VBCRLF
  47. wscript.echo "(2/7) Création d'un nouveau nom à partir de l'adresse IP" & VBCRLF
  48. HostNameSuffix = Right(AdrIp, Len(AdrIp) - InStrRev(AdrIp, "." ))
  49. If HostNameSuffix < 10 Then
  50. HostNameSuffix = 0 & HostNameSuffix
  51. End If
  52. HostName = HostName & HostNameSuffix
  53. wscript.echo "    nouveau nom d'hôte     : " & HostName
  54. wscript.echo VBCRLF
  56. wscript.echo "(3/7) Modification du nom de machine affiché dans l'écran de veille" & VBCRLF
  57. shell.Run "reg add """ & ScreenSaver3DTextRegKey & """ /v """ & ScreenSaver3DTextRegKeyValue & """ /d " & BaseName & HostName & " /f", 0
  58. wscript.echo "    nouveau texte d'écran de veille     : " & BaseName & HostName & VBCRLF
  59. wscript.echo VBCRLF
  61. wscript.echo "(4/7) Création d'un nouvel SID aléatoire" & VBCRLF
  62. wscript.echo "(5/7) Modification du SID" & VBCRLF
  63. wscript.echo "(6/7) Modification du nom de machine" & VBCRLF
  64. shell.Run "newsid /a /d 10 " & HostName, 1, true
  65. wscript.echo VBCRLF
  67. wscript.echo "(7/7) Redémarrage" & VBCRLF
  68. wscript.echo VBCRLF


 
@+

Reply

Marsh Posté le 09-02-2008 à 18:01:07    

Je deterre, pas mal ton script, exactement ce que je cherche. Je vais tester ça. ;)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed