diff options
Diffstat (limited to 'source/blender/src/playanim.c')
| -rw-r--r-- | source/blender/src/playanim.c | 711 |
1 files changed, 711 insertions, 0 deletions
diff --git a/source/blender/src/playanim.c b/source/blender/src/playanim.c new file mode 100644 index 00000000000..ef07d910cc1 --- /dev/null +++ b/source/blender/src/playanim.c @@ -0,0 +1,711 @@ +/** + * $Id$ + * + * ***** BEGIN GPL/BL DUAL LICENSE BLOCK ***** + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. The Blender + * Foundation also sells licenses for use in proprietary software under + * the Blender License. See http://www.blender.org/BL/ for information + * about this. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software Foundation, + * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + * + * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV. + * All rights reserved. + * + * The Original Code is: all of this file. + * + * Contributor(s): none yet. + * + * ***** END GPL/BL DUAL LICENSE BLOCK ***** + */ + +#include <sys/types.h> +#include <fcntl.h> +#include <stdlib.h> +#ifndef WIN32 +#include <unistd.h> +#include <sys/times.h> +#include <sys/wait.h> +#else +#include <io.h> +#include "BLI_winstuff.h" +#endif +#include "MEM_guardedalloc.h" + +#include "PIL_time.h" + +#include <math.h> + +#include "BLI_blenlib.h" +#include "BLI_arithb.h" +#include "BLI_editVert.h" + +#include "IMB_imbuf_types.h" +#include "IMB_imbuf.h" + +#include "BDR_editcurve.h" + +#include "BKE_global.h" +#include "BKE_utildefines.h" + +#include "BIF_gl.h" +#include "BIF_screen.h" +#include "BIF_mywindow.h" + +#include "playanim_ext.h" +#include "mydevice.h" +#include "blendef.h" +#include "winlay.h" + +/* ***************** gl_util.c ****************** */ + +static Window *g_window = NULL; +static int qualN = 0; + +#define LSHIFT (1<<0) +#define RSHIFT (1<<1) +#define SHIFT (LSHIFT | RSHIFT) +#define LALT (1<<2) +#define RALT (1<<3) +#define ALT (LALT | RALT) +#define LCTRL (1<<4) +#define RCTRL (1<<5) +#define LMOUSE (1<<16) +#define MMOUSE (1<<17) +#define RMOUSE (1<<18) +#define MOUSE (LMOUSE | MMOUSE | RMOUSE) + +unsigned short screen_qread(short *val, char *ascii); + +/* implementation */ +static int qreadN(short *val) +{ + char ascii; + int event = screen_qread(val, &ascii); + + switch(event){ + case LEFTMOUSE: + if (*val) qualN |= LMOUSE; + else qualN &= ~LMOUSE; + break; + case MIDDLEMOUSE: + if (*val) qualN |= MMOUSE; + else qualN &= ~MMOUSE; + break; + case RIGHTMOUSE: + if (*val) qualN |= RMOUSE; + else qualN &= ~RMOUSE; + break; + case LEFTSHIFTKEY: + if (*val) qualN |= LSHIFT; + else qualN &= ~LSHIFT; + break; + case RIGHTSHIFTKEY: + if (*val) qualN |= RSHIFT; + else qualN &= ~RSHIFT; + break; + case LEFTCTRLKEY: + if (*val) qualN |= LCTRL; + else qualN &= ~LCTRL; + break; + case RIGHTCTRLKEY: + if (*val) qualN |= RCTRL; + else qualN &= ~RCTRL; + break; + case LEFTALTKEY: + if (*val) qualN |= LALT; + else qualN &= ~LALT; + break; + case RIGHTALTKEY: + if (*val) qualN |= RALT; + else qualN &= ~RALT; + break; + } + + return(event); +} + +/* ***************** gl_util.c ****************** */ + + + + +typedef struct pict{ + struct pict *next, *prev; + char *mem; + int size; + char *name; + struct ImBuf *ibuf; + struct anim *anim; + int frame; + int IB_flags; +}Pict; + +static struct ListBase _picsbase = {0,0}; +static struct ListBase *picsbase = &_picsbase; +static int fromdisk = FALSE; +static float zoomx = 1.0 , zoomy = 1.0; +static double ptottime = 0.0, swaptime = 0.04; + +static int pupdate_time(void) +{ + static double ltime; + double time; + + time = PIL_check_seconds_timer(); + + ptottime += (time - ltime); + ltime = time; + return (ptottime < 0); +} + +static void toscreen(struct ImBuf *ibuf) +{ + if (ibuf == 0){ + printf("no ibuf !\n"); + return; + } + + glRasterPos2f(-1, -1); + + glDrawPixels(ibuf->x, ibuf->y, GL_RGBA, GL_UNSIGNED_BYTE, ibuf->rect); + + pupdate_time(); + + window_swap_buffers(g_window); +} + +static void build_pict_list(char * first) +{ + int size,pic,file; + char *mem, name[256]; + short val; + struct pict * picture = 0; + struct ImBuf *ibuf = 0; + int count = 0; + char str[100]; + struct anim * anim; + + if (IMB_isanim(first)) { + anim = IMB_open_anim(first, IB_rect); + if (anim) { + ibuf = IMB_anim_absolute(anim, 0); + if (ibuf) { + toscreen(ibuf); + IMB_freeImBuf(ibuf); + } + + for (pic = 0; pic < IMB_anim_get_duration(anim); pic ++) { + picture = (Pict*)MEM_callocN(sizeof(Pict),"Pict"); + picture->anim = anim; + picture->frame = pic; + picture->IB_flags = IB_rect; + sprintf(str, "%s : %d", first, pic + 1); + picture->name = strdup(str); + BLI_addtail(picsbase, picture); + } + } else printf("couldn't open anim %s\n", first); + } else { + + strcpy(name,first); + + pupdate_time(); + ptottime = 1.0; + +/* + O_DIRECT + If set, all reads and writes on the resulting file descriptor will + be performed directly to or from the user program buffer, provided + appropriate size and alignment restrictions are met. Refer to the + F_SETFL and F_DIOINFO commands in the fcntl(2) manual entry for + information about how to determine the alignment constraints. + O_DIRECT is a Silicon Graphics extension and is only supported on + local EFS and XFS file systems. +*/ + while(IMB_ispic(name)){ + file = open(name, O_BINARY|O_RDONLY, 0); + if (file < 0) return; + picture = (struct pict*)calloc(1, sizeof(struct pict)); + if (picture == 0){ + printf("Not enough memory for pict struct \n"); + close(file); + return; + } + size = BLI_filesize(file); + picture->size = size; + picture->IB_flags = IB_rect; + + if (fromdisk == FALSE) { + mem=(char *)malloc(size); + if (mem==0){ + printf("Couldn't get memory\n"); + close(file); + free(picture); + return; + } + + if (read(file,mem,size) != size){ + printf("Error while reading %s\n",name); + close(file); + free(picture); + free(mem); + return; + } + } else mem = 0; + + picture->mem = mem; + picture->name = strdup(name); + close(file); + BLI_addtail(picsbase,picture); + count++; + + pupdate_time(); + + if (ptottime > 1.0) { + if (picture->mem) ibuf = IMB_ibImageFromMemory((int *) picture->mem, picture->size, picture->IB_flags); + else ibuf = IMB_loadiffname(picture->name, picture->IB_flags); + if (ibuf) { + toscreen(ibuf); + IMB_freeImBuf(ibuf); + glDrawBuffer(GL_FRONT); + + cpack(-1); + glRasterPos2i(10, 10); + sprintf(str, "%4d: %s", count, name); + glCallLists(strlen(str), GL_UNSIGNED_BYTE, str); + glDrawBuffer(GL_BACK); + } + pupdate_time(); + ptottime = 0.0; + } + + BLI_newname(name, +1); + + while(qtest()){ + switch(qreadN(&val)){ + case ESCKEY: + if (val) return; + break; + } + } + } + } + return; +} + +void playanim(int argc, char **argv) +{ + struct ImBuf *ibuf = 0; + struct pict *picture = 0; + char name[256]; + short val = 0, go = TRUE, ibufx = 0, ibufy = 0; + int event, stopped = FALSE, maxwinx, maxwiny; + short /* c233 = FALSE, */ /* yuvx = FALSE, */ once = FALSE, sstep = FALSE, wait2 = FALSE, /* resetmap = FALSE, */ pause = 0; + short pingpong = FALSE, direction = 1, next = 1, turbo = FALSE, /* doubleb = TRUE, */ noskip = FALSE; + int sizex, sizey, ofsx, ofsy, i; + /* This was done to disambiguate the name for use under c++. */ + struct anim * anim = 0; + int start_x= 0, start_y= 0; + + while (argc > 1) { + if (argv[1][0] == '-'){ + switch(argv[1][1]) { + case 'm': + fromdisk = TRUE; + break; + case 'p': + if (argc>3) { + start_x= atoi(argv[2]); + start_y= atoi(argv[3]); + argc-= 2; + argv+= 2; + } else { + printf("too few arguments for -p (need 2): skipping\n"); + } + break; + default: + printf("unknown option '%c': skipping\n", argv[1][1]); + break; + } + argc--; + argv++; + } else break; + } + + if (argc > 1) strcpy(name,argv[1]); + else { + BLI_getwdN(name); + if (name[strlen(name)-1] != '/') strcat(name,"/"); + } + + if (IMB_isanim(name)) { + anim = IMB_open_anim(name, IB_rect); + if (anim) { + ibuf = IMB_anim_absolute(anim, 0); + IMB_close_anim(anim); + anim = NULL; + } + } else if (!IMB_ispic(name)) { + exit(1); + } + + if (ibuf == 0) ibuf = IMB_loadiffname(name, IB_rect); + if (ibuf == 0){ + printf("couldn't open %s\n",name); + exit(1); + } + + #if !defined(WIN32) && !defined(__APPLE__) + if (fork()) exit(0); + #endif + + winlay_get_screensize(&maxwinx, &maxwiny); + + /* XXX, fixme zr */ + { + extern void add_to_mainqueue(Window *win, void *user_data, short evt, short val, char ascii); + + g_window = window_open("Blender:Anim", start_x, start_y, ibuf->x, ibuf->y, 0); + window_set_handler(g_window, add_to_mainqueue, NULL); + } + + ibufx = ibuf->x; + ibufy = ibuf->y; + + if (maxwinx % ibuf->x) maxwinx = ibuf->x * (1 + (maxwinx / ibuf->x)); + if (maxwiny % ibuf->y) maxwiny = ibuf->y * (1 + (maxwiny / ibuf->y)); + + glClearColor(0.0, 0.0, 0.0, 0.0); + glClear(GL_COLOR_BUFFER_BIT); + + window_swap_buffers(g_window); + + build_pict_list(name); + + for (i = 2; i < argc; i++){ + strcpy(name, argv[i]); + build_pict_list(name); + } + + IMB_freeImBuf(ibuf); + ibuf = 0; + + pupdate_time(); + ptottime = 0; + + while (go){ + if (pingpong) direction = -direction; + + if (direction == 1) picture = picsbase->first; + else picture = picsbase->last; + + if (picture == 0){ + printf("couldn't find pictures\n"); + go = FALSE; + } + if (pingpong){ + if (direction == 1) picture = picture->next; + else picture = picture->prev; + } + if (ptottime > 0.0) ptottime = 0.0; + + while (picture){ + if (ibuf != 0 && ibuf->type == 0) IMB_freeImBuf(ibuf); + + if (picture->ibuf) ibuf = picture->ibuf; + else if (picture->anim) ibuf = IMB_anim_absolute(picture->anim, picture->frame); + else if (picture->mem) ibuf = IMB_ibImageFromMemory((int *) picture->mem, picture->size, picture->IB_flags); + else ibuf = IMB_loadiffname(picture->name, picture->IB_flags); + + if (ibuf){ + strcpy(ibuf->name, picture->name); + + while (pupdate_time()) PIL_sleep_ms(1); + ptottime -= swaptime; + toscreen(ibuf); + } /* else deleten */ + else { + printf("error: can't play this image type\n"); + exit(0); + } + + if (once){ + if (picture->next == 0) wait2 = TRUE; + else if (picture->prev == 0) wait2 = TRUE; + } + + next = direction; + + while ((qtest() != 0 ) || ( wait2 != 0)){ + if (wait2 && stopped) { + stopped = FALSE; + } + + event = qreadN(&val); + /* printf("%d %d\n", event, val); */ + + if (wait2){ + pupdate_time(); + ptottime = 0; + } + switch (event){ + case AKEY: + if (val) + noskip = !noskip; + break; + case PKEY: + if (val) + pingpong = !pingpong; + break; + case SLASHKEY: + if (val) { + if (qualN & SHIFT) { + if (ibuf) + printf(" Name: %s | Speed: %.2f frames/s\n", ibuf->name, 1.0 / swaptime); + } else { + swaptime = 1.0 / 5.0; + } + } + break; + case LEFTARROWKEY: + if (val){ + sstep = TRUE; + wait2 = FALSE; + if (qualN & SHIFT) { + picture = picsbase->first; + next = 0; + } else { + next = -1; + } + } + break; + case DOWNARROWKEY: + if (val){ + wait2 = FALSE; + if (qualN & SHIFT) { + next = direction = -1; + } else { + next = -10; + sstep = TRUE; + } + } + break; + case RIGHTARROWKEY: + if (val){ + sstep = TRUE; + wait2 = FALSE; + if (qualN & SHIFT) { + picture = picsbase->last; + next = 0; + } else { + next = 1; + } + } + break; + case UPARROWKEY: + if (val){ + wait2 = FALSE; + if (qualN & SHIFT) { + next = direction = 1; + } else { + next = 10; + sstep = TRUE; + } + } + break; + case LEFTMOUSE: + case MOUSEX: + if (qualN & LMOUSE) { + window_get_size(g_window,&sizex,&sizey); + picture = picsbase->first; + i = 0; + while (picture){ + i ++; + picture = picture->next; + } + i = (i * val) / sizex; + picture = picsbase->first; + for (; i > 0; i--){ + if (picture->next == 0) break; + picture = picture->next; + } + sstep = TRUE; + wait2 = FALSE; + next = 0; + } + break; + go= FALSE; + break; + case EQUALKEY: + if (val) { + if (qualN & SHIFT) { + pause ++; + printf("pause:%d\n", pause); + } else swaptime /= 1.1; + } + break; + case MINUSKEY: + if (val) { + if (qualN & SHIFT) { + pause --; + printf("pause:%d\n", pause); + } else swaptime *= 1.1; + } + break; + case PAD0: + if (val){ + if (once) once = wait2 = FALSE; + else { + picture = 0; + once = TRUE; + wait2 = FALSE; + } + } + break; + case RETKEY: + case PADENTER: + if (val){ + wait2 = sstep = FALSE; + } + break; + case PADPERIOD: + if (val){ + if (sstep) wait2 = FALSE; + else { + sstep = TRUE; + wait2 = !wait2; + } + } + break; + case PAD1: + swaptime = 1.0 / 60.0; + break; + case PAD2: + swaptime = 1.0 / 50.0; + break; + case PAD3: + swaptime = 1.0 / 30.0; + break; + case PAD4: + swaptime = 1.0 / 25.0; + break; + case PAD5: + swaptime = 1.0 / 20.0; + break; + case PAD6: + swaptime = 1.0 / 15.0; + break; + case PAD7: + swaptime = 1.0 / 12.0; + break; + case PAD8: + swaptime = 1.0 / 10.0; + break; + case PAD9: + swaptime = 1.0 / 6.0; + break; + case PADPLUSKEY: + if (val == 0) break; + zoomx += 2.0; + zoomy += 2.0; + case PADMINUS: + if (val == 0) break; + if (zoomx > 1.0) zoomx -= 1.0; + if (zoomy > 1.0) zoomy -= 1.0; + window_get_position(g_window,&ofsx,&ofsy); + window_get_size(g_window,&sizex,&sizey); + ofsx += sizex/2; + ofsy += sizey/2; + sizex = zoomx * ibufx; + sizey = zoomy * ibufy; + ofsx -= sizex/2; + ofsy -= sizey/2; +/* window_set_position(g_window,sizex,sizey); */ + window_set_size(g_window,sizex,sizey); + break; + case RESHAPE: + case REDRAW: + window_get_size(g_window,&sizex,&sizey); + window_make_active(g_window); + + glViewport(0, 0, sizex, sizey); + glScissor(0, 0, sizex, sizey); + + zoomx = (float) sizex / ibufx; + zoomy = (float) sizey / ibufy; + zoomx = floor(zoomx + 0.5); + zoomy = floor(zoomy + 0.5); + if (zoomx < 1.0) zoomx = 1.0; + if (zoomy < 1.0) zoomy = 1.0; + + sizex = zoomx * ibufx; + sizey = zoomy * ibufy; + + glPixelZoom(zoomx, zoomy); + glEnable(GL_DITHER); + ptottime = 0.0; + toscreen(ibuf); + while (qtest()) qreadN(&val); + + break; + case ESCKEY: + case WINCLOSE: + case WINQUIT: + go = FALSE; + break; + } + if (go == FALSE) break; + } + + wait2 = sstep; + + if (wait2 == 0 && stopped == 0) { + stopped = TRUE; + } + + pupdate_time(); + + if (picture && next) { + /* altijd minstens 1 stap zetten */ + while (picture){ + if (next < 0) picture = picture->prev; + else picture = picture->next; + + if (once && picture != 0){ + if (picture->next == 0) wait2 = TRUE; + else if (picture->prev == 0) wait2 = TRUE; + } + + if (wait2 || ptottime < swaptime || turbo || noskip) break; + ptottime -= swaptime; + } + if (picture == 0 && sstep) { + if (next < 0) picture = picsbase->last; + else if (next > 0) picture = picsbase->first; + } + } + if (go == FALSE) break; + } + } + picture = picsbase->first; + anim = NULL; + while (picture) { + if (picture && picture->anim && (anim != picture->anim)) { + // to prevent divx crashes + anim = picture->anim; + IMB_close_anim(anim); + } + picture = picture->next; + } +} |