Logo Search packages:      
Sourcecode: blender version File versions

outliner.c

/**
 * $Id: ooutliner.c
 *
 * ***** 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) 2004 Blender Foundation.
 * All rights reserved.
 *
 * The Original Code is: all of this file.
 *
 * Contributor(s): none yet.
 *
 * ***** END GPL/BL DUAL LICENSE BLOCK *****
 */

#include <string.h>
#include <stdlib.h>

#include "MEM_guardedalloc.h"

#ifdef WIN32
#include "BLI_winstuff.h"
#endif

#include "DNA_action_types.h"
#include "DNA_armature_types.h"
#include "DNA_constraint_types.h"
#include "DNA_curve_types.h"
#include "DNA_camera_types.h"
#include "DNA_image_types.h"
#include "DNA_ipo_types.h"
#include "DNA_key_types.h"
#include "DNA_lamp_types.h"
#include "DNA_material_types.h"
#include "DNA_mesh_types.h"
#include "DNA_meta_types.h"
#include "DNA_nla_types.h"
#include "DNA_object_types.h"
#include "DNA_oops_types.h"
#include "DNA_scene_types.h"
#include "DNA_screen_types.h"
#include "DNA_space_types.h"
#include "DNA_texture_types.h"
#include "DNA_text_types.h"
#include "DNA_world_types.h"

#include "BLI_blenlib.h"

#include "BKE_global.h"
#include "BKE_library.h"
#include "BKE_main.h"
#include "BKE_material.h"
#include "BKE_screen.h"
#include "BKE_utildefines.h"

#include "BIF_butspace.h"
#include "BIF_drawscene.h"
#include "BIF_drawtext.h"
#include "BIF_editaction.h"
#include "BIF_editarmature.h"
#include "BIF_editdeform.h"
#include "BIF_editnla.h"
#include "BIF_editview.h"
#include "BIF_editconstraint.h"
#include "BIF_gl.h"
#include "BIF_graphics.h"
#include "BIF_interface.h"
#include "BIF_mywindow.h"
#include "BIF_outliner.h"
#include "BIF_language.h"
#include "BIF_mainqueue.h"
#include "BIF_poseobject.h"
#include "BIF_previewrender.h"
#include "BIF_resources.h"
#include "BIF_screen.h"
#include "BIF_space.h"
#include "BIF_toolbox.h"

#ifdef INTERNATIONAL
#include "FTF_Api.h"
#endif

#include "BDR_editobject.h"
#include "BSE_drawipo.h"
#include "BSE_edit.h"
#include "BSE_editaction.h"

#include "blendef.h"
#include "mydevice.h"

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#define OL_H      19
#define OL_X      18

#define TS_CHUNK  128

#define TREESTORE(a) soops->treestore->data+(a)->store_index

/* ******************** PERSISTANT DATA ***************** */

static void outliner_storage_cleanup(SpaceOops *soops)
{
      TreeStore *ts= soops->treestore;
      
      if(ts) {
            TreeStoreElem *tselem;
            int a, unused= 0;
            
            /* each element used once, for ID blocks with more users to have each a treestore */
            for(a=0, tselem= ts->data; a<ts->usedelem; a++, tselem++) tselem->used= 0;

            /* cleanup only after reading file or undo step */
            if(soops->storeflag & SO_TREESTORE_CLEANUP) {
                  
                  for(a=0, tselem= ts->data; a<ts->usedelem; a++, tselem++) {
                        if(tselem->id==NULL) unused++;
                  }

                  if(unused) {
                        if(ts->usedelem == unused) {
                              MEM_freeN(ts->data);
                              ts->data= NULL;
                              ts->usedelem= ts->totelem= 0;
                        }
                        else {
                              TreeStoreElem *tsnewar, *tsnew;
                              
                              tsnew=tsnewar= MEM_mallocN((ts->usedelem-unused)*sizeof(TreeStoreElem), "new tselem");
                              for(a=0, tselem= ts->data; a<ts->usedelem; a++, tselem++) {
                                    if(tselem->id) {
                                          *tsnew= *tselem;
                                          tsnew++;
                                    }
                              }
                              MEM_freeN(ts->data);
                              ts->data= tsnewar;
                              ts->usedelem-= unused;
                              ts->totelem= ts->usedelem;
                        }
                  }
            }
      }
}

static void check_persistant(SpaceOops *soops, TreeElement *te, ID *id, short type, short nr)
{
      TreeStore *ts;
      TreeStoreElem *tselem;
      int a;
      
      /* case 1; no TreeStore */
      if(soops->treestore==NULL) {
            ts= soops->treestore= MEM_callocN(sizeof(TreeStore), "treestore");
      }
      ts= soops->treestore;
      
      /* check if 'te' is in treestore */
      tselem= ts->data;
      for(a=0; a<ts->usedelem; a++, tselem++) {
            if(tselem->id==id && tselem->used==0) {
                  if((type==0 && tselem->type==0) ||(tselem->type==type && tselem->nr==nr)) {
                        te->store_index= a;
                        tselem->used= 1;
                        return;
                  }
            }
      }
      
      /* add 1 element to treestore */
      if(ts->usedelem==ts->totelem) {
            TreeStoreElem *tsnew;
            
            tsnew= MEM_mallocN((ts->totelem+TS_CHUNK)*sizeof(TreeStoreElem), "treestore data");
            if(ts->data) {
                  memcpy(tsnew, ts->data, ts->totelem*sizeof(TreeStoreElem));
                  MEM_freeN(ts->data);
            }
            ts->data= tsnew;
            ts->totelem+= TS_CHUNK;
      }
      
      tselem= ts->data+ts->usedelem;
      
      tselem->type= type;
      if(type) tselem->nr= nr; // we're picky! :)
      else tselem->nr= 0;
      tselem->id= id;
      tselem->flag= TSE_CLOSED;
      te->store_index= ts->usedelem;
      
      ts->usedelem++;
}

/* ******************** TREE MANAGEMENT ****************** */

void outliner_free_tree(ListBase *lb)
{
      
      while(lb->first) {
            TreeElement *te= lb->first;

            outliner_free_tree(&te->subtree);
            BLI_remlink(lb, te);
            MEM_freeN(te);
      }
}

static void outliner_height(SpaceOops *soops, ListBase *lb, int *h)
{
      TreeElement *te= lb->first;
      while(te) {
            TreeStoreElem *tselem= TREESTORE(te);
            if((tselem->flag & TSE_CLOSED)==0) 
                  outliner_height(soops, &te->subtree, h);
            (*h)++;
            te= te->next;
      }
}

static TreeElement *outliner_find_tree_element(ListBase *lb, int store_index)
{
      TreeElement *te= lb->first, *tes;
      while(te) {
            if(te->store_index==store_index) return te;
            tes= outliner_find_tree_element(&te->subtree, store_index);
            if(tes) return tes;
            te= te->next;
      }
      return NULL;
}



static ID *outliner_search_back(SpaceOops *soops, TreeElement *te, short idcode)
{
      TreeStoreElem *tselem;
      te= te->parent;
      
      while(te) {
            tselem= TREESTORE(te);
            if(te->idcode==idcode && tselem->type==0) return tselem->id;
            te= te->parent;
      }
      return NULL;
}

struct treesort {
      TreeElement *te;
      ID *id;
      char *name;
      short idcode;
};

static int treesort_alpha(const void *v1, const void *v2)
{
      const struct treesort *x1= v1, *x2= v2;
      int comp;
      
      /* first put objects last (hierarchy) */
      comp= (x1->idcode==ID_OB);
      if(x2->idcode==ID_OB) comp+=2;
      
      if(comp==1) return 1;
      else if(comp==2) return -1;
      else if(comp==3) {
            int comp= strcmp(x1->name, x2->name);
            
            if( comp>0 ) return 1;
            else if( comp<0) return -1;
            return 0;
      }
      return 0;
}

/* this is nice option for later? doesnt look too useful... */
#if 0
static int treesort_obtype_alpha(const void *v1, const void *v2)
{
      const struct treesort *x1= v1, *x2= v2;
      
      /* first put objects last (hierarchy) */
      if(x1->idcode==ID_OB && x2->idcode!=ID_OB) return 1;
      else if(x2->idcode==ID_OB && x1->idcode!=ID_OB) return -1;
      else {
            /* 2nd we check ob type */
            if(x1->idcode==ID_OB && x2->idcode==ID_OB) {
                  if( ((Object *)x1->id)->type > ((Object *)x2->id)->type) return 1;
                  else if( ((Object *)x1->id)->type > ((Object *)x2->id)->type) return -1;
                  else return 0;
            }
            else {
                  int comp= strcmp(x1->name, x2->name);
                  
                  if( comp>0 ) return 1;
                  else if( comp<0) return -1;
                  return 0;
            }
      }
}
#endif

/* sort happens on each subtree individual */
static void outliner_sort(SpaceOops *soops, ListBase *lb)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      int totelem=0;
      
      te= lb->last;
      if(te==NULL) return;
      tselem= TREESTORE(te);
      
      /* sorting rules; only object lists or deformgroups */
      if( (tselem->type==TSE_DEFGROUP) || (tselem->type==0 && te->idcode==ID_OB)) {
            
            /* count first */
            for(te= lb->first; te; te= te->next) totelem++;
            
            if(totelem>1) {
                  struct treesort *tear= MEM_mallocN(totelem*sizeof(struct treesort), "tree sort array");
                  struct treesort *tp=tear;
                  
                  for(te= lb->first; te; te= te->next, tp++) {
                        tselem= TREESTORE(te);
                        tp->te= te;
                        tp->name= te->name;
                        tp->idcode= te->idcode;
                        if(tselem->type && tselem->type!=TSE_DEFGROUP) tp->idcode= 0;     // dont sort this
                        tp->id= tselem->id;
                  }
                  
                  qsort(tear, totelem, sizeof(struct treesort), treesort_alpha);
                  
                  lb->first=lb->last= NULL;
                  tp= tear;
                  while(totelem--) {
                        BLI_addtail(lb, tp->te);
                        tp++;
                  }
                  MEM_freeN(tear);
            }
      }
      
      for(te= lb->first; te; te= te->next) {
            outliner_sort(soops, &te->subtree);
      }
}

/* Prototype, see function below */
static void outliner_add_bone(SpaceOops *soops, ListBase *lb, 
                                            ID *id, Bone *curBone, TreeElement *parent, int *a);


static TreeElement *outliner_add_element(SpaceOops *soops, ListBase *lb, void *idv, 
                                                             TreeElement *parent, short type, short index)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      ID *id= idv;
      int a;
      
      if(id==NULL) return NULL;

      te= MEM_callocN(sizeof(TreeElement), "tree elem");
      /* add to the visual tree */
      BLI_addtail(lb, te);
      /* add to the storage */
      check_persistant(soops, te, id, type, index);
      tselem= TREESTORE(te);  
      
      te->parent= parent;
      te->index= index; // for data arays
      te->name= id->name+2; // default, can be overridden by non-ID data
      te->idcode= GS(id->name);
      
      if(type==0) {

            /* tuck pointer back in object, to construct hierarchy */
            if(GS(id->name)==ID_OB) id->newid= (ID *)te;
            
            /* expand specific data always */
            switch(GS(id->name)) {
            case ID_SCE:
                  {
                        Scene *sce= (Scene *)id;
                        outliner_add_element(soops, &te->subtree, sce->world, te, 0, 0);
                        if(sce->scriptlink.scripts) {
                              TreeElement *tenla= outliner_add_element(soops, &te->subtree, sce, te, TSE_SCRIPT_BASE, 0);
                              int a= 0;
                              tenla->name= "Scripts";
                              for (a=0; a<sce->scriptlink.totscript; a++) {
                                    outliner_add_element(soops, &tenla->subtree, sce->scriptlink.scripts[a], te, 0, 0);
                              }
                        }
                  }
                  break;
            case ID_OB:
                  {
                        Object *ob= (Object *)id;
                        
                        outliner_add_element(soops, &te->subtree, ob->data, te, 0, 0);
                        outliner_add_element(soops, &te->subtree, ob->ipo, te, 0, 0);
                        outliner_add_element(soops, &te->subtree, ob->action, te, 0, 0);
                        
                        for(a=0; a<ob->totcol; a++) 
                              outliner_add_element(soops, &te->subtree, ob->mat[a], te, 0, a);
                        
                        if(ob->constraints.first) {
                              bConstraint *con;
                              TreeElement *ten;
                              TreeElement *tenla= outliner_add_element(soops, &te->subtree, ob, te, TSE_CONSTRAINT_BASE, 0);
                              int a= 0;
                              
                              tenla->name= "Constraints";
                              for(con= ob->constraints.first; con; con= con->next, a++) {
                                    ten= outliner_add_element(soops, &tenla->subtree, ob, tenla, TSE_CONSTRAINT, a);
                                    ten->name= con->name;
                                    ten->directdata= con;
                                    outliner_add_element(soops, &ten->subtree, con->ipo, ten, 0, 0);
                                    /* possible add all other types links? */
                              }
                        }
                        if(ob->hooks.first) {
                              ObHook *hook;
                              TreeElement *ten;
                              TreeElement *tenla= outliner_add_element(soops, &te->subtree, ob, te, TSE_HOOKS_BASE, 0);
                              int a= 0;
                              
                              tenla->name= "Hooks";
                              for(hook=ob->hooks.first; hook; hook= hook->next, a++) {
                                    ten= outliner_add_element(soops, &tenla->subtree, hook->parent, tenla, TSE_HOOK, a);
                                    if(ten) ten->name= hook->name;
                              }
                        }
                        if(ob->defbase.first) {
                              bDeformGroup *defgroup;
                              TreeElement *ten;
                              TreeElement *tenla= outliner_add_element(soops, &te->subtree, ob, te, TSE_DEFGROUP_BASE, 0);
                              int a= 0;
                              
                              tenla->name= "Vertex Groups";
                              for (defgroup=ob->defbase.first; defgroup; defgroup=defgroup->next, a++) {
                                    ten= outliner_add_element(soops, &tenla->subtree, ob, tenla, TSE_DEFGROUP, a);
                                    ten->name= defgroup->name;
                                    ten->directdata= defgroup;
                              }
                        }
                        if(ob->scriptlink.scripts) {
                              TreeElement *tenla= outliner_add_element(soops, &te->subtree, ob, te, TSE_SCRIPT_BASE, 0);
                              int a= 0;
                              
                              tenla->name= "Scripts";
                              for (a=0; a<ob->scriptlink.totscript; a++) {
                                    outliner_add_element(soops, &tenla->subtree, ob->scriptlink.scripts[a], te, 0, 0);
                              }
                        }
                        if(ob->nlastrips.first) {
                              bActionStrip *strip;
                              TreeElement *ten;
                              TreeElement *tenla= outliner_add_element(soops, &te->subtree, ob, te, TSE_NLA, 0);
                              int a= 0;
                              
                              tenla->name= "NLA strips";
                              for (strip=ob->nlastrips.first; strip; strip=strip->next, a++) {
                                    ten= outliner_add_element(soops, &tenla->subtree, strip->act, tenla, TSE_NLA_ACTION, a);
                                    if(ten) ten->directdata= strip;
                              }
                        }
                        
                  }
                  break;
            case ID_ME:
                  {
                        Mesh *me= (Mesh *)id;
                        outliner_add_element(soops, &te->subtree, me->ipo, te, 0, 0);
                        outliner_add_element(soops, &te->subtree, me->key, te, 0, 0);
                        for(a=0; a<me->totcol; a++) 
                              outliner_add_element(soops, &te->subtree, me->mat[a], te, 0, a);
                        /* could do tfaces with image links, but the images are not grouped nicely.
                           would require going over all tfaces, sort images in use. etc... */
                  }
                  break;
            case ID_CU:
                  {
                        Curve *cu= (Curve *)id;
                        for(a=0; a<cu->totcol; a++) 
                              outliner_add_element(soops, &te->subtree, cu->mat[a], te, 0, a);
                  }
                  break;
            case ID_MB:
                  {
                        MetaBall *mb= (MetaBall *)id;
                        for(a=0; a<mb->totcol; a++) 
                              outliner_add_element(soops, &te->subtree, mb->mat[a], te, 0, a);
                  }
                  break;
            case ID_MA:
            {
                  Material *ma= (Material *)id;
                  
                  outliner_add_element(soops, &te->subtree, ma->ipo, te, 0, 0);
                  for(a=0; a<MAX_MTEX; a++) {
                        if(ma->mtex[a]) outliner_add_element(soops, &te->subtree, ma->mtex[a]->tex, te, 0, a);
                  }
            }
                  break;
            case ID_TE:
                  {
                        Tex *tex= (Tex *)id;
                        
                        outliner_add_element(soops, &te->subtree, tex->ipo, te, 0, 0);
                        outliner_add_element(soops, &te->subtree, tex->ima, te, 0, 0);
                  }
                  break;
            case ID_CA:
                  {
                        Camera *ca= (Camera *)id;
                        outliner_add_element(soops, &te->subtree, ca->ipo, te, 0, 0);
                  }
                  break;
            case ID_LA:
                  {
                        Lamp *la= (Lamp *)id;
                        outliner_add_element(soops, &te->subtree, la->ipo, te, 0, 0);
                        for(a=0; a<MAX_MTEX; a++) {
                              if(la->mtex[a]) outliner_add_element(soops, &te->subtree, la->mtex[a]->tex, te, 0, a);
                        }
                  }
                  break;
            case ID_WO:
                  {
                        World *wrld= (World *)id;
                        outliner_add_element(soops, &te->subtree, wrld->ipo, te, 0, 0);
                        for(a=0; a<MAX_MTEX; a++) {
                              if(wrld->mtex[a]) outliner_add_element(soops, &te->subtree, wrld->mtex[a]->tex, te, 0, a);
                        }
                  }
                  break;
            case ID_KE:
                  {
                        Key *key= (Key *)id;
                        outliner_add_element(soops, &te->subtree, key->ipo, te, 0, 0);
                  }
                  break;
            case ID_AC:
                  {
                        bAction *act= (bAction *)id;
                        bActionChannel *chan;
                        int a= 0;
                        
                        tselem= TREESTORE(parent);
                        for (chan=act->chanbase.first; chan; chan=chan->next, a++) {
                              outliner_add_element(soops, &te->subtree, chan->ipo, te, 0, a);
                        }
                  }
                  break;
            case ID_AR:
                  {
                        bArmature *arm= (bArmature *)id;
                        int a= 0;
                        
                        if(G.obedit && G.obedit->data==arm) {
                              EditBone *ebone;
                              TreeElement *ten;
                              
                              for (ebone = G.edbo.first; ebone; ebone=ebone->next, a++) {
                                    ten= outliner_add_element(soops, &te->subtree, id, te, TSE_EBONE, a);
                                    ten->directdata= ebone;
                                    ten->name= ebone->name;
                                    ebone->temp= ten;
                              }
                              /* make hierarchy */
                              ten= te->subtree.first;
                              while(ten) {
                                    TreeElement *nten= ten->next, *par;
                                    ebone= (EditBone *)ten->directdata;
                                    if(ebone->parent) {
                                          BLI_remlink(&te->subtree, ten);
                                          par= ebone->parent->temp;
                                          BLI_addtail(&par->subtree, ten);
                                    }
                                    ten= nten;
                              }
                              
                        }
                        else {
                              Bone *curBone;
                              for (curBone=arm->bonebase.first; curBone; curBone=curBone->next){
                                    outliner_add_bone(soops, &te->subtree, id, curBone, te, &a);
                              }
                        }
                  }
                  break;
            }
      }
      return te;
}

/* special handling of hierarchical non-lib data */
static void outliner_add_bone(SpaceOops *soops, ListBase *lb, ID *id, Bone *curBone, 
                                            TreeElement *parent, int *a)
{
      TreeElement *te= outliner_add_element(soops, lb, id, parent, TSE_BONE, *a);

      (*a)++;
      te->name= curBone->name;
      te->directdata= curBone;

      for(curBone= curBone->childbase.first; curBone; curBone=curBone->next) {
            outliner_add_bone(soops, &te->subtree, id, curBone, te, a);
      }
}


static void outliner_make_hierarchy(SpaceOops *soops, ListBase *lb)
{
      TreeElement *te, *ten, *tep;
      TreeStoreElem *tselem;

      /* build hierarchy */
      te= lb->first;
      while(te) {
            ten= te->next;
            tselem= TREESTORE(te);
            
            if(tselem->type==0 && te->idcode==ID_OB) {
                  Object *ob= (Object *)tselem->id;
                  if(ob->parent && ob->parent->id.newid) {
                        BLI_remlink(lb, te);
                        tep= (TreeElement *)ob->parent->id.newid;
                        BLI_addtail(&tep->subtree, te);
                        // set correct parent pointers
                        for(te=tep->subtree.first; te; te= te->next) te->parent= tep;
                  }
            }
            te= ten;
      }
}

static void outliner_build_tree(SpaceOops *soops)
{
      Scene *sce;
      Base *base;
      Object *ob;
      TreeElement *te, *ten;
      TreeStoreElem *tselem;
      
      outliner_free_tree(&soops->tree);
      outliner_storage_cleanup(soops);
                                       
      /* clear ob id.new flags */
      for(ob= G.main->object.first; ob; ob= ob->id.next) ob->id.newid= NULL;
      
      /* option 1: all scenes */
      if(soops->outlinevis == SO_ALL_SCENES) {
            for(sce= G.main->scene.first; sce; sce= sce->id.next) {
                  te= outliner_add_element(soops, &soops->tree, sce, NULL, 0, 0);
                  tselem= TREESTORE(te);

                  for(base= sce->base.first; base; base= base->next) {
                        ten= outliner_add_element(soops, &te->subtree, base->object, te, 0, 0);
                        ten->directdata= base;
                  }
                  outliner_make_hierarchy(soops, &te->subtree);
            }
      }
      else if(soops->outlinevis == SO_CUR_SCENE) {
            outliner_add_element(soops, &soops->tree, G.scene->world, NULL, 0, 0);
            
            for(base= G.scene->base.first; base; base= base->next) {
                  ten= outliner_add_element(soops, &soops->tree, base->object, NULL, 0, 0);
                  ten->directdata= base;
            }
            outliner_make_hierarchy(soops, &soops->tree);
      }
      else if(soops->outlinevis == SO_VISIBLE) {
            for(base= G.scene->base.first; base; base= base->next) {
                  if(base->lay & G.scene->lay)
                        outliner_add_element(soops, &soops->tree, base->object, NULL, 0, 0);
            }
            outliner_make_hierarchy(soops, &soops->tree);
      }
      else if(soops->outlinevis == SO_SAME_TYPE) {
            Object *ob= OBACT;
            if(ob) {
                  for(base= G.scene->base.first; base; base= base->next) {
                        if(base->object->type==ob->type) {
                              ten= outliner_add_element(soops, &soops->tree, base->object, NULL, 0, 0);
                              ten->directdata= base;
                        }
                  }
                  outliner_make_hierarchy(soops, &soops->tree);
            }
      }
      else if(soops->outlinevis == SO_SELECTED) {
            for(base= G.scene->base.first; base; base= base->next) {
                  if(base->lay & G.scene->lay) {
                        if(base==BASACT || (base->flag & SELECT)) {
                              ten= outliner_add_element(soops, &soops->tree, base->object, NULL, 0, 0);
                              ten->directdata= base;
                        }
                  }
            }
            outliner_make_hierarchy(soops, &soops->tree);
      }
      else {
            ten= outliner_add_element(soops, &soops->tree, OBACT, NULL, 0, 0);
            if(ten) ten->directdata= BASACT;
      }
      
      outliner_sort(soops, &soops->tree);
}

/* **************** INTERACTIVE ************* */

static int outliner_count_levels(SpaceOops *soops, ListBase *lb, int curlevel)
{
      TreeElement *te;
      int level=curlevel, lev;
      
      for(te= lb->first; te; te= te->next) {
            
            lev= outliner_count_levels(soops, &te->subtree, curlevel+1);
            if(lev>level) level= lev;
      }
      return level;
}

static int outliner_has_one_flag(SpaceOops *soops, ListBase *lb, short flag, short curlevel)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      int level;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->flag & flag) return curlevel;
            
            level= outliner_has_one_flag(soops, &te->subtree, flag, curlevel+1);
            if(level) return level;
      }
      return 0;
}

static void outliner_set_flag(SpaceOops *soops, ListBase *lb, short flag, short set)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(set==0) tselem->flag &= ~flag;
            else tselem->flag |= flag;
            outliner_set_flag(soops, &te->subtree, flag, set);
      }
}

void outliner_toggle_visible(struct ScrArea *sa)
{
      SpaceOops *soops= sa->spacedata.first;
      
      if( outliner_has_one_flag(soops, &soops->tree, TSE_CLOSED, 1))
            outliner_set_flag(soops, &soops->tree, TSE_CLOSED, 0);
      else 
            outliner_set_flag(soops, &soops->tree, TSE_CLOSED, 1);

      BIF_undo_push("Outliner toggle visible");
      scrarea_queue_redraw(sa);
}

void outliner_toggle_selected(struct ScrArea *sa)
{
      SpaceOops *soops= sa->spacedata.first;
      
      if( outliner_has_one_flag(soops, &soops->tree, TSE_SELECTED, 1))
            outliner_set_flag(soops, &soops->tree, TSE_SELECTED, 0);
      else 
            outliner_set_flag(soops, &soops->tree, TSE_SELECTED, 1);
      
      BIF_undo_push("Outliner toggle selected");
      scrarea_queue_redraw(sa);
}


static void outliner_openclose_level(SpaceOops *soops, ListBase *lb, int curlevel, int level, int open)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            
            if(open) {
                  if(curlevel<=level) tselem->flag &= ~TSE_CLOSED;
            }
            else {
                  if(curlevel>=level) tselem->flag |= TSE_CLOSED;
            }
            
            outliner_openclose_level(soops, &te->subtree, curlevel+1, level, open);
      }
}

void outliner_one_level(struct ScrArea *sa, int add)
{
      SpaceOops *soops= sa->spacedata.first;
      int level;
      
      level= outliner_has_one_flag(soops, &soops->tree, TSE_CLOSED, 1);
      if(add==1) {
            if(level) outliner_openclose_level(soops, &soops->tree, 1, level, 1);
      }
      else {
            if(level==0) level= outliner_count_levels(soops, &soops->tree, 0);
            if(level) outliner_openclose_level(soops, &soops->tree, 1, level-1, 0);
      }
      
      BIF_undo_push("Outliner show/hide one level");
      scrarea_queue_redraw(sa);
}

void outliner_page_up_down(ScrArea *sa, int up)
{
      SpaceOops *soops= sa->spacedata.first;
      int dy= soops->v2d.mask.ymax-soops->v2d.mask.ymin;
      
      if(up == -1) dy= -dy;
      soops->v2d.cur.ymin+= dy;
      soops->v2d.cur.ymax+= dy;
      
      scrarea_queue_redraw(sa);
}

/* **** do clicks on items ******* */

static void tree_element_active_object(SpaceOops *soops, TreeElement *te)
{
      TreeStoreElem *tselem= TREESTORE(te);
      Scene *sce;
      Base *base;
      Object *ob= NULL;
      
      /* if id is not object, we search back */
      if(te->idcode==ID_OB) ob= (Object *)tselem->id;
      else {
            ob= (Object *)outliner_search_back(soops, te, ID_OB);
            if(ob==OBACT) return;
      }
      if(ob==NULL) return;
      
      sce= (Scene *)outliner_search_back(soops, te, ID_SCE);
      if(sce && G.scene != sce) {
            if(G.obedit) exit_editmode(2);
            if(G.obpose) exit_posemode(1);
            set_scene(sce);
      }
      
      /* find associated base in current scene */
      for(base= FIRSTBASE; base; base= base->next) 
            if(base->object==ob) break;
      if(base) {
            if(G.qual & LR_SHIFTKEY) {
                  /* swap select */
                  if(base->flag & SELECT) base->flag &= ~SELECT;
                  else base->flag |= SELECT;
                  base->object->flag= base->flag;
            }
            else {
                  Base *b;
                  /* deleselect all */
                  for(b= FIRSTBASE; b; b= b->next) {
                        b->flag &= ~SELECT;
                        b->object->flag= b->flag;
                  }
                  base->flag |= SELECT;
                  base->object->flag |= SELECT;
            }
            set_active_base(base);  /* editview.c */
            
            allqueue(REDRAWVIEW3D, 1);
            allqueue(REDRAWOOPS, 0);
            allqueue(REDRAWINFO, 1);
      }
      
      if(ob!=G.obedit) exit_editmode(2);
      if(ob!=G.obpose) exit_posemode(1);
}

static int tree_element_active_material(SpaceOops *soops, TreeElement *te, int set)
{
      TreeElement *tes;
      Object *ob;
      
      /* we search for the object parent */
      ob= (Object *)outliner_search_back(soops, te, ID_OB);
      if(ob==NULL || ob!=OBACT) return 0; // just paranoia
      
      /* searching in ob mat array? */
      tes= te->parent;
      if(tes->idcode==ID_OB) {
            if(set) {
                  ob->actcol= te->index+1;
                  ob->colbits |= (1<<te->index);      // make ob material active too
            }
            else {
                  if(ob->actcol == te->index+1) 
                        if(ob->colbits & (1<<te->index)) return 1;
            }
      }
      /* or we search for obdata material */
      else {
            if(set) {
                  ob->actcol= te->index+1;
                  ob->colbits &= ~(1<<te->index);     // make obdata material active too
            }
            else {
                  if(ob->actcol == te->index+1)
                        if( (ob->colbits & (1<<te->index))==0 ) return 1;
            }
      }
      if(set) {
            extern_set_butspace(F5KEY);   // force shading buttons
            BIF_all_preview_changed();
            allqueue(REDRAWBUTSSHADING, 1);
            allqueue(REDRAWOOPS, 0);
            allqueue(REDRAWIPO, 0);
      }
      return 0;
}

static int tree_element_active_texture(SpaceOops *soops, TreeElement *te, int set)
{
      TreeElement *tep;
      TreeStoreElem *tselem, *tselemp;
      Object *ob=OBACT;
      ScrArea *sa;
      SpaceButs *sbuts=NULL;
      
      if(ob==NULL) return 0; // no active object
      
      tselem= TREESTORE(te);
      
      /* find buttons area (note, this is undefined really still, needs recode in blender) */
      sa= G.curscreen->areabase.first;
      while(sa) {
            if(sa->spacetype==SPACE_BUTS) break;
            sa= sa->next;
      }
      if(sa) sbuts= sa->spacedata.first;
      
      /* where is texture linked to? */
      tep= te->parent;
      tselemp= TREESTORE(tep);
      
      if(tep->idcode==ID_WO) {
            World *wrld= (World *)tselemp->id;

            if(set) {
                  if(sbuts) {
                        sbuts->tabo= TAB_SHADING_TEX; // hack from header_buttonswin.c
                        sbuts->texfrom= 1;
                  }
                  extern_set_butspace(F6KEY);   // force shading buttons texture
                  wrld->texact= te->index;
            }
            else if(tselemp->id == (ID *)(G.scene->world)) {
                  if(wrld->texact==te->index) return 1;
            }
      }
      else if(tep->idcode==ID_LA) {
            Lamp *la= (Lamp *)tselemp->id;
            if(set) {
                  if(sbuts) {
                        sbuts->tabo= TAB_SHADING_TEX; // hack from header_buttonswin.c
                        sbuts->texfrom= 2;
                  }
                  extern_set_butspace(F6KEY);   // force shading buttons texture
                  la->texact= te->index;
            }
            else {
                  if(tselemp->id == ob->data) {
                        if(la->texact==te->index) return 1;
                  }
            }
      }
      else if(tep->idcode==ID_MA) {
            Material *ma= (Material *)tselemp->id;
            if(set) {
                  if(sbuts) {
                        //sbuts->tabo= TAB_SHADING_TEX;     // hack from header_buttonswin.c
                        sbuts->texfrom= 0;
                  }
                  extern_set_butspace(F6KEY);   // force shading buttons texture
                  ma->texact= te->index;
                  
                  /* also set active material */
                  ob->actcol= tep->index+1;
            }
            else if(tep->flag & TE_ACTIVE) {    // this is active material
                  if(ma->texact==te->index) return 1;
            }
      }
      
      return 0;
}


static int tree_element_active_lamp(SpaceOops *soops, TreeElement *te, int set)
{
      Object *ob;
      
      /* we search for the object parent */
      ob= (Object *)outliner_search_back(soops, te, ID_OB);
      if(ob==NULL || ob!=OBACT) return 0; // just paranoia
      
      if(set) {
            extern_set_butspace(F5KEY);
            BIF_all_preview_changed();
            allqueue(REDRAWBUTSSHADING, 1);
            allqueue(REDRAWOOPS, 0);
            allqueue(REDRAWIPO, 0);
      }
      else return 1;
      
      return 0;
}

static int tree_element_active_world(SpaceOops *soops, TreeElement *te, int set)
{
      TreeElement *tep;
      TreeStoreElem *tselem=NULL;
      Scene *sce=NULL;
      
      tep= te->parent;
      if(tep) {
            tselem= TREESTORE(tep);
            sce= (Scene *)tselem->id;
      }
      
      if(set) {   // make new scene active
            if(sce && G.scene != sce) {
                  if(G.obedit) exit_editmode(2);
                  if(G.obpose) exit_posemode(1);
                  set_scene(sce);
            }
      }
      
      if(tep==NULL || tselem->id == (ID *)G.scene) {
            if(set) {
                  extern_set_butspace(F8KEY);
            }
            else {
                  return 1;
            }
      }
      return 0;
}

static int tree_element_active_ipo(SpaceOops *soops, TreeElement *te, int set)
{
      TreeElement *tes;
      TreeStoreElem *tselems=NULL;
      Object *ob;
      
      /* we search for the object parent */
      ob= (Object *)outliner_search_back(soops, te, ID_OB);
      if(ob==NULL || ob!=OBACT) return 0; // just paranoia
      
      /* the parent of ipo */
      tes= te->parent;
      tselems= TREESTORE(tes);
      
      if(set) {
            ob->ipowin= tes->idcode;
            if(ob->ipowin==ID_MA) tree_element_active_material(soops, tes, 1);
            else if(ob->ipowin==ID_AC) {
                  bActionChannel *chan;
                  short a=0;
                  for(chan=ob->action->chanbase.first; chan; chan= chan->next) {
                        if(a==te->index) break;
                        if(chan->ipo) a++;
                  }
                  deselect_actionchannels(ob->action, 0);
                  select_channel(ob->action, chan, SELECT_ADD);
                  allqueue(REDRAWACTION, ob->ipowin);
                  if(G.obpose) allqueue(REDRAWVIEW3D, ob->ipowin);
            }
            
            allqueue(REDRAWIPO, ob->ipowin);
      }
      else if(ob->ipowin==tes->idcode) {
            if(ob->ipowin==ID_MA) {
                  Material *ma= give_current_material(ob, ob->actcol);
                  if(ma==(Material *)tselems->id) return 1;
            }
            else if(ob->ipowin==ID_AC) {
                  bActionChannel *chan;
                  short a=0;
                  for(chan=ob->action->chanbase.first; chan; chan= chan->next) {
                        if(a==te->index) break;
                        if(chan->ipo) a++;
                  }
                  if(chan==get_hilighted_action_channel(ob->action)) return 1;
            }
            else return 1;
      }
      return 0;
}     

static int tree_element_active_defgroup(TreeElement *te, TreeStoreElem *tselem, int set)
{
      Object *ob;
      
      /* id in tselem is object */
      ob= (Object *)tselem->id;
      if(set) {
            ob->actdef= te->index+1;
      }
      else {
            if(ob==OBACT)
                  if(ob->actdef== te->index+1) return 1;
      }
      return 0;
}

static int tree_element_active_nla_action(TreeElement *te, TreeStoreElem *tselem, int set)
{
      if(set) {
            bActionStrip *strip= te->directdata;
            if(strip) {
                  deselect_nlachannel_keys(0);
                  strip->flag |= ACTSTRIP_SELECT;
                  allqueue(REDRAWNLA, 0);
            }
      }
      else {
            /* id in tselem is action */
            bActionStrip *strip= te->directdata;
            if(strip) {
                  if(strip->flag & ACTSTRIP_SELECT) return 1;
            }
      }
      return 0;
}


static int tree_element_active_bone(TreeElement *te, TreeStoreElem *tselem, int set)
{
      bArmature *arm= (bArmature *)tselem->id;
      Bone *bone= te->directdata;

      if(set) {
            if(G.qual & LR_SHIFTKEY);
            else deselectall_posearmature(0);
            bone->flag |= BONE_SELECTED;

            allqueue(REDRAWVIEW3D, 0);
            allqueue(REDRAWOOPS, 0);
            allqueue(REDRAWACTION, 0);
      }
      else {
            Object *ob= OBACT;
            
            if(ob && ob->data==arm) {
                  if (bone->flag & BONE_SELECTED) return 1;
            }
      }
      return 0;
}

/* ebones only draw in editmode armature */
static int tree_element_active_ebone(TreeElement *te, TreeStoreElem *tselem, int set)
{
      EditBone *ebone= te->directdata;
      
      if(set) {
            if(G.qual & LR_SHIFTKEY);
            else {
                  ebone->flag |= BONE_SELECTED; // trick deselectall, it toggles... duhh
                  deselectall_armature();
            }
            ebone->flag |= BONE_SELECTED|BONE_ROOTSEL|BONE_TIPSEL;
            // flush to parent?
            if(ebone->parent && (ebone->flag & BONE_IK_TOPARENT)) ebone->parent->flag |= BONE_TIPSEL;
            
            allqueue(REDRAWVIEW3D, 0);
            allqueue(REDRAWOOPS, 0);
            allqueue(REDRAWACTION, 0);
      }
      else {
            if (ebone->flag & BONE_SELECTED) return 1;
      }
      return 0;
}


static int tree_element_active_text(SpaceOops *soops, TreeElement *te, int set)
{
      ScrArea *sa=NULL;
      
      for(sa= G.curscreen->areabase.first; sa; sa= sa->next) {
            if(sa->spacetype==SPACE_TEXT) break;
      }
      if(sa) {
            SpaceText *st= sa->spacedata.first;
            TreeStoreElem *tselem= TREESTORE(te);
            
            if(set) {
                  st->text= (Text *)tselem->id;
                  st->top= 0;
                  scrarea_queue_redraw(sa);
            }
            else if(st->text==(Text *)tselem->id) return 1;
      }
      return 0;
}

/* generic call for ID data check or make/check active in UI */
static int tree_element_active(SpaceOops *soops, TreeElement *te, int set)
{

      switch(te->idcode) {
            case ID_MA:
                  return tree_element_active_material(soops, te, set);
            case ID_WO:
                  return tree_element_active_world(soops, te, set);
            case ID_LA:
                  return tree_element_active_lamp(soops, te, set);
            case ID_IP:
                  return tree_element_active_ipo(soops, te, set);
            case ID_TE:
                  return tree_element_active_texture(soops, te, set);
            case ID_TXT:
                  return tree_element_active_text(soops, te, set);
      }
      return 0;
}

/* generic call for non-id data to make/check active in UI */
static int tree_element_type_active(SpaceOops *soops, TreeElement *te, TreeStoreElem *tselem, int set)
{
      
      switch(tselem->type) {
            case TSE_NLA_ACTION:
                  return tree_element_active_nla_action(te, tselem, set);
            case TSE_DEFGROUP:
                  return tree_element_active_defgroup(te, tselem, set);
            case TSE_BONE:
                  return tree_element_active_bone(te, tselem, set);
            case TSE_EBONE:
                  return tree_element_active_ebone(te, tselem, set);
            case TSE_HOOK: // actually object
                  if(set) tree_element_active_object(soops, te);
                  else if(tselem->id==(ID *)OBACT) return 1;
                  break;
      }
      return 0;
}


static int do_outliner_mouse_event(SpaceOops *soops, TreeElement *te, short event, float *mval)
{
      
      if(mval[1]>te->ys && mval[1]<te->ys+OL_H) {
            TreeStoreElem *tselem= TREESTORE(te);
            int openclose= 0;

            /* open close icon, three things to check */
            if(event==RETKEY || event==PADENTER) openclose= 1; // enter opens/closes always
            else if((te->flag & TE_ICONROW)==0) {                       // hidden icon, no open/close
                  if( mval[0]>te->xs && mval[0]<te->xs+OL_X) openclose= 1;
            }

            if(openclose) {
                  
                  /* all below close/open? */
                  if( (G.qual & LR_SHIFTKEY) ) {
                        tselem->flag &= ~TSE_CLOSED;
                        outliner_set_flag(soops, &te->subtree, TSE_CLOSED, !outliner_has_one_flag(soops, &te->subtree, TSE_CLOSED, 1));
                  }
                  else {
                        if(tselem->flag & TSE_CLOSED) tselem->flag &= ~TSE_CLOSED;
                        else tselem->flag |= TSE_CLOSED;
                        
                  }
                  
                  return 1;
            }
            /* name and first icon */
            else if(mval[0]>te->xs && mval[0]<te->xend) {
                  
                  /* activate a name button? */
                  if(G.qual & LR_CTRLKEY) {
                        if(ELEM5(tselem->type, TSE_NLA, TSE_DEFGROUP_BASE, TSE_CONSTRAINT_BASE, TSE_HOOKS_BASE, TSE_SCRIPT_BASE)) 
                              error("Cannot edit builtin name");
                        else {
                              tselem->flag |= TSE_TEXTBUT;
                        }
                  }
                  else {
                        /* always makes active object */
                        tree_element_active_object(soops, te);
                        
                        if(tselem->type==0) { // the lib blocks
                              /* editmode? */
                              if(te->idcode==ID_SCE) {
                                    if(G.scene!=(Scene *)tselem->id) {
                                          if(G.obedit) exit_editmode(2);
                                          if(G.obpose) exit_posemode(1);
                                          set_scene((Scene *)tselem->id);
                                    }
                              }
                              else if(ELEM4(te->idcode, ID_ME, ID_CU, ID_MB, ID_LT)) {
                                    if(G.obpose) exit_posemode(1);
                                    if(G.obedit) exit_editmode(2);
                                    else {
                                          enter_editmode();
                                          extern_set_butspace(F9KEY);
                                    }
                              }
                              else if(te->idcode==ID_AR) {
                                    if(G.obedit) exit_editmode(2);
                                    if(G.obpose) exit_posemode(1);
                                    else enter_posemode();
                              }
                              else {      // rest of types
                                    tree_element_active(soops, te, 1);
                              }
                              
                        }
                        else tree_element_type_active(soops, te, tselem, 1);
                  }
                  return 1;
            }
      }
      
      for(te= te->subtree.first; te; te= te->next) {
            if(do_outliner_mouse_event(soops, te, event, mval)) return 1;
      }
      return 0;
}

/* event can enterkey, then it opens/closes */
void outliner_mouse_event(ScrArea *sa, short event)
{
      SpaceOops *soops= curarea->spacedata.first;
      TreeElement *te;
      float fmval[2];
      short mval[2];
      
      getmouseco_areawin(mval);
      areamouseco_to_ipoco(&soops->v2d, mval, fmval, fmval+1);
      
      for(te= soops->tree.first; te; te= te->next) {
            if(do_outliner_mouse_event(soops, te, event, fmval)) break;
      }
      
      if(te) {
            BIF_undo_push("Outliner click event");
            allqueue(REDRAWOOPS, 0);
      }

}

static TreeElement *outliner_find_id(SpaceOops *soops, ListBase *lb, ID *id)
{
      TreeElement *te, *tes;
      TreeStoreElem *tselem;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->id==id) return te;
            /* only deeper on scene or object */
            if( te->idcode==ID_OB || te->idcode==ID_SCE) { 
                  tes= outliner_find_id(soops, &te->subtree, id);
                  if(tes) return tes;
            }
      }
      return NULL;
}

void outliner_show_active(struct ScrArea *sa)
{
      SpaceOops *so= sa->spacedata.first;
      TreeElement *te;
      int ytop;
      
      if(OBACT == NULL) return;
      
      te= outliner_find_id(so, &so->tree, (ID *)OBACT);
      if(te) {
            /* make te->ys center of view */
            ytop= te->ys + (so->v2d.mask.ymax-so->v2d.mask.ymin)/2;
            if(ytop>0) ytop= 0;
            so->v2d.cur.ymax= ytop;
            so->v2d.cur.ymin= ytop-(so->v2d.mask.ymax-so->v2d.mask.ymin);
            scrarea_queue_redraw(sa);
      }
}

static int subtree_has_objects(SpaceOops *soops, ListBase *lb)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->type==0 && te->idcode==ID_OB) return 1;
            if( subtree_has_objects(soops, &te->subtree)) return 1;
      }
      return 0;
}

static void tree_element_show_hierarchy(SpaceOops *soops, ListBase *lb)
{
      TreeElement *te;
      TreeStoreElem *tselem;

      /* open all object elems, close others */
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            
            if(tselem->type==0) {
                  if(te->idcode==ID_SCE) {
                        if(tselem->id!=(ID *)G.scene) tselem->flag |= TSE_CLOSED;
                              else tselem->flag &= ~TSE_CLOSED;
                  }
                  else if(te->idcode==ID_OB) {
                        if(subtree_has_objects(soops, &te->subtree)) tselem->flag &= ~TSE_CLOSED;
                        else tselem->flag |= TSE_CLOSED;
                  }
            }
            else tselem->flag |= TSE_CLOSED;

            if(tselem->flag & TSE_CLOSED); else tree_element_show_hierarchy(soops, &te->subtree);
      }
      
}

/* show entire object level hierarchy */
void outliner_show_hierarchy(struct ScrArea *sa)
{
      SpaceOops *so= sa->spacedata.first;
      
      tree_element_show_hierarchy(so, &so->tree);
      scrarea_queue_redraw(sa);
      
      BIF_undo_push("Outliner show hierarchy");
}

static void do_outliner_select(SpaceOops *soops, ListBase *lb, float y1, float y2, short *selecting)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      if(y1>y2) SWAP(float, y1, y2);
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            
            if(te->ys + OL_H < y1) return;
            if(te->ys < y2) {
                  if((te->flag & TE_ICONROW)==0) {
                        if(*selecting == -1) {
                              if( tselem->flag & TSE_SELECTED) *selecting= 0;
                              else *selecting= 1;
                        }
                        if(*selecting) tselem->flag |= TSE_SELECTED;
                        else tselem->flag &= ~TSE_SELECTED;
                  }
            }
            if((tselem->flag & TSE_CLOSED)==0) do_outliner_select(soops, &te->subtree, y1, y2, selecting);
      }
}

/* its own redraw loop... urm */
void outliner_select(struct ScrArea *sa )
{
      SpaceOops *so= sa->spacedata.first;
      float fmval[2], y1, y2;
      short mval[2], yo=-1, selecting= -1;
      
      getmouseco_areawin(mval);
      areamouseco_to_ipoco(&so->v2d, mval, fmval, fmval+1);
      y1= fmval[1];

      while (get_mbut() & R_MOUSE) {
            getmouseco_areawin(mval);
            areamouseco_to_ipoco(&so->v2d, mval, fmval, fmval+1);
            y2= fmval[1];
            if(yo!=mval[1]) {
                  do_outliner_select(so, &so->tree, y1, y2, &selecting);
                  yo= mval[1];
                  scrarea_do_windraw(sa);
                  screen_swapbuffers();
            
                  y1= y2;
            }
      }
      BIF_undo_push("Outliner selection");

}

/* ************ SELECTION OPERATIONS ********* */

static int scenelevel=0, objectlevel=0, idlevel=0, datalevel=0; // globals, euh... you can do better

static void set_operation_types(SpaceOops *soops, ListBase *lb)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->flag & TSE_SELECTED) {
                  if(tselem->type) {
                        if(datalevel==0) datalevel= tselem->type;
                        else if(datalevel!=tselem->type) datalevel= -1;
                  }
                  else {
                        int idcode= GS(tselem->id->name);
                        switch(idcode) {
                              case ID_SCE:
                                    scenelevel= 1;
                                    break;
                              case ID_OB:
                                    objectlevel= 1;
                                    break;
                                    
                              case ID_ME: case ID_CU: case ID_MB: case ID_LT:
                              case ID_LA: case ID_AR: case ID_CA:
                                    idlevel= -2;
                                    break;
                                    
                              case ID_MA: case ID_TE: case ID_IP: case ID_IM:
                              case ID_SO: case ID_KE: case ID_WO: case ID_AC:
                              case ID_NLA: case ID_TXT:
                                    if(idlevel==0) idlevel= idcode;
                                    else if(idlevel!=idcode) idlevel= -1;
                                          break;
                        }
                  }
            }
            if((tselem->flag & TSE_CLOSED)==0) set_operation_types(soops, &te->subtree);
      }
}

static void unlink_material_cb(TreeElement *te, TreeStoreElem *tsep)
{
      Material **matar=NULL;
      int a, totcol=0;
      
      if( GS(tsep->id->name)==ID_OB) {
            Object *ob= (Object *)tsep->id;
            totcol= ob->totcol;
            matar= ob->mat;
      }
      else if( GS(tsep->id->name)==ID_ME) {
            Mesh *me= (Mesh *)tsep->id;
            totcol= me->totcol;
            matar= me->mat;
      }
      else if( GS(tsep->id->name)==ID_CU) {
            Curve *cu= (Curve *)tsep->id;
            totcol= cu->totcol;
            matar= cu->mat;
      }
      else if( GS(tsep->id->name)==ID_MB) {
            MetaBall *mb= (MetaBall *)tsep->id;
            totcol= mb->totcol;
            matar= mb->mat;
      }

      for(a=0; a<totcol; a++) {
            if(a==te->index && matar[a]) {
                  matar[a]->id.us--;
                  matar[a]= NULL;
            }
      }
}

static void unlink_texture_cb(TreeElement *te, TreeStoreElem *tsep)
{
      MTex **mtex= NULL;
      int a;
      
      if( GS(tsep->id->name)==ID_MA) {
            Material *ma= (Material *)tsep->id;
            mtex= ma->mtex;
      }
      else if( GS(tsep->id->name)==ID_LA) {
            Lamp *la= (Lamp *)tsep->id;
            mtex= la->mtex;
      }
      else if( GS(tsep->id->name)==ID_WO) {
            World *wrld= (World *)tsep->id;
            mtex= wrld->mtex;
      }
      else return;
      
      for(a=0; a<MAX_MTEX; a++) {
            if(a==te->index && mtex[a]) {
                  if(mtex[a]->tex) {
                        mtex[a]->tex->id.us--;
                        mtex[a]->tex= NULL;
                  }
            }
      }
}

static void outliner_do_libdata_operation(SpaceOops *soops, ListBase *lb, 
                                                             void (*operation_cb)(TreeElement *, TreeStoreElem *))
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te=lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->flag & TSE_SELECTED) {
                  if(tselem->type==0) {
                        TreeStoreElem *tsep= TREESTORE(te->parent);
                        operation_cb(te, tsep);
                  }
            }
            if((tselem->flag & TSE_CLOSED)==0) {
                  outliner_do_libdata_operation(soops, &te->subtree, operation_cb);
            }
      }
}

/* */

static void object_select_cb(TreeElement *te, TreeStoreElem *tselem)
{
      Base *base= (Base *)te->directdata;
      
      base->flag |= SELECT;
      base->object->flag |= SELECT;
}

static void object_deselect_cb(TreeElement *te, TreeStoreElem *tselem)
{
      Base *base= (Base *)te->directdata;
      
      base->flag &= ~SELECT;
      base->object->flag &= ~SELECT;
}

static void object_delete_cb(TreeElement *te, TreeStoreElem *tselem)
{
      Base *base= (Base *)te->directdata;
      
      if(base) {
            // check also library later
            if(G.obpose==base->object) exit_posemode(1);
            if(G.obedit==base->object) exit_editmode(2);
            
            if(base==BASACT) {
                  G.f &= ~(G_VERTEXPAINT+G_FACESELECT+G_TEXTUREPAINT+G_WEIGHTPAINT);
                  setcursor_space(SPACE_VIEW3D, CURSOR_STD);
            }
            
            free_and_unlink_base(base);
            te->directdata= NULL;
            tselem->id= NULL;
      }
}


static void outliner_do_object_operation(SpaceOops *soops, ListBase *lb, 
                                                             void (*operation_cb)(TreeElement *, TreeStoreElem *))
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te=lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->flag & TSE_SELECTED) {
                  if(tselem->type==0 && te->idcode==ID_OB) {
                        // when objects selected in other scenes... dunno if that should be allowed
                        Scene *sce= (Scene *)outliner_search_back(soops, te, ID_SCE);
                        if(sce && G.scene != sce) set_scene(sce);
                        
                        operation_cb(te, tselem);
                  }
            }
            if((tselem->flag & TSE_CLOSED)==0) {
                  outliner_do_object_operation(soops, &te->subtree, operation_cb);
            }
      }
}

void outliner_operation_menu(ScrArea *sa)
{
      SpaceOops *soops= sa->spacedata.first;
      
      // globals
      scenelevel= objectlevel= idlevel= datalevel=0;
      
      set_operation_types(soops, &soops->tree);
      
      if(scenelevel) {
            if(objectlevel || datalevel || idlevel) error("Mixed selection");
            //else pupmenu("Scene Operations%t|Delete");
      }
      else if(objectlevel) {
            short event= pupmenu("Object Operations%t|Select%x1|Deselect%x2|Delete%x4");
            if(event>0) {
                  char *str="";
                  
                  if(event==1) {
                        Scene *sce= G.scene;    // to be able to delete, scenes are set...
                        outliner_do_object_operation(soops, &soops->tree, object_select_cb);
                        if(G.scene != sce) set_scene(sce);
                        
                        str= "Select Objects";
                  }
                  else if(event==2) {
                        outliner_do_object_operation(soops, &soops->tree, object_deselect_cb);
                        str= "Deselect Objects";
                  }
                  else if(event==4) {
                        outliner_do_object_operation(soops, &soops->tree, object_delete_cb);
                        str= "Delete Objects";
                  }
                  
                  countall();
                  test_scene_constraints(); // for delete
                  
                  BIF_undo_push(str);
                  allqueue(REDRAWALL, 0); // yah... to be sure :)
            }
      }
      else if(idlevel) {
            if(idlevel==-1 || datalevel) error("Mixed selection");
            else if(idlevel==-2) error("No operations available");
            else {
                  short event= pupmenu("Data Operations%t|Unlink");
                  
                  if(event==1) {
                        switch(idlevel) {
                              case ID_MA:
                                    outliner_do_libdata_operation(soops, &soops->tree, unlink_material_cb);
                                    BIF_undo_push("Unlink material");
                                    allqueue(REDRAWBUTSSHADING, 1);
                                    break;
                              case ID_TE:
                                    outliner_do_libdata_operation(soops, &soops->tree, unlink_texture_cb);
                                    allqueue(REDRAWBUTSSHADING, 1);
                                    BIF_undo_push("Unlink texture");
                                    break;
                              default:
                                    error("Not yet...");
                        }
                        allqueue(REDRAWOOPS, 0);
                  }
            }
      }
      else if(datalevel) {
            if(datalevel==-1) error("Mixed selection");
            else {
                  error("Not yet...");
                  //pupmenu("Data Operations%t|Delete");
            }
      }
      else error("Nothing selected");
      
}


/* ***************** DRAW *************** */

static void tselem_draw_icon(TreeStoreElem *tselem)
{
      if(tselem->type) {
            switch( tselem->type) {
                  case TSE_NLA:
                        BIF_draw_icon(ICON_NLA); break;
                  case TSE_NLA_ACTION:
                        BIF_draw_icon(ICON_ACTION); break;
                  case TSE_DEFGROUP_BASE:
                        BIF_draw_icon(ICON_VERTEXSEL); break;
                  case TSE_BONE:
                  case TSE_EBONE:
                        BIF_draw_icon(ICON_WPAINT_DEHLT); break;
                  case TSE_CONSTRAINT_BASE:
                        BIF_draw_icon(ICON_CONSTRAINT); break;
                  case TSE_HOOKS_BASE:
                        BIF_draw_icon(ICON_HOOK); break;
                  case TSE_HOOK:
                        BIF_draw_icon(ICON_OBJECT); break;
                  case TSE_SCRIPT_BASE:
                        BIF_draw_icon(ICON_TEXT); break;
                  default:
                        BIF_draw_icon(ICON_DOT); break;
            }
      }
      else {
            switch( GS(tselem->id->name)) {
                  case ID_SCE:
                        BIF_draw_icon(ICON_SCENE_DEHLT); break;
                  case ID_OB:
                        BIF_draw_icon(ICON_OBJECT); break;
                  case ID_ME:
                        BIF_draw_icon(ICON_MESH); break;
                  case ID_CU:
                        BIF_draw_icon(ICON_CURVE); break;
                  case ID_MB:
                        BIF_draw_icon(ICON_MBALL); break;
                  case ID_LT:
                        BIF_draw_icon(ICON_LATTICE); break;
                  case ID_LA:
                        BIF_draw_icon(ICON_LAMP_DEHLT); break;
                  case ID_MA:
                        BIF_draw_icon(ICON_MATERIAL_DEHLT); break;
                  case ID_TE:
                        BIF_draw_icon(ICON_TEXTURE_DEHLT); break;
                  case ID_IP:
                        BIF_draw_icon(ICON_IPO_DEHLT); break;
                  case ID_IM:
                        BIF_draw_icon(ICON_IMAGE_DEHLT); break;
                  case ID_SO:
                        BIF_draw_icon(ICON_SPEAKER); break;
                  case ID_AR:
                        BIF_draw_icon(ICON_ARMATURE_DEHLT); break;
                  case ID_CA:
                        BIF_draw_icon(ICON_CAMERA_DEHLT); break;
                  case ID_KE:
                        BIF_draw_icon(ICON_EDIT_DEHLT); break;
                  case ID_WO:
                        BIF_draw_icon(ICON_WORLD_DEHLT); break;
                  case ID_AC:
                        BIF_draw_icon(ICON_ACTION); break;
                  case ID_NLA:
                        BIF_draw_icon(ICON_NLA); break;
                  case ID_TXT:
                        BIF_draw_icon(ICON_SCRIPT); break;
            }
      }
}

static void outliner_draw_iconrow(SpaceOops *soops, ListBase *lb, int level, int *offsx, int ys)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      int active;

      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            
            /* object hierarchy always, further constrained on level */
            if(level<1 || (tselem->type==0 && te->idcode==ID_OB)) {

                  /* active blocks get white circle */
                  active= 0;
                  if(tselem->type==0) {
                        if(te->idcode==ID_OB) active= (OBACT==(Object *)tselem->id);
                        else if(G.obpose && G.obpose->data==tselem->id) active= 1;
                        else if(G.obedit && G.obedit->data==tselem->id) active= 1;
                        else active= tree_element_active(soops, te, 0);
                  }
                  else active= tree_element_type_active(soops, te, tselem, 0);
                  
                  if(active) {
                        uiSetRoundBox(15);
                        glColor4ub(255, 255, 255, 100);
                        uiRoundBox( (float)*offsx-0.5, (float)ys-1.0, (float)*offsx+OL_H-3.0, (float)ys+OL_H-3.0, OL_H/2.0-2.0);
                        glEnable(GL_BLEND);
                  }
                  
                  glRasterPos2i(*offsx, ys);
                  tselem_draw_icon(tselem);
                  te->xs= *offsx;
                  te->ys= ys;
                  te->xend= *offsx+OL_X;
                  te->flag |= TE_ICONROW; // for click
                  
                  (*offsx) += OL_X;
            }
            
            outliner_draw_iconrow(soops, &te->subtree, level+1, offsx, ys);
      }
      
}

static void outliner_draw_tree_element(SpaceOops *soops, TreeElement *te, int startx, int *starty)
{
      TreeElement *ten;
      TreeStoreElem *tselem;
      int offsx= 0, active=0; // active=1 active obj, else active data
      
      tselem= TREESTORE(te);

      if(*starty >= soops->v2d.cur.ymin && *starty<= soops->v2d.cur.ymax) {
            
            glEnable(GL_BLEND);

            /* colors for active/selected data */
            if(tselem->type==0) {
                  if(te->idcode==ID_SCE) {
                        if(tselem->id == (ID *)G.scene) {
                              glColor4ub(255, 255, 255, 100);
                              active= 2;
                        }
                  }
                  else if(te->idcode==ID_OB) {
                        Object *ob= (Object *)tselem->id;
                        
                        if(ob==OBACT || (ob->flag & SELECT)) {
                              char col[4];
                              
                              active= 2;
                              if(ob==OBACT) {
                                    BIF_GetThemeColorType4ubv(TH_ACTIVE, SPACE_VIEW3D, col);
                                    active= 1;
                              }
                              else BIF_GetThemeColorType4ubv(TH_SELECT, SPACE_VIEW3D, col);
                              col[3]= 100;
                              glColor4ubv(col);
                        }
                  }
                  else if(G.obpose && G.obpose->data==tselem->id) {
                        glColor4ub(255, 255, 255, 100);
                        active= 2;
                  }
                  else if(G.obedit && G.obedit->data==tselem->id) {
                        glColor4ub(255, 255, 255, 100);
                        active= 2;
                  }
                  else {
                        if(tree_element_active(soops, te, 0)) {
                              glColor4ub(220, 220, 255, 100);
                              active= 2;
                        }
                  }
            }
            else {
                  if( tree_element_type_active(soops, te, tselem, 0) ) active= 2;
                  glColor4ub(220, 220, 255, 100);
            }
            
            /* active circle */
            if(active) {
                  uiSetRoundBox(15);
                  uiRoundBox( (float)startx+OL_H-1.5, (float)*starty+2.0, (float)startx+2*OL_H-4.0, (float)*starty+OL_H-1.0, OL_H/2.0-2.0);
                  glEnable(GL_BLEND);
                  
                  te->flag |= TE_ACTIVE; // for lookup in display hierarchies
            }
            
            /* open/close icon, only when sublevels, except for scene */
            if(te->subtree.first || te->idcode==ID_SCE) {
                  if(tselem->type==0 && (te->idcode==ID_OB || te->idcode==ID_SCE))
                        glRasterPos2i(startx, *starty+2); // icons a bit higher
                  else
                        glRasterPos2i(startx+5, *starty+2); // icons a bit higher
                  if(tselem->flag & TSE_CLOSED) 
                        BIF_draw_icon(ICON_TRIA_CLOSED);
                  else
                        BIF_draw_icon(ICON_TRIA_OPEN);
            }
            offsx+= OL_X;
            
            /* datatype icon */
            
            glRasterPos2i(startx+offsx, *starty+2); // icons a bit higher
            tselem_draw_icon(tselem);
            offsx+= OL_X;
            glDisable(GL_BLEND);

            /* name */
            if(active==1) BIF_ThemeColor(TH_TEXT_HI); 
            else BIF_ThemeColor(TH_TEXT);
            glRasterPos2i(startx+offsx, *starty+5);
            BIF_DrawString(G.font, te->name, 0);
            
            offsx+= OL_X + BIF_GetStringWidth(G.font, te->name, 0);
            
            /* closed item, we draw the icons, not when it's a scene though */
            if(tselem->flag & TSE_CLOSED) {
                  if(te->subtree.first) {
                        if(tselem->type==0 && te->idcode==ID_SCE);
                        else {
                              int tempx= startx+offsx;
                              // divider
                              BIF_ThemeColorShade(TH_BACK, -40);
                              glRecti(tempx -10, *starty+4, tempx -8, *starty+OL_H-4);

                              glEnable(GL_BLEND);
                              glPixelTransferf(GL_ALPHA_SCALE, 0.5);
                              outliner_draw_iconrow(soops, &te->subtree, 0, &tempx, *starty+2);
                              glPixelTransferf(GL_ALPHA_SCALE, 1.0);
                              glDisable(GL_BLEND);
                        }
                  }
            }
      }     
      /* store coord and continue */
      te->xs= startx;
      te->ys= *starty;
      te->xend= startx+offsx;
            
      *starty-= OL_H;
      
      if((tselem->flag & TSE_CLOSED)==0) {
            for(ten= te->subtree.first; ten; ten= ten->next) {
                  outliner_draw_tree_element(soops, ten, startx+OL_X, starty);
            }
      }
}

static void outliner_draw_hierarchy(SpaceOops *soops, ListBase *lb, int startx, int *starty)
{
      TreeElement *te;
      TreeStoreElem *tselem;
      int y1, y2;
      
      if(lb->first==NULL) return;
      
      y1=y2= *starty; /* for vertical lines between objects */
      for(te=lb->first; te; te= te->next) {
            y2= *starty;
            tselem= TREESTORE(te);
            
            /* horizontal line? */
            if(tselem->type==0 && (te->idcode==ID_OB || te->idcode==ID_SCE)) 
                  glRecti(startx, *starty, startx+OL_X, *starty-1);
                  
            *starty-= OL_H;
            
            if((tselem->flag & TSE_CLOSED)==0)
                  outliner_draw_hierarchy(soops, &te->subtree, startx+OL_X, starty);
      }
      
      /* vertical line */
      te= lb->last;
      if(te->parent || lb->first!=lb->last) {
            tselem= TREESTORE(te);
            if(tselem->type==0 && te->idcode==ID_OB) {
                  
                  glRecti(startx, y1+OL_H, startx+1, y2);
            }
      }
}

static void outliner_draw_selection(SpaceOops *soops, ListBase *lb, int *starty) 
{
      TreeElement *te;
      TreeStoreElem *tselem;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            
            /* selection status */
            if(tselem->flag & TSE_SELECTED) {
                  glRecti(0, *starty+1, (int)soops->v2d.mask.xmax, *starty+OL_H-1);
            }
            *starty-= OL_H;
            if((tselem->flag & TSE_CLOSED)==0) outliner_draw_selection(soops, &te->subtree, starty);
      }
}

static void outliner_draw_tree(SpaceOops *soops)
{
      TreeElement *te;
      int starty, startx;
      
#ifdef INTERNATIONAL
      FTF_SetFontSize('l');
#endif
      
      glBlendFunc(GL_SRC_ALPHA,  GL_ONE_MINUS_SRC_ALPHA); // only once

      // selection first
      glColor3ub(125, 150, 175);
      starty= soops->v2d.tot.ymax-OL_H;
      outliner_draw_selection(soops, &soops->tree, &starty);
      
      // black hierarchy lines
      glColor3ub(0,0,0);
      starty= soops->v2d.tot.ymax-OL_H/2;
      startx= 6;
      outliner_draw_hierarchy(soops, &soops->tree, startx, &starty);
      
      // items themselves
      starty= soops->v2d.tot.ymax-OL_H;
      startx= 0;
      for(te= soops->tree.first; te; te= te->next) {
            outliner_draw_tree_element(soops, te, startx, &starty);
      }
      
}

static void outliner_back(SpaceOops *soops)
{
      int ystart;
      
      BIF_ThemeColorShade(TH_BACK, 6);
      ystart= soops->v2d.tot.ymax;
      ystart= OL_H*(ystart/(OL_H));
      
      while(ystart > soops->v2d.cur.ymin) {
            glRecti(0, ystart, (int)soops->v2d.mask.xmax, ystart+OL_H);
            ystart-= 2*OL_H;
      }
}

static char bone_newname[40]; // temp storage for bone rename, bones are 32 max.

static void namebutton_cb(void *voidp, void *arg2_unused)
{
      SpaceOops *soops= voidp;
      TreeStore *ts= soops->treestore;
      TreeStoreElem *tselem;
      int a;
      
      if(ts) {
            /* only one namebutton can exist */
            for(a=0, tselem= ts->data; a<ts->usedelem; a++, tselem++) {
                  if(tselem->flag & TSE_TEXTBUT) {
                        if(tselem->type==0) {
                              test_idbutton(tselem->id->name+2);  // library.c, unique name and alpha sort
                        }
                        else {
                              TreeElement *te= outliner_find_tree_element(&soops->tree, a);
                              
                              if(te) {
                                    switch(tselem->type) {
                                    case TSE_DEFGROUP:
                                          unique_vertexgroup_name(te->directdata, (Object *)tselem->id); // id = object
                                          break;
                                    case TSE_NLA_ACTION:
                                          test_idbutton(tselem->id->name+2);
                                          break;
                                    case TSE_EBONE:
                                          if(G.obedit && G.obedit->data==(ID *)tselem->id) {
                                                extern void validate_editbonebutton(EditBone *);
                                                EditBone *ebone= te->directdata;
                                                validate_editbonebutton(ebone);
                                          }
                                          allqueue(REDRAWOOPS, 0);
                                          allqueue(REDRAWVIEW3D, 1);
                                          allqueue(REDRAWBUTSEDIT, 0);
                                          break;
                                    case TSE_BONE:
                                          {
                                                Bone *bone= te->directdata;
                                                // always make current object active
                                                tree_element_active_object(soops, te);

                                                // dangerous call, it re-allocs the Armature bones, exits editmode too
                                                rename_bone_ext(bone->name, bone_newname);
                                          }
                                          allqueue(REDRAWOOPS, 0);
                                          allqueue(REDRAWVIEW3D, 1);
                                          allqueue(REDRAWBUTSEDIT, 0);
                                          break;
                                    }
                              }
                        }
                        tselem->flag &= ~TSE_TEXTBUT;
                  }
            }
            scrarea_queue_redraw(curarea);
      }
}

void outliner_buttons(uiBlock *block, SpaceOops *soops, ListBase *lb)
{
      uiBut *bt;
      TreeElement *te;
      TreeStoreElem *tselem;
      int dx, len;
      
      for(te= lb->first; te; te= te->next) {
            tselem= TREESTORE(te);
            if(tselem->flag & TSE_TEXTBUT) {
                  
                  // darn bones have complex renaming conventions... cannot edit name itself in button
                  if(tselem->type==TSE_BONE) {
                        strncpy(bone_newname, te->name, 32); // bone_newname is global
                        te->name= bone_newname;
                        len= 24;
                  }
                  else len= 19;
                  
                  dx= BIF_GetStringWidth(G.font, te->name, 0);
                  if(dx<50) dx= 50;
                  
                  bt= uiDefBut(block, TEX, OL_NAMEBUTTON, "",  te->xs+2*OL_X-4, te->ys, dx+10, OL_H-1, te->name, 1.0, (float)len, 0, 0, "");
                  uiButSetFunc(bt, namebutton_cb, soops, NULL);

                  // signal for button to open
                  addqueue(curarea->win, BUT_ACTIVATE, OL_NAMEBUTTON);
            }
            if((tselem->flag & TSE_CLOSED)==0) outliner_buttons(block, soops, &te->subtree);
      }
}

void draw_outliner(ScrArea *sa, SpaceOops *soops)
{
      uiBlock *block;
      int sizey;
      short ofsx, ofsy;
      
      calc_scrollrcts(G.v2d, curarea->winx, curarea->winy);

      if(curarea->winx>SCROLLB+10 && curarea->winy>SCROLLH+10) {
            if(G.v2d->scroll) {     
                  ofsx= curarea->winrct.xmin;   /* because mywin */
                  ofsy= curarea->winrct.ymin;
                  glViewport(ofsx+G.v2d->mask.xmin,  ofsy+G.v2d->mask.ymin, ( ofsx+G.v2d->mask.xmax-1)-(ofsx+G.v2d->mask.xmin)+1, ( ofsy+G.v2d->mask.ymax-1)-( ofsy+G.v2d->mask.ymin)+1); 
                  glScissor(ofsx+G.v2d->mask.xmin,  ofsy+G.v2d->mask.ymin, ( ofsx+G.v2d->mask.xmax-1)-(ofsx+G.v2d->mask.xmin)+1, ( ofsy+G.v2d->mask.ymax-1)-( ofsy+G.v2d->mask.ymin)+1);
            }
      }
      
      outliner_build_tree(soops); // always 
      sizey= 0;
      outliner_height(soops, &soops->tree, &sizey);
      
      /* we init all tot rect vars, only really needed on window size change tho */
      G.v2d->tot.xmin= 0.0;
      G.v2d->tot.xmax= (G.v2d->mask.xmax-G.v2d->mask.xmin);
      G.v2d->tot.ymax= 0.0;
      G.v2d->tot.ymin= -sizey*OL_H;
      test_view2d(G.v2d, curarea->winx, curarea->winy);

      // align on top window if cur bigger than tot
      if(G.v2d->cur.ymax-G.v2d->cur.ymin > sizey*OL_H) {
            G.v2d->cur.ymax= 0.0;
            G.v2d->cur.ymin= -(G.v2d->mask.ymax-G.v2d->mask.ymin);
      }

      myortho2(G.v2d->cur.xmin-0.375, G.v2d->cur.xmax-0.375, G.v2d->cur.ymin-0.375, G.v2d->cur.ymax-0.375);

      /* draw outliner stuff */
      outliner_back(soops);
      outliner_draw_tree(soops);

      /* restore viewport */
      mywinset(sa->win);
      
      /* ortho corrected */
      myortho2(G.v2d->cur.xmin-SCROLLB-0.375, G.v2d->cur.xmax-0.375, G.v2d->cur.ymin-0.375, G.v2d->cur.ymax-0.375);
      
      block= uiNewBlock(&curarea->uiblocks, "outliner buttons", UI_EMBOSS, UI_HELV, sa->win);
      outliner_buttons(block, soops, &soops->tree);
      uiDrawBlock(block);
      
      /* drawoopsspace handles sliders */
}



Generated by  Doxygen 1.6.0   Back to index