source/blender/editors/screen/screen_edit.c

   1 /**
   2  * $Id:
   3  *
   4  * ***** BEGIN GPL LICENSE BLOCK *****
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * as published by the Free Software Foundation; either version 2
   9  * of the License, or (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software Foundation,
  18  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  19  *
  20  * The Original Code is Copyright (C) 2008 Blender Foundation.
  21  * All rights reserved.
  22  *
  23  *
  24  * ***** END GPL LICENSE BLOCK *****
  25  */
  26
  27 #include <string.h>
  28
  29 #include "MEM_guardedalloc.h"
  30
  31 #include "DNA_vec_types.h"
  32 #include "DNA_scene_types.h"
  33 #include "DNA_screen_types.h"
  34 #include "DNA_texture_types.h"
  35 #include "DNA_userdef_types.h"
  36
  37 #include "BLI_blenlib.h"
  38
  39 #include "BKE_context.h"
  40 #include "BKE_global.h"
  41 #include "BKE_library.h"
  42 #include "BKE_main.h"
  43 #include "BKE_node.h"
  44 #include "BKE_screen.h"
  45 #include "BKE_scene.h"
  46 #include "BKE_utildefines.h"
  47
  48 #include "BIF_gl.h"
  49 #include "BIF_glutil.h"
  50
  51 #include "WM_api.h"
  52 #include "WM_types.h"
  53
  54 #include "ED_screen.h"
  55 #include "ED_screen_types.h"
  56
  57 #include "wm_subwindow.h"
  58
  59 #include "screen_intern.h"      /* own module include */
  60
  61
  62 /* ******************* screen vert, edge, area managing *********************** */
  63
  64 static ScrVert *screen_addvert(bScreen *sc, short x, short y)
  65 {
  66         ScrVert *sv= MEM_callocN(sizeof(ScrVert), "addscrvert");
  67         sv->vec.x= x;
  68         sv->vec.y= y;
  69
  70         BLI_addtail(&sc->vertbase, sv);
  71         return sv;
  72 }
  73
  74 static void sortscrvert(ScrVert **v1, ScrVert **v2)
  75 {
  76         ScrVert *tmp;
  77
  78         if (*v1 > *v2) {
  79                 tmp= *v1;
  80                 *v1= *v2;
  81                 *v2= tmp;
  82         }
  83 }
  84
  85 static ScrEdge *screen_addedge(bScreen *sc, ScrVert *v1, ScrVert *v2)
  86 {
  87         ScrEdge *se= MEM_callocN(sizeof(ScrEdge), "addscredge");
  88
  89         sortscrvert(&v1, &v2);
  90         se->v1= v1;
  91         se->v2= v2;
  92
  93         BLI_addtail(&sc->edgebase, se);
  94         return se;
  95 }
  96
  97
  98 ScrEdge *screen_findedge(bScreen *sc, ScrVert *v1, ScrVert *v2)
  99 {
 100         ScrEdge *se;
 101
 102         sortscrvert(&v1, &v2);
 103         for (se= sc->edgebase.first; se; se= se->next)
 104                 if(se->v1==v1 && se->v2==v2)
 105                         return se;
 106
 107         return NULL;
 108 }
 109
 110 void removedouble_scrverts(bScreen *sc)
 111 {
 112         ScrVert *v1, *verg;
 113         ScrEdge *se;
 114         ScrArea *sa;
 115
 116         verg= sc->vertbase.first;
 117         while(verg) {
 118                 if(verg->newv==NULL) {  /* !!! */
 119                         v1= verg->next;
 120                         while(v1) {
 121                                 if(v1->newv==NULL) {    /* !?! */
 122                                         if(v1->vec.x==verg->vec.x && v1->vec.y==verg->vec.y) {
 123                                                 /* printf("doublevert\n"); */
 124                                                 v1->newv= verg;
 125                                         }
 126                                 }
 127                                 v1= v1->next;
 128                         }
 129                 }
 130                 verg= verg->next;
 131         }
 132
 133         /* replace pointers in edges and faces */
 134         se= sc->edgebase.first;
 135         while(se) {
 136                 if(se->v1->newv) se->v1= se->v1->newv;
 137                 if(se->v2->newv) se->v2= se->v2->newv;
 138                 /* edges changed: so.... */
 139                 sortscrvert(&(se->v1), &(se->v2));
 140                 se= se->next;
 141         }
 142         sa= sc->areabase.first;
 143         while(sa) {
 144                 if(sa->v1->newv) sa->v1= sa->v1->newv;
 145                 if(sa->v2->newv) sa->v2= sa->v2->newv;
 146                 if(sa->v3->newv) sa->v3= sa->v3->newv;
 147                 if(sa->v4->newv) sa->v4= sa->v4->newv;
 148                 sa= sa->next;
 149         }
 150
 151         /* remove */
 152         verg= sc->vertbase.first;
 153         while(verg) {
 154                 v1= verg->next;
 155                 if(verg->newv) {
 156                         BLI_remlink(&sc->vertbase, verg);
 157                         MEM_freeN(verg);
 158                 }
 159                 verg= v1;
 160         }
 161
 162 }
 163
 164 void removenotused_scrverts(bScreen *sc)
 165 {
 166         ScrVert *sv, *svn;
 167         ScrEdge *se;
 168
 169         /* we assume edges are ok */
 170
 171         se= sc->edgebase.first;
 172         while(se) {
 173                 se->v1->flag= 1;
 174                 se->v2->flag= 1;
 175                 se= se->next;
 176         }
 177
 178         sv= sc->vertbase.first;
 179         while(sv) {
 180                 svn= sv->next;
 181                 if(sv->flag==0) {
 182                         BLI_remlink(&sc->vertbase, sv);
 183                         MEM_freeN(sv);
 184                 }
 185                 else sv->flag= 0;
 186                 sv= svn;
 187         }
 188 }
 189
 190 void removedouble_scredges(bScreen *sc)
 191 {
 192         ScrEdge *verg, *se, *sn;
 193
 194         /* compare */
 195         verg= sc->edgebase.first;
 196         while(verg) {
 197                 se= verg->next;
 198                 while(se) {
 199                         sn= se->next;
 200                         if(verg->v1==se->v1 && verg->v2==se->v2) {
 201                                 BLI_remlink(&sc->edgebase, se);
 202                                 MEM_freeN(se);
 203                         }
 204                         se= sn;
 205                 }
 206                 verg= verg->next;
 207         }
 208 }
 209
 210 void removenotused_scredges(bScreen *sc)
 211 {
 212         ScrEdge *se, *sen;
 213         ScrArea *sa;
 214         int a=0;
 215
 216         /* sets flags when edge is used in area */
 217         sa= sc->areabase.first;
 218         while(sa) {
 219                 se= screen_findedge(sc, sa->v1, sa->v2);
 220                 if(se==0) printf("error: area %d edge 1 doesn't exist\n", a);
 221                 else se->flag= 1;
 222                 se= screen_findedge(sc, sa->v2, sa->v3);
 223                 if(se==0) printf("error: area %d edge 2 doesn't exist\n", a);
 224                 else se->flag= 1;
 225                 se= screen_findedge(sc, sa->v3, sa->v4);
 226                 if(se==0) printf("error: area %d edge 3 doesn't exist\n", a);
 227                 else se->flag= 1;
 228                 se= screen_findedge(sc, sa->v4, sa->v1);
 229                 if(se==0) printf("error: area %d edge 4 doesn't exist\n", a);
 230                 else se->flag= 1;
 231                 sa= sa->next;
 232                 a++;
 233         }
 234         se= sc->edgebase.first;
 235         while(se) {
 236                 sen= se->next;
 237                 if(se->flag==0) {
 238                         BLI_remlink(&sc->edgebase, se);
 239                         MEM_freeN(se);
 240                 }
 241                 else se->flag= 0;
 242                 se= sen;
 243         }
 244 }
 245
 246 int scredge_is_horizontal(ScrEdge *se)
 247 {
 248         return (se->v1->vec.y == se->v2->vec.y);
 249 }
 250
 251 ScrEdge *screen_find_active_scredge(bScreen *sc, int mx, int my)
 252 {
 253         ScrEdge *se;
 254
 255         for (se= sc->edgebase.first; se; se= se->next) {
 256                 if (scredge_is_horizontal(se)) {
 257                         short min, max;
 258                         min= MIN2(se->v1->vec.x, se->v2->vec.x);
 259                         max= MAX2(se->v1->vec.x, se->v2->vec.x);
 260
 261                         if (abs(my-se->v1->vec.y)<=2 && mx>=min && mx<=max)
 262                                 return se;
 263                 }
 264                 else {
 265                         short min, max;
 266                         min= MIN2(se->v1->vec.y, se->v2->vec.y);
 267                         max= MAX2(se->v1->vec.y, se->v2->vec.y);
 268
 269                         if (abs(mx-se->v1->vec.x)<=2 && my>=min && my<=max)
 270                                 return se;
 271                 }
 272         }
 273
 274         return NULL;
 275 }
 276
 277
 278
 279 /* adds no space data */
 280 static ScrArea *screen_addarea(bScreen *sc, ScrVert *v1, ScrVert *v2, ScrVert *v3, ScrVert *v4, short headertype, short spacetype)
 281 {
 282         ScrArea *sa= MEM_callocN(sizeof(ScrArea), "addscrarea");
 283         sa->v1= v1;
 284         sa->v2= v2;
 285         sa->v3= v3;
 286         sa->v4= v4;
 287         sa->headertype= headertype;
 288         sa->spacetype= sa->butspacetype= spacetype;
 289
 290         BLI_addtail(&sc->areabase, sa);
 291
 292         return sa;
 293 }
 294
 295 static void screen_delarea(bContext *C, bScreen *sc, ScrArea *sa)
 296 {
 297
 298         ED_area_exit(C, sa);
 299
 300         BKE_screen_area_free(sa);
 301
 302         BLI_remlink(&sc->areabase, sa);
 303         MEM_freeN(sa);
 304 }
 305
 306 /* return 0: no split possible */
 307 /* else return (integer) screencoordinate split point */
 308 static short testsplitpoint(wmWindow *win, ScrArea *sa, char dir, float fac)
 309 {
 310         short x, y;
 311
 312         // area big enough?
 313         if(dir=='v' && (sa->v4->vec.x- sa->v1->vec.x <= 2*AREAMINX)) return 0;
 314         if(dir=='h' && (sa->v2->vec.y- sa->v1->vec.y <= 2*AREAMINY)) return 0;
 315
 316         // to be sure
 317         if(fac<0.0) fac= 0.0;
 318         if(fac>1.0) fac= 1.0;
 319
 320         if(dir=='h') {
 321                 y= sa->v1->vec.y+ fac*(sa->v2->vec.y- sa->v1->vec.y);
 322
 323                 if(y- sa->v1->vec.y < AREAMINY)
 324                         y= sa->v1->vec.y+ AREAMINY;
 325                 else if(sa->v2->vec.y- y < AREAMINY)
 326                         y= sa->v2->vec.y- AREAMINY;
 327                 else y-= (y % AREAGRID);
 328
 329                 return y;
 330         }
 331         else {
 332                 x= sa->v1->vec.x+ fac*(sa->v4->vec.x- sa->v1->vec.x);
 333
 334                 if(x- sa->v1->vec.x < AREAMINX)
 335                         x= sa->v1->vec.x+ AREAMINX;
 336                 else if(sa->v4->vec.x- x < AREAMINX)
 337                         x= sa->v4->vec.x- AREAMINX;
 338                 else x-= (x % AREAGRID);
 339
 340                 return x;
 341         }
 342 }
 343
 344 ScrArea *area_split(wmWindow *win, bScreen *sc, ScrArea *sa, char dir, float fac)
 345 {
 346         ScrArea *newa=NULL;
 347         ScrVert *sv1, *sv2;
 348         short split;
 349
 350         if(sa==NULL) return NULL;
 351
 352         split= testsplitpoint(win, sa, dir, fac);
 353         if(split==0) return NULL;
 354
 355         if(dir=='h') {
 356                 /* new vertices */
 357                 sv1= screen_addvert(sc, sa->v1->vec.x, split);
 358                 sv2= screen_addvert(sc, sa->v4->vec.x, split);
 359
 360                 /* new edges */
 361                 screen_addedge(sc, sa->v1, sv1);
 362                 screen_addedge(sc, sv1, sa->v2);
 363                 screen_addedge(sc, sa->v3, sv2);
 364                 screen_addedge(sc, sv2, sa->v4);
 365                 screen_addedge(sc, sv1, sv2);
 366
 367                 /* new areas: top */
 368                 newa= screen_addarea(sc, sv1, sa->v2, sa->v3, sv2, sa->headertype, sa->spacetype);
 369                 area_copy_data(newa, sa, 0);
 370
 371                 /* area below */
 372                 sa->v2= sv1;
 373                 sa->v3= sv2;
 374
 375         }
 376         else {
 377                 /* new vertices */
 378                 sv1= screen_addvert(sc, split, sa->v1->vec.y);
 379                 sv2= screen_addvert(sc, split, sa->v2->vec.y);
 380
 381                 /* new edges */
 382                 screen_addedge(sc, sa->v1, sv1);
 383                 screen_addedge(sc, sv1, sa->v4);
 384                 screen_addedge(sc, sa->v2, sv2);
 385                 screen_addedge(sc, sv2, sa->v3);
 386                 screen_addedge(sc, sv1, sv2);
 387
 388                 /* new areas: left */
 389                 newa= screen_addarea(sc, sa->v1, sa->v2, sv2, sv1, sa->headertype, sa->spacetype);
 390                 area_copy_data(newa, sa, 0);
 391
 392                 /* area right */
 393                 sa->v1= sv1;
 394                 sa->v2= sv2;
 395         }
 396
 397         /* remove double vertices en edges */
 398         removedouble_scrverts(sc);
 399         removedouble_scredges(sc);
 400         removenotused_scredges(sc);
 401
 402         return newa;
 403 }
 404
 405 /* empty screen, with 1 dummy area without spacedata */
 406 /* uses window size */
 407 bScreen *screen_add(wmWindow *win, Scene *scene, char *name)
 408 {
 409         bScreen *sc;
 410         ScrVert *sv1, *sv2, *sv3, *sv4;
 411
 412         sc= alloc_libblock(&G.main->screen, ID_SCR, name);
 413         sc->scene= scene;
 414         sc->do_refresh= 1;
 415         sc->winid= win->winid;
 416
 417         sv1= screen_addvert(sc, 0, 0);
 418         sv2= screen_addvert(sc, 0, win->sizey-1);
 419         sv3= screen_addvert(sc, win->sizex-1, win->sizey-1);
 420         sv4= screen_addvert(sc, win->sizex-1, 0);
 421
 422         screen_addedge(sc, sv1, sv2);
 423         screen_addedge(sc, sv2, sv3);
 424         screen_addedge(sc, sv3, sv4);
 425         screen_addedge(sc, sv4, sv1);
 426
 427         /* dummy type, no spacedata */
 428         screen_addarea(sc, sv1, sv2, sv3, sv4, HEADERDOWN, SPACE_EMPTY);
 429
 430         return sc;
 431 }
 432
 433 static void screen_copy(bScreen *to, bScreen *from)
 434 {
 435         ScrVert *s1, *s2;
 436         ScrEdge *se;
 437         ScrArea *sa, *saf;
 438
 439         /* free contents of 'to', is from blenkernel screen.c */
 440         free_screen(to);
 441
 442         BLI_duplicatelist(&to->vertbase, &from->vertbase);
 443         BLI_duplicatelist(&to->edgebase, &from->edgebase);
 444         BLI_duplicatelist(&to->areabase, &from->areabase);
 445         to->regionbase.first= to->regionbase.last= NULL;
 446
 447         s2= to->vertbase.first;
 448         for(s1= from->vertbase.first; s1; s1= s1->next, s2= s2->next) {
 449                 s1->newv= s2;
 450         }
 451
 452         for(se= to->edgebase.first; se; se= se->next) {
 453                 se->v1= se->v1->newv;
 454                 se->v2= se->v2->newv;
 455                 sortscrvert(&(se->v1), &(se->v2));
 456         }
 457
 458         saf= from->areabase.first;
 459         for(sa= to->areabase.first; sa; sa= sa->next, saf= saf->next) {
 460                 sa->v1= sa->v1->newv;
 461                 sa->v2= sa->v2->newv;
 462                 sa->v3= sa->v3->newv;
 463                 sa->v4= sa->v4->newv;
 464
 465                 sa->spacedata.first= sa->spacedata.last= NULL;
 466                 sa->regionbase.first= sa->regionbase.last= NULL;
 467                 sa->actionzones.first= sa->actionzones.last= NULL;
 468                 sa->scriptlink.totscript= 0;
 469
 470                 area_copy_data(sa, saf, 0);
 471         }
 472
 473         /* put at zero (needed?) */
 474         for(s1= from->vertbase.first; s1; s1= s1->next)
 475                 s1->newv= NULL;
 476
 477 }
 478
 479
 480 /* with sa as center, sb is located at: 0=W, 1=N, 2=E, 3=S */
 481 /* -1 = not valid check */
 482 /* used with join operator */
 483 int area_getorientation(bScreen *screen, ScrArea *sa, ScrArea *sb)
 484 {
 485         ScrVert *sav1, *sav2, *sav3, *sav4;
 486         ScrVert *sbv1, *sbv2, *sbv3, *sbv4;
 487
 488         if(sa==NULL || sb==NULL) return -1;
 489
 490         sav1= sa->v1;
 491         sav2= sa->v2;
 492         sav3= sa->v3;
 493         sav4= sa->v4;
 494         sbv1= sb->v1;
 495         sbv2= sb->v2;
 496         sbv3= sb->v3;
 497         sbv4= sb->v4;
 498
 499         if(sav1==sbv4 && sav2==sbv3) { /* sa to right of sb = W */
 500                 return 0;
 501         }
 502         else if(sav2==sbv1 && sav3==sbv4) { /* sa to bottom of sb = N */
 503                 return 1;
 504         }
 505         else if(sav3==sbv2 && sav4==sbv1) { /* sa to left of sb = E */
 506                 return 2;
 507         }
 508         else if(sav1==sbv2 && sav4==sbv3) { /* sa on top of sb = S*/
 509                 return 3;
 510         }
 511
 512         return -1;
 513 }
 514
 515 /* Helper function to join 2 areas, it has a return value, 0=failed 1=success
 516 *       used by the split, join operators
 517 */
 518 int screen_area_join(bContext *C, bScreen* scr, ScrArea *sa1, ScrArea *sa2)
 519 {
 520         int dir;
 521
 522         dir = area_getorientation(scr, sa1, sa2);
 523         /*printf("dir is : %i \n", dir);*/
 524
 525         if (dir < 0)
 526         {
 527                 if (sa1 ) sa1->flag &= ~AREA_FLAG_DRAWJOINFROM;
 528                 if (sa2 ) sa2->flag &= ~AREA_FLAG_DRAWJOINTO;
 529                 return 0;
 530         }
 531
 532         if(dir == 0) {
 533                 sa1->v1= sa2->v1;
 534                 sa1->v2= sa2->v2;
 535                 screen_addedge(scr, sa1->v2, sa1->v3);
 536                 screen_addedge(scr, sa1->v1, sa1->v4);
 537         }
 538         else if(dir == 1) {
 539                 sa1->v2= sa2->v2;
 540                 sa1->v3= sa2->v3;
 541                 screen_addedge(scr, sa1->v1, sa1->v2);
 542                 screen_addedge(scr, sa1->v3, sa1->v4);
 543         }
 544         else if(dir == 2) {
 545                 sa1->v3= sa2->v3;
 546                 sa1->v4= sa2->v4;
 547                 screen_addedge(scr, sa1->v2, sa1->v3);
 548                 screen_addedge(scr, sa1->v1, sa1->v4);
 549         }
 550         else if(dir == 3) {
 551                 sa1->v1= sa2->v1;
 552                 sa1->v4= sa2->v4;
 553                 screen_addedge(scr, sa1->v1, sa1->v2);
 554                 screen_addedge(scr, sa1->v3, sa1->v4);
 555         }
 556
 557         screen_delarea(C, scr, sa2);
 558         removedouble_scrverts(scr);
 559         sa1->flag &= ~AREA_FLAG_DRAWJOINFROM;
 560
 561         return 1;
 562 }
 563
 564 void select_connected_scredge(bScreen *sc, ScrEdge *edge)
 565 {
 566         ScrEdge *se;
 567         ScrVert *sv;
 568         int oneselected;
 569         char dir;
 570
 571         /* select connected, only in the right direction */
 572         /* 'dir' is the direction of EDGE */
 573
 574         if(edge->v1->vec.x==edge->v2->vec.x) dir= 'v';
 575         else dir= 'h';
 576
 577         sv= sc->vertbase.first;
 578         while(sv) {
 579                 sv->flag = 0;
 580                 sv= sv->next;
 581         }
 582
 583         edge->v1->flag= 1;
 584         edge->v2->flag= 1;
 585
 586         oneselected= 1;
 587         while(oneselected) {
 588                 se= sc->edgebase.first;
 589                 oneselected= 0;
 590                 while(se) {
 591                         if(se->v1->flag + se->v2->flag==1) {
 592                                 if(dir=='h') if(se->v1->vec.y==se->v2->vec.y) {
 593                                         se->v1->flag= se->v2->flag= 1;
 594                                         oneselected= 1;
 595                                 }
 596                                         if(dir=='v') if(se->v1->vec.x==se->v2->vec.x) {
 597                                                 se->v1->flag= se->v2->flag= 1;
 598                                                 oneselected= 1;
 599                                         }
 600                         }
 601                                 se= se->next;
 602                 }
 603         }
 604 }
 605
 606 /* test if screen vertices should be scaled */
 607 static void screen_test_scale(bScreen *sc, int winsizex, int winsizey)
 608 {
 609         ScrVert *sv=NULL;
 610         ScrArea *sa;
 611         int sizex, sizey;
 612         float facx, facy, tempf, min[2], max[2];
 613
 614         /* calculate size */
 615         min[0]= min[1]= 10000.0f;
 616         max[0]= max[1]= 0.0f;
 617
 618         for(sv= sc->vertbase.first; sv; sv= sv->next) {
 619                 min[0]= MIN2(min[0], sv->vec.x);
 620                 min[1]= MIN2(min[1], sv->vec.y);
 621                 max[0]= MAX2(max[0], sv->vec.x);
 622                 max[1]= MAX2(max[1], sv->vec.y);
 623         }
 624
 625         /* always make 0.0 left under */
 626         for(sv= sc->vertbase.first; sv; sv= sv->next) {
 627                 sv->vec.x -= min[0];
 628                 sv->vec.y -= min[1];
 629         }
 630
 631         sizex= max[0]-min[0];
 632         sizey= max[1]-min[1];
 633
 634         if(sizex!= winsizex || sizey!= winsizey) {
 635                 facx= winsizex;
 636                 facx/= (float)sizex;
 637                 facy= winsizey;
 638                 facy/= (float)sizey;
 639
 640                 /* make sure it fits! */
 641                 for(sv= sc->vertbase.first; sv; sv= sv->next) {
 642                         tempf= ((float)sv->vec.x)*facx;
 643                         sv->vec.x= (short)(tempf+0.5);
 644                         sv->vec.x+= AREAGRID-1;
 645                         sv->vec.x-=  (sv->vec.x % AREAGRID);
 646
 647                         CLAMP(sv->vec.x, 0, winsizex);
 648
 649                         tempf= ((float)sv->vec.y )*facy;
 650                         sv->vec.y= (short)(tempf+0.5);
 651                         sv->vec.y+= AREAGRID-1;
 652                         sv->vec.y-=  (sv->vec.y % AREAGRID);
 653
 654                         CLAMP(sv->vec.y, 0, winsizey);
 655                 }
 656         }
 657
 658         /* test for collapsed areas. This could happen in some blender version... */
 659         /* ton: removed option now, it needs Context... */
 660
 661         /* make each window at least HEADERY high */
 662         for(sa= sc->areabase.first; sa; sa= sa->next) {
 663                 int headery= HEADERY+1;
 664
 665                 if(sa->v1->vec.y+headery > sa->v2->vec.y) {
 666                         /* lower edge */
 667                         ScrEdge *se= screen_findedge(sc, sa->v4, sa->v1);
 668                         if(se && sa->v1!=sa->v2 ) {
 669                                 int yval;
 670
 671                                 select_connected_scredge(sc, se);
 672
 673                                 /* all selected vertices get the right offset */
 674                                 yval= sa->v2->vec.y-headery;
 675                                 sv= sc->vertbase.first;
 676                                 while(sv) {
 677                                         /* if is a collapsed area */
 678                                         if(sv!=sa->v2 && sv!=sa->v3) {
 679                                                 if(sv->flag) sv->vec.y= yval;
 680                                         }
 681                                         sv= sv->next;
 682                                 }
 683                         }
 684                 }
 685         }
 686
 687 }
 688
 689 /* *********************** DRAWING **************************************** */
 690
 691
 692 #define SCR_BACK 0.55
 693 #define SCR_ROUND 12
 694
 695 /* draw vertical shape visualising future joining (left as well
 696  * right direction of future joining) */
 697 static void draw_horizontal_join_shape(ScrArea *sa, char dir)
 698 {
 699         vec2f points[10];
 700         short i;
 701         float w, h;
 702         float width = sa->v3->vec.x - sa->v1->vec.x;
 703         float height = sa->v3->vec.y - sa->v1->vec.y;
 704
 705         if(height<width) {
 706                 h = height/8;
 707                 w = height/4;
 708         }
 709         else {
 710                 h = width/8;
 711                 w = width/4;
 712         }
 713
 714         points[0].x = sa->v1->vec.x;
 715         points[0].y = sa->v1->vec.y + height/2;
 716
 717         points[1].x = sa->v1->vec.x;
 718         points[1].y = sa->v1->vec.y;
 719
 720         points[2].x = sa->v4->vec.x - w;
 721         points[2].y = sa->v4->vec.y;
 722
 723         points[3].x = sa->v4->vec.x - w;
 724         points[3].y = sa->v4->vec.y + height/2 - 2*h;
 725
 726         points[4].x = sa->v4->vec.x - 2*w;
 727         points[4].y = sa->v4->vec.y + height/2;
 728
 729         points[5].x = sa->v4->vec.x - w;
 730         points[5].y = sa->v4->vec.y + height/2 + 2*h;
 731
 732         points[6].x = sa->v3->vec.x - w;
 733         points[6].y = sa->v3->vec.y;
 734
 735         points[7].x = sa->v2->vec.x;
 736         points[7].y = sa->v2->vec.y;
 737
 738         points[8].x = sa->v4->vec.x;
 739         points[8].y = sa->v4->vec.y + height/2 - h;
 740
 741         points[9].x = sa->v4->vec.x;
 742         points[9].y = sa->v4->vec.y + height/2 + h;
 743
 744         if(dir=='l') {
 745                 /* when direction is left, then we flip direction of arrow */
 746                 float cx = sa->v1->vec.x + width;
 747                 for(i=0;i<10;i++) {
 748                         points[i].x -= cx;
 749                         points[i].x = -points[i].x;
 750                         points[i].x += sa->v1->vec.x;
 751                 }
 752         }
 753
 754         glBegin(GL_POLYGON);
 755         for(i=0;i<5;i++)
 756                 glVertex2f(points[i].x, points[i].y);
 757         glEnd();
 758         glBegin(GL_POLYGON);
 759         for(i=4;i<8;i++)
 760                 glVertex2f(points[i].x, points[i].y);
 761         glVertex2f(points[0].x, points[0].y);
 762         glEnd();
 763
 764         glRectf(points[2].x, points[2].y, points[8].x, points[8].y);
 765         glRectf(points[6].x, points[6].y, points[9].x, points[9].y);
 766 }
 767
 768 /* draw vertical shape visualising future joining (up/down direction) */
 769 static void draw_vertical_join_shape(ScrArea *sa, char dir)
 770 {
 771         vec2f points[10];
 772         short i;
 773         float w, h;
 774         float width = sa->v3->vec.x - sa->v1->vec.x;
 775         float height = sa->v3->vec.y - sa->v1->vec.y;
 776
 777         if(height<width) {
 778                 h = height/4;
 779                 w = height/8;
 780         }
 781         else {
 782                 h = width/4;
 783                 w = width/8;
 784         }
 785
 786         points[0].x = sa->v1->vec.x + width/2;
 787         points[0].y = sa->v3->vec.y;
 788
 789         points[1].x = sa->v2->vec.x;
 790         points[1].y = sa->v2->vec.y;
 791
 792         points[2].x = sa->v1->vec.x;
 793         points[2].y = sa->v1->vec.y + h;
 794
 795         points[3].x = sa->v1->vec.x + width/2 - 2*w;
 796         points[3].y = sa->v1->vec.y + h;
 797
 798         points[4].x = sa->v1->vec.x + width/2;
 799         points[4].y = sa->v1->vec.y + 2*h;
 800
 801         points[5].x = sa->v1->vec.x + width/2 + 2*w;
 802         points[5].y = sa->v1->vec.y + h;
 803
 804         points[6].x = sa->v4->vec.x;
 805         points[6].y = sa->v4->vec.y + h;
 806
 807         points[7].x = sa->v3->vec.x;
 808         points[7].y = sa->v3->vec.y;
 809
 810         points[8].x = sa->v1->vec.x + width/2 - w;
 811         points[8].y = sa->v1->vec.y;
 812
 813         points[9].x = sa->v1->vec.x + width/2 + w;
 814         points[9].y = sa->v1->vec.y;
 815
 816         if(dir=='u') {
 817                 /* when direction is up, then we flip direction of arrow */
 818                 float cy = sa->v1->vec.y + height;
 819                 for(i=0;i<10;i++) {
 820                         points[i].y -= cy;
 821                         points[i].y = -points[i].y;
 822                         points[i].y += sa->v1->vec.y;
 823                 }
 824         }
 825
 826         glBegin(GL_POLYGON);
 827         for(i=0;i<5;i++)
 828                 glVertex2f(points[i].x, points[i].y);
 829         glEnd();
 830         glBegin(GL_POLYGON);
 831         for(i=4;i<8;i++)
 832                 glVertex2f(points[i].x, points[i].y);
 833         glVertex2f(points[0].x, points[0].y);
 834         glEnd();
 835
 836         glRectf(points[2].x, points[2].y, points[8].x, points[8].y);
 837         glRectf(points[6].x, points[6].y, points[9].x, points[9].y);
 838 }
 839
 840 /* draw join shape due to direction of joining */
 841 static void draw_join_shape(ScrArea *sa, char dir)
 842 {
 843         if(dir=='u' || dir=='d')
 844                 draw_vertical_join_shape(sa, dir);
 845         else
 846                 draw_horizontal_join_shape(sa, dir);
 847 }
 848
 849 /* draw screen area darker with arrow (visualisation of future joining) */
 850 static void scrarea_draw_shape_dark(ScrArea *sa, char dir)
 851 {
 852         glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 853         glEnable(GL_BLEND);
 854         glColor4ub(0, 0, 0, 50);
 855         draw_join_shape(sa, dir);
 856         glDisable(GL_BLEND);
 857 }
 858
 859 /* draw screen area ligher with arrow shape ("eraser" of previous dark shape) */
 860 static void scrarea_draw_shape_light(ScrArea *sa, char dir)
 861 {
 862         glBlendFunc(GL_DST_COLOR, GL_SRC_ALPHA);
 863         glEnable(GL_BLEND);
 864         /* value 181 was hardly computed: 181~105 */
 865         glColor4ub(255, 255, 255, 50);
 866         /* draw_join_shape(sa, dir); */
 867         glRecti(sa->v1->vec.x, sa->v1->vec.y, sa->v3->vec.x, sa->v3->vec.y);
 868         glDisable(GL_BLEND);
 869 }
 870
 871 /** screen edges drawing **/
 872 static void drawscredge_area(ScrArea *sa)
 873 {
 874         short x1= sa->v1->vec.x;
 875         short y1= sa->v1->vec.y;
 876         short x2= sa->v3->vec.x;
 877         short y2= sa->v3->vec.y;
 878
 879         cpack(0x0);
 880
 881         /* right border area */
 882         sdrawline(x2, y1, x2, y2);
 883
 884         /* left border area */
 885         if(x1>0) { /* otherwise it draws the emboss of window over */
 886                 sdrawline(x1, y1, x1, y2);
 887         }
 888
 889         /* top border area */
 890         sdrawline(x1, y2, x2, y2);
 891
 892         /* bottom border area */
 893         sdrawline(x1, y1, x2, y1);
 894
 895 }
 896
 897 /* ****************** EXPORTED API TO OTHER MODULES *************************** */
 898
 899 bScreen *ED_screen_duplicate(wmWindow *win, bScreen *sc)
 900 {
 901         bScreen *newsc;
 902
 903         if(sc->full != SCREENNORMAL) return NULL; /* XXX handle this case! */
 904
 905         /* make new empty screen: */
 906         newsc= screen_add(win, sc->scene, sc->id.name+2);
 907         /* copy all data */
 908         screen_copy(newsc, sc);
 909         /* set in window */
 910         win->screen= newsc;
 911
 912         /* store identifier */
 913         win->screen->winid= win->winid;
 914         BLI_strncpy(win->screenname, win->screen->id.name+2, 21);
 915
 916         return newsc;
 917 }
 918
 919 /* screen sets cursor based on swinid */
 920 static void region_cursor_set(wmWindow *win, int swinid)
 921 {
 922         ScrArea *sa= win->screen->areabase.first;
 923
 924         for(;sa; sa= sa->next) {
 925                 ARegion *ar= sa->regionbase.first;
 926                 for(;ar; ar= ar->next) {
 927                         if(ar->swinid == swinid) {
 928                                 if(ar->type && ar->type->cursor)
 929                                         ar->type->cursor(win, sa, ar);
 930                                 else
 931                                         WM_cursor_set(win, CURSOR_STD);
 932                                 return;
 933                         }
 934                 }
 935         }
 936 }
 937
 938 void ED_screen_do_listen(wmWindow *win, wmNotifier *note)
 939 {
 940
 941         /* generic notes */
 942         switch(note->category) {
 943                 case NC_WM:
 944                         if(note->data==ND_FILEREAD)
 945                                 win->screen->do_draw= 1;
 946                         break;
 947                 case NC_WINDOW:
 948                         win->screen->do_draw= 1;
 949                         break;
 950                 case NC_SCREEN:
 951                         if(note->action==NA_EDITED)
 952                                 win->screen->do_draw= win->screen->do_refresh= 1;
 953                 case NC_SCENE:
 954                         if(note->data==ND_MODE)
 955                                 region_cursor_set(win, note->swinid);
 956                         break;
 957         }
 958 }
 959
 960 /* only for edge lines between areas, and the blended join arrows */
 961 void ED_screen_draw(wmWindow *win)
 962 {
 963         ScrArea *sa;
 964         ScrArea *sa1=NULL;
 965         ScrArea *sa2=NULL;
 966         int dir = -1;
 967         int dira = -1;
 968
 969         wmSubWindowSet(win, win->screen->mainwin);
 970
 971         for(sa= win->screen->areabase.first; sa; sa= sa->next) {
 972                 if (sa->flag & AREA_FLAG_DRAWJOINFROM) sa1 = sa;
 973                 if (sa->flag & AREA_FLAG_DRAWJOINTO) sa2 = sa;
 974                 drawscredge_area(sa);
 975         }
 976
 977         /* blended join arrow */
 978         if (sa1 && sa2) {
 979                 dir = area_getorientation(win->screen, sa1, sa2);
 980                 if (dir >= 0) {
 981                         switch(dir) {
 982                                 case 0: /* W */
 983                                         dir = 'r';
 984                                         dira = 'l';
 985                                         break;
 986                                 case 1: /* N */
 987                                         dir = 'd';
 988                                         dira = 'u';
 989                                         break;
 990                                 case 2: /* E */
 991                                         dir = 'l';
 992                                         dira = 'r';
 993                                         break;
 994                                 case 3: /* S */
 995                                         dir = 'u';
 996                                         dira = 'd';
 997                                         break;
 998                         }
 999                 }
1000                 scrarea_draw_shape_dark(sa2, dir);
1001                 scrarea_draw_shape_light(sa1, dira);
1002         }
1003
1004 //      if(G.f & G_DEBUG) printf("draw screen\n");
1005         win->screen->do_draw= 0;
1006 }
1007
1008 /* make this screen usable */
1009 /* for file read and first use, for scaling window, area moves */
1010 void ED_screen_refresh(wmWindowManager *wm, wmWindow *win)
1011 {
1012         ScrArea *sa;
1013         rcti winrct= {0, win->sizex-1, 0, win->sizey-1};
1014
1015         screen_test_scale(win->screen, win->sizex, win->sizey);
1016
1017         if(win->screen->mainwin==0)
1018                 win->screen->mainwin= wm_subwindow_open(win, &winrct);
1019         else
1020                 wm_subwindow_position(win, win->screen->mainwin, &winrct);
1021
1022         for(sa= win->screen->areabase.first; sa; sa= sa->next) {
1023                 /* set spacetype and region callbacks, calls init() */
1024                 /* sets subwindows for regions, adds handlers */
1025                 ED_area_initialize(wm, win, sa);
1026         }
1027
1028         /* wake up animtimer */
1029         if(win->screen->animtimer)
1030                 WM_event_window_timer_sleep(win, win->screen->animtimer, 0);
1031
1032         if(G.f & G_DEBUG) printf("set screen\n");
1033         win->screen->do_refresh= 0;
1034
1035         win->screen->context= ed_screen_context;
1036 }
1037
1038 /* file read, set all screens, ... */
1039 void ED_screens_initialize(wmWindowManager *wm)
1040 {
1041         wmWindow *win;
1042
1043         for(win= wm->windows.first; win; win= win->next) {
1044
1045                 if(win->screen==NULL)
1046                         win->screen= G.main->screen.first;
1047
1048                 ED_screen_refresh(wm, win);
1049         }
1050 }
1051
1052
1053 /* *********** exit calls are for closing running stuff ******** */
1054
1055 void ED_region_exit(bContext *C, ARegion *ar)
1056 {
1057         ARegion *prevar= CTX_wm_region(C);
1058
1059         CTX_wm_region_set(C, ar);
1060         WM_event_remove_handlers(C, &ar->handlers);
1061         if(ar->swinid)
1062                 wm_subwindow_close(CTX_wm_window(C), ar->swinid);
1063         ar->swinid= 0;
1064
1065         if(ar->headerstr)
1066                 MEM_freeN(ar->headerstr);
1067         ar->headerstr= NULL;
1068
1069         CTX_wm_region_set(C, prevar);
1070 }
1071
1072 void ED_area_exit(bContext *C, ScrArea *sa)
1073 {
1074         ScrArea *prevsa= CTX_wm_area(C);
1075         ARegion *ar;
1076
1077         CTX_wm_area_set(C, sa);
1078         for(ar= sa->regionbase.first; ar; ar= ar->next)
1079                 ED_region_exit(C, ar);
1080
1081         WM_event_remove_handlers(C, &sa->handlers);
1082         CTX_wm_area_set(C, prevsa);
1083 }
1084
1085 void ED_screen_exit(bContext *C, wmWindow *window, bScreen *screen)
1086 {
1087         wmWindow *prevwin= CTX_wm_window(C);
1088         ScrArea *sa;
1089         ARegion *ar;
1090
1091         CTX_wm_window_set(C, window);
1092
1093         if(screen->animtimer)
1094                 WM_event_remove_window_timer(window, screen->animtimer);
1095         screen->animtimer= NULL;
1096
1097         if(screen->mainwin)
1098                 wm_subwindow_close(window, screen->mainwin);
1099         screen->mainwin= 0;
1100         screen->subwinactive= 0;
1101
1102         for(ar= screen->regionbase.first; ar; ar= ar->next)
1103                 ED_region_exit(C, ar);
1104
1105         for(sa= screen->areabase.first; sa; sa= sa->next)
1106                 ED_area_exit(C, sa);
1107
1108         /* mark it available for use for other windows */
1109         screen->winid= 0;
1110
1111         CTX_wm_window_set(C, prevwin);
1112 }
1113
1114 /* *********************************** */
1115
1116 /* case when on area-edge or in azones, or outside window */
1117 static void screen_cursor_set(wmWindow *win, wmEvent *event)
1118 {
1119         ScrArea *sa;
1120
1121         for(sa= win->screen->areabase.first; sa; sa= sa->next)
1122                 if(is_in_area_actionzone(sa, event->x, event->y))
1123                         break;
1124
1125         if(sa) {
1126                 WM_cursor_set(win, CURSOR_EDIT);
1127         }
1128         else {
1129                 ScrEdge *actedge= screen_find_active_scredge(win->screen, event->x, event->y);
1130
1131                 if (actedge) {
1132                         if(scredge_is_horizontal(actedge))
1133                                 WM_cursor_set(win, CURSOR_Y_MOVE);
1134                         else
1135                                 WM_cursor_set(win, CURSOR_X_MOVE);
1136                 }
1137                 else
1138                         WM_cursor_set(win, CURSOR_STD);
1139         }
1140 }
1141
1142
1143 /* called in wm_event_system.c. sets state vars in screen, cursors */
1144 /* event type is mouse move */
1145 void ED_screen_set_subwinactive(wmWindow *win, wmEvent *event)
1146 {
1147         if(win->screen) {
1148                 bScreen *scr= win->screen;
1149                 ScrArea *sa;
1150                 ARegion *ar;
1151                 int oldswin= scr->subwinactive;
1152
1153                 for(sa= scr->areabase.first; sa; sa= sa->next) {
1154                         if(event->x > sa->totrct.xmin && event->x < sa->totrct.xmax)
1155                                 if(event->y > sa->totrct.ymin && event->y < sa->totrct.ymax)
1156                                         if(NULL==is_in_area_actionzone(sa, event->x, event->y))
1157                                                 break;
1158                 }
1159                 if(sa) {
1160                         for(ar= sa->regionbase.first; ar; ar= ar->next) {
1161                                 if(BLI_in_rcti(&ar->winrct, event->x, event->y))
1162                                         scr->subwinactive= ar->swinid;
1163                         }
1164                 }
1165                 else
1166                         scr->subwinactive= scr->mainwin;
1167
1168                 /* check for redraw headers */
1169                 if(oldswin!=scr->subwinactive) {
1170
1171                         for(sa= scr->areabase.first; sa; sa= sa->next) {
1172                                 int do_draw= 0;
1173
1174                                 for(ar= sa->regionbase.first; ar; ar= ar->next)
1175                                         if(ar->swinid==oldswin || ar->swinid==scr->subwinactive)
1176                                                 do_draw= 1;
1177
1178                                 if(do_draw) {
1179                                         for(ar= sa->regionbase.first; ar; ar= ar->next)
1180                                                 if(ar->regiontype==RGN_TYPE_HEADER)
1181                                                         ED_region_tag_redraw(ar);
1182                                 }
1183                         }
1184                 }
1185
1186                 /* cursors, for time being set always on edges, otherwise aregion doesnt switch */
1187                 if(scr->subwinactive==scr->mainwin) {
1188                         screen_cursor_set(win, event);
1189                 }
1190                 else if(oldswin!=scr->subwinactive) {
1191                         region_cursor_set(win, scr->subwinactive);
1192                 }
1193         }
1194 }
1195
1196 int ED_screen_area_active(const bContext *C)
1197 {
1198         bScreen *sc= CTX_wm_screen(C);
1199         ScrArea *sa= CTX_wm_area(C);
1200
1201         if(sc && sa) {
1202                 ARegion *ar;
1203                 for(ar= sa->regionbase.first; ar; ar= ar->next)
1204                         if(ar->swinid == sc->subwinactive)
1205                                 return 1;
1206         }
1207         return 0;
1208 }
1209
1210 /* operator call, WM + Window + screen already existed before */
1211 /* Do NOT call in area/region queues! */
1212 void ED_screen_set(bContext *C, bScreen *sc)
1213 {
1214         wmWindow *win= CTX_wm_window(C);
1215         bScreen *oldscreen= CTX_wm_screen(C);
1216         ID *id;
1217
1218         /* validate screen, it's called with notifier reference */
1219         for(id= CTX_data_main(C)->screen.first; id; id= id->next)
1220                 if(sc == (bScreen *)id)
1221                         break;
1222         if(id==NULL)
1223                 return;
1224
1225         /* check for valid winid */
1226         if(sc->winid!=0 && sc->winid!=win->winid)
1227                 return;
1228
1229         if(sc->full) {                          /* find associated full */
1230                 bScreen *sc1;
1231                 for(sc1= CTX_data_main(C)->screen.first; sc1; sc1= sc1->id.next) {
1232                         ScrArea *sa= sc1->areabase.first;
1233                         if(sa->full==sc) {
1234                                 sc= sc1;
1235                                 break;
1236                         }
1237                 }
1238         }
1239
1240         if (oldscreen != sc) {
1241                 wmTimer *wt= oldscreen->animtimer;
1242
1243                 /* we put timer to sleep, so screen_exit has to think there's no timer */
1244                 oldscreen->animtimer= NULL;
1245                 if(wt)
1246                         WM_event_window_timer_sleep(win, wt, 1);
1247
1248                 ED_screen_exit(C, win, oldscreen);
1249                 oldscreen->animtimer= wt;
1250
1251                 win->screen= sc;
1252                 CTX_wm_window_set(C, win);      // stores C->wm.screen... hrmf
1253
1254                 /* prevent multiwin errors */
1255                 sc->winid= win->winid;
1256
1257                 ED_screen_refresh(CTX_wm_manager(C), CTX_wm_window(C));
1258                 WM_event_add_notifier(C, NC_WINDOW, NULL);
1259         }
1260 }
1261
1262 /* only call outside of area/region loops */
1263 void ED_screen_set_scene(bContext *C, Scene *scene)
1264 {
1265         bScreen *sc;
1266         bScreen *curscreen= CTX_wm_screen(C);
1267
1268         for(sc= CTX_data_main(C)->screen.first; sc; sc= sc->id.next) {
1269                 if((U.flag & USER_SCENEGLOBAL) || sc==curscreen) {
1270
1271                         if(scene != sc->scene) {
1272                                 /* all areas endlocalview */
1273                         // XXX  ScrArea *sa= sc->areabase.first;
1274                         //      while(sa) {
1275                         //              endlocalview(sa);
1276                         //              sa= sa->next;
1277                         //      }
1278                                 sc->scene= scene;
1279                         }
1280
1281                 }
1282         }
1283
1284         //  copy_view3d_lock(0);        /* space.c */
1285
1286         /* are there cameras in the views that are not in the scene? */
1287         for(sc= CTX_data_main(C)->screen.first; sc; sc= sc->id.next) {
1288                 if( (U.flag & USER_SCENEGLOBAL) || sc==curscreen) {
1289                         ScrArea *sa= sc->areabase.first;
1290                         while(sa) {
1291                                 SpaceLink *sl= sa->spacedata.first;
1292                                 while(sl) {
1293                                         if(sl->spacetype==SPACE_VIEW3D) {
1294                                                 View3D *v3d= (View3D*) sl;
1295                                                 if (!v3d->camera || !object_in_scene(v3d->camera, scene)) {
1296                                                         v3d->camera= scene_find_camera(sc->scene);
1297                                                         // XXX if (sc==curscreen) handle_view3d_lock();
1298                                                         if (!v3d->camera && v3d->persp==V3D_CAMOB)
1299                                                                 v3d->persp= V3D_PERSP;
1300                                                 }
1301                                         }
1302                                         sl= sl->next;
1303                                 }
1304                                 sa= sa->next;
1305                         }
1306                 }
1307         }
1308
1309         CTX_data_scene_set(C, scene);
1310         set_scene_bg(scene);
1311
1312         ED_update_for_newframe(C, 1);
1313
1314 //      set_radglobal();
1315
1316         /* complete redraw */
1317         WM_event_add_notifier(C, NC_WINDOW, NULL);
1318
1319 }
1320
1321 /* this function toggles: if area is full then the parent will be restored */
1322 void ed_screen_fullarea(bContext *C, ScrArea *sa)
1323 {
1324         bScreen *sc, *oldscreen;
1325
1326         if(sa==NULL) {
1327                 return;
1328         }
1329         else if(sa->full) {
1330                 short fulltype;
1331
1332                 sc= sa->full;           /* the old screen to restore */
1333                 oldscreen= CTX_wm_screen(C);    /* the one disappearing */
1334
1335                 fulltype = sc->full;
1336
1337                 /* refuse to go out of SCREENAUTOPLAY as long as G_FLAGS_AUTOPLAY
1338                    is set */
1339
1340                 if (fulltype != SCREENAUTOPLAY || (G.flags & G_FILE_AUTOPLAY) == 0) {
1341                         ScrArea *old;
1342
1343                         sc->full= 0;
1344
1345                         /* find old area */
1346                         for(old= sc->areabase.first; old; old= old->next)
1347                                 if(old->full) break;
1348                         if(old==NULL) {
1349                                 printf("something wrong in areafullscreen\n");
1350                                 return;
1351                         }
1352                             // old feature described below (ton)
1353                                 // in autoplay screens the headers are disabled by
1354                                 // default. So use the old headertype instead
1355
1356                         area_copy_data(old, sa, 1);     /*  1 = swap spacelist */
1357
1358                         old->full= NULL;
1359
1360                         /* animtimer back */
1361                         sc->animtimer= oldscreen->animtimer;
1362                         oldscreen->animtimer= NULL;
1363
1364                         ED_screen_set(C, sc);
1365
1366                         free_screen(oldscreen);
1367                         free_libblock(&CTX_data_main(C)->screen, oldscreen);
1368                 }
1369         }
1370         else {
1371                 ScrArea *newa;
1372
1373                 oldscreen= CTX_wm_screen(C);
1374
1375                 /* is there only 1 area? */
1376                 if(oldscreen->areabase.first==oldscreen->areabase.last) return;
1377                 if(sa->spacetype==SPACE_INFO) return;
1378
1379                 oldscreen->full = SCREENFULL;
1380
1381                 sc= screen_add(CTX_wm_window(C), CTX_data_scene(C), "temp");
1382                 sc->full = SCREENFULL; // XXX
1383
1384                 /* timer */
1385                 sc->animtimer= oldscreen->animtimer;
1386                 oldscreen->animtimer= NULL;
1387
1388                 /* returns the top small area */
1389                 newa= area_split(CTX_wm_window(C), sc, (ScrArea *)sc->areabase.first, 'h', 0.99f);
1390                 ED_area_newspace(C, newa, SPACE_INFO);
1391
1392                 /* copy area */
1393                 newa= newa->prev;
1394                 area_copy_data(newa, sa, 1);    /* 1 = swap spacelist */
1395
1396                 sa->full= oldscreen;
1397                 newa->full= oldscreen;
1398                 newa->next->full= oldscreen; // XXX
1399
1400                 ED_screen_set(C, sc);
1401         }
1402
1403         /* XXX bad code: setscreen() ends with first area active. fullscreen render assumes this too */
1404         CTX_wm_area_set(C, sc->areabase.first);
1405
1406         /* XXX retopo_force_update(); */
1407
1408 }
1409
1410 int ED_screen_full_newspace(bContext *C, ScrArea *sa, int type)
1411 {
1412         if(sa==NULL)
1413                 return 0;
1414
1415         if(sa->full==0)
1416                 ed_screen_fullarea(C, sa);
1417
1418         /* CTX_wm_area(C) is new area */
1419         ED_area_newspace(C, CTX_wm_area(C), type);
1420
1421         return 1;
1422 }
1423
1424 void ED_screen_full_prevspace(bContext *C)
1425 {
1426         ScrArea *sa= CTX_wm_area(C);
1427
1428         ED_area_prevspace(C);
1429
1430         if(sa->full)
1431                 ed_screen_fullarea(C, sa);
1432 }
1433
1434 void ED_screen_animation_timer(bContext *C, int enable)
1435 {
1436         bScreen *screen= CTX_wm_screen(C);
1437         wmWindow *win= CTX_wm_window(C);
1438         Scene *scene= CTX_data_scene(C);
1439
1440         if(screen->animtimer)
1441                 WM_event_remove_window_timer(win, screen->animtimer);
1442         screen->animtimer= NULL;
1443
1444         if(enable)
1445                 screen->animtimer= WM_event_add_window_timer(win, TIMER0, (1.0/FPS));
1446 }
1447
1448 unsigned int ED_screen_view3d_layers(bScreen *screen)
1449 {
1450         if(screen) {
1451                 unsigned int layer= screen->scene->lay; /* as minimum this */
1452                 ScrArea *sa;
1453
1454                 /* get all used view3d layers */
1455                 for(sa= screen->areabase.first; sa; sa= sa->next) {
1456                         if(sa->spacetype==SPACE_VIEW3D)
1457                                 layer |= ((View3D *)sa->spacedata.first)->lay;
1458                 }
1459                 return layer;
1460         }
1461         return 0;
1462 }
1463
1464
1465 /* results in fully updated anim system */
1466 /* in future sound should be on WM level, only 1 sound can play! */
1467 void ED_update_for_newframe(const bContext *C, int mute)
1468 {
1469         bScreen *screen= CTX_wm_screen(C);
1470         Scene *scene= screen->scene;
1471
1472         //extern void audiostream_scrub(unsigned int frame);    /* seqaudio.c */
1473
1474         /* this function applies the changes too */
1475         /* XXX future: do all windows */
1476         scene_update_for_newframe(scene, ED_screen_view3d_layers(screen)); /* BKE_scene.h */
1477
1478         //if ( (CFRA>1) && (!mute) && (scene->audio.flag & AUDIO_SCRUB))
1479         //      audiostream_scrub( CFRA );
1480
1481         /* 3d window, preview */
1482         //BIF_view3d_previewrender_signal(curarea, PR_DBASE|PR_DISPRECT);
1483
1484         /* all movie/sequence images */
1485         //BIF_image_update_frame();
1486
1487         /* composite */
1488         if(scene->use_nodes && scene->nodetree)
1489                 ntreeCompositTagAnimated(scene->nodetree);
1490
1491         /* update animated texture nodes */
1492         {
1493                 Tex *tex;
1494                 for(tex= CTX_data_main(C)->tex.first; tex; tex= tex->id.next)
1495                         if( tex->use_nodes && tex->nodetree ) {
1496                                 ntreeTexTagAnimated( tex->nodetree );
1497                         }
1498         }
1499 }
1500
1501