urlmon: Implemented IUri_GetPort.

dlls/urlmon/uri.c

@@ -2020,6 +2020,7 @@ static BOOL canonicalize_hierpart(const parse_data *data, Uri *uri, DWORD flags,
         uri->userinfo_len = 0;
         uri->host_start = -1;
         uri->host_len = 0;
+        uri->has_port = FALSE;
     }
 
     return TRUE;
@@ -2401,6 +2402,16 @@ static HRESULT WINAPI Uri_GetPropertyDWORD(IUri *iface, Uri_PROPERTY uriProp, DW
         *pcchProperty = This->scheme_type;
         hres = S_OK;
         break;
+    case Uri_PROPERTY_PORT:
+        if(!This->has_port) {
+            *pcchProperty = 0;
+            hres = S_FALSE;
+        } else {
+            *pcchProperty = This->port;
+            hres = S_OK;
+        }
+
+        break;
     default:
         FIXME("(%p)->(%d %p %x)\n", This, uriProp, pcchProperty, dwFlags);
         hres = E_NOTIMPL;
@@ -2572,13 +2583,8 @@ static HRESULT WINAPI Uri_GetHostType(IUri *iface, DWORD *pdwHostType)
 
 static HRESULT WINAPI Uri_GetPort(IUri *iface, DWORD *pdwPort)
 {
-    Uri *This = URI_THIS(iface);
-    FIXME("(%p)->(%p)\n", This, pdwPort);
-
-    if(!pdwPort)
-        return E_INVALIDARG;
-
-    return E_NOTIMPL;
+    TRACE("(%p)->(%p)\n", iface, pdwPort);
+    return Uri_GetPropertyDWORD(iface, Uri_PROPERTY_PORT, pdwPort, 0);
 }
 
 static HRESULT WINAPI Uri_GetScheme(IUri *iface, DWORD *pdwScheme)