AES encryption with openssl bindings

[brad clawsie via Digitalmars-d-learn]

hi everyone.

I'm trying to symmetrically encrypt some text using the openssl 
bindings. My code compiles and fails silently. Clearly there is 
something very wrong with it - it could be my novice D skills, or 
my misuse of the openssl binding.

     auto chunk = new ubyte[](16);
     foreach(ref x; chunk) x = uniform!"[]"(ubyte.min, ubyte.max);
     AES_KEY wctx;
     AES_set_encrypt_key(chunk.ptr,128,&wctx);

     string s = "virident";
     ubyte[] b;
     b = cast(ubyte[]) s;
     ubyte[] e;
     AES_encrypt(b.ptr,e.ptr,&wctx);
     ubyte[] d;
     AES_decrypt(e.ptr,d.ptr,&wctx);
     writefln("%s",d);


Any clues? I am a D novice, so any spoonfeeding you could provide 
would be helpful :)

thanks!
Brad