AdminWorld - Part 4

Простая генерация паролей

Автор: sysadmin | - 13:34 | FreeBSD, Linux

Комментарии отключены

Достаточно часто на практике приходится генерировать пароли для разных аккаунтов и сервисов — почты, ftp, samba и просто для нерадивых пользователей, теряющих и забывающих пароли при каждом удобном случае. Очевидно, что придумать новый пароль достаточно просто, но его устойчивость к взлому, как правило, будет сомнительной, поскольку любимые наши пароли — 111, 12345 и «интернет», а также год рождения, номер паспорта или мобильного телефона — известны всем и каждому.

Поэтому для себя я использовал простенький скрипт следующего вида (файл passgen.sh):

#!/bin/bash
echo `tr -cd [:digit:] < /dev/urandom | head -c8`

Этому скрипту необходимо дать права на выполенение

chmod u+x passgen.sh

и в дальнейшем использовать из консоли:

~$ ./passgen.sh
93723588

Как видно из примера, скрипт позволяет получить случайное восьмизначное число, которое и используется в качестве пароля. Немного поэкспериментировав, мы можем еще усилить стойкость пароля и улучшить его читабельность, изменив наш минискрипт следующим образом (файл genpass.sh):

#!/bin/bash
x=`tr -cd [:alnum:] < /dev/urandom | head -c8`
echo ${x:0:4}-${x:4:4}

«Расширенная» версия генератора позволит нам получать буквенно-цифровые пароли в формате XXXX-XXXX:

~$ ./genpass.sh
sv81-1AxP

Найти по MAC адресу IP компьютера

Автор: sysadmin | - 09:46 | Windows

Комментарии отключены

Как-то случайно натыкался на полезные скрипты для определения по мак адресу айпи компьютера:

такой вот коротенький батничек, пингующий группу адресов и записывающий в файлик arp_table.txt

@echo off
if exist arp_table.txt (
if exist arp_table.bak del arp_table.bak
ren arp_table.txt arp_table.bak
)
for /L %%i in (1,1,254) do (
echo 192.168.0.%%i
ping -n 1 192.168.0.%%i>nul
arp -a 192.168.0.%%i>arp_string.tmp
for /F "skip=3 tokens=*" %%j in (arp_string.tmp) do (
echo %%j|find /V "invalid">>arp_table.txt
)
)
del arp_string.tmp

и более тотальный скрипт:

'******************************************************************************

```
'* File: mac2ip.vbs
```

'* Purpose: Finds IP of the host with given MAC address.

'* Syntax: cscript mac2ip.vbs /mac:MAC_ADDRESS /ip:IP_BLOCK [/p:pause]

```
'* Version: 1.0.2
```
```
'*
```
```
'* Technology: VBSCRIPT,WSH,WMI
```

'* Requirements: Windows XP or newer (uses Win32_PingStatus WMI class)

```
'*
```
```
'* Authors: 4u3u (asuhovey mtu-net ru)
```
```
'*
```

'******************************************************************************

```
Option Explicit
```
```
'On Error Resume Next
```

Dim objShell,strOutput,i,strMAC,objOutput,objAdapter,intPause

Dim strSTime,strIP,strNameSpace,strQuery,colAdapters,PausePattern

Dim colResult,IPPattern,MACPattern,strArpCommand,strOMAC

```
 
```
```
'* Matches valid MAC address
```

MACPattern = "^([0-9a-f][0-9a-f]-){5}([0-9a-f][0-9a-f])$"

```
'*Matches valid IP block
```

IPPattern = "^b((25[0-5]|2[0-4]d|[01]dd|d?d).){3}$"

```
'*Matches positive integer
```
```
PausePattern = "^d+$"
```
```
 
```

'****************************************

```
'Parse arguments
```

'****************************************

strOMAC = WScript.Arguments.Named("mac")

strMAC = Replace(LCase(strOMAC),":","-")

```
strIP = Wscript.Arguments.Named("ip")
```
```
intPause = Wscript.Arguments.Named("p")
```
```
If intPause="" Then intPause=1000
```
```
If Wscript.Arguments.Count<2 Then
```
```
Syntax()
```
```
End If
```
```
If not ArgVrf(strMAC,MACPattern) Then
```

WScript.Echo "ERROR: Invalid MAC: '" & strOMAC & "' Check syntax..." & VbCrLf

```
Syntax()
```
```
End If
```
```
If not ArgVrf(strIP,IPPattern) Then
```

WScript.Echo "ERROR: Invalid IP: '" & strIP & "' Check syntax..." & VbCrLf

```
Syntax()
```
```
End If
```

If not ArgVrf(intPause,PausePattern) Then

WScript.Echo "ERROR: Invalid Pause: '" & intPause & "' Must be positive integer." & VbCrLf

```
Syntax()
```
```
End If
```
```
 
```

''****************************************

```
'Check if script is running by cscript.
```
```
'If not, restart script using cscript.
```

'****************************************

Set objShell = WScript.CreateObject("WScript.Shell")

If Instr(1, WScript.FullName, "CScript", vbTextCompare) = 0 Then

objShell.Run "cmd /k cscript.exe /nologo """ & WScript.ScriptFullName & """ /mac:" &_

strOMAC & " /ip:" & strIP & " /p:" & intPause, 1, False

```
WScript.Quit
```
```
End If
```
```
 
```

'****************************************

'Check if given MAC is owned by local host

'****************************************

strNameSpace = "winmgmts:{impersonationLevel=impersonate}//./root/cimv2"

strQuery = "SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True"

Set colAdapters = GetObject(strNameSpace). ExecQuery(strQuery)

```
For Each objAdapter in colAdapters
```

If LCase(Replace(objAdapter.MACAddress,":","-")) = strMAC Then

WScript.Echo strOMAC & " is YOUR MAC address!"

```
WScript.Quit
```
```
End If
```
```
Next
```
```
 
```

'****************************************

```
'Ping all IPs in range.
```

'****************************************

```
strSTime = Now()
```

strQuery = "SELECT * FROM Win32_PingStatus WHERE Address = '" & strIP

```
For i = 1 To 254 Step 1
```

Set colResult = GetObject(strNameSpace). ExecQuery(strQuery & i & "'")

```
WScript.StdOut.Write "."
```
```
If i/51-Int(i/51)=0 Then
```

WScript.StdOut.WriteLine " " & Int(100*i/254) & "%"

```
End If
```
```
Next
```

WScript.Echo ". 100%" & VbCrLf & "Ping completed in " & DateDiff("s",strSTime,Now()) & " seconds." & VbCrLf

```
 
```

'****************************************

```
'Get IP-MAC pair from ARP cache.
```

'****************************************

```
WScript.Sleep(intPause)
```

strArpCommand = "%comspec% /c arp.exe -a | find /i """ & strMAC & """"

Set objOutput=objShell.Exec(strArpCommand).StdOut

```
WScript.Echo String(56,"=")
```
```
i=0
```
```
Do While Not objOutput.AtEndOfStream
```
```
i=i+1
```
```
strOutput = objOutput.ReadLine
```

WScript.Echo StrOMAC & " is " & RTrim(Left(LTrim(strOutput),15))

```
Loop
```
```
If i=0 Then
```

WScript.Echo strOMAC & " was NOT FOUND" &_

```
" on the local network" & VbCrLf &_
```

"Either host is unreachable or " & strIP &_

"xxx is not" & VbCrLf & "your local network."

```
End If
```
```
WScript.Echo String(56,"=")
```
```
 
```

'****************************************

```
'Subroutines
```

'****************************************

```
'*Syntax
```
```
Sub Syntax()
```
```
Dim s
```

s = "Finds IP of the host with given MAC address." & VbCrLf & VbCrLf

s = s & "SYNTAX: cscript /nologo " & UCase(WScript.ScriptName) &_

" /mac:MAC_ADDRESS /ip:IP_BLOCK [/p:pause]" & VbCrLf & VbCrLf

s = s & " MAC_ADDRESS MAC address to search for. MAC_ADDRESS" & VbCrLf

s = s & " is in XX-XX-XX-XX-XX-XX format. Both" & VbCrLf

s = s & " ':' and '-' delimiters allowed." & VbCrLf

s = s & " IP_BLOCK First three octets of local ip range to" & VbCrLf

s = s & " scan. E.g. '192.168.0.' Only /24 subnets" & VbCrLf

s = s & " are supported in current version." & VbCrLf

s = s & " pause Pause after ping in milliseconds." & _

VbCrLf & " Default is 1000 (1 second)" & VbCrLf & VbCrLf

```
s = s & "Example:" & VbCrLf
```

s = s & " cscript /nologo " & UCase(WScript.ScriptName) &_

" /mac:01-23-45-67-89-AB /ip:192.168.0." & VbCrLf

```
WScript.Echo s
```
```
WScript.Quit 1
```
```
End Sub
```
```
 
```
```
'*Arguments validation
```
```
Function ArgVrf(arg,pattern)
```
```
Dim objRegExp
```
```
Set objRegExp = New RegExp
```
```
objRegExp.IgnoreCase = true
```
```
objRegExp.Pattern = pattern
```
```
ArgVrf = objRegExp.Test(arg)
```
```
Set objRegExp = Nothing
```
```
End Function
```
```
 
```

'****************************************

```
'End of script
```

'****************************************

Освобождаем консоль

Автор: sysadmin | - 09:23 | Development

Комментарии отключены

Большинство Linux-приложений с графическим пользовательским интерфейсом при запуске из консоли не освобождают консоль, а запирают сесию и начинают выводить в ней свои диагностические сообщения. Нажатие Ctrl+C в этом случае приводит к остановке приложения.Сейчас я покажу как заставить свои приложения освобождать консоль.

Добавляем в функцию main() своего приложения следующий код:

      if (fork() != 0){
          exit(0);
      }
 
      close(0);
      close (1);
      close(2);
 
      int fd = open("/dev/null", O_RDWR);
      dup2(fd, 0);
      dup2(fd, 1);
      dup2(fd, 2);

Первые три строки создают новую копию процесса нашей программы и убивают родительский процесс. Затем с помощью функции close() закрываем все дескрипторы ввода-вывода, унаследованные от родительского процесса, создаем новые дескрипторы, адресованные в /dev/null, и присваиваем их своей программе.

Как удалить из кэша DNS сервера Bind конкретную запись, без перезагрузки всего кэша

Автор: sysadmin | - 11:42 | FreeBSD, Linux

Комментарии отключены

Для удаления отдельной записи в кэше Bind нужно использовать команду «rndc flushname»

Запрашиваем имя mx.example.ru у сервера 127.0.0.1:

   $>  dig +short @127.0.0.1 mx.example.ru
   192.168.168.168

Сохраняем для изучения дамп с содержимым кэша:

   $>  rndc dumpdb -all

Находим в нем искомое имя, чтобы убедится, что оно в кэше:

   $> grep mx.example.ru /var/bind/named_dump.db
   mx.example.ru.             431988  A       192.168.168.168

Выполняем команду для удаления mx.example.ru из кэша:

   $> rndc flushname mx.example.ru.

Убедимся, что имя удалилось:

   rm /var/bind/named_dump.db 
   rndc dumpdb -all
   grep mx.example.ru /var/bind/named_dump.db

Коды ответов (ошибок) HTTP сервера

Автор: sysadmin | - 09:22 | Development, FreeBSD, Linux, Windows

Комментарии отключены

При любом HTTP запросе сервер сначала возвращает код ответа на HTML запрос. Проанализировав этот ответ можно сделать вывод о том, был ли запрос выполнен успешно, или в процессе обработки запроса произошла ошибка.

Коды ответа HTTP сервера могут принадлежать следующим группам:
1xx — Информационный ответ
2xx — Успешная обработка запроса
3xx — Переадресация (редирект)
4xx — Неполный запрос к серверу
5xx — При обработке запроса произошла ошибка

Естественно, что кодов ответа в каждой группе не по 100. Браузер (клиент IE, Opera, Mozilla и т.д.), получая от сервера тот или иной код, сам решает как его интерпретировать. Если код клиенту неизвестен, то как минимум он может определить диапазон кода и повести себя соответствующим образом.

Информационные ответы

100 Continue
Часть запроса принята. Как правило это занчит, что можно отправлять следующую часть запроса.

101 Switching Protocols
Сервер производит переключение протоколов в соответствии с заголовком Upgrade.

Успешная обработка запроса

200 OK
Запрос обработан успешно.

201 Created
Данный код используется когда происходит создание нового URI. Вместе с кодом сервер посылает заголовок Location с адресом нового URI.

202 Accepted
Запрос принят и обрабатывается. В теле ответа как правило содержится дополнительная информация.

203 Non-Authoritative Information
Ответ означает, что информация получена из ненадежного источника (например, с другого сервера).

204 No Content
Запрос обработан, но в ответ ничего не возвращается. Как правило используется если в ответ на запрос не нужно обновлять содержимое документа.

205 Reset Content
Означает, что содержимое документа должно быть сброшено в начальное состояние. Обычно используется при очистке форм ввода данных..

206 Partial Content
При данном ответе возвращается лишь часть данных. Обычно используется если клиент запросил часть данных с использованием заголовка Range.

Переадресация

300 Multiple Choices
Означает, что существует несколько вариантов запрашиваемой страницы. Например, сайт, переведенный на несколько языков.

301 Moved Permanently
Данный ответ означает, что данный документ был перемещен и клиенту следует изменить все ссылки на данный документ его новым местоположением.

302 Moved Temporarily
Документ временно перемещен в другое место.

303 See Other
Данный документ можно найте по другим ссылкам. Список ссылок передан в теле ответа.

304 Not Modified
Данный код ответа возвращается если был запрос lf-Modified-Since, и документ не изменялся с указанной даты.

305 Use Proxy
Доступ к документу должен осуществляться через proxy-сервер, адрес которого указан в Location.

Неполные запросы клиента

400 Bad Request
Ошибка в строке запроса.

401 Unauthorized
Ответ означает, что пользователь не имеет достаточных прав для просмотра документа.

402 Payment Required
Данный код зарезервирован на будущее. Видимо будет означать, что запрошенный документ является платным ресурсом.

403 Forbidden
Запрос не будет выполнен по какой-либо причине.

404 Not Found
Запрашиваемого документа нет на сервере.

405 Method Not Allowed
Означает, что метод, используемый клиентом, не поддерживается.

406 Not Acceptable
Ресурс существует, но не в той форме, что клиент запросил. Например, может различаться язык документа.

407 Proxy Authentication Required
Для Proxy-сервера необходима авторизация.

408 Request Time-out
Сервер разорвал соединение из-за превышенного таймаута.

409 Conflict
Запрос конфликтует с другим запросом.

410 Gone
Данный код означает, что документ был удален с сервера.

411 Length Required
Пропущено необходимое поле в заголовке запроса Content-Length.

412 Precondition Failed
Условие указанное в заголовке не выполняется.

413 Request Entity Too Large
Слишком большое тело запроса.

414 Request-URI Too Long
Слишком длинный URI в запросе.

415 Unsupported Media Type
Сервер не поддерживает указанный формат данных.

Ошибки сервера

500 Internal Server Error
Внутренняя ошибка сервера. Например, ошибка при выполнении скрипта.

501 Not Implemented
Недопустимое действие.

502 Bad Gateway
Недопустимый ответ с другого ресурса.

503 Service Unavailable
Данный код означает, что указанный сервис временно недоступен.

504 Gateway Time-out
Превышен таймаут ожидания от другого ресурса

505 HTTP Version not supported
Данная версия протокола HTTP не поддерживается сервером.

Информационные ответы

Успешная обработка запроса

Переадресация

Неполные запросы клиента

Ошибки сервера

Метки