From aa29344f720bdefd2a6ada60a788698c589df48f Mon Sep 17 00:00:00 2001
From: Armando Rivera <airrsongs@gmail.com>
Date: Sun, 15 Aug 2021 21:53:13 -0400
Subject: [PATCH] Uploaded NSStatusBar example

---
 examples/systray/img/icon.png | Bin 0 -> 457 bytes
 examples/systray/systray.nim  |  50 ++++++++++++++++++++++++++++++++++
 2 files changed, 50 insertions(+)
 create mode 100644 examples/systray/img/icon.png
 create mode 100644 examples/systray/systray.nim

diff --git a/examples/systray/img/icon.png b/examples/systray/img/icon.png
new file mode 100644
index 0000000000000000000000000000000000000000..1f8c2eba34853b2b8ed19bc43b007e3a24b34e4e
GIT binary patch
literal 457
zcmV;)0XF`LP)<h;3K|Lk000e1NJLTq000sI000sQ1^@s6R?d!B00009a7bBm000XU
z000XU0RWnu7ytkPdr3q=R5%g6Q$0(=P!zp+6$(<dNx&h3LWL@1XcYv(K}Q`VD5XoM
z=;R0J>Your&>!F|TEs!2h~g}W;NYS|RZy^=o6na-n+)QG!#nrfbMJdEA4LBaIa;9{
zt)}fK(hSt0Ibb%;7az1tf;M7J_sAJx2--xl6beaJA%z|>Y&%)<6hT{#ho~ZZdgKKB
z8rN8WamLf9F?12ULtk`+^#b@rHjniN$Pj|oG4M^-wM$*sTg(l^h+jK(PzjB%IL(^x
z<RPl6z9S#?wV&1o8qa_e6o-Kt_!HK=WX^k9&G9I7jQkwD!5;suwZQg(eQ3`>yEstn
zw{3fnO&peGG4BJ~z>DKWk7=4$$bXFjcDu#1IfY}2p=nx^HShwEIeOtNJ4aWry9>TX
z8Q@xm5VV71?|M$Y`j7|rF>sANDN)Dn5Aaka-z4~ilvh1ZUD6V?1Z5<m3Oc|E4kMcD
zVQ&!eFZ(X2gybWn0gL{7f!v*pqdeB#@`u%LhVDO~da2tV00000NkvXXu0mjf?6<_r

literal 0
HcmV?d00001

diff --git a/examples/systray/systray.nim b/examples/systray/systray.nim
new file mode 100644
index 0000000..37ab3f3
--- /dev/null
+++ b/examples/systray/systray.nim
@@ -0,0 +1,50 @@
+# NSStatusBar example
+
+import Cocoa, os, dnsclient, net
+from nativesockets import getHostName
+
+proc externalIP(): string
+proc getActiveIP(): string
+proc getComputerName(): string
+
+proc menuCallback(sender: ID) {.cdecl.} =
+    case sender.tag:
+        of 1001: echo getComputerName()
+        of 1002: echo getActiveIP()
+        of 1003: echo externalIP()
+        of -1:
+            echo "bye."
+            Cocoa_Quit(sender)
+        else: discard
+
+proc externalIP(): string =
+    let client = newDNSClient("resolver1.opendns.com",53)
+    let resp = client.sendQuery("myip.opendns.com", A)
+    result = "External IP: " & resp.answers[0].toString
+
+proc getActiveIP(): string =
+    var ip:string
+    var s = newSocket(Domain.AF_INET, SockType.SOCK_DGRAM, Protocol.IPPROTO_UDP)
+    s.connect("1.0.0.0",Port(1))
+    ip = s.getLocalAddr[0]
+    s.close()
+    return "IP Address: " & ip
+
+proc getComputerName(): string =
+    result = "Computer Name: " & getHostName()
+
+Status_Init()
+
+var menu = newStatusMenu()
+var statusBar = newStatusBar(getAppDir() & "/img/icon.png")
+
+newStatusMenuItem(menu, 1001, getComputerName(), menuCallback)
+newStatusMenuItem(menu, 1002, getActiveIP(), menuCallback)
+newStatusMenuItem(menu, 1003, externalIP(), menuCallback)
+menu.separator()
+newStatusMenuItem(menu, -1, "Quit", menuCallback)
+
+
+statusBar.menu = menu
+
+Cocoa_Run(menu)