void lime_image_data_util_resize (value image, value buffer, int width, int height) {
Image _image = Image (image);
ImageBuffer _buffer = ImageBuffer (buffer);
ImageDataUtil::Resize (&_image, &_buffer, width, height);
}
void lime_window_set_icon (value window, value buffer) {
Window* targetWindow = (Window*)val_data (window);
ImageBuffer imageBuffer = ImageBuffer (buffer);
targetWindow->SetIcon (&imageBuffer);
}
value lime_image_data_util_resize (value image, value buffer, value width, value height) {
Image _image = Image (image);
ImageBuffer _buffer = ImageBuffer (buffer);
ImageDataUtil::Resize (&_image, &_buffer, val_int (width), val_int (height));
return alloc_null ();
}
value lime_window_set_icon (value window, value buffer) {
Window* targetWindow = (Window*)(intptr_t)val_float (window);
ImageBuffer imageBuffer = ImageBuffer (buffer);
targetWindow->SetIcon (&imageBuffer);
return alloc_null ();
}
ImageBuffer DDScreen::GetBackBuffer()
{
// This is only Emulation of Share<Surface>
// We actually don't wan't Share to be the Surface owner
// So we tell Share to give up, and Release ownership
// This way we'll avoid removal of our backbuffer Surface
_emul_sh_surface.ReleaseTarget();
_emul_sh_surface.SetTarget( GetSurface() );
return ImageBuffer(_emul_sh_surface);
}
value lime_image_encode (value buffer, value type, value quality) {
ImageBuffer imageBuffer = ImageBuffer (buffer);
Bytes data;
switch (val_int (type)) {
case 0:
#ifdef LIME_PNG
if (PNG::Encode (&imageBuffer, &data)) {
//delete imageBuffer.data;
return data.Value ();
}
#endif
break;
case 1:
#ifdef LIME_JPEG
if (JPEG::Encode (&imageBuffer, &data, val_int (quality))) {
//delete imageBuffer.data;
return data.Value ();
}
#endif
break;
default: break;
}
//delete imageBuffer.data;
return alloc_null ();
}
void init_buffers(int w, int h) {
trace_image_buffer = ImageBuffer(w, h);
}
