- added GCC warning -Wstrict-prototypes
[blender.git] / source / blender / editors / space_image / image_ops.c
index 3b7ffc2d8166dcd670063b6e9307d4f18fb37f3a..dab486949ead37073d03ddf70783ad935fd0dd87 100644 (file)
  * ***** END GPL LICENSE BLOCK *****
  */
 
+#include <stddef.h>
 #include <string.h>
 #include <stdlib.h>
+#include <errno.h>
 
 #include "MEM_guardedalloc.h"
 
 #include "DNA_object_types.h"
+#include "DNA_node_types.h"
 #include "DNA_packedFile_types.h"
 #include "DNA_scene_types.h"
 
@@ -38,7 +41,6 @@
 #include "BKE_context.h"
 #include "BKE_image.h"
 #include "BKE_global.h"
-#include "BKE_image.h"
 #include "BKE_library.h"
 #include "BKE_main.h"
 #include "BKE_node.h"
@@ -122,13 +124,19 @@ static int space_image_buffer_exists_poll(bContext *C)
 static int space_image_file_exists_poll(bContext *C)
 {
        if(space_image_buffer_exists_poll(C)) {
+               Main *bmain= CTX_data_main(C);
                SpaceImage *sima= CTX_wm_space_image(C);
                ImBuf *ibuf;
                void *lock;
-               int poll;
-               
+               int poll= 0;
+               char name[FILE_MAX];
+
                ibuf= ED_space_image_acquire_buffer(sima, &lock);
-               poll= (ibuf && BLI_exists(ibuf->name) && BLI_is_writable(ibuf->name));
+               if(ibuf) {
+                       BLI_strncpy(name, ibuf->name, FILE_MAX);
+                       BLI_path_abs(name, bmain->name);
+                       poll= (BLI_exists(name) && BLI_is_writable(name));
+               }
                ED_space_image_release_buffer(sima, lock);
 
                return poll;
@@ -425,7 +433,7 @@ void IMAGE_OT_view_zoom(wmOperatorType *ot)
  * Default behavior is to reset the position of the image and set the zoom to 1
  * If the image will not fit within the window rectangle, the zoom is adjusted */
 
-static int view_all_exec(bContext *C, wmOperator *op)
+static int view_all_exec(bContext *C, wmOperator *UNUSED(op))
 {
        SpaceImage *sima;
        ARegion *ar;
@@ -479,7 +487,7 @@ void IMAGE_OT_view_all(wmOperatorType *ot)
 
 /********************** view selected operator *********************/
 
-static int view_selected_exec(bContext *C, wmOperator *op)
+static int view_selected_exec(bContext *C, wmOperator *UNUSED(op))
 {
        SpaceImage *sima;
        ARegion *ar;
@@ -536,7 +544,7 @@ void IMAGE_OT_view_selected(wmOperatorType *ot)
 
 /********************** view zoom in/out operator *********************/
 
-static int view_zoom_in_exec(bContext *C, wmOperator *op)
+static int view_zoom_in_exec(bContext *C, wmOperator *UNUSED(op))
 {
        SpaceImage *sima= CTX_wm_space_image(C);
        ARegion *ar= CTX_wm_region(C);
@@ -559,7 +567,7 @@ void IMAGE_OT_view_zoom_in(wmOperatorType *ot)
        ot->poll= space_image_main_area_poll;
 }
 
-static int view_zoom_out_exec(bContext *C, wmOperator *op)
+static int view_zoom_out_exec(bContext *C, wmOperator *UNUSED(op))
 {
        SpaceImage *sima= CTX_wm_space_image(C);
        ARegion *ar= CTX_wm_region(C);
@@ -637,11 +645,16 @@ static const EnumPropertyItem image_file_type_items[] = {
                {R_JP2, "JPEG_2000", 0, "Jpeg 2000", ""},
 #endif
                {R_IRIS, "IRIS", 0, "Iris", ""},
-       //if(G.have_libtiff)
+#ifdef WITH_TIFF
                {R_TIFF, "TIFF", 0, "Tiff", ""},
+#endif
+#ifdef WITH_DDS
                {R_RADHDR, "RADIANCE_HDR", 0, "Radiance HDR", ""},
+#endif
+#ifdef WITH_CINEON
                {R_CINEON, "CINEON", 0, "Cineon", ""},
                {R_DPX, "DPX", 0, "DPX", ""},
+#endif
 #ifdef WITH_OPENEXR
                {R_OPENEXR, "OPENEXR", 0, "OpenEXR", ""},
        /* saving sequences of multilayer won't work, they copy buffers  */
@@ -653,7 +666,7 @@ static const EnumPropertyItem image_file_type_items[] = {
 
 static void image_filesel(bContext *C, wmOperator *op, const char *path)
 {
-       RNA_string_set(op->ptr, "path", path);
+       RNA_string_set(op->ptr, "filepath", path);
        WM_event_add_fileselect(C, op); 
 }
 
@@ -667,7 +680,7 @@ static void open_init(bContext *C, wmOperator *op)
        uiIDContextProperty(C, &pprop->ptr, &pprop->prop);
 }
 
-static int open_cancel(bContext *C, wmOperator *op)
+static int open_cancel(bContext *UNUSED(C), wmOperator *op)
 {
        MEM_freeN(op->customdata);
        op->customdata= NULL;
@@ -676,20 +689,25 @@ static int open_cancel(bContext *C, wmOperator *op)
 
 static int open_exec(bContext *C, wmOperator *op)
 {
-       SpaceImage *sima= CTX_wm_space_image(C);
+       SpaceImage *sima= CTX_wm_space_image(C); /* XXX other space types can call */
        Scene *scene= CTX_data_scene(C);
        Object *obedit= CTX_data_edit_object(C);
+       ImageUser *iuser= NULL;
        PropertyPointerRNA *pprop;
        PointerRNA idptr;
        Image *ima= NULL;
        char str[FILE_MAX];
 
-       RNA_string_get(op->ptr, "path", str);
+       RNA_string_get(op->ptr, "filepath", str);
        /* default to frame 1 if there's no scene in context */
-       ima= BKE_add_image_file(str, scene ? scene->r.cfra : 1);
+
+       errno= 0;
+
+       ima= BKE_add_image_file(str);
 
        if(!ima) {
                if(op->customdata) MEM_freeN(op->customdata);
+               BKE_reportf(op->reports, RPT_ERROR, "Can't read: \"%s\", %s.", str, errno ? strerror(errno) : "Unsupported image format");
                return OPERATOR_CANCELLED;
        }
        
@@ -708,11 +726,25 @@ static int open_exec(bContext *C, wmOperator *op)
                RNA_property_pointer_set(&pprop->ptr, pprop->prop, idptr);
                RNA_property_update(C, &pprop->ptr, pprop->prop);
        }
-       else if(sima)
+       else if(sima) {
                ED_space_image_set(C, sima, scene, obedit, ima);
+               iuser= &sima->iuser;
+       }
+       else {
+               Tex *tex= CTX_data_pointer_get_type(C, "texture", &RNA_Texture).data;
+               if(tex && tex->type==TEX_IMAGE)
+                       iuser= &tex->iuser;
+               
+       }
+       
+       /* initialize because of new image */
+       if(iuser) {
+               iuser->sfra= 1;
+               iuser->offset= 0;
+               iuser->fie_ima= 2;
+       }
 
-       // XXX other users?
-       BKE_image_signal(ima, (sima)? &sima->iuser: NULL, IMA_SIGNAL_RELOAD);
+       BKE_image_signal(ima, iuser, IMA_SIGNAL_RELOAD);
        WM_event_add_notifier(C, NC_IMAGE|NA_EDITED, ima);
        
        MEM_freeN(op->customdata);
@@ -720,15 +752,30 @@ static int open_exec(bContext *C, wmOperator *op)
        return OPERATOR_FINISHED;
 }
 
-static int open_invoke(bContext *C, wmOperator *op, wmEvent *event)
+static int open_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
 {
-       SpaceImage *sima= CTX_wm_space_image(C);
-       char *path= (sima && sima->image)? sima->image->name: U.textudir;
+       SpaceImage *sima= CTX_wm_space_image(C); /* XXX other space types can call */
+       char *path=U.textudir;
+       Image *ima= NULL;
+
+       if(sima) {
+                ima= sima->image;
+       }
+
+       if (ima==NULL) {
+                Tex *tex= CTX_data_pointer_get_type(C, "texture", &RNA_Texture).data;
+                if(tex && tex->type==TEX_IMAGE)
+                        ima= tex->ima;
+       }
+
+       if(ima)
+               path= ima->name;
+       
 
        if(!RNA_property_is_set(op->ptr, "relative_path"))
                RNA_boolean_set(op->ptr, "relative_path", U.flag & USER_RELPATHS);
 
-       if(RNA_property_is_set(op->ptr, "path"))
+       if(RNA_property_is_set(op->ptr, "filepath"))
                return open_exec(C, op);
        
        open_init(C, op);
@@ -738,6 +785,7 @@ static int open_invoke(bContext *C, wmOperator *op, wmEvent *event)
        return OPERATOR_RUNNING_MODAL;
 }
 
+/* called by other space types too */
 void IMAGE_OT_open(wmOperatorType *ot)
 {
        /* identifiers */
@@ -753,9 +801,7 @@ void IMAGE_OT_open(wmOperatorType *ot)
        ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
 
        /* properties */
-       WM_operator_properties_filesel(ot, FOLDERFILE|IMAGEFILE|MOVIEFILE, FILE_SPECIAL, FILE_OPENFILE);
-
-       RNA_def_boolean(ot->srna, "relative_path", 0, "Relative Path", "Load image with relative path to current .blend file");
+       WM_operator_properties_filesel(ot, FOLDERFILE|IMAGEFILE|MOVIEFILE, FILE_SPECIAL, FILE_OPENFILE, WM_FILESEL_FILEPATH|WM_FILESEL_RELPATH);
 }
 
 /******************** replace image operator ********************/
@@ -768,8 +814,8 @@ static int replace_exec(bContext *C, wmOperator *op)
        if(!sima->image)
                return OPERATOR_CANCELLED;
        
-       RNA_string_get(op->ptr, "path", str);
-       BLI_strncpy(sima->image->name, str, sizeof(sima->image->name)-1); /* we cant do much if the str is longer then 240 :/ */
+       RNA_string_get(op->ptr, "filepath", str);
+       BLI_strncpy(sima->image->name, str, sizeof(sima->image->name)); /* we cant do much if the str is longer then 240 :/ */
 
        BKE_image_signal(sima->image, &sima->iuser, IMA_SIGNAL_RELOAD);
        WM_event_add_notifier(C, NC_IMAGE|NA_EDITED, sima->image);
@@ -777,18 +823,20 @@ static int replace_exec(bContext *C, wmOperator *op)
        return OPERATOR_FINISHED;
 }
 
-static int replace_invoke(bContext *C, wmOperator *op, wmEvent *event)
+static int replace_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
 {
        SpaceImage *sima= CTX_wm_space_image(C);
-       char *path= (sima->image)? sima->image->name: U.textudir;
 
        if(!sima->image)
                return OPERATOR_CANCELLED;
 
-       if(RNA_property_is_set(op->ptr, "path"))
+       if(RNA_property_is_set(op->ptr, "filepath"))
                return replace_exec(C, op);
 
-       image_filesel(C, op, path);
+       if(!RNA_property_is_set(op->ptr, "relative_path"))
+               RNA_boolean_set(op->ptr, "relative_path", (strncmp(sima->image->name, "//", 2))==0);
+
+       image_filesel(C, op, sima->image->name);
 
        return OPERATOR_RUNNING_MODAL;
 }
@@ -808,94 +856,108 @@ void IMAGE_OT_replace(wmOperatorType *ot)
        ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
 
        /* properties */
-       WM_operator_properties_filesel(ot, FOLDERFILE|IMAGEFILE|MOVIEFILE, FILE_SPECIAL, FILE_OPENFILE);
+       WM_operator_properties_filesel(ot, FOLDERFILE|IMAGEFILE|MOVIEFILE, FILE_SPECIAL, FILE_OPENFILE, WM_FILESEL_FILEPATH|WM_FILESEL_RELPATH);
 }
 
 /******************** save image as operator ********************/
 
 /* assumes name is FILE_MAX */
 /* ima->name and ibuf->name should end up the same */
-static void save_image_doit(bContext *C, SpaceImage *sima, Scene *scene, wmOperator *op, char *path)
+static void save_image_doit(bContext *C, SpaceImage *sima, Scene *scene, wmOperator *op, char *path, int do_newpath)
 {
        Image *ima= ED_space_image(sima);
        void *lock;
        ImBuf *ibuf= ED_space_image_acquire_buffer(sima, &lock);
 
        if (ibuf) {
-               int relative= RNA_boolean_get(op->ptr, "relative_path");
-               BLI_path_abs(path, G.sce);
-               
+               Main *bmain= CTX_data_main(C);
+               const short relative= (RNA_struct_find_property(op->ptr, "relative_path") && RNA_boolean_get(op->ptr, "relative_path"));
+               const short save_copy= (RNA_struct_find_property(op->ptr, "copy") && RNA_boolean_get(op->ptr, "copy"));
+               short ok= FALSE;
+
+               BLI_path_abs(path, bmain->name);
+
+               WM_cursor_wait(1);
+
+               if(ima->type == IMA_TYPE_R_RESULT) {
+                       /* enforce user setting for RGB or RGBA, but skip BW */
+                       if(scene->r.planes==32) {
+                               ibuf->depth= 32;
+                       }
+                       else if(scene->r.planes==24) {
+                               ibuf->depth= 24;
+                       }
+               }
+               else {
+                       /* TODO, better solution, if a 24bit image is painted onto it may contain alpha */
+                       if(ibuf->userflags & IB_BITMAPDIRTY) { /* it has been painted onto */
+                               /* checks each pixel, not ideal */
+                               ibuf->depth= BKE_alphatest_ibuf(ibuf) ? 32 : 24;
+                       }
+               }
+
                if(scene->r.scemode & R_EXTENSION)  {
                        BKE_add_image_extension(path, sima->imtypenr);
                }
                
-               /* enforce user setting for RGB or RGBA, but skip BW */
-               if(scene->r.planes==32)
-                       ibuf->depth= 32;
-               else if(scene->r.planes==24)
-                       ibuf->depth= 24;
-               
-               WM_cursor_wait(1);
-
                if(sima->imtypenr==R_MULTILAYER) {
                        RenderResult *rr= BKE_image_acquire_renderresult(scene, ima);
                        if(rr) {
                                RE_WriteRenderResult(rr, path, scene->r.quality);
-
-                               if(relative)
-                                       BLI_path_rel(path, G.sce); /* only after saving */
-
-                               BLI_strncpy(ima->name, path, sizeof(ima->name));
-                               BLI_strncpy(ibuf->name, path, sizeof(ibuf->name));
-                               
-                               /* should be function? nevertheless, saving only happens here */
-                               for(ibuf= ima->ibufs.first; ibuf; ibuf= ibuf->next)
-                                       ibuf->userflags &= ~IB_BITMAPDIRTY;
-                               
+                               ok= TRUE;
                        }
-                       else
+                       else {
                                BKE_report(op->reports, RPT_ERROR, "Did not write, no Multilayer Image");
+                       }
                        BKE_image_release_renderresult(scene, ima);
                }
                else if (BKE_write_ibuf(scene, ibuf, path, sima->imtypenr, scene->r.subimtype, scene->r.quality)) {
-                       char *name;
+                       ok= TRUE;
+               }
 
+               if(ok)  {
                        if(relative)
-                               BLI_path_rel(path, G.sce); /* only after saving */
+                               BLI_path_rel(path, bmain->name); /* only after saving */
 
-                       BLI_strncpy(ima->name, path, sizeof(ima->name));
-                       BLI_strncpy(ibuf->name, path, sizeof(ibuf->name));
-                       
-                       ibuf->userflags &= ~IB_BITMAPDIRTY;
-                       
-                       /* change type? */
-                       if(ima->type==IMA_TYPE_R_RESULT) {
-                               ima->type= IMA_TYPE_IMAGE;
-
-                               /* workaround to ensure the render result buffer is no longer used
-                                * by this image, otherwise can crash when a new render result is
-                                * created. */
-                               if(ibuf->rect && !(ibuf->mall & IB_rect))
-                                       imb_freerectImBuf(ibuf);
-                               if(ibuf->rect_float && !(ibuf->mall & IB_rectfloat))
-                                       imb_freerectfloatImBuf(ibuf);
-                               if(ibuf->zbuf && !(ibuf->mall & IB_zbuf))
-                                       IMB_freezbufImBuf(ibuf);
-                               if(ibuf->zbuf_float && !(ibuf->mall & IB_zbuffloat))
-                                       IMB_freezbuffloatImBuf(ibuf);
-                       }
-                       if( ELEM(ima->source, IMA_SRC_GENERATED, IMA_SRC_VIEWER)) {
-                               ima->source= IMA_SRC_FILE;
-                               ima->type= IMA_TYPE_IMAGE;
+                       if(ibuf->name[0]==0) {
+                               BLI_strncpy(ibuf->name, path, sizeof(ibuf->name));
+                               BLI_strncpy(ima->name, path, sizeof(ima->name));
                        }
-                       
-                       name = BLI_last_slash(path);
 
-                       /* name image as how we saved it */
-                       rename_id(&ima->id, name ? name + 1 : path);
-               } 
-               else
+                       if(!save_copy) {
+                               if(do_newpath) {
+                                       BLI_strncpy(ima->name, path, sizeof(ima->name));
+                                       BLI_strncpy(ibuf->name, path, sizeof(ibuf->name));
+                               }
+
+                               ibuf->userflags &= ~IB_BITMAPDIRTY;
+
+                               /* change type? */
+                               if(ima->type==IMA_TYPE_R_RESULT) {
+                                       ima->type= IMA_TYPE_IMAGE;
+
+                                       /* workaround to ensure the render result buffer is no longer used
+                                        * by this image, otherwise can crash when a new render result is
+                                        * created. */
+                                       if(ibuf->rect && !(ibuf->mall & IB_rect))
+                                               imb_freerectImBuf(ibuf);
+                                       if(ibuf->rect_float && !(ibuf->mall & IB_rectfloat))
+                                               imb_freerectfloatImBuf(ibuf);
+                                       if(ibuf->zbuf && !(ibuf->mall & IB_zbuf))
+                                               IMB_freezbufImBuf(ibuf);
+                                       if(ibuf->zbuf_float && !(ibuf->mall & IB_zbuffloat))
+                                               IMB_freezbuffloatImBuf(ibuf);
+                               }
+                               if( ELEM(ima->source, IMA_SRC_GENERATED, IMA_SRC_VIEWER)) {
+                                       ima->source= IMA_SRC_FILE;
+                                       ima->type= IMA_TYPE_IMAGE;
+                               }
+                       }
+               }
+               else {
                        BKE_reportf(op->reports, RPT_ERROR, "Couldn't write image: %s", path);
+               }
+
 
                WM_event_add_notifier(C, NC_IMAGE|NA_EDITED, sima->image);
 
@@ -916,25 +978,39 @@ static int save_as_exec(bContext *C, wmOperator *op)
                return OPERATOR_CANCELLED;
 
        sima->imtypenr= RNA_enum_get(op->ptr, "file_type");
-       RNA_string_get(op->ptr, "path", str);
+       RNA_string_get(op->ptr, "filepath", str);
 
-       save_image_doit(C, sima, scene, op, str);
+       save_image_doit(C, sima, scene, op, str, TRUE);
 
        return OPERATOR_FINISHED;
 }
 
-static int save_as_invoke(bContext *C, wmOperator *op, wmEvent *event)
+
+static int save_as_check(bContext *UNUSED(C), wmOperator *op)
+{
+       char filepath[FILE_MAX];
+       RNA_string_get(op->ptr, "filepath", filepath);
+       if(BKE_add_image_extension(filepath, RNA_enum_get(op->ptr, "file_type"))) {
+               RNA_string_set(op->ptr, "filepath", filepath);
+               return TRUE;
+       }
+       return FALSE;
+}
+
+static int save_as_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
 {
        SpaceImage *sima= CTX_wm_space_image(C);
        Image *ima = ED_space_image(sima);
        Scene *scene= CTX_data_scene(C);
        ImBuf *ibuf;
+       char filename[FILE_MAX];
+       
        void *lock;
 
        if(!RNA_property_is_set(op->ptr, "relative_path"))
                RNA_boolean_set(op->ptr, "relative_path", U.flag & USER_RELPATHS);
 
-       if(RNA_property_is_set(op->ptr, "path"))
+       if(RNA_property_is_set(op->ptr, "filepath"))
                return save_as_exec(C, op);
        
        if(!ima)
@@ -957,10 +1033,21 @@ static int save_as_invoke(bContext *C, wmOperator *op, wmEvent *event)
                RNA_enum_set(op->ptr, "file_type", sima->imtypenr);
                
                if(ibuf->name[0]==0)
-                       BLI_strncpy(ibuf->name, G.ima, FILE_MAX);
+                       if ( (G.ima[0] == '/') && (G.ima[1] == '/') && (G.ima[2] == '\0') ) {
+                               BLI_strncpy(filename, "//untitled", FILE_MAX);
+                       } else {
+                               BLI_strncpy(filename, G.ima, FILE_MAX);
+                       }
+               else
+                       BLI_strncpy(filename, ibuf->name, FILE_MAX);
                
+               /* enable save_copy by default for render results */
+               if(ELEM(ima->type, IMA_TYPE_R_RESULT, IMA_TYPE_COMPOSITE) && !RNA_property_is_set(op->ptr, "copy")) {
+                       RNA_boolean_set(op->ptr, "copy", TRUE);
+               }
+
                // XXX note: we can give default menu enums to operator for this 
-               image_filesel(C, op, ibuf->name);
+               image_filesel(C, op, filename);
 
                ED_space_image_release_buffer(sima, lock);
                
@@ -980,6 +1067,7 @@ void IMAGE_OT_save_as(wmOperatorType *ot)
        
        /* api callbacks */
        ot->exec= save_as_exec;
+       ot->check= save_as_check;
        ot->invoke= save_as_invoke;
        ot->poll= space_image_buffer_exists_poll;
 
@@ -988,15 +1076,16 @@ void IMAGE_OT_save_as(wmOperatorType *ot)
 
        /* properties */
        RNA_def_enum(ot->srna, "file_type", image_file_type_items, R_PNG, "File Type", "File type to save image as.");
-       WM_operator_properties_filesel(ot, FOLDERFILE|IMAGEFILE|MOVIEFILE, FILE_SPECIAL, FILE_SAVE);
+       WM_operator_properties_filesel(ot, FOLDERFILE|IMAGEFILE|MOVIEFILE, FILE_SPECIAL, FILE_SAVE, WM_FILESEL_FILEPATH|WM_FILESEL_RELPATH);
 
-       RNA_def_boolean(ot->srna, "relative_path", 0, "Relative Path", "Save image with relative path to current .blend file");
+       RNA_def_boolean(ot->srna, "copy", 0, "Copy", "Create a new image file without modifying the current image in blender");
 }
 
 /******************** save image operator ********************/
 
 static int save_exec(bContext *C, wmOperator *op)
 {
+       Main *bmain= CTX_data_main(C);
        SpaceImage *sima= CTX_wm_space_image(C);
        Image *ima = ED_space_image(sima);
        void *lock;
@@ -1012,9 +1101,11 @@ static int save_exec(bContext *C, wmOperator *op)
 
        /* if exists, saves over without fileselect */
        
-       BLI_strncpy(name, ibuf->name, FILE_MAX);
+       BLI_strncpy(name, ima->name, FILE_MAX);
        if(name[0]==0)
                BLI_strncpy(name, G.ima, FILE_MAX);
+       else
+               BLI_path_abs(name, bmain->name);
        
        if(BLI_exists(name) && BLI_is_writable(name)) {
                rr= BKE_image_acquire_renderresult(scene, ima);
@@ -1027,7 +1118,7 @@ static int save_exec(bContext *C, wmOperator *op)
                BKE_image_release_renderresult(scene, ima);
                ED_space_image_release_buffer(sima, lock);
                
-               save_image_doit(C, sima, scene, op, name);
+               save_image_doit(C, sima, scene, op, name, FALSE);
        }
        else {
                ED_space_image_release_buffer(sima, lock);
@@ -1057,6 +1148,7 @@ void IMAGE_OT_save(wmOperatorType *ot)
 
 static int save_sequence_exec(bContext *C, wmOperator *op)
 {
+       Main *bmain= CTX_data_main(C);
        SpaceImage *sima= CTX_wm_space_image(C);
        ImBuf *ibuf;
        int tot= 0;
@@ -1100,7 +1192,7 @@ static int save_sequence_exec(bContext *C, wmOperator *op)
                        char name[FILE_MAX];
                        BLI_strncpy(name, ibuf->name, sizeof(name));
                        
-                       BLI_path_abs(name, G.sce);
+                       BLI_path_abs(name, bmain->name);
 
                        if(0 == IMB_saveiff(ibuf, name, IB_rect | IB_zbuf | IB_zbuffloat)) {
                                BKE_reportf(op->reports, RPT_ERROR, "Could not write image %s.", name);
@@ -1131,7 +1223,7 @@ void IMAGE_OT_save_sequence(wmOperatorType *ot)
 
 /******************** reload image operator ********************/
 
-static int reload_exec(bContext *C, wmOperator *op)
+static int reload_exec(bContext *C, wmOperator *UNUSED(op))
 {
        Image *ima= CTX_data_edit_image(C);
        SpaceImage *sima= CTX_wm_space_image(C);
@@ -1143,7 +1235,6 @@ static int reload_exec(bContext *C, wmOperator *op)
        BKE_image_signal(ima, (sima)? &sima->iuser: NULL, IMA_SIGNAL_RELOAD);
 
        WM_event_add_notifier(C, NC_IMAGE|NA_EDITED, ima);
-       ED_area_tag_redraw(CTX_wm_area(C));
        
        return OPERATOR_FINISHED;
 }
@@ -1156,7 +1247,6 @@ void IMAGE_OT_reload(wmOperatorType *ot)
        
        /* api callbacks */
        ot->exec= reload_exec;
-       ot->poll= space_image_poll;
 
        /* flags */
        ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
@@ -1164,7 +1254,7 @@ void IMAGE_OT_reload(wmOperatorType *ot)
 
 /********************** new image operator *********************/
 
-static int new_exec(bContext *C, wmOperator *op)
+static int image_new_exec(bContext *C, wmOperator *op)
 {
        SpaceImage *sima;
        Scene *scene;
@@ -1174,7 +1264,7 @@ static int new_exec(bContext *C, wmOperator *op)
        PropertyRNA *prop;
        char name[22];
        float color[4];
-       int width, height, floatbuf, uvtestgrid;
+       int width, height, floatbuf, uvtestgrid, alpha;
 
        /* retrieve state */
        sima= CTX_wm_space_image(C);
@@ -1187,12 +1277,15 @@ static int new_exec(bContext *C, wmOperator *op)
        floatbuf= RNA_boolean_get(op->ptr, "float");
        uvtestgrid= RNA_boolean_get(op->ptr, "uv_test_grid");
        RNA_float_get_array(op->ptr, "color", color);
-       color[3]= RNA_float_get(op->ptr, "alpha");
+       alpha= RNA_boolean_get(op->ptr, "alpha");
        
        if (!floatbuf && scene->r.color_mgt_flag & R_COLOR_MANAGEMENT)
                linearrgb_to_srgb_v3_v3(color, color);
 
-       ima = BKE_add_image_size(width, height, name, floatbuf, uvtestgrid, color);
+       if(!alpha)
+               color[3]= 1.0f;
+
+       ima = BKE_add_image_size(width, height, name, alpha ? 32 : 24, floatbuf, uvtestgrid, color);
 
        if(!ima)
                return OPERATOR_CANCELLED;
@@ -1218,25 +1311,36 @@ static int new_exec(bContext *C, wmOperator *op)
        return OPERATOR_FINISHED;
 }
 
+/* XXX, Ton is not a fan of OK buttons but using this function to avoid undo/redo bug while in mesh-editmode, - campbell */
+static int image_new_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
+{
+       return WM_operator_props_dialog_popup(C, op, 300, 100);
+
+}
+
 void IMAGE_OT_new(wmOperatorType *ot)
 {
+       PropertyRNA *prop;
+       static float default_color[4]= {0.0f, 0.0f, 0.0f, 1.0f};
+       
        /* identifiers */
        ot->name= "New";
        ot->idname= "IMAGE_OT_new";
        
        /* api callbacks */
-       ot->exec= new_exec;
-       ot->invoke= WM_operator_props_popup;
-
+       ot->exec= image_new_exec;
+       ot->invoke= image_new_invoke;
+       
        /* flags */
        ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
 
        /* properties */
-       RNA_def_string(ot->srna, "name", "Untitled", 21, "Name", "Image datablock name.");
+       RNA_def_string(ot->srna, "name", "untitled", 21, "Name", "Image datablock name.");
        RNA_def_int(ot->srna, "width", 1024, 1, INT_MAX, "Width", "Image width.", 1, 16384);
        RNA_def_int(ot->srna, "height", 1024, 1, INT_MAX, "Height", "Image height.", 1, 16384);
-       RNA_def_float_color(ot->srna, "color", 3, NULL, 0.0f, FLT_MAX, "Color", "Default fill color.", 0.0f, 1.0f);
-       RNA_def_float(ot->srna, "alpha", 1.0f, 0.0f, 1.0f, "Alpha", "Default fill alpha.", 0.0f, 1.0f);
+       prop= RNA_def_float_color(ot->srna, "color", 4, NULL, 0.0f, FLT_MAX, "Color", "Default fill color.", 0.0f, 1.0f);
+       RNA_def_property_float_array_default(prop, default_color);
+       RNA_def_boolean(ot->srna, "alpha", 1, "Alpha", "Create an image with an alpha channel.");
        RNA_def_boolean(ot->srna, "uv_test_grid", 0, "UV Test Grid", "Fill the image with a grid for UV map testing.");
        RNA_def_boolean(ot->srna, "float", 0, "32 bit Float", "Create image with 32 bit floating point bit depth.");
 }
@@ -1254,7 +1358,7 @@ static int pack_test(bContext *C, wmOperator *op)
                return 0;
 
        if(ima->source==IMA_SRC_SEQUENCE || ima->source==IMA_SRC_MOVIE) {
-               BKE_report(op->reports, RPT_ERROR, "Can't pack movie or image sequence.");
+               BKE_report(op->reports, RPT_ERROR, "Packing movies or image sequences not supported.");
                return 0;
        }
 
@@ -1280,10 +1384,12 @@ static int pack_exec(bContext *C, wmOperator *op)
        else
                ima->packedfile= newPackedFile(op->reports, ima->name);
 
+       WM_event_add_notifier(C, NC_IMAGE|NA_EDITED, ima);
+       
        return OPERATOR_FINISHED;
 }
 
-static int pack_invoke(bContext *C, wmOperator *op, wmEvent *event)
+static int pack_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
 {
        Image *ima= CTX_data_edit_image(C);
        ImBuf *ibuf= BKE_image_get_ibuf(ima, NULL);
@@ -1310,12 +1416,12 @@ void IMAGE_OT_pack(wmOperatorType *ot)
 {
        /* identifiers */
        ot->name= "Pack";
+       ot->description= "Pack an image as embedded data into the .blend file"; 
        ot->idname= "IMAGE_OT_pack";
        
        /* api callbacks */
        ot->exec= pack_exec;
        ot->invoke= pack_invoke;
-       ot->poll= space_image_buffer_exists_poll;
 
        /* flags */
        ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
@@ -1326,12 +1432,14 @@ void IMAGE_OT_pack(wmOperatorType *ot)
 
 /********************* unpack operator *********************/
 
-void unpack_menu(bContext *C, char *opname, char *abs_name, char *folder, PackedFile *pf)
+void unpack_menu(bContext *C, char *opname, Image *ima, char *folder, PackedFile *pf)
 {
+       PointerRNA props_ptr;
        uiPopupMenu *pup;
        uiLayout *layout;
        char line[FILE_MAXDIR + FILE_MAXFILE + 100];
        char local_name[FILE_MAXDIR + FILE_MAX], fi[FILE_MAX];
+       char *abs_name = ima->name;
        
        strcpy(local_name, abs_name);
        BLI_splitdirstring(local_name, fi);
@@ -1346,17 +1454,33 @@ void unpack_menu(bContext *C, char *opname, char *abs_name, char *folder, Packed
                switch(checkPackedFile(local_name, pf)) {
                        case PF_NOFILE:
                                sprintf(line, "Create %s", local_name);
-                               uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_LOCAL);
+                               props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                               RNA_enum_set(&props_ptr, "method", PF_WRITE_LOCAL);
+                               RNA_string_set(&props_ptr, "image", ima->id.name+2);
+       
                                break;
                        case PF_EQUAL:
                                sprintf(line, "Use %s (identical)", local_name);
-                               uiItemEnumO(layout, opname, line, 0, "method", PF_USE_LOCAL);
+                               //uiItemEnumO(layout, opname, line, 0, "method", PF_USE_LOCAL);
+                               props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                               RNA_enum_set(&props_ptr, "method", PF_USE_LOCAL);
+                               RNA_string_set(&props_ptr, "image", ima->id.name+2);
+                               
                                break;
                        case PF_DIFFERS:
                                sprintf(line, "Use %s (differs)", local_name);
-                               uiItemEnumO(layout, opname, line, 0, "method", PF_USE_LOCAL);
+                               //uiItemEnumO(layout, opname, line, 0, "method", PF_USE_LOCAL);
+                               props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                               RNA_enum_set(&props_ptr, "method", PF_USE_LOCAL);
+                               RNA_string_set(&props_ptr, "image", ima->id.name);
+                               
                                sprintf(line, "Overwrite %s", local_name);
-                               uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_LOCAL);
+                               //uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_LOCAL);
+                               props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                               RNA_enum_set(&props_ptr, "method", PF_WRITE_LOCAL);
+                               RNA_string_set(&props_ptr, "image", ima->id.name+2);
+                               
+                               
                                break;
                }
        }
@@ -1364,17 +1488,30 @@ void unpack_menu(bContext *C, char *opname, char *abs_name, char *folder, Packed
        switch(checkPackedFile(abs_name, pf)) {
                case PF_NOFILE:
                        sprintf(line, "Create %s", abs_name);
-                       uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_ORIGINAL);
+                       //uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_ORIGINAL);
+                       props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                       RNA_enum_set(&props_ptr, "method", PF_WRITE_ORIGINAL);
+                       RNA_string_set(&props_ptr, "image", ima->id.name+2);
                        break;
                case PF_EQUAL:
                        sprintf(line, "Use %s (identical)", abs_name);
-                       uiItemEnumO(layout, opname, line, 0, "method", PF_USE_ORIGINAL);
+                       //uiItemEnumO(layout, opname, line, 0, "method", PF_USE_ORIGINAL);
+                       props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                       RNA_enum_set(&props_ptr, "method", PF_USE_ORIGINAL);
+                       RNA_string_set(&props_ptr, "image", ima->id.name+2);
                        break;
                case PF_DIFFERS:
                        sprintf(line, "Use %s (differs)", local_name);
-                       uiItemEnumO(layout, opname, line, 0, "method", PF_USE_ORIGINAL);
+                       //uiItemEnumO(layout, opname, line, 0, "method", PF_USE_ORIGINAL);
+                       props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                       RNA_enum_set(&props_ptr, "method", PF_USE_ORIGINAL);
+                       RNA_string_set(&props_ptr, "image", ima->id.name+2);
+                       
                        sprintf(line, "Overwrite %s", local_name);
-                       uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_ORIGINAL);
+                       //uiItemEnumO(layout, opname, line, 0, "method", PF_WRITE_ORIGINAL);
+                       props_ptr= uiItemFullO(layout, opname, line, 0, NULL, WM_OP_EXEC_DEFAULT, UI_ITEM_O_RETURN_PROPS);
+                       RNA_enum_set(&props_ptr, "method", PF_WRITE_ORIGINAL);
+                       RNA_string_set(&props_ptr, "image", ima->id.name+2);
                        break;
        }
 
@@ -1386,38 +1523,51 @@ static int unpack_exec(bContext *C, wmOperator *op)
        Image *ima= CTX_data_edit_image(C);
        int method= RNA_enum_get(op->ptr, "method");
 
+       /* find the suppplied image by name */
+       if (RNA_property_is_set(op->ptr, "image")) {
+               char imaname[22];
+               RNA_string_get(op->ptr, "image", imaname);
+               ima = BLI_findstring(&CTX_data_main(C)->image, imaname, offsetof(ID, name) + 2);
+               if (!ima) ima = CTX_data_edit_image(C);
+       }
+       
        if(!ima || !ima->packedfile)
                return OPERATOR_CANCELLED;
 
        if(ima->source==IMA_SRC_SEQUENCE || ima->source==IMA_SRC_MOVIE) {
-               BKE_report(op->reports, RPT_ERROR, "Can't unpack movie or image sequence.");
+               BKE_report(op->reports, RPT_ERROR, "Unpacking movies or image sequences not supported.");
                return OPERATOR_CANCELLED;
        }
 
        if(G.fileflags & G_AUTOPACK)
                BKE_report(op->reports, RPT_WARNING, "AutoPack is enabled, so image will be packed again on file save.");
-       
+               
        unpackImage(op->reports, ima, method);
+       
+       WM_event_add_notifier(C, NC_IMAGE|NA_EDITED, ima);
 
        return OPERATOR_FINISHED;
 }
 
-static int unpack_invoke(bContext *C, wmOperator *op, wmEvent *event)
+static int unpack_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
 {
        Image *ima= CTX_data_edit_image(C);
 
+       if(RNA_property_is_set(op->ptr, "image"))
+               return unpack_exec(C, op);
+               
        if(!ima || !ima->packedfile)
                return OPERATOR_CANCELLED;
 
        if(ima->source==IMA_SRC_SEQUENCE || ima->source==IMA_SRC_MOVIE) {
-               BKE_report(op->reports, RPT_ERROR, "Can't unpack movie or image sequence.");
+               BKE_report(op->reports, RPT_ERROR, "Unpacking movies or image sequences not supported.");
                return OPERATOR_CANCELLED;
        }
 
        if(G.fileflags & G_AUTOPACK)
                BKE_report(op->reports, RPT_WARNING, "AutoPack is enabled, so image will be packed again on file save.");
        
-       unpack_menu(C, "IMAGE_OT_unpack", ima->name, "textures", ima->packedfile);
+       unpack_menu(C, "IMAGE_OT_unpack", ima, "textures", ima->packedfile);
 
        return OPERATOR_FINISHED;
 }
@@ -1426,18 +1576,19 @@ void IMAGE_OT_unpack(wmOperatorType *ot)
 {
        /* identifiers */
        ot->name= "Unpack";
+       ot->description= "Save an image packed in the .blend file to disk"; 
        ot->idname= "IMAGE_OT_unpack";
        
        /* api callbacks */
        ot->exec= unpack_exec;
        ot->invoke= unpack_invoke;
-       ot->poll= space_image_buffer_exists_poll;
 
        /* flags */
        ot->flag= OPTYPE_REGISTER|OPTYPE_UNDO;
 
        /* properties */
        RNA_def_enum(ot->srna, "method", unpack_method_items, PF_USE_LOCAL, "Method", "How to unpack.");
+       RNA_def_string(ot->srna, "image", "", 21, "Image Name", "Image datablock name to unpack.");
 }
 
 /******************** sample image operator ********************/
@@ -1461,7 +1612,7 @@ typedef struct ImageSampleInfo {
        int draw;
 } ImageSampleInfo;
 
-static void sample_draw(const bContext *C, ARegion *ar, void *arg_info)
+static void sample_draw(const bContext *UNUSED(C), ARegion *ar, void *arg_info)
 {
        ImageSampleInfo *info= arg_info;
 
@@ -1477,16 +1628,16 @@ static void sample_apply(bContext *C, wmOperator *op, wmEvent *event)
        ImBuf *ibuf= ED_space_image_acquire_buffer(sima, &lock);
        ImageSampleInfo *info= op->customdata;
        float fx, fy;
-       int x, y;
+       int mx, my;
        
        if(ibuf == NULL) {
                ED_space_image_release_buffer(sima, lock);
                return;
        }
 
-       x= event->x - ar->winrct.xmin;
-       y= event->y - ar->winrct.ymin;
-       UI_view2d_region_to_view(&ar->v2d, x, y, &fx, &fy);
+       mx= event->x - ar->winrct.xmin;
+       my= event->y - ar->winrct.ymin;
+       UI_view2d_region_to_view(&ar->v2d, mx, my, &fx, &fy);
 
        if(fx>=0.0 && fy>=0.0 && fx<1.0 && fy<1.0) {
                float *fp;
@@ -1547,11 +1698,13 @@ static void sample_apply(bContext *C, wmOperator *op, wmEvent *event)
 
                                if(point == 1) {
                                        curvemapping_set_black_white(sima->cumap, NULL, info->colfp);
-                                       curvemapping_do_ibuf(sima->cumap, ibuf);
+                                       if(ibuf->rect_float)
+                                               curvemapping_do_ibuf(sima->cumap, ibuf);
                                }
                                else if(point == 0) {
                                        curvemapping_set_black_white(sima->cumap, info->colfp, NULL);
-                                       curvemapping_do_ibuf(sima->cumap, ibuf);
+                                       if(ibuf->rect_float)
+                                               curvemapping_do_ibuf(sima->cumap, ibuf);
                                }
                        }
                }
@@ -1652,6 +1805,7 @@ static int sample_line_exec(bContext *C, wmOperator *op)
 {
        SpaceImage *sima= CTX_wm_space_image(C);
        ARegion *ar= CTX_wm_region(C);
+       Scene *scene= CTX_data_scene(C);
        
        int x_start= RNA_int_get(op->ptr, "xstart");
        int y_start= RNA_int_get(op->ptr, "ystart");
@@ -1666,6 +1820,7 @@ static int sample_line_exec(bContext *C, wmOperator *op)
        int x1, y1, x2, y2;
        int i, x, y;
        float *fp;
+       float rgb[3];
        unsigned char *cp;
        
        if (ibuf == NULL) {
@@ -1695,14 +1850,20 @@ static int sample_line_exec(bContext *C, wmOperator *op)
                y= (int)(0.5f + y1 + (float)i*(y2-y1)/255.0f);
                
                if (x<0 || y<0 || x>=ibuf->x || y>=ibuf->y) {
-                       hist->data_r[i] = hist->data_g[i]= hist->data_b[i] = 0.0f;
+                       hist->data_luma[i] = hist->data_r[i] = hist->data_g[i]= hist->data_b[i] = 0.0f;
                } else {
                        if (ibuf->rect_float) {
                                fp= (ibuf->rect_float + (ibuf->channels)*(y*ibuf->x + x));
-                               hist->data_r[i] = fp[0];
-                               hist->data_g[i] = fp[1];
-                               hist->data_b[i] = fp[2];
-                               hist->data_luma[i] = (0.299f*fp[0] + 0.587f*fp[1] + 0.114f*fp[2]);
+
+                               if (scene->r.color_mgt_flag & R_COLOR_MANAGEMENT)
+                                       linearrgb_to_srgb_v3_v3(rgb, fp);
+                               else
+                                       copy_v3_v3(rgb, fp);
+
+                               hist->data_r[i] = rgb[0];
+                               hist->data_g[i] = rgb[1];
+                               hist->data_b[i] = rgb[2];
+                               hist->data_luma[i] = (0.299f*rgb[0] + 0.587f*rgb[1] + 0.114f*rgb[2]);
                        }
                        else if (ibuf->rect) {
                                cp= (unsigned char *)(ibuf->rect + y*ibuf->x + x);
@@ -1866,7 +2027,7 @@ static int record_composite_exec(bContext *C, wmOperator *op)
        return OPERATOR_FINISHED;
 }
 
-static int record_composite_invoke(bContext *C, wmOperator *op, wmEvent *event)
+static int record_composite_invoke(bContext *C, wmOperator *op, wmEvent *UNUSED(event))
 {
        RecordCompositeData *rcd= op->customdata;
        
@@ -1933,7 +2094,7 @@ static int cycle_render_slot_poll(bContext *C)
        return (ima && ima->type == IMA_TYPE_R_RESULT);
 }
 
-static int cycle_render_slot_exec(bContext *C, wmOperator *op)
+static int cycle_render_slot_exec(bContext *C, wmOperator *UNUSED(op))
 {
        Image *ima= CTX_data_edit_image(C);
        int a, slot, cur= ima->render_slot;
@@ -1945,6 +2106,10 @@ static int cycle_render_slot_exec(bContext *C, wmOperator *op)
                        ima->render_slot= slot;
                        break;
                }
+               else if((slot - 1) == ima->last_render_slot && slot < IMA_MAX_RENDER_SLOT) {
+                       ima->render_slot= slot;
+                       break;
+               }
        }
 
        if(a == IMA_MAX_RENDER_SLOT)
@@ -1975,10 +2140,10 @@ void IMAGE_OT_cycle_render_slot(wmOperatorType *ot)
 
 /* goes over all ImageUsers, and sets frame numbers if auto-refresh is set */
 
-void ED_image_update_frame(const bContext *C)
+void ED_image_update_frame(const Main *mainp, int cfra)
 {
-       Main *mainp = CTX_data_main(C);
-       Scene *scene= CTX_data_scene(C);
+       wmWindowManager *wm;
+       wmWindow *win;
        Tex *tex;
        
        /* texture users */
@@ -1986,46 +2151,45 @@ void ED_image_update_frame(const bContext *C)
                if(tex->type==TEX_IMAGE && tex->ima) {
                        if(ELEM(tex->ima->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE)) {
                                if(tex->iuser.flag & IMA_ANIM_ALWAYS)
-                                       BKE_image_user_calc_frame(&tex->iuser, scene->r.cfra, 0);
+                                       BKE_image_user_calc_frame(&tex->iuser, cfra, 0);
                        }
                }
        }
        
-#if 0
        /* image window, compo node users */
-       if(G.curscreen) {
-               ScrArea *sa;
-               for(sa= G.curscreen->areabase.first; sa; sa= sa->next) {
-                       if(sa->spacetype==SPACE_VIEW3D) {
-                               View3D *v3d= sa->spacedata.first;
-                               if(v3d->bgpic)
-                                       if(v3d->bgpic->iuser.flag & IMA_ANIM_ALWAYS)
-                                               BKE_image_user_calc_frame(&v3d->bgpic->iuser, scene->r.cfra, 0);
-                       }
-                       else if(sa->spacetype==SPACE_IMAGE) {
-                               SpaceImage *sima= sa->spacedata.first;
-                               if(sima->iuser.flag & IMA_ANIM_ALWAYS)
-                                       BKE_image_user_calc_frame(&sima->iuser, scene->r.cfra, 0);
-                       }
-                       else if(sa->spacetype==SPACE_NODE) {
-                               SpaceNode *snode= sa->spacedata.first;
-                               if((snode->treetype==NTREE_COMPOSIT) && (snode->nodetree)) {
-                                       bNode *node;
-                                       for(node= snode->nodetree->nodes.first; node; node= node->next) {
-                                               if(node->id && node->type==CMP_NODE_IMAGE) {
-                                                       Image *ima= (Image *)node->id;
-                                                       ImageUser *iuser= node->storage;
-                                                       if(ELEM(ima->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE))
-                                                               if(iuser->flag & IMA_ANIM_ALWAYS)
-                                                                       BKE_image_user_calc_frame(iuser, scene->r.cfra, 0);
+       for(wm=mainp->wm.first; wm; wm= wm->id.next) { /* only 1 wm */
+               for(win= wm->windows.first; win; win= win->next) {
+                       ScrArea *sa;
+                       for(sa= win->screen->areabase.first; sa; sa= sa->next) {
+                               if(sa->spacetype==SPACE_VIEW3D) {
+                                       View3D *v3d= sa->spacedata.first;
+                                       BGpic *bgpic;
+                                       for(bgpic= v3d->bgpicbase.first; bgpic; bgpic= bgpic->next)
+                                               if(bgpic->iuser.flag & IMA_ANIM_ALWAYS)
+                                                       BKE_image_user_calc_frame(&bgpic->iuser, cfra, 0);
+                               }
+                               else if(sa->spacetype==SPACE_IMAGE) {
+                                       SpaceImage *sima= sa->spacedata.first;
+                                       if(sima->iuser.flag & IMA_ANIM_ALWAYS)
+                                               BKE_image_user_calc_frame(&sima->iuser, cfra, 0);
+                               }
+                               else if(sa->spacetype==SPACE_NODE) {
+                                       SpaceNode *snode= sa->spacedata.first;
+                                       if((snode->treetype==NTREE_COMPOSIT) && (snode->nodetree)) {
+                                               bNode *node;
+                                               for(node= snode->nodetree->nodes.first; node; node= node->next) {
+                                                       if(node->id && node->type==CMP_NODE_IMAGE) {
+                                                               Image *ima= (Image *)node->id;
+                                                               ImageUser *iuser= node->storage;
+                                                               if(ELEM(ima->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE))
+                                                                       if(iuser->flag & IMA_ANIM_ALWAYS)
+                                                                               BKE_image_user_calc_frame(iuser, cfra, 0);
+                                                       }
                                                }
                                        }
                                }
                        }
                }
        }
-#endif
 }
 
-
-