Initial commit: cframework. Longbow and Libparc

Change-Id: I90378dbd30da6033b20fb1f829b3b822cf366c59
Signed-off-by: Luca Muscariello <lumuscar+fdio@cisco.com>

1 files changed, 133 insertions, 0 deletions

diff --git a/libparc/parc/algol/parc_URIAuthority.c b/libparc/parc/algol/parc_URIAuthority.c
new file mode 100644
index 00000000..ac2ee351
--- /dev/null
+++ b/libparc/parc/algol/parc_URIAuthority.c
@@ -0,0 +1,133 @@
+/*
+ * Copyright (c) 2017 Cisco and/or its affiliates.
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at:
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+/**
+ *
+ */
+#include <config.h>
+
+#include <LongBow/runtime.h>
+
+#include <unistd.h>
+#include <stdio.h>
+#include <string.h>
+#include <strings.h>
+#include <ctype.h>
+#include <stdarg.h>
+
+#include <parc/algol/parc_URIAuthority.h>
+
+#include <parc/algol/parc_Memory.h>
+#include <parc/algol/parc_Object.h>
+#include <parc/algol/parc_SafeMemory.h>
+
+struct parc_uri_authority {
+    char *userinfo;
+    char *hostName;
+    long port;
+};
+
+static void
+_parcURIAuthority_Finalize(PARCURIAuthority **authorityPtr)
+{
+    PARCURIAuthority *authority = *authorityPtr;
+    parcMemory_SafeFree(authority->userinfo);
+    parcMemory_SafeFree(authority->hostName);
+}
+
+parcObject_ExtendPARCObject(PARCURIAuthority, _parcURIAuthority_Finalize, NULL, NULL, parcURIAuthority_Equals, NULL, NULL, NULL);
+
+PARCURIAuthority *
+parcURIAuthority_Create(void)
+{
+    PARCURIAuthority *result = parcObject_CreateInstance(PARCURIAuthority);
+    result->userinfo = 0;
+    result->hostName = 0;
+    result->port = 0;
+    return result;
+}
+
+parcObject_ImplementAcquire(parcURIAuthority, PARCURIAuthority);
+
+parcObject_ImplementRelease(parcURIAuthority, PARCURIAuthority);
+
+PARCURIAuthority *
+parcURIAuthority_Parse(const char *authority)
+{
+    PARCURIAuthority *result = parcURIAuthority_Create();
+
+    char *atSign = strchr(authority, '@');
+    if (atSign != NULL) {
+        result->userinfo = parcMemory_StringDuplicate(authority, atSign - authority);
+        authority = ++atSign;
+    }
+    // Support literal IPv6 address specifications (i.e. [::0]:80)
+    char *rightBracket = strrchr(authority, ']');
+    char *lastColon = strrchr(authority, ':');
+    if (rightBracket != NULL) {
+        result->hostName = parcMemory_StringDuplicate(authority, rightBracket - authority + 1);
+        if ((lastColon - rightBracket) > 0) {
+            result->port = (short) strtol(++lastColon, NULL, 10);
+        }
+    } else if (lastColon != NULL) {
+        result->hostName = parcMemory_StringDuplicate(authority, lastColon - authority);
+        result->port = (short) strtol(++lastColon, NULL, 10);
+    } else {
+        result->hostName = parcMemory_StringDuplicate(authority, strlen(authority));
+    }
+
+    return result;
+}
+
+const char *
+parcURIAuthority_GetUserInfo(const PARCURIAuthority *authority)
+{
+    return authority->userinfo;
+}
+
+const char *
+parcURIAuthority_GetHostName(const PARCURIAuthority *authority)
+{
+    return authority->hostName;
+}
+
+long
+parcURIAuthority_GetPort(const PARCURIAuthority *authority)
+{
+    return authority->port;
+}
+
+bool
+parcURIAuthority_Equals(const PARCURIAuthority *authA, const PARCURIAuthority *authB)
+{
+    if (authA == authB) {
+        return true;
+    }
+    if (authA == NULL || authB == NULL) {
+        return false;
+    }
+
+    if (strcmp(authA->hostName, authB->hostName) == 0) {
+        if (strcmp(authA->userinfo, authB->userinfo) == 0) {
+            if (authA->port == authB->port) {
+                return true;
+            }
+            return false;
+        }
+        return false;
+    }
+
+    return false;
+}