Lock.java Source File

00001 package edu.ksu.cis.bandera.bir;
00002 
00003 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
00004  * Bandera, a Java(TM) analysis and transformation toolkit           *
00005  * Copyright (C) 1998, 1999   James Corbett (corbett@hawaii.edu)     *
00006  * All rights reserved.                                              *
00007  *                                                                   *
00008  * This work was done as a project in the SAnToS Laboratory,         *
00009  * Department of Computing and Information Sciences, Kansas State    *
00010  * University, USA (http://www.cis.ksu.edu/santos).                  *
00011  * It is understood that any modification not identified as such is  *
00012  * not covered by the preceding statement.                           *
00013  *                                                                   *
00014  * This work is free software; you can redistribute it and/or        *
00015  * modify it under the terms of the GNU Library General Public       *
00016  * License as published by the Free Software Foundation; either      *
00017  * version 2 of the License, or (at your option) any later version.  *
00018  *                                                                   *
00019  * This work is distributed in the hope that it will be useful,      *
00020  * but WITHOUT ANY WARRANTY; without even the implied warranty of    *
00021  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU *
00022  * Library General Public License for more details.                  *
00023  *                                                                   *
00024  * You should have received a copy of the GNU Library General Public *
00025  * License along with this toolkit; if not, write to the             *
00026  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,      *
00027  * Boston, MA  02111-1307, USA.                                      *
00028  *                                                                   *
00029  * Java is a trademark of Sun Microsystems, Inc.                     *
00030  *                                                                   *
00031  * To submit a bug report, send a comment, or get the latest news on *
00032  * this project and other SAnToS projects, please visit the web-site *
00033  *                http://www.cis.ksu.edu/santos                      *
00034  * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
00035 import ca.mcgill.sable.util.*;
00036 
00037 import java.io.*;
00038 import java.util.*;
00039 
00040 /**
00041  * A lock type.
00042  */
00043 
00044 public class Lock extends Type implements BirConstants {
00045 
00046     boolean waiting;
00047     boolean reentrant;
00048 
00049     /**
00050      * Construct a lock type.
00051      * @param waiting does the lock support wait/notify?
00052      * @param reentrant can the lock be reacquired without blocking?
00053      */
00054 
00055     public Lock(boolean waiting, boolean reentrant) {
00056     this.waiting = waiting;
00057     this.reentrant = reentrant;
00058     }
00059     public void apply(TypeSwitch sw, Object o)
00060     {
00061         sw.caseLock(this, o);
00062     }
00063     public boolean isKind(int kind) { 
00064     return (kind & LOCKTYPE) != 0;
00065     }
00066     public boolean isReentrant() { return reentrant; }
00067     public boolean isWaiting() { return waiting; }
00068     public void setWaiting(boolean waiting) { this.waiting = waiting; }
00069     public String toString() {
00070     String s = "lock";
00071     if (waiting)
00072         s += " wait";
00073     if (reentrant)
00074         s += " reentrant";
00075     return s;
00076     }
00077 }