010
11.01.2006, 09:36 Uhr
J-jayz-Z
Perl Crack ala Carte
(Operator)
|
Okay, danke dir.
Jetzt hab ich verstanden, wie man damit umgeht. Ich dachte die deklarierte Struktur ist gleich mit Werten gefüllt.
Aber jetzt habe ich noch ein Problem.
Ich hab ein kleines script geschrieben, das 100 User einfügt. Jetzt will ich aber ein Script schreiben, das auch User entfernt und komme damit nicht weiter.
Kann da maybe jemand helfen?
| C++: |
#include <iostream>
#include <utmp.h>
#include <pwd.h>
#include <cstring>
using namespace std;
int main(int argc, char* argv[]) {
struct utmp utmp;
setutent();
int foo = 100;
while(foo--) {
strcpy(utmp.ut_user, "foo");
utmp.ut_type = USER_PROCESS;
utmp.ut_pid = getpid();
strcpy(utmp.ut_line,ttyname(0)+strlen("/dev/"));
strcpy(utmp.ut_id,ttyname(0)+strlen("/dev/tty"));
time(&utmp.ut_time);
pututline(&utmp);
getutid(&utmp);
utmp.ut_type=DEAD_PROCESS;
memset(utmp.ut_line,0,UT_LINESIZE);
utmp.ut_time=0;
memset(utmp.ut_user,0,UT_NAMESIZE);
setutent();
pututline(&utmp);
}
endutent();
return 0;
}
|
--
perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="66756e2d736f66742e6465"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"' |
