���� 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�=� P




f�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�Lycu
T�.���ܯ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�������������?�� #!/usr/local/cpanel/3rdparty/bin/perl # cpanel - scripts/linksubemailtomainacct Copyright 2022 cPanel, L.L.C. # All rights reserved. # copyright@cpanel.net http://cpanel.net # This code is subject to the cPanel license. Unauthorized copying is prohibited package scripts::linksubemailtomainacct; use strict; use Getopt::Long (); use Cpanel::PwCache (); use Cpanel::PwCache::Helpers (); use Cpanel::PwCache::Build (); use Cpanel::LoginDefs (); use Cpanel::Config::LoadConfig (); use Cpanel::Email::Maildir::Link (); if ( !caller() ) { $| = 1; # The -force option is not used, but we'll retain it due to # historical precedent, and in case it might be implemented # some day. my $force = 0; my $quiet = 0; my $exitondelete = 1; my $delete = ""; # delete old symlinks my $opt_parse_result = Getopt::Long::GetOptions( "force" => \$force, "quiet" => \$quiet, "exitondelete=n" => \$exitondelete, "delete=s" => \$delete, # don't create new symlinks, just delete old ones for given domain ); usage() unless $opt_parse_result && @ARGV <= 1; # note ok if $ARGV == 0 my $convertuser = $ARGV[0]; __PACKAGE__->script( $convertuser, 'force' => $force, 'quiet' => $quiet, 'delete' => $delete ); } sub script { my ( $class, $convertuser, %OPTS ) = @_; my $force = $OPTS{'force'}; my $quiet = $OPTS{'quiet'}; my $delete = $OPTS{'delete'}; print "cPanel Email Linker v3.0\n" if !$quiet; my $pwcache_ref; if ($convertuser) { $pwcache_ref = [ [ Cpanel::PwCache::getpwnam($convertuser) ] ]; } else { Cpanel::PwCache::Helpers::no_uid_cache(); #uid cache only needed if we are going to make lots of getpwuid calls Cpanel::PwCache::Build::init_passwdless_pwcache(); $pwcache_ref = Cpanel::PwCache::Build::fetch_pwcache(); } my $current_format = scalar Cpanel::Config::LoadConfig::loadConfig( "/etc/mailbox_formats", undef, ": " ); foreach my $pw ( @{$pwcache_ref} ) { my ( $user, $uid, $gid, $homedir ) = ( @{$pw} )[ 0, 2, 3, 7 ]; ($homedir) = $homedir =~ /(.*)/; # Untaint next if ( $uid < Cpanel::LoginDefs::get_uid_min() || length($homedir) < 5 || !-e $homedir . '/etc/' || -l $homedir . '/etc/passwd' ); print "Processing $user..." if !$quiet; if ($delete) { Cpanel::Email::Maildir::Link::remove_maildir_symlinks_for_users_domain( $pw, $delete ); } elsif ( !$current_format->{$user} || $current_format->{$user} eq 'maildir' ) { Cpanel::Email::Maildir::Link::setup_all_maildir_symlinks_for_user($pw); } else { Cpanel::Email::Maildir::Link::remove_all_maildir_symlinks_for_user($pw); } print "Done\n" if !$quiet; } return; } sub usage { die "Usage: $0 [ -force ] [ -quiet ] \n(Note: The -force option is not yet implemented, and currently has no effect.)\n"; } 1;