clc
clear all;
iPortStart = 1;
iPortEnd = 60000;
iPortGap = iPortEnd - iPortStart;
chCMD = 'tcping -n 1 -s';
iPC_Start = 88;
iPC_END = 108;
iPC_Gap = iPC_END - iPC_Start;
for iPC_ip = iPC_Start:iPC_END
mS = 0;
iS = 1;
chIP = sprintf('%d.%d.%d.%d', 210, 125, 216, iPC_ip);
for i=iPortStart:iPortEnd
iPort = i;
chPort = sprintf('%d', iPort);
chLine = sprintf('%s %s %s', chCMD, chIP, chPort);
chFailed = sprintf('Probing %s:%s/tcp - No response', chIP, chPort);
iFailed_Len = length(chFailed);
[chMode, chTemp] = system(chLine);
iComp = strcmp(chFailed, chTemp(2:iFailed_Len+1));
if iComp == 1
% fprintf('[System] port number %s Failed \n', chPort);
dPer = iPort / iPortEnd * 100;
iTotal_Cover = (iPC_Gap) * iPortGap;
iTotal_Now = (iPC_Gap - (iPC_END - iPC_ip)) * iPortGap + iPort;
iTotal_Per = iTotal_Now / iTotal_Cover * 100;
clc
fprintf('********************************* \n');
fprintf('[System] Shin Dong Seok \n', iTotal_Cover);
fprintf('[System] Shindongseok304@gmail.com \n', iTotal_Cover);
fprintf('[System] shintime.com \n', iTotal_Cover);
fprintf('********************************* \n\n');
fprintf('[System] Total Num : %10d [EA]\n', iTotal_Cover);
fprintf('[System] Total Now : %10d [EA]\n', iTotal_Now);
fprintf('[System] Total Per : %10.4f [%%] \n\n', iTotal_Per);
fprintf('[System] IP Number : %s (%d) \n', chIP, iPort);
fprintf('[System] IP Per : %10.4f [%%] \n', dPer);
if mS(1) == 0
fprintf('\n ');
else
fprintf('[System] Ports : %d [EA] \n ', length(mS));
end
else
mS(iS) = iPort;
iS = iS + 1;
end
end
fprintf('\n');
chTextName = sprintf('%s.txt', chIP);
hFile = fopen(chTextName, 'w');
for i=1:1:length(mS)
fprintf(hFile, '%d\n', mS(i));
end
fclose(hFile);
clear iPort chFailed iFailed_Len chMode chTemp
clear mS iS k i dPer iTotal_Cover iTotal_Now iTotal_Per
clear hFile chTextName
end