diff --git a/checkin_notes b/checkin_notes
index e87a429251..39e19993f6 100755
--- a/checkin_notes
+++ b/checkin_notes
@@ -24139,3 +24139,9 @@ David 6 Feb 2005
sched/
sched_locality.C
sched_send.C,h
+
+David 7 Feb 2005
+ - add "web service" for verifying a user CPID and an authenticator
+
+ html/user/
+ verify_cpid.php
diff --git a/html/user/verify_cpid.php b/html/user/verify_cpid.php
new file mode 100644
index 0000000000..fd7cbfc769
--- /dev/null
+++ b/html/user/verify_cpid.php
@@ -0,0 +1,31 @@
+missing argument\n";
+ exit();
+}
+
+$user = lookup_user_auth($authenticator);
+
+if (!$user) {
+ echo "bad authenticator\n";
+ exit();
+}
+
+$x = $user->cross_project_id.$user->email_addr;
+if (md5($x) == $cpid) {
+ echo "\n";
+} else {
+ echo "bad CPID\n";
+}
+
+?>