BATCH 스크립트를 사용하여 Windows gethostbyaddr API를 호출하는 방법

Question

역방향 조회를 수행 할 펄 스크립트가 이미 있습니다.하지만 다른 컴퓨터에도 perl이 설치되어 있지 않으면 이식 할 수 없습니다. 동료 컴퓨터에서 원활하게 실행할 수있는 스크립트가 필요하며 PATH & PATHEXT 환경 변수를 업데이트하여 사용자 지정 명령으로 변환 할 수도 있습니다. 스크립트 파일은 이식성이 있어야하며 관리자가 아닌 사용자도 사용할 수 있어야합니다.

배치 스크립트가이 목적에 부합하는 것 같지만 gethostbyaddr API를 호출하는 방법을 알 수 없습니다. 나는 VBScript도 옵션이고 개방적이라고 생각합니다.

gethostbyaddr API

Answer 1

다음은이 배치 스크립트입니다. 적어도 하나는 도움이되기를 바랍니다. 배치 파일을 원하는 경우

@ECHO OFF 
::Lookup.bat 
::http://www.computing.net/answers/programming/ip-by-hostname/25313.html 
::Takes input file of hostnames and creates csv file with hostnames and IP addresses. 
::Gets IP's using nslookup 
:: Output in file hostnames.csv in current folder 

if "%1"=="" goto :Syntax 

SET SCRIPTPATH=%~p0 
CD %SCRIPTPATH% 

del hostnames.csv 

for /f %%e in (%1) do call :LOOKUP %%e 
echo Done!!! 
goto :EOF 

:LOOKUP 
SET HOST1=%1 
FOR /F "skip=4 tokens=2 delims=:" %%A IN ('2^>NUL nslookup %1') DO (ECHO %1,%%A>>%SCRIPTPATH%hostnames.csv) 
GOTO :EOF 

:Syntax 
echo. 
echo Syntax: 
echo. 
echo %0 ^<FileName^> 
echo. 
echo where ^<FileName^> is a file containing a list of hostnames. 
echo. 
echo The batch file will return the results to file hostnames.csv in current folder 
goto :EOF 

---

@echo off 
::gethostname.bat 
::Takes input file of IP addresses and creates csv file with IP address and hostnames. 
::Gets hostnames using netBIOS, which is usually accurate. If no info avail from 
::netBIOS, then use nslookup. Plenty of debug statements in screen output. :) 
:: Output in file C:\TEMP\ip-resolved.csv 

if "%1"=="" goto :Syntax 

SET SCRIPTPATH=%~p0 
CD %SCRIPTPATH% 

echo ip,hostname,power>C:\TEMP\ip-resolved.csv 
for /f %%e in (%1) do call :PING-NBT %%e 
echo Done!!! 
goto :EOF 

:PING-NBT 
set ipaddress=%1 
set host1= 
echo. 
echo ***Pinging %ipaddress% 
SET ON=0 
PING -n 1 %1 | find /i "Reply from" >nul && SET ON=1 
echo Just parsed ping reply... host is %ON% 
REM Next line skips netBIOS check if host is offline 
IF "%ON%"=="0" GOTO :LOOKUP %ipaddress% %ON% 
echo Proceeding to nbtstat with host %on% 

REM The next lines check netBIOS name. 
echo nbt1-start 
for /f %%i in ('nbtstat -a %1^|find "<20>"') do @set host1=%%i 
echo nbt=%host1% power=%ON% 
REM If there isn't a NetBIOS name, then skips to nslookup section. 
REM echo %2 
if "%host1%"=="" goto :LOOKUP %1 %ON% 
ECHO %ipaddress%,%host1%,%ON% >> C:\TEMP\ip-resolved.csv 
echo nbt2-end 
goto :EOF 

:LOOKUP 
echo nslookup1-start 
for /f "tokens=2" %%i in ('nslookup %1^|find "Name:"') do @set host1=%%i 
echo nslookup=%host1% power=%2 
REM Next line=if host var 
rem if not "%host1%"=="%1" goto :EOF 
ECHO %ipaddress%,%host1%,%2 >>C:\TEMP\ip-resolved.csv 
set host1= 
echo nslookup2-end 
goto :EOF 

:Syntax 
echo. 
echo Syntax: 
echo. 
echo %0 ^<FileName^> 
echo. 
echo where ^<FileName^> is a file containing a list of IP addresses to 
echo   which we need the hostname. 
echo. 
echo The batch file will return the results via a file 
echo C:\TEMP\ip-resolved.csv 
goto :EOF