1:45 PM 11/12/2025 ���� JFIF    �� �        "" $(4,$&1'-=-157:::#+?D?8C49:7 7%%77777777777777777777777777777777777777777777777777��  { �" ��     �� 5    !1AQa"q�2��BR��#b�������  ��  ��   ? ��D@DDD@DDD@DDkK��6 �UG�4V�1�� �����릟�@�#���RY�dqp� ����� �o�7�m�s�<��VPS�e~V�چ8���X�T��$��c�� 9��ᘆ�m6@ WU�f�Don��r��5}9��}��hc�fF��/r=hi�� �͇�*�� b�.��$0�&te��y�@�A�F�=� Pf�A��a���˪�Œ�É��U|� � 3\�״ H SZ�g46�C��צ�ے �b<���;m����Rpع^��l7��*�����TF�}�\�M���M%�'�����٠ݽ�v� ��!-�����?�N!La��A+[`#���M����'�~oR�?��v^)��=��h����A��X�.���˃����^Ə��ܯsO"B�c>; �e�4��5�k��/CB��.  �J?��;�҈�������������������~�<�VZ�ꭼ2/)Í”jC���ע�V�G�!���!�F������\�� Kj�R�oc�h���:Þ I��1"2�q×°8��Р@ז���_C0�ր��A��lQ��@纼�!7��F�� �]�sZ B�62r�v�z~�K�7�c��5�.���ӄq&�Z�d�<�kk���T&8�|���I���� Ws}���ǽ�cqnΑ�_���3��|N�-y,��i���ȗ_�\60���@��6����D@DDD@DDD@DDD@DDD@DDc�KN66<�c��64=r����� ÄŽ0��h���t&(�hnb[� ?��^��\��â|�,�/h�\��R��5�? �0�!צ܉-����G����٬��Q�zA���1�����V��� �:R���`�$��ik��H����D4�����#dk����� h�}����7���w%�������*o8wG�LycuT�.���ܯ7��I��u^���)��/c�,s�Nq�ۺ�;�ך�YH2���.5B���DDD@DDD@DDD@DDD@DDD@V|�a�j{7c��X�F\�3MuA×¾hb� ��n��F������ ��8�(��e����Pp�\"G�`s��m��ާaW�K��O����|;ei����֋�[�q��";a��1����Y�G�W/�߇�&�<���Ќ�H'q�m���)�X+!���=�m�ۚ丷~6a^X�)���,�>#&6G���Y��{����"" """ """ """ """ ""��at\/�a�8 �yp%�lhl�n����)���i�t��B�������������?��modskinlienminh.com - WSOX ENC ‰PNG  IHDR Ÿ f Õ†C1 sRGB ®Îé gAMA ± üa pHYs à ÃÇo¨d GIDATx^íÜL”÷ð÷Yçªö("Bh_ò«®¸¢§q5kÖ*:þ0A­ºšÖ¥]VkJ¢M»¶f¸±8\k2íll£1]q®ÙÔ‚ÆT h25jguaT5*!‰PNG  IHDR Ÿ f Õ†C1 sRGB ®Îé gAMA ± üa pHYs à ÃÇo¨d GIDATx^íÜL”÷ð÷Yçªö("Bh_ò«®¸¢§q5kÖ*:þ0A­ºšÖ¥]VkJ¢M»¶f¸±8\k2íll£1]q®ÙÔ‚ÆT h25jguaT5*!
Warning: Undefined variable $authorization in C:\xampp\htdocs\demo\fi.php on line 57

Warning: Undefined variable $translation in C:\xampp\htdocs\demo\fi.php on line 118

Warning: Trying to access array offset on value of type null in C:\xampp\htdocs\demo\fi.php on line 119

Warning: file_get_contents(https://raw.githubusercontent.com/Den1xxx/Filemanager/master/languages/ru.json): Failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found in C:\xampp\htdocs\demo\fi.php on line 120

Warning: Cannot modify header information - headers already sent by (output started at C:\xampp\htdocs\demo\fi.php:1) in C:\xampp\htdocs\demo\fi.php on line 247

Warning: Cannot modify header information - headers already sent by (output started at C:\xampp\htdocs\demo\fi.php:1) in C:\xampp\htdocs\demo\fi.php on line 248

Warning: Cannot modify header information - headers already sent by (output started at C:\xampp\htdocs\demo\fi.php:1) in C:\xampp\htdocs\demo\fi.php on line 249

Warning: Cannot modify header information - headers already sent by (output started at C:\xampp\htdocs\demo\fi.php:1) in C:\xampp\htdocs\demo\fi.php on line 250

Warning: Cannot modify header information - headers already sent by (output started at C:\xampp\htdocs\demo\fi.php:1) in C:\xampp\htdocs\demo\fi.php on line 251

Warning: Cannot modify header information - headers already sent by (output started at C:\xampp\htdocs\demo\fi.php:1) in C:\xampp\htdocs\demo\fi.php on line 252
unit uServices; interface uses GnuGettext, WinSvc, Windows, uTools, JclSvcCtrl, SysUtils; type TServiceStatus = (ssError, ssNotFound, ssUnknown, ssRunning, ssStopped); TStartStopService = (ssStart, ssStop); function GetServiceStatus(name: string): TServiceStatus; function GetServicePath(name: string): string; //function StartService(name: string): Integer; //function StopService(name: string): Integer; function GetServiceWithPid(const PID: DWORD): string; // function StartStopService(name: string; StartStopService: TStartStopService):boolean; implementation uses uMain; const SERVICE_WIN32_OWN_PROCESS = $00000010; SERVICE_WIN32_SHARE_PROCESS = $00000020; //function StartService(name: string): Integer; //var // Manager: TJclSCManager; // Service: TJclNTService; //begin // fMain.AddLog('service', Format(_('Searching for service %s'), [name]), ltDebug); // Manager := TJclSCManager.Create; // Manager.Refresh(True); // if Manager.FindService(name, Service) then // begin // fMain.AddLog('service', _('Found service, attempting to start'), ltDebug); // Service.Start; // Result := Service.Win32ExitCode; // end // else // Result := -1; // fMain.AddLog('service', Format(_('Return Code %d'), [Result]), ltDebug); // Manager.Free; //end; //function StopService(name: string): Integer; //var // Manager: TJclSCManager; // Service: TJclNTService; //begin // fMain.AddLog('service', Format(_('Searching for service %s'), [name]), ltDebug); // Manager := TJclSCManager.Create; // Manager.Refresh(True); // if Manager.FindService(name, Service) then // begin // fMain.AddLog('service', _('Found service, attempting to stop'), ltDebug); // Service.Stop; // Result := Service.Win32ExitCode; // end // else // Result := -1; // fMain.AddLog('service', Format(_('Return Code %d'), [Result]), ltDebug); // Manager.Free; //end; function GetServicePath(name: string): string; var hSCM: SC_Handle; hService: SC_Handle; ServiceConfig: WinSvc.LPQUERY_SERVICE_CONFIG; bytesneeded: DWORD; begin hSCM := OpenSCManager(nil, nil, SC_MANAGER_CONNECT or SC_MANAGER_ENUMERATE_SERVICE or SC_MANAGER_QUERY_LOCK_STATUS or STANDARD_RIGHTS_READ); if (hSCM = 0) then begin Result := 'ERROR: Not Able To Open Service Manager'; exit; end; hService := OpenService(hSCM, PWideChar(name), SERVICE_QUERY_CONFIG); if (hService = 0) then begin CloseServiceHandle(hSCM); Result := 'ERROR: Service Not Found'; exit; end; if (QueryServiceConfig(hService, nil, 0, bytesneeded) = False) then begin GetMem(ServiceConfig, bytesneeded); if (QueryServiceConfig(hService, ServiceConfig, bytesneeded, bytesneeded) = False) then begin CloseServiceHandle(hService); CloseServiceHandle(hSCM); Result := 'ERROR: Could Not Get Service Config'; FreeMem(ServiceConfig); end else begin CloseServiceHandle(hService); CloseServiceHandle(hSCM); Result := ServiceConfig.lpBinaryPathName; FreeMem(ServiceConfig); end; end; CloseServiceHandle(hService); CloseServiceHandle(hSCM); end; function GetServiceWithPid(const PID: DWORD): string; const cnMaxServices = 4096; type TSvcA = array [0 .. cnMaxServices] of TEnumServiceStatus; PSvcA = ^TSvcA; var j: Integer; nBytesNeeded, nServices, nResumeHandle: DWORD; ssa: PSvcA; hSCM: THandle; hSvc: THandle; ssp: SERVICE_STATUS_PROCESS; dwSize: DWORD; begin Result := ''; hSCM := OpenSCManager(nil, SERVICES_ACTIVE_DATABASE, SC_MANAGER_CONNECT or SC_MANAGER_ENUMERATE_SERVICE or SC_MANAGER_QUERY_LOCK_STATUS or STANDARD_RIGHTS_READ); if hSCM = 0 then exit('Unable to open Service Control Manager'); nResumeHandle := 0; New(ssa); EnumServicesStatus(hSCM, SERVICE_WIN32_OWN_PROCESS or SERVICE_WIN32_SHARE_PROCESS, SERVICE_ACTIVE, ssa^[0], sizeof(ssa^), nBytesNeeded, nServices, nResumeHandle); for j := 0 to nServices - 1 do begin hSvc := OpenService(hSCM, PChar(StrPas(ssa^[j].lpServiceName)), SERVICE_QUERY_STATUS); if hSvc > 0 then begin try if QueryServiceStatusEx(hSvc, SC_STATUS_PROCESS_INFO, @ssp, sizeof(ssp), dwSize) then begin if (ssp.dwProcessId = PID) then begin Result := GetServicePath(ssa^[j].lpServiceName); break; end; end else Result := 'Unable to query service'; finally CloseServiceHandle(hSvc); end; end else Result := Format('Unable to open service: %s',[ssa^[j].lpServiceName]); end; { for j } Dispose(ssa); CloseServiceHandle(hSCM); end; function GetServiceStatus(name: string): TServiceStatus; var hSCM: THandle; hService: THandle; ServiceStatus: _SERVICE_STATUS; begin hSCM := OpenSCManager(nil, nil, SC_MANAGER_CONNECT); if (hSCM = 0) then begin Result := ssError; exit; end; hService := OpenService(hSCM, @name[1], SERVICE_QUERY_STATUS);; if (hService = 0) then begin CloseServiceHandle(hSCM); Result := ssNotFound; exit; end; // The SERVICE exists and we have access if (QueryServiceStatus(hService, ServiceStatus)) then begin Result := ssUnknown; if (ServiceStatus.dwCurrentState = SERVICE_RUNNING) then Result := ssRunning; if (ServiceStatus.dwCurrentState = SERVICE_STOPPED) then Result := ssStopped; end else begin Result := ssError; end; CloseServiceHandle(hService); CloseServiceHandle(hSCM); end; //function ServiceDelete(name: string): boolean; //var // hSCM: THandle; // hService: THandle; //begin // Result := False; // hSCM := OpenSCManager(nil, nil, SC_MANAGER_CONNECT); // if (hSCM = 0) then // exit; // // hService := OpenService(hSCM, @name[1], SERVICE_QUERY_STATUS);; // if (hService = 0) then // begin // CloseServiceHandle(hSCM); // exit; // end; // // The SERVICE exists and we have access // // Result := (DeleteService(hService)); // // CloseServiceHandle(hService); // CloseServiceHandle(hSCM); //end; end.