---

StmtList.java

package ca.mcgill.sable.soot.jimple;

/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
 * Jimple, a 3-address code Java(TM) bytecode representation.        *
 * Copyright (C) 1997, 1998 Raja Vallee-Rai (kor@sable.mcgill.ca)    *
 * All rights reserved.                                              *
 *                                                                   *
 * Modifications by Patrick Lam (plam@sable.mcgill.ca) are           *
 * Copyright (C) 1999 Patrick Lam.  All rights reserved.             *
 *                                                                   *
 * This work was done as a project of the Sable Research Group,      *
 * School of Computer Science, McGill University, Canada             *
 * (http://www.sable.mcgill.ca/).  It is understood that any         *
 * modification not identified as such is not covered by the         *
 * preceding statement.                                              *
 *                                                                   *
 * This work is free software; you can redistribute it and/or        *
 * modify it under the terms of the GNU Library General Public       *
 * License as published by the Free Software Foundation; either      *
 * version 2 of the License, or (at your option) any later version.  *
 *                                                                   *
 * This work 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 *
 * Library General Public License for more details.                  *
 *                                                                   *
 * You should have received a copy of the GNU Library General Public *
 * License along with this library; if not, write to the             *
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,      *
 * Boston, MA  02111-1307, USA.                                      *
 *                                                                   *
 * Java is a trademark of Sun Microsystems, Inc.                     *
 *                                                                   *
 * To submit a bug report, send a comment, or get the latest news on *
 * this project and other Sable Research Group projects, please      *
 * visit the web site: http://www.sable.mcgill.ca/                   *
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */

/*
 Reference Version
 -----------------
 This is the latest official version on which this file is based.
 The reference version is: $SootVersion: 1.beta.4 $

 Change History
 --------------
 A) Notes:

 Please use the following template.  Most recent changes should
 appear at the top of the list.

 - Modified on [date (March 1, 1900)] by [name]. [(*) if appropriate]
   [description of modification].

 Any Modification flagged with "(*)" was done as a project of the
 Sable Research Group, School of Computer Science,
 McGill University, Canada (http://www.sable.mcgill.ca/).

 You should add your copyright, using the following template, at
 the top of this file, along with other copyrights.

 *                                                                   *
 * Modifications by [name] are                                       *
 * Copyright (C) [year(s)] [your name (or company)].  All rights     *
 * reserved.                                                         *
 *                                                                   *

 B) Changes:

 - Modified on February 3, 1999 by Patrick Lam (plam@sable.mcgill.ca) (*)
   Added changes in support of the Grimp intermediate
   representation (with aggregated-expressions).

 - Modified on November 2, 1998 by Raja Vallee-Rai (kor@sable.mcgill.ca) (*)
   Repackaged all source files and performed extensive modifications.
   First initial release of Soot.

 - Modified on 15-Jun-1998 by Raja Vallee-Rai (kor@sable.mcgill.ca). (*)
   First internal release (Version 0.1).
*/

import ca.mcgill.sable.soot.*;
import ca.mcgill.sable.util.*;

public class StmtList extends ArrayList
{
    StmtBody body;

    public StmtList(StmtBody body)
    {
        super();

        this.body = body;
    }
    public StmtBody getBody()
    {
        return body;
    }
    public Object remove(int index)
    {
        Object obj = get(index);
        Object toReturn = null;

        if(contains(obj))
        {
            Stmt successor;

            if(index + 1 < size())
                successor = (Stmt) get(index + 1);
            else if(size() >= 2)
                successor = (Stmt) get(index - 1);
            else
                successor = null;

            toReturn = super.remove(index);

            body.redirectJumps((Stmt) obj, successor);
            body.eliminateBackPointersTo((Stmt) obj);

        }

        return toReturn;
    }
    public boolean remove(Object obj)
    {
        boolean toReturn = false;

        if(contains(obj))
        {
            int index = indexOf(obj);
            Stmt successor;

            if(index + 1 < size())
                successor = (Stmt) get(index + 1);
            else if(size() >= 2)
                successor = (Stmt) get(index - 1);
            else
                successor = null;

            toReturn = super.remove(obj);
            body.redirectJumps((Stmt) obj, successor);
            body.eliminateBackPointersTo((Stmt) obj);
        }

        return toReturn;
    }
    public boolean removeAll(Collection c)
    {
        throw new UnsupportedOperationException();
    }
    public void testIntegrity(String message)
    {
        Iterator stmtIt = iterator();

        while(stmtIt.hasNext())
        {
            Stmt s = (Stmt) stmtIt.next();
            Iterator boxIt = s.getUnitBoxes().iterator();

            while(boxIt.hasNext())
            {
                StmtBox box = (StmtBox) boxIt.next();
                Stmt pointed = (Stmt) box.getUnit();

                if(!contains(pointed))
                    throw new RuntimeException(message + "Statement no longer contained");

                if(!pointed.getBoxesPointingToThis().contains(box))
                    throw new RuntimeException(message + "back pointer not set");
            }
        }

        stmtIt = iterator();

        while(stmtIt.hasNext())
        {
            Stmt s = (Stmt) stmtIt.next();
            List boxes = s.getBoxesPointingToThis();

            Iterator it = boxes.iterator();

            while(it.hasNext())
            {
                StmtBox box = (StmtBox) it.next();

                if(box.getUnit() != s)
                    throw new RuntimeException(message + "back pointer still set");
            }
        }

        stmtIt = iterator();

        while(stmtIt.hasNext())
        {
            Stmt s = (Stmt) stmtIt.next();
            Iterator boxIt = s.getUnitBoxes().iterator();

            while(boxIt.hasNext())
            {
                StmtBox box = (StmtBox) boxIt.next();

                if(indexOf(box.getUnit()) == -1)
                {
                    System.out.println("looking for: " + box.getUnit());
                    throw new RuntimeException(message + "[failed integrity test for: " + s + "]");
                }
            }
        }
    }
}

---