All Downloads are FREE. Search and download functionalities are using the official Maven repository.

net.sf.scuba.smartcards.CardManager Maven / Gradle / Ivy

There is a newer version: 0.0.21
Show newest version
/*
 * This file is part of the SCUBA smart card framework.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library 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
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 *
 * Copyright (C) 2009-2013 The SCUBA team.
 *
 * $Id: $
 */

package net.sf.scuba.smartcards;

import java.util.ArrayList;
import java.util.Collection;
import java.util.Collections;
import java.util.Comparator;
import java.util.HashMap;
import java.util.HashSet;
import java.util.List;
import java.util.Map;
import java.util.Set;
import java.util.concurrent.locks.Condition;
import java.util.concurrent.locks.Lock;
import java.util.concurrent.locks.ReentrantLock;

import javax.smartcardio.CardException;
import javax.smartcardio.CardTerminal;
import javax.smartcardio.CardTerminals;
import javax.smartcardio.TerminalFactory;

/**
 * Manages all card terminals.
 * 
 * This is the source of card insertion and removal events. Ideally this should 
 * be the only place where low level CardService instances (such as {@link 
 * net.sf.scuba.smartcards.TerminalCardService TerminalCardService})
 * are created.
 * 
 * @author Martijn Oostdijk ([email protected])
 * @author Wojciech Mostowski ([email protected])
 * @author Pim Vullers ([email protected])
 * 
 * @version $Revision: 200 $
 */
public class CardManager {

  private static final CardManager INSTANCE = new CardManager();
  private static final int FACTORY_POLL_INTERVAL = 950;
  private static final int TERMINAL_POLL_INTERVAL = 450;

  private static final Comparator FACTORY_COMPARATOR = new Comparator() {
    public int compare(TerminalFactory o1, TerminalFactory o2) {
      return ((TerminalFactory)o1).getType().compareToIgnoreCase(((TerminalFactory)o2).getType());
    }
  };

  private static final Comparator TERMINAL_COMPARATOR = new Comparator() {
    public int compare(CardTerminal o1, CardTerminal o2) {
      return ((CardTerminal)o1).getName().compareToIgnoreCase(((CardTerminal)o2).getName());
    }
  };

  private Map factories;
  private Map terminals;
  private Collection terminalFactoryListeners;
  private Collection cardTerminalListeners;
  private Collection apduListeners;

  private Lock terminalFactoryListenersLock;
  private Condition notWaitingForFirstTerminalFactoryListenerCondition;

  private Lock cardTerminalListenersLock;
  private Condition notWaitingForFirstCardTerminalListenerCondition;

  private CardManager() {	   
    try {
      terminalFactoryListeners = new HashSet();
      cardTerminalListeners = new HashSet();
      apduListeners = new HashSet();
      terminalFactoryListenersLock = new ReentrantLock(true);
      notWaitingForFirstTerminalFactoryListenerCondition = terminalFactoryListenersLock.newCondition();
      cardTerminalListenersLock = new ReentrantLock(true);
      notWaitingForFirstCardTerminalListenerCondition = cardTerminalListenersLock.newCondition();

      factories = new HashMap();
      terminals = new HashMap();

      addFactories();
    } catch (Exception ex) {
      System.err.println("WARNING: exception while adding factories and terminals");
      ex.printStackTrace();
    }
  }

  /**
   * Starts polling all registered factories and terminals (if not already doing so).
   */    
  public void startPolling() {
    for (TerminalFactory factory : getFactories()) {
      startPolling(factory);
    }
    for (CardTerminal terminal : getTerminals()) {
      startPolling(terminal);
    }
  }

  /**
   * Starts polling factory (if not already doing so).
   * 
   * @param factory a terminal factory
   */
  public void startPolling(TerminalFactory factory) {
    FactoryPoller poller = factories.get(factory);
    if (poller == null) { poller = new FactoryPoller(factory, this); }
    try {
      poller.startPolling();
    } catch (InterruptedException ie) {
      /* NOTE: if thread interrupted we just quit. */
    }
  }

  /**
   * Starts polling terminal (if not already doing so).
   * 
   * @param terminal a card terminal
   */
  public void startPolling(CardTerminal terminal) {
    TerminalPoller poller = terminals.get(terminal);
    if (poller == null) {
      poller = new TerminalPoller(terminal, this);
    }

    try {
      poller.startPolling();
    } catch (InterruptedException ie) {
      /* NOTE: if thread interrupted we just quit. */
    }
  }

  /**
   * Stops polling all registered factories and terminals
   */    
  public void stopPolling() {
    for (TerminalFactory factory : getFactories()) {
      stopPolling(factory);
    }

    for (CardTerminal terminal : getTerminals()) {
      stopPolling(terminal);
    }
  }

  /**
   * Stops polling factory.
   * 
   * @param factory a terminal factory
   */
  public void stopPolling(TerminalFactory factory) {
    FactoryPoller poller = factories.get(factory);
    if (poller == null) {
      return;
    }

    try {
      poller.stopPolling();
    } catch (InterruptedException ie) {
      /* NOTE: if thread interrupted we just quit. */
    }
  }

  /**
   * Stops polling terminal.
   * 
   * @param terminal a card terminal
   */
  public void stopPolling(CardTerminal terminal) {
    TerminalPoller poller = terminals.get(terminal);
    if (poller == null) {
      return;
    }

    try {
      poller.stopPolling();
    } catch (InterruptedException ie) {
      /* NOTE: if thread interrupted we just quit. */
    }
  }

  /**
   * Whether we are polling factory.
   *
   * @param factory a terminal factory
   *
   * @return a boolean
   */
  public boolean isPolling(TerminalFactory factory) {
    FactoryPoller poller = factories.get(factory);
    if (poller == null) {
      return false;
    }

    return poller.isPolling();
  }

  /**
   * Whether we are polling terminal.
   *
   * @param terminal a card terminal
   *
   * @return a boolean
   */
  public boolean isPolling(CardTerminal terminal) {
    TerminalPoller poller = terminals.get(terminal);
    if (poller == null) {
      return false;
    }

    return poller.isPolling();
  }

  /**
   * Gets the service associated with terminal (or null if
   * we are not polling terminal).
   *
   * @param terminal a card terminal
   *
   * @return a card service or null
   */
  public CardService getService(CardTerminal terminal) {
    TerminalPoller poller = terminals.get(terminal);
    if (poller == null) {
      return null;
    }

    CardService service = poller.getService();
    return service;
  }
  /**
   * Whether the card manager is running.
   * 
   * @return a boolean indicating whether the card manager is running.
   */
  public boolean isPolling() {
    boolean isPolling = false;

    for (TerminalFactory factory: factories.keySet()) {
      isPolling ^= isPolling(factory);
    }

    for (CardTerminal terminal: terminals.keySet()) {
      isPolling ^= isPolling(terminal);
    }

    return isPolling;
  }

  private void addFactories() {
    addFactory(TerminalFactory.getDefault(), true);
  }

  /**
   * Adds a factory.
   *
   * @param factory the factory to add
   * @param isPolling whether we should immediately start polling
   */
  public void addFactory(TerminalFactory factory, boolean isPolling) {
    FactoryPoller poller = factories.get(factory);
    if (poller == null) {
      poller = new FactoryPoller(factory, this);
      factories.put(factory, poller);
    }
    if (isPolling && !isPolling(factory)) {
      startPolling(factory);
    }
    if (!isPolling && isPolling(factory)) {
      stopPolling(factory);
    }
  }

  /**
   * Adds the terminals produced by the given terminal factory.
   *
   * @param factory the terminal factory
   * @param isPolling should we start polling these terminals initially
   *
   * @return the number of terminals added
   */
  public int addTerminals(TerminalFactory factory, boolean isPolling) {
    try {
      CardTerminals additionalTerminals = factory.terminals();
      if (additionalTerminals == null) {
        return 0;
      }

      List additionalTerminalsList = additionalTerminals.list();
      if (additionalTerminalsList == null) {
        return 0;
      }

      List terminalsList = new ArrayList();
      terminalsList.addAll(additionalTerminalsList);
      for (CardTerminal terminal: terminalsList) {
        addTerminal(terminal, isPolling);
      }

      return additionalTerminalsList.size();
    } catch (CardException cde) {
      /* NOTE: Listing of readers failed. Don't add anything. */
    }

    return 0;
  }

  /**
   * Adds a terminal.
   *
   * @param terminal the card terminal to add
   * @param isPolling whether we should immediately start polling this terminal
   */
  public void addTerminal(CardTerminal terminal, boolean isPolling) {
    TerminalPoller poller = terminals.get(terminal);
    if (poller == null) {
      poller = new TerminalPoller(terminal, this);
      terminals.put(terminal, poller);
    }
    if (isPolling && !isPolling(terminal)) {
      startPolling(terminal);
    }
    if (!isPolling && isPolling(terminal)) {
      stopPolling(terminal);
    }
  }

  /**
   * Remove a terminal.
   *
   * @param terminal the card terminal to remove
   */
  public void removeTerminal(CardTerminal terminal) {
    stopPolling(terminal);        
    terminals.remove(terminal);
  }

  /**
   * Adds a listener.
   * 
   * @param l the listener to add
   */
  public void addTerminalFactoryListener(TerminalFactoryListener l) {
    terminalFactoryListenersLock.lock();
    try {
      terminalFactoryListeners.add(l);
      notWaitingForFirstTerminalFactoryListenerCondition.signalAll();
    } finally {
      terminalFactoryListenersLock.unlock();
    }
  }

  /**
   * Adds a listener.
   * 
   * @param l the listener to add
   */
  public void addCardTerminalListener(CardTerminalListener l) {
    cardTerminalListenersLock.lock();
    try {
      cardTerminalListeners.add(l);
      notWaitingForFirstCardTerminalListenerCondition.signalAll();
    } finally {
      cardTerminalListenersLock.unlock();
    }
  }

  /**
   * Removes a listener.
   * 
   * @param l the listener to remove
   */
  public void removeTerminalFactoryListener(TerminalFactoryListener l) {
    terminalFactoryListeners.remove(l);
  }

  /**
   * Removes a listener.
   * 
   * @param l the listener to remove
   */
  public void removeCardTerminalListener(CardTerminalListener l) {
    cardTerminalListeners.remove(l);
  }

  /**
   * Adds a listener.
   * 
   * @param l the listener to add
   */
  public void addAPDUListener(APDUListener l) {
    apduListeners.add(l);
    for (CardTerminal terminal: terminals.keySet()) {
      TerminalPoller poller = terminals.get(terminal);
      if (poller != null) {
        CardService service = poller.getService();
        if (service != null) {
          service.addAPDUListener(l);
        }
      }
    }
  }

  /**
   * Removes a listener.
   * 
   * @param l the listener to remove
   */
  public void removeAPDUListener(APDUListener l) {
    apduListeners.remove(l);
    for (CardTerminal terminal: terminals.keySet()) {
      TerminalPoller poller = terminals.get(terminal);
      if (poller != null) {
        CardService service = poller.getService();
        if (service != null) {
          service.removeAPDUListener(l);
        }
      }
    }
  }

  private void notifyCardTerminalEvent(final CardTerminalEvent cte) {
    for (final TerminalFactoryListener l : terminalFactoryListeners) { 
      (new Thread(new Runnable() {
        public void run() {
          switch (cte.getType()) {
            case CardTerminalEvent.ADDED: l.cardTerminalAdded(cte); break;
            case CardTerminalEvent.REMOVED: l.cardTerminalRemoved(cte); break;
          }
        }
      })).start();
    }
  }

  private void notifyCardEvent(final CardEvent ce) {
    for (final CardTerminalListener l : cardTerminalListeners) { 
      (new Thread(new Runnable() {
        public void run() {
          switch (ce.getType()) {
            case CardEvent.INSERTED: l.cardInserted(ce); break;
            case CardEvent.REMOVED: l.cardRemoved(ce); break;
          }	
        }
      })).start();
    }
  }

  private boolean hasNoTerminalFactoryListeners() {
    return terminalFactoryListeners.isEmpty();
  }

  private boolean hasNoCardTerminalListeners() {
    return cardTerminalListeners.isEmpty();
  }

  /**
   * Gets a list of factories.
   * 
   * @return a list of factories
   */
  public List getFactories() {
    List result = new ArrayList();
    result.addAll(factories.keySet());
    Collections.sort(result, FACTORY_COMPARATOR);
    return result;
  }

  /**
   * Gets a list of terminals.
   * 
   * @return a list of terminals
   */
  public List getTerminals() {
    List result = new ArrayList();
    result.addAll(terminals.keySet());
    Collections.sort(result, TERMINAL_COMPARATOR);
    return result;
  }

  public String toString() {
    StringBuffer result = new StringBuffer();
    result.append("CardManager: [");
    boolean first = true;
    for (CardTerminal terminal: terminals.keySet()) {
      result.append((first ? "" : ", ") + terminals.get(terminal));
      if (first) { first = false; }
    }
    result.append("]");
    return result.toString();
  }

  /**
   * Gets the card manager.
   * By default only PC/SC terminals are added,
   * use {@link #addTerminals(TerminalFactory,boolean)} to add additional terminals.
   * 
   * @return the card manager
   */
  public static CardManager getInstance() {
    return INSTANCE;
  }


  private class FactoryPoller implements Runnable {

    private CardManager cm;
    private TerminalFactory factory;
    private boolean isPolling, hasStoppedPolling;
    private Thread myThread;
    private Set myTerminals;

    private Lock pollingLock;
    private Condition startedPollingCondition, stoppedPollingCondition;

    public FactoryPoller(TerminalFactory factory, CardManager cm) {
      this.factory = factory;
      this.isPolling = false;
      this.hasStoppedPolling = true;
      this.cm = cm;

      myTerminals = new HashSet();
      pollingLock = new ReentrantLock(true);
      stoppedPollingCondition = pollingLock.newCondition();
      startedPollingCondition = pollingLock.newCondition();
    }

    public boolean isPolling() {
      return isPolling;
    }

    public void startPolling() throws InterruptedException {
      pollingLock.lock();
      try {
        if (isPolling) {
          return;
        }

        isPolling = true;
        if (myThread != null && myThread.isAlive()) {
          return;
        }

        myThread = new Thread(this);
        myThread.start();
        while (isPolling && hasStoppedPolling) {
          startedPollingCondition.await();
        }
      } finally {
        pollingLock.unlock();
      }
    }

    public void stopPolling() throws InterruptedException {
      pollingLock.lock();
      try {
        if (!isPolling) { return; }
        isPolling = false;

        /* Wake up threads waiting for first listener. */
        terminalFactoryListenersLock.lock();
        try {
          notWaitingForFirstTerminalFactoryListenerCondition.signalAll();
        } finally {
          terminalFactoryListenersLock.unlock();
        }

        if (myThread == null || !myThread.isAlive()) {
          return;
        }

        /* Wait until thread has stopped polling. */
        while (!isPolling && !hasStoppedPolling) {
          stoppedPollingCondition.await();
        }
        myThread = null;
      } finally {
        pollingLock.unlock();
      }
    }


    public void run() {
      pollingLock.lock();
      try {
        hasStoppedPolling = false;
        startedPollingCondition.signalAll();
      } finally {
        pollingLock.unlock();
      }
      try {
        while (isPolling) {
          /* If Card Manager has no listeners, we go to sleep. */
          terminalFactoryListenersLock.lock();
          try {
            while (isPolling && cm.hasNoTerminalFactoryListeners()) {
              notWaitingForFirstTerminalFactoryListenerCondition.await();
            }
          } finally {
            terminalFactoryListenersLock.unlock();
          }

          pollingLock.lock();
          try {
            try {
              if (!isPolling) {
                break;
              }
              
              CardTerminals additionalTerminals = factory.terminals();
              if (additionalTerminals != null) {
                List terminalsList = additionalTerminals.list();
                if (terminalsList != null) {
                  Set addedTerminals = new HashSet(terminalsList);
                  addedTerminals.removeAll(myTerminals);
                  addTerminals(addedTerminals);

                  Set removedTerminals = new HashSet(myTerminals);
                  removedTerminals.removeAll(terminalsList);
                  removeTerminals(removedTerminals);
                }
              }
            } catch (CardException ce) {
              if (ce.getCause().getMessage().contains("SCARD_E_NO_READERS_AVAILABLE")) {
                removeTerminals(myTerminals);
              } else {
                ce.printStackTrace(); // for debugging
              }
            } finally {
              Thread.sleep(FACTORY_POLL_INTERVAL);
            }
          } finally {
            pollingLock.unlock();
          }
        }

        pollingLock.lock();
        try {
          hasStoppedPolling = true;
          stoppedPollingCondition.signalAll();
        } finally {
          pollingLock.unlock();
        }
      } catch (InterruptedException ie) { 
        /* NOTE: interrupt, we quit. */
        // ie.printStackTrace();
      }
    }

    /**
     * @param terminals
     */
    private void removeTerminals(Set terminals) {
      for (CardTerminal terminal : terminals) {
        removeTerminal(terminal);
        myTerminals.remove(terminal);
        final CardTerminalEvent cte = new CardTerminalEvent(CardTerminalEvent.REMOVED, terminal);
        notifyCardTerminalEvent(cte);
      }
    }

    /**
     * @param terminals
     */
    private void addTerminals(Set terminals) {
      for (CardTerminal terminal : terminals) {
        myTerminals.add(terminal);
        addTerminal(terminal, isPolling);
        final CardTerminalEvent cte = new CardTerminalEvent(CardTerminalEvent.ADDED, terminal);
        notifyCardTerminalEvent(cte);
      }
    }

    public String toString() {
      return "Poller for " + factory.getType() + (isPolling ? " (polling)" : " (not polling)");
    }
  }

  private class TerminalPoller implements Runnable {

    private CardManager cm;
    private CardTerminal terminal;
    private TerminalCardService service;
    private boolean isPolling, hasStoppedPolling;
    private Thread myThread;

    private Lock pollingLock;
    private Condition startedPollingCondition, stoppedPollingCondition;

    public TerminalPoller(CardTerminal terminal, CardManager cm) {
      this.terminal = terminal;
      this.service = null;
      this.isPolling = false;
      this.hasStoppedPolling = true;
      this.cm = cm;
      this.pollingLock = new ReentrantLock(true);
      stoppedPollingCondition = pollingLock.newCondition();
      startedPollingCondition = pollingLock.newCondition();
    }

    public boolean isPolling() {
      return isPolling;
    }

    public void startPolling() throws InterruptedException {
      pollingLock.lock();
      try {
        if (isPolling) {
          return;
        }
        
        isPolling = true;
        
        if (myThread != null && myThread.isAlive()) {
          return;
        }
        
        myThread = new Thread(this);
        myThread.start();
        
        while (isPolling && hasStoppedPolling) {
          startedPollingCondition.await();
        }
      } finally {
        pollingLock.unlock();
      }
    }

    public void stopPolling() throws InterruptedException {
      pollingLock.lock();
      try {
        if (!isPolling) {
          return;
        }

        /* Actually stop polling: this will quit the loop in the run method. */
        isPolling = false;

        /* Wake up threads waiting for first listener. */
        cardTerminalListenersLock.lock();
        try {
          notWaitingForFirstCardTerminalListenerCondition.signalAll();
        } finally {
          cardTerminalListenersLock.unlock();
        }

        if (myThread == null || !myThread.isAlive()) {
          return;
        }

        /* Wait until thread has stopped polling. */
        while (!isPolling && !hasStoppedPolling) {
          stoppedPollingCondition.await();
        }
        myThread = null;
      } finally {
        pollingLock.unlock();
      }
    }

    public CardService getService() {
      return service;
    }

    public void run() {
      pollingLock.lock();
      try {
        hasStoppedPolling = false;
        startedPollingCondition.signalAll();
      } finally {
        pollingLock.unlock();
      }

      try {
        while (isPolling) {
          /* If Card Manager has no listeners, we go to sleep. */
          cardTerminalListenersLock.lock();
          try {
            while (isPolling && cm.hasNoCardTerminalListeners()) {
              notWaitingForFirstCardTerminalListenerCondition.await();
            }
          } finally {
            cardTerminalListenersLock.unlock();
          }

          pollingLock.lock();
          try {
            try {
              if (!isPolling) {
                break;
              }

              boolean wasCardPresent = false;
              boolean isCardPresent = false;
              long currentTime = System.currentTimeMillis();
              if (service != null) {
                wasCardPresent = true;
              } else {
                try {
                  if (terminal.isCardPresent()) {
                    service = new TerminalCardService(terminal);
                    for (APDUListener l: cm.apduListeners) {
                      service.addAPDUListener(l);
                    }
                  }
                } catch (Exception e) {
                  if (service != null) { service.close(); }
                }
              }
              
              if (service != null && (currentTime - service.getLastActiveTime() < TERMINAL_POLL_INTERVAL)) {
                isCardPresent = true;
              } else {
                try {
                  isCardPresent = terminal.isCardPresent();
                } catch (Exception ise) {
                  isCardPresent = false;
                }
              }
              
              if (wasCardPresent && !isCardPresent) {
                if (service != null) {
                  final CardEvent ce = new CardEvent(CardEvent.REMOVED, service);
                  notifyCardEvent(ce);
                  service.close();
                }
                service = null;
              } else if (!wasCardPresent && isCardPresent) {
                if (service != null) {
                  final CardEvent ce = new CardEvent(CardEvent.INSERTED, service);
                  notifyCardEvent(ce);
                }
              }

              // // This doesn't seem to work on some variants of Linux + pcsclite. :(
              //		if (isCardPresent) {
              //			terminal.waitForCardAbsent(TERMINAL_POLL_INTERVAL); // or longer..
              //		} else {
              //			terminal.waitForCardPresent(TERMINAL_POLL_INTERVAL); // or longer..
              //		}
              // // ... so we'll just sleep for a while as a courtesy to other threads...
              Thread.sleep(TERMINAL_POLL_INTERVAL);
            } catch (Exception ce) {
              /* FIXME: what if reader no longer connected, should we remove it from list? */
              ce.printStackTrace(); // for debugging
            } finally {
              if (!isPolling && service != null) {
                service.close();
              }
            }
          } finally {
            pollingLock.unlock();
          }
        }

        pollingLock.lock();
        try {
          hasStoppedPolling = true;
          stoppedPollingCondition.signalAll();
        } finally {
          pollingLock.unlock();
        }
      } catch (InterruptedException ie) { 
        /* NOTE: interrupt, we quit. */
        // ie.printStackTrace();
      }
    }

    @Override
    public String toString() {
      return "Poller for " + terminal.getName() + (isPolling ? " (polling)" : " (not polling)");
    }
  }
}




© 2015 - 2024 Weber Informatics LLC | Privacy Policy