> aggiungerei: > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > Super Hacker > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > $=5F=3D'while(read+STDIN,$=5F,2048){$a=3D29;$b=3D73;$c=3D142;$t=3D255;@t=3D= map{$=5F%16or$t^=3D$c > ^=3D( > > $m=3D(11,10,116,100,11,122,20,100)[$=5F/16%8])&110;$t^=3D(72,@z=3D(64,72,$a= ^=3D12*($=5F% > 16 > -2?0:$m&17)),$b^=3D$=5F%64?12:0,@z)[$=5F%8]}(16..271);if((@a=3Dunx"C*",$= =5F)[20]&48 ){ > $h > > =3D5;$=5F=3Dunxb24,join"",@b=3Dmap{xB8,unxb8,chr($=5F^$a[--$h+84])}@ARGV;s/= ...$/1$&/;$ > d=3DunxV,xb25,$=5F;$e=3D256|(ord$b[4])<<9|ord$b[3];$d=3D$d8^($f=3D$t&($d= 12^$d4^ > $d^$d/8))<<17,$e=3D$e8^($t&($g=3D($q=3D$e14&7^$e)^$q*8^$q<<6))<<9,$=5F= =3D$t[$=5F]^ > (($h=3D8)+=3D$f+(~$g&$t))for@a[128..$#a]}print+x"C*",@a}';s/x/pack+/g;ev= al > > ---- > Che sono Le famose 7 linee di Perl che possono consentire a chiunque di > decodificare, anche in tempo reale, un DVD. > scritto in Perl da due studenti del MIT. I due volevano dimostrare come > fosse ormai assurdo per la Motion Picture Association (MPAA) tentare ancora > di impedire la proliferazione di programmi come il DeCSS quando ormai si > poteva fare la stessa cosa con sole sette righe di codice: sette righe > stampabili su un banale foglietto di carta. > > e > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > Super Top Hacker > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > /* efdtt.c Author: Charles M. Hannum <root@xxxxxxxxx> > */ > /* > */ > /* Thanks to Phil Carmody <fatphil@xxxxxxxx> for additional tweaks. > */ > /* > */ > /* Length: 434 bytes (excluding unnecessary newlines) > */ > /* > */ > /* Usage is: cat title-key scrambled.vob | efdtt >clear.vob > */ > > #define m(i)(x[i]^s[i+84])<< > unsigned char > x[5],y,s[2048];main(n){for(read(0,x,5);read(0,s,n=3D2048);write(1,s > ,n))if(s[y=3Ds[13]%8+20]/16%4=3D=3D1){int > i=3Dm(1)17^256+m(0)8,k=3Dm(2)0,j=3Dm(4)17^m(3)9^k > *2-k%8^8,a=3D0,c=3D26;for(s[y]-=3D16;--c;j*=3D2)a=3Da*2^i&1,i=3Di/2^j&1<<24= ;for(j=3D127;++ > j<n > ;c=3Dc>y)c+=3Dy=3Di^i/8^i>>4^i>>12,i=3Di>>8^y<<17,a^=3Da>>14,y=3Da^a*8^a<<6= ,a=3Da>>8^y<<9, > k=3Ds > [j],k=3D"7Wo~'G=5F\216"[k&7]+2^"cr3sfw6v;*k+>/n."[k>>4]*2^k*257/8,s[j]=3Dk^= (k&k*2& > 34) > *6^c+~y;}} > > > ----- > che =E8 il sorgente per decrittare il CSS dei DVD-Vide, scritto da Charles M. > Hannum, poche righe di C > della dimensione totale di soli 442 byte contro i 472 di quello sopra in > perl > > > Ciao Mondo !!! > Stefano > > ------------------------------------------------------------- > Ing. Setti Stefano - Web Engineer > Sistema Informativo - Comune di Trento > Via Belenzani 19 - 38060 Trento > Tel. 0461/884392 > e-mail: stefano=5Fsetti@xxxxxxxxxxxxxxxx > ssetti@xxxxxxxxxxxxx > ------------------------------------------------------------- > > > > ----- Original Message ----- > From: "Stefano Della Puppa" <sdellapuppa@xxxxxxxx> > To: <dumbo@xxxxxxxxxxxxx> > Sent: Friday, March 30, 2001 9:34 AM > Subject: [dumbo] Re: Hello World (era Consiglio Nazionale Ingegneri) > > > > Mauro Colorio wrote: > > > > e allora alleniamoci: > > http://www.latech.edu/~acm/HelloWorld.shtml > > Miiiiiiiiiiitico!!!!!! Tra i vari linguaggi che penso vengano anche da > marte, > c'e` anche in POP11!!!!!! :-DDDDD > > Comunque penso che a noi interessino di piu` questi (non fermatevi ai primi > non e` quella che girava qualche anno fa :-)) ): > > > > Subject: Hello World > > > > > > > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Scuola Media > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > 10 PRINT "HELLO WORLD" > > > 20 END > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Scuola superiore (1=B0 anno) > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > program Hello(input, output) > > > begin > > > writeln('Hello World'); > > > end. > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Scuola superiore (ultimo anno) > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > (defun hello > > > (print > > > (cons 'Hello (list 'World)))) > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Universit=E0 > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > #include > > > void main(void) > > > > > > > > char *message[] =3D {"Hello ", "World"}; > > > int i; > > > > > > for(i =3D 0; i < 2; ++i) > > > printf("%s", message[i]); > > > printf("\n"); > > > } > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Consulente informatico > > > esperto > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > #include > > > #include > > > > > > class string > > > > > > > > private: > > > int size; > > > char *ptr; > > > > > > public: > > > string() : size(0), ptr(new char('\0')) {} > > > > > > string(const string &s) : size(s.size) > > > > > > > > ptr =3D new char[size + 1]; > > > strcpy(ptr, s.ptr); > > > } > > > > > > ~string() > > > > > > > > delete [] ptr; > > > } > > > > > > friend ostream &operator <<(ostream &, const string &); > > > string &operator=3D(const char *); > > > }; > > > > > > ostream &operator<<(ostream &stream, const string &s) > > > > > > > > return(stream << s.ptr); > > > } > > > > > > string &string::operator=3D(const char *chrs) > > > > > > > > if (this !=3D &chrs) > > > > > > > > delete [] ptr; > > > size =3D strlen(chrs); > > > ptr =3D new char[size + 1]; > > > strcpy(ptr, chrs); > > > } > > > return(*this); > > > } > > > > > > int main() > > > > > > > > string str; > > > > > > str =3D "Hello World"; > > > cout << str << endl; > > > > > > return(0); > > > } > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Programmatore con > > > grande esperienza > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > > > > > > uuid(2573F8F4-CFEE-101A-9A9F-00AA00342820) > > > ] > > > library LHello > > > > > > > > // bring in the master library > > > importlib("actimp.tlb"); > > > importlib("actexp.tlb"); > > > > > > // bring in my interfaces > > > #include "pshlo.idl" > > > > > > > > > > > uuid(2573F8F5-CFEE-101A-9A9F-00AA00342820) > > > ] > > > cotype THello > > > > > > > > interface IHello; > > > interface IPersistFile; > > > }; > > > }; > > > > > > > > > > > exe, > > > uuid(2573F890-CFEE-101A-9A9F-00AA00342820) > > > ] > > > module CHelloLib > > > > > > > > > > > // some code related header files > > > importheader(); > > > importheader(); > > > importheader(); > > > importheader("pshlo.h"); > > > importheader("shlo.hxx"); > > > importheader("mycls.hxx"); > > > > > > // needed typelibs > > > importlib("actimp.tlb"); > > > importlib("actexp.tlb"); > > > importlib("thlo.tlb"); > > > > > > > > > > > uuid(2573F891-CFEE-101A-9A9F-00AA00342820), > > > aggregatable > > > ] > > > coclass CHello > > > > > > > > cotype THello; > > > }; > > > }; > > > > > > #include "ipfix.hxx" > > > extern HANDLE hEvent; > > > class CHello : public CHelloBase > > > > > > > > public: > > > IPFIX(CLSID=5FCHello); > > > > > > CHello(IUnknown *pUnk); > > > ~CHello(); > > > > > > HRESULT =5F=5Fstdcall PrintSz(LPWSTR pwszString); > > > > > > private: > > > static int cObjRef; > > > }; > > > > > > #include > > > #include > > > #include > > > #include > > > #include "thlo.h" > > > #include "pshlo.h" > > > #include "shlo.hxx" > > > #include "mycls.hxx" > > > > > > int CHello:cObjRef =3D 0; > > > > > > CHello::CHello(IUnknown *pUnk) : CHelloBase(pUnk) > > > > > > > > cObjRef++; > > > return; > > > } > > > > > > HRESULT =5F=5Fstdcall CHello::PrintSz(LPWSTR pwszString) > > > > > > > > printf("%ws\n", pwszString); > > > return(ResultFromScode(S=5FOK)); > > > } > > > > > > > > > CHello::~CHello(void) > > > > > > > > > > > // when the object count goes to zero, stop the server > > > cObjRef--; > > > if( cObjRef =3D=3D 0 ) > > > PulseEvent(hEvent); > > > > > > return; > > > } > > > > > > #include > > > #include > > > #include "pshlo.h" > > > #include "shlo.hxx" > > > #include "mycls.hxx" > > > > > > HANDLE hEvent; > > > > > > int =5Fcdecl > > > > > > int argc, > > > char * argv[] > > > ) > > > > ULONG ulRef; > > > DWORD dwRegistration; > > > CHelloCF *pCF =3D new CHelloCF(); > > > > > > hEvent =3D CreateEvent(NULL, FALSE, FALSE, NULL); > > > > > > // Initialize the OLE libraries > > > CoInitiali, NULL); > > > > > > // Initialize the OLE libraries > > > CoInitializeEx(NULL, COINIT=5FMULTITHREADED); > > > > > > CoRegisterClassObject(CLSID=5FCHello, pCF, CLSCTX=5FLOCAL=5FSERVER, > > > REGCLS=5FMULTIPLEUSE, &dwRegistration); > > > > > > // wait on an event to stop > > > WaitForSingleObject(hEvent, INFINITE); > > > > > > // revoke and release the class object > > > CoRevokeClassObject(dwRegistration); > > > ulRef =3D pCF->Release(); > > > > > > // Tell OLE we are going away. > > > CoUninitialize(); > > > > > > return(0); } > > > > > > extern CLSID CLSID=5FCHello; > > > extern UUID LIBID=5FCHelloLib; > > > > > > CLSID CLSID=5FCHello =3D { /* 2573F891-CFEE-101A-9A9F-00AA00342820 = */ > > > 0x2573F891, > > > 0xCFEE, > > > 0x101A, > > > { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 } > > > }; > > > > > > UUID LIBID=5FCHelloLib =3D { /* 2573F890-CFEE-101A-9A9F-00AA0034282= 0 */ > > > 0x2573F890, > > > 0xCFEE, > > > 0x101A, > > > { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 } > > > }; > > > > > > #include > > > #include > > > #include > > > #include > > > #include > > > #include "pshlo.h" > > > #include "shlo.hxx" > > > #include "clsid.h" > > > > > > int =5Fcdecl > n( > > > int argc, > > > char * argv[] > > > ) { > > > HRESULT hRslt; > > > IHello *pHello; > > > ULONG ulCnt; > > > IMoniker * pmk; > > > WCHAR wcsT[=5FMAX=5FPATH]; > > > WCHAR wcsPath[2 * =5FMAX=5FPATH]; > > > > > > // get object path > > > wcsPath[0] =3D '\0'; > > > wcsT[0] =3D '\0'; > > > if( argc > 1) { > > > mbstowcs(wcsPath, argv[1], strlen(argv[1]) + 1); > > > wcsupr(wcsPath); > > > } > > > else { > > > fprintf(stderr, "O > > bject path must be specified\n"); > > > return(1); > > > } > > > > > > // get print string > > > if(argc > 2) > > > mbstowcs(wcsT, argv[2], strlen(argv[2]) + 1); > > > else > > > wcscpy(wcsT, L"Hello World"); > > > > > > printf("Linking to object %ws\n", wcsPath); > > > printf("Text String %ws\n", wcsT); > > > > > > // Initialize the OLE libraries > > > hRslt =3D CoInitializeEx(NULL, COINIT=5FMULTITHREADED); > > > > > > if(SUCCEEDED(hRslt)) > > > > > > > > hRslt =3D CreateFileMoniker(wcsPath, &pmk); > > > if(SUCCEEDED(hRslt)) > > > hRslt =3D BindMoniker(pmk, 0, IID=5FIHello, (void **)&pHello); > > > > > > if(SUCCEEDED(hRslt)) > > > > > > > > // print a string out > > > pHello->PrintSz(wcsT); > > > > > > Sleep(2000); > > > ulCnt =3D pHello->Release(); > > > } > > > else > > > printf("Failure to connect, status: %lx", hRslt); > > > > > > // Tell OLE we are going away. > > > CoUninitialize(); > > > } > > > > > > return(0); > > > } > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Hacker alle prime armi > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > #!/usr/local/bin/perl > > > $msg=3D"Hello, world.\n"; > > > if ($#ARGV >=3D 0) > > > > > while(defined($arg=3Dshift(@ARGV))) > > > > > $outfilename =3D $arg; > > > open(FILE, ">" . $outfilename) || die "Can't write $arg: $!\n"; > > > print (FILE $msg); > > > close(FILE) || die "Can't close $arg: $!\n"; > > > } > > > } else > > > > > print ($msg); > > > } > > > 1; > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Hacker esperto > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > #include > > > #define S "Hello, World\n" > > > main(){exit(printf(S) =3D=3D strlen(S) ? 0 : 1);} > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Hacker "stagionato" > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > > > % cc -o a.out ~/src/misc/hw/hw.c > > > % a.out > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Guru Hacker > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > % cat > > > Hello, world. > > > ^D > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Programmatore di sistema > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > LL0: > > > .seg "data" > > > .seg "text" > > > .proc 04 > > > .global =5Fmain > > > =5Fmain: > > > !#PROLOGUE# 0 > > > sethi %hi(LF26),%g1 > > > add %g1,%lo(LF26),%g1 > > > save %sp,%g1,%sp > > > !#PROLOGUE# 1 > > > .seg "data1" > > > L30: > > > .ascii "Hello, World\012\0" > > > .seg "text" > > > .seg "data1" > > > L32: > > > .ascii "Hello, World\012\0" > > > .seg "text" > > > set L32,%o0 > > > call =5Fstrlen,1 > > > nop > > > mov %o0,%i5 > > > set L30,%o0 > > > call =5Fprintf,1 > > > nop > > > cmp %o0,%i5 > > > bne L2000000 > > > nop > > > mov 0,%o0 > > > b L2000001 > > > nop > > > L2000000: > > > mov 0x1,%o0 > > > L2000001: > > > call =5Fexit,1 > > > nop > > > LE26: > > > ret > > > restore > > > LF26 =3D -96 > > > LP26 =3D 96 > > > LST26 =3D 96 > > > LT26 =3D 96 > > > .seg "data" > > > > > > 0000000 0103 0107 0000 0060 0000 0020 0000 0000 > > > 0000020 0000 0030 0000 0000 0000 0054 0000 0000 > > > 0000040 033f ffff 8200 63a0 9de3 8001 1100 0000 > > > 0000060 9012 2000 4000 0000 0100 0000 ba10 0008 > > > 0000100 1100 0000 9012 2000 4000 0000 0100 00 ba10 0008 > > > 0000100 1100 0000 9012 2000 4000 0000 0100 0000 > > > 0000120 80a2 001d 1280 0005 0100 0000 9010 2000 > > > 0000140 1080 0003 0100 0000 9010 2001 4000 0000 > > > 0000160 0100 0000 81c7 e008 81e8 0000 0000 0000 > > > 0000200 4865 6c6c 6f2c 2057 6f72 6c64 0a00 4865 > > > 0000220 6c6c 6f2c 2057 6f72 6c64 0a00 0000 0000 > > > 0000240 0000 000c 0000 0608 0000 006e 0000 0010 > > > 0000260 0000 060b 0000 006e 0000 0014 0000 0286 > > > 0000300 ffff ffec 0000 0020 0000 0608 0000 0060 > > > 0000320 0000 0024 0000 060b 0000 0060 0000 0028 > > > 0000340 0000 0186 ffff ffd8 0000 004c 0000 0386 > > > 0000360 ffff ffb4 0000 0004 0500 0000 0000 0000 > > > 0000400 0000 000a 0100 0000 0000 0000 0000 0012 > > > 0000420 0100 0000 0000 0000 0000 001a 0100 0000 > > > 0000440 0000 0000 0000 0020 5f6d 6169 6e00 5f70 > > > 0000460 7269 6e74 6600 5f73 7472 6c65 6e00 5f65 > > > 0000500 7869 7400 > > > 0000504 > > > > > > % axe=5Fgenerate -f system.uhdl > > > Application 'Exchange' generated > > > 2324042350000000 source code lines > > > No Errors detected. > > > Hardware retrieval...done OK > > > Certification Test...done OK > > > Packing..............done OK > > > Delivery.............done OK > > > Application 'Exchange' delivered to customer > > > 23456000 bytes/sec. > > > End processing, 2345 seconds. > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D > > > Programmatore di altissimo livello > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D > > > > > > system.uhdl : > > > > > > SYSTEM > > > CREATE ScreenWin > > > SIZE 20000000/Unit=3DOne > > > DESTINATION Order.dest[One] > > > OUTPUT CHARACTER['Hello world'] > > > END > > > END > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Dirigente di > > > basso profilo > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > 10 PRINT "HELLO WORLD" > > > 20 END > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Dirigente di medio > > > livello > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > mail -s "Hello, world." sergio.rossi@xxxxxxx > > > > > > Sergio, potresti scrivermi un programma che stampi > > > "Hello, world."? Ne ho bisogno per domani pomeriggio.. > > > > > > ^D > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Dirigente di lungo > > > corso > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > % zmail all > > > > > > Ho assolutamente bisogno di un programma per stampare "Hello, world." > > > per questo pomeriggio. > > > > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > Amministratore > > > Delegato > > > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D > > > > > > % message > > > message: Command not found > > > % pm > > > pm: Command not found > > > % letter > > > letter: Command not found. > > > % mail > > > To: ^X ^F ^C > > > > help mail > > > help: Command not found. > > > >what > > > what: Command not found > > > >need help > > > need: Command not found > > > > damn! > > > !: Event unrecognized > > > >exit > > > exit: Unknown > > > >quit > > > % > > > % logout > > > > > > Bipppp ! Sig.a Rossi ? Chiami immediatamente qualcuno dei Sistemi > > > Informativi. SUBITO !!! > > > > Ciao > s > -- > Stefano Della Puppa > > Per (de)iscriversi spedire un messaggio con SOGGETTO > "subscribe" (o "unsubscribe") a mailto:dumbo-request@xxxxxxxxxxxxx > HomePage/Archivio lista //www.freelists.org/cgi-bin/list?list=5Fid=3Ddumbo > > Per (de)iscriversi spedire un messaggio con SOGGETTO "subscribe" (o "unsubscribe") a mailto:dumbo-request@xxxxxxxxxxxxx HomePage/Archivio lista //www.freelists.org/cgi-bin/list?list_id=dumbo