Give Drydock leases a resourcePHID instead of a resourceID

Summary:
Ref T9252. Leases currently have a `resourceID`, but this is a bit nonstandard and generally less flexible than giving them a `resourcePHID`.

In particular, a `resourcePHID` is easier to use when rendering interfaces, since you can get handles out of a PHID.

Add a PHID column, copy over all the PHIDs that correspond to existing IDs, then drop the ID column.

Test Plan:
- Browsed web UIs.
- Inspected database during/after migration.
- Grepped for `resourceID`.
- Allocated a new lease with `bin/drydock lease`.

Reviewers: chad, hach-que

Reviewed By: hach-que

Maniphest Tasks: T9252

Differential Revision: https://secure.phabricator.com/D14151

resources/sql/autopatches/20150923.drydock.resourceid.1.sql

···
+ALTER TABLE {$NAMESPACE}_drydock.drydock_lease
+  ADD resourcePHID VARBINARY(64);

resources/sql/autopatches/20150923.drydock.resourceid.2.sql

···
+UPDATE
+  {$NAMESPACE}_drydock.drydock_lease l,
+  {$NAMESPACE}_drydock.drydock_resource r
+  SET l.resourcePHID = r.phid
+  WHERE l.resourceID = r.id;

resources/sql/autopatches/20150923.drydock.resourceid.3.sql

···
+ALTER TABLE {$NAMESPACE}_drydock.drydock_lease
+  DROP resourceID;

src/applications/drydock/controller/DrydockLeaseViewController.php

···
       pht('Resource Type'),
       $lease->getResourceType());
 
-    $resource = id(new DrydockResourceQuery())
-      ->setViewer($this->getViewer())
-      ->withIDs(array($lease->getResourceID()))
-      ->executeOne();
-
-    if ($resource !== null) {
-      $view->addProperty(
-        pht('Resource'),
-        $this->getViewer()->renderHandle($resource->getPHID()));
+    $resource_phid = $lease->getResourcePHID();
+    if ($resource_phid) {
+      $resource_display = $viewer->renderHandle($resource_phid);
     } else {
-      $view->addProperty(
-        pht('Resource'),
-        pht('No Resource'));
+      $resource_display = phutil_tag('em', array(), pht('No Resource'));
     }
+    $view->addProperty(pht('Resource'), $resource_display);
 
     $until = $lease->getUntil();
     if ($until) {

src/applications/drydock/controller/DrydockResourceViewController.php

···
 
     $leases = id(new DrydockLeaseQuery())
       ->setViewer($viewer)
-      ->withResourceIDs(array($resource->getID()))
+      ->withResourcePHIDs(array($resource->getPHID()))
       ->execute();
 
     $lease_list = id(new DrydockLeaseListView())

src/applications/drydock/query/DrydockLeaseQuery.php

···
 
   private $ids;
   private $phids;
-  private $resourceIDs;
+  private $resourcePHIDs;
   private $statuses;
   private $datasourceQuery;
   private $needCommands;
···
     return $this;
   }
 
-  public function withResourceIDs(array $ids) {
-    $this->resourceIDs = $ids;
+  public function withResourcePHIDs(array $phids) {
+    $this->resourcePHIDs = $phids;
     return $this;
   }
 
···
   }
 
   protected function willFilterPage(array $leases) {
-    $resource_ids = array_filter(mpull($leases, 'getResourceID'));
-    if ($resource_ids) {
+    $resource_phids = array_filter(mpull($leases, 'getResourcePHID'));
+    if ($resource_phids) {
       $resources = id(new DrydockResourceQuery())
         ->setParentQuery($this)
         ->setViewer($this->getViewer())
-        ->withIDs(array_unique($resource_ids))
+        ->withPHIDs(array_unique($resource_phids))
         ->execute();
+      $resources = mpull($resources, null, 'getPHID');
     } else {
       $resources = array();
     }
 
     foreach ($leases as $key => $lease) {
       $resource = null;
-      if ($lease->getResourceID()) {
-        $resource = idx($resources, $lease->getResourceID());
+      if ($lease->getResourcePHID()) {
+        $resource = idx($resources, $lease->getResourcePHID());
         if (!$resource) {
+          $this->didRejectResult($lease);
           unset($leases[$key]);
           continue;
         }
···
   protected function buildWhereClauseParts(AphrontDatabaseConnection $conn) {
     $where = parent::buildWhereClauseParts($conn);
 
-    if ($this->resourceIDs !== null) {
+    if ($this->resourcePHIDs !== null) {
       $where[] = qsprintf(
         $conn,
-        'resourceID IN (%Ld)',
-        $this->resourceIDs);
+        'resourcePHID IN (%Ls)',
+        $this->resourcePHIDs);
     }
 
     if ($this->ids !== null) {

src/applications/drydock/storage/DrydockLease.php

···
 final class DrydockLease extends DrydockDAO
   implements PhabricatorPolicyInterface {
 
-  protected $resourceID;
+  protected $resourcePHID;
   protected $resourceType;
   protected $until;
   protected $ownerPHID;
···
         'until' => 'epoch?',
         'resourceType' => 'text128',
         'ownerPHID' => 'phid?',
-        'resourceID' => 'id?',
+        'resourcePHID' => 'phid?',
       ),
       self::CONFIG_KEY_SCHEMA => array(
-        'key_phid' => null,
-        'phid' => array(
-          'columns' => array('phid'),
-          'unique' => true,
+        'key_resource' => array(
+          'columns' => array('resourcePHID', 'status'),
         ),
       ),
     ) + parent::getConfiguration();
···
     $this->openTransaction();
 
       $this
-        ->setResourceID($resource->getID())
+        ->setResourcePHID($resource->getPHID())
         ->setStatus($new_status)
         ->save();
 

src/applications/drydock/worker/DrydockAllocatorWorker.php

···
           'acquireLease()'));
     }
 
-    $lease_id = $lease->getResourceID();
-    $resource_id = $resource->getID();
+    $lease_phid = $lease->getResourcePHID();
+    $resource_phid = $resource->getPHID();
 
-    if ($lease_id !== $resource_id) {
+    if ($lease_phid !== $resource_phid) {
       // TODO: Destroy the lease?
       throw new Exception(
         pht(

src/applications/drydock/worker/DrydockLeaseWorker.php

···
           $actual_status));
     }
 
-    $resource_id = $lease->getResourceID();
-
-    $resource = id(new DrydockResourceQuery())
-      ->setViewer($this->getViewer())
-      ->withIDs(array($resource_id))
-      ->executeOne();
+    $resource = $lease->getResource();
     if (!$resource) {
       throw new PhabricatorWorkerPermanentFailureException(
-        pht(
-          'Trying to activate lease on invalid resource ("%s").',
-          $resource_id));
+        pht('Trying to activate lease with no resource.'));
     }
 
     $resource_status = $resource->getStatus();

src/applications/drydock/worker/DrydockResourceUpdateWorker.php

···
 
     $leases = id(new DrydockLeaseQuery())
       ->setViewer($viewer)
-      ->withResourceIDs(array($resource->getID()))
+      ->withResourcePHIDs(array($resource->getPHID()))
       ->withStatuses($statuses)
       ->execute();