Guest User

Plugin_IntChecker.lua

a guest
Apr 25th, 2016
244
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.38 KB | None | 0 0
  1. -- Integrity Checker by Ariman
  2. --
  3. -- Скрипт решает две задачи - вызов главного меню плагина и проверку хэшей
  4. -- с подавлением записи об этом в историю (без мусора оно как спокойнее).
  5. -- Вторая его функция добавлена чтобы вышвырнуть запись из БД ассоциаций
  6. -- ибо там у всех и без того зоопарка хватает. Перед выполнением макроса
  7. -- проверяется расширение файла и коли он не пройдёт проверку, то просто
  8. -- будет молча проигнорирован.
  9. --
  10. -- Ну а с возможностями управления плагином - как всегда, хочется больше,
  11. -- но у плагина GUID-о не хватает. Я бы хотел иметь GUID для для пунктов
  12. -- создания хэшей, сравнения панелей и проверки через буфер обмена чтобы
  13. -- не городить капризный многоэтажный огород с выбором пунктов диалога,
  14. -- но и набор команд управляения меня бы полностью устроил...
  15. --
  16. -- VictorVG @ VikSoft.Ru/
  17. --
  18. -- v1.0 - initial version
  19. -- Wds Jan 15 02:16:30 +0300 2014
  20. -- v1.1 - refactoring
  21. -- Mon Jun 15 06:32:20 +0300 2015
  22. -- v1.1.1 - refactoring
  23. -- Tue Jun 16 23:25:04 +0300 2015
  24. -- v1.2 - рефакторинг
  25. -- Mon Jun 22 05:40:42 +0300 2015
  26. --
  27.  
  28. local ICID="E186306E-3B0D-48C1-9668-ED7CF64C0E65";
  29. local ICMID="A22F9043-C94A-4037-845C-26ED67E843D1";
  30. local Mask="/.+\\.(md5|sfv|sha(1|256|512)|wrpl)/i";
  31.  
  32. Macro{
  33.   uid="C7BD288F-E03F-44F1-8E43-DC7BC7CBE4BA";
  34.   area="Shell";
  35.   key="Enter NumEnter MsM1Click";
  36.   description="Integrity Checker: check integrity use check summ";
  37.   priority=60;
  38.   flags="EnableOutput";
  39.   condition=function() return mf.fmatch(APanel.Current,Mask)==1; end;
  40.   action=function()
  41.     Far.DisableHistory(-1) Plugin.Command(ICID,APanel.Current);
  42.   end;
  43. }
  44.  
  45. Macro{
  46.   uid="3E69B931-A38E-4119-98E9-6149684B01A1";
  47.   area="Shell";
  48.   key="AltH";
  49.   priority=50;
  50.   description="Integrity Checker: show menu";
  51.   action=function()
  52.      Plugin.Menu(ICID,ICMID)
  53.   end;
  54. }
Advertisement
Add Comment
Please, Sign In to add comment