1 /* coded by Ketmar // Invisible Vector <ketmar@ketmar.no-ip.org>
2 * Understanding is not required. Only obedience.
4 * This program is free software: you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation, either version 3 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <http://www.gnu.org/licenses/>.
17 module accobj
is aliced
;
23 import arsd
.simpledisplay
;
44 // ////////////////////////////////////////////////////////////////////////// //
45 __gshared
bool optShowOffline
= false;
48 // ////////////////////////////////////////////////////////////////////////// //
49 __gshared string accBaseDir
= ".";
50 __gshared Contact activeContact
;
53 private bool decodeHexStringInto (ubyte[] dest
, const(char)[] str) {
56 foreach (immutable char ch
; str) {
57 if (ch
<= ' ' || ch
== '_' || ch
== '.' || ch
== ':') continue;
59 if (ch
>= '0' && ch
<= '9') dig
= ch
-'0';
60 else if (ch
>= 'A' && ch
<= 'F') dig
= ch
-'A'+10;
61 else if (ch
>= 'a' && ch
<= 'f') dig
= ch
-'a'+10;
63 if (dpos
>= dest
.length
*2) return false;
64 if (dpos
%2 == 0) dest
[dpos
/2] = cast(ubyte)(dig
<<4); else dest
[dpos
/2] |
= cast(ubyte)dig
;
67 return (dpos
== dest
.length
*2);
71 public PubKey
decodePubKeyStr (const(char)[] str) {
73 if (!decodeHexStringInto(res
[], str)) res
[] = toxCoreEmptyKey
[];
78 public ToxAddr
decodeAddrStr (const(char)[] str) {
80 if (!decodeHexStringInto(res
[], str)) res
[] = toxCoreEmptyAddr
[];
85 // ////////////////////////////////////////////////////////////////////////// //
88 this (Account aOwner
) nothrow { acc
= aOwner
; }
91 bool mDirty
; // true: write contact's config
99 bool getTriOpt(string
fld, string fld2
=null) () const nothrow @trusted @nogc {
100 enum lo
= "info."~fld;
101 if (mixin(lo
) != TriOption
.Default
) return (mixin(lo
) == TriOption
.Yes
);
102 static if (fld2
.length
) return mixin("acc.info."~fld2
); else return mixin("acc.info."~fld);
105 int getIntOpt(string
fld) () const nothrow @trusted @nogc {
106 enum lo
= "info."~fld;
107 if (mixin(lo
) >= 0) return mixin(lo
);
108 return mixin("acc.info."~fld);
112 void markDirty () pure nothrow @safe @nogc => mDirty
= true;
115 import std
.path
: dirName
;
117 assert(acc
!is null);
119 if (diskFileName
.length
== 0) {
120 diskFileName
= acc
.basePath
~"/contacts/groups.rc";
122 mkdirRec(diskFileName
.dirName
);
123 if (serialize(info
, diskFileName
)) mDirty
= false;
126 @property bool visible () const nothrow @trusted @nogc {
127 if (!hideIfNoVisibleMembers
) return true; // always visible
128 // check if we have any visible members
129 foreach (const(Contact
) c
; acc
.contacts
.byValue
) {
130 if (c
.gid
!= info
.gid
) continue;
131 if (c
.visibleNoGroupCheck
) return true;
133 return false; // nobody's here
136 @property nothrow @safe {
137 uint gid () const pure @nogc => info
.gid
;
139 bool opened () const @nogc => info
.opened
;
140 void opened (bool v
) @nogc { pragma(inline
, true); if (info
.opened
!= v
) { info
.opened
= v
; markDirty(); } }
142 string
name () const @nogc => info
.name
;
143 void name (string v
) @nogc { pragma(inline
, true); if (v
.length
== 0) v
= "<unnamed>"; if (info
.name
!= v
) { info
.name
= v
; markDirty(); } }
145 string
note () const @nogc => info
.note
;
146 void note (string v
) @nogc { pragma(inline
, true); if (info
.note
!= v
) { info
.note
= v
; markDirty(); } }
149 bool showOffline () const => getTriOpt
!"showOffline";
150 bool showPopup () const => getTriOpt
!"showPopup";
151 bool blinkActivity () const => getTriOpt
!"blinkActivity";
152 bool skipUnread () const => getTriOpt
!"skipUnread";
153 bool hideIfNoVisibleMembers () const => getTriOpt
!("hideIfNoVisibleMembers", "hideEmptyGroups");
154 bool ftranAllowed () const => getTriOpt
!"ftranAllowed";
155 int resendRotDays () const => getIntOpt
!"resendRotDays";
156 int hmcOnOpen () const => getIntOpt
!"hmcOnOpen";
162 // ////////////////////////////////////////////////////////////////////////// //
163 final class Contact
{
165 // `Connecting` for non-account means "awaiting authorization"
168 bool isMe
; // "/me" message?
171 long msgid
; // ==0: unknown yet
173 MonoTime resendAllowTime
= MonoTime
.zero
;
175 string
textOrig () const pure nothrow @trusted @nogc {
177 while (pos
< text
.length
&& text
.ptr
[pos
] != ']') ++pos
;
179 return (pos
< text
.length ? text
[pos
..$] : null);
182 bool isOurMark (const(void)[] atext
, SysTime atime
) nothrow @trusted {
183 pragma(inline
, true);
184 return (atime
== time
&& textDigest(textOrig
) == textDigest(atext
));
187 bool isOurMark (long aid
, const(void)[] atext
, SysTime atime
) nothrow @trusted {
188 pragma(inline
, true);
189 return (aid
> 0 ?
(msgid
== aid
) : (atime
== time
&& textDigest(textOrig
) == textDigest(atext
)));
192 bool isOurMark (long aid
, in ref TextDigest adigest
, SysTime atime
) nothrow @trusted {
193 pragma(inline
, true);
194 return (aid
> 0 ?
(msgid
== aid
) : (atime
== time
&& textDigest(textOrig
) == adigest
));
199 MonoTime nextSendTime
; // for resend queue
202 this (Account aOwner
) nothrow { acc
= aOwner
; edit
= new MiniEdit(); }
204 void removeData () nothrow {
205 if (diskFileName
.length
== 0) return;
207 import std
.file
: rmdirRecurse
, rename
;
208 import std
.path
: dirName
;
209 auto dn
= diskFileName
.dirName
;
210 if (dn
.length
== 0 || dn
== "/") return; // just in case
211 conwriteln("removing dir <", dn
, ">");
213 //rename(dn, "_"~dn);
216 } catch (Exception e
) {}
220 bool mDirty
; // true: write contact's config
226 ContactStatus status
= ContactStatus
.Offline
; // not saved, so if it safe to change it
232 void markDirty () pure nothrow @safe @nogc => mDirty
= true;
234 void loadUnreadCount () nothrow {
235 assert(diskFileName
.length
);
236 assert(acc
!is null);
238 import std
.path
: dirName
;
239 auto fi
= VFile(diskFileName
.dirName
~"/logs/unread.dat");
240 unreadCount
= fi
.readNum
!int;
241 } catch (Exception e
) {
246 void saveUnreadCount () nothrow {
247 assert(diskFileName
.length
);
248 assert(acc
!is null);
250 import std
.path
: dirName
;
251 auto fo
= VFile(diskFileName
.dirName
~"/logs/unread.dat", "w");
252 fo
.writeNum(unreadCount
);
253 } catch (Exception e
) {
257 void loadResendQueue () {
258 import std
.path
: dirName
;
259 string fname
= diskFileName
.dirName
~"/logs/resend.log";
262 foreach (const ref lmsg
; lf
.messages
) {
264 xmsg
.isMe
= lmsg
.isMe
;
265 xmsg
.time
= lmsg
.time
;
266 xmsg
.text
= lmsg
.text
;
270 nextSendTime
= MonoTime
.currTime
;
273 void saveResendQueue () {
274 import std
.file
: remove
;
275 import std
.path
: dirName
;
276 assert(diskFileName
.length
);
277 assert(acc
!is null);
278 mkdirRec(diskFileName
.dirName
~"/logs");
279 string fname
= diskFileName
.dirName
~"/logs/resend.log";
280 try { remove(fname
); } catch (Exception e
) {}
281 if (resendQueue
.length
) {
282 foreach (const ref msg
; resendQueue
) {
283 LogFile
.appendLine(fname
, LogFile
.Msg
.Kind
.Outgoing
, msg
.text
, msg
.isMe
, msg
.time
);
289 import std
.path
: dirName
;
291 assert(acc
!is null);
293 if (diskFileName
.length
== 0) {
294 diskFileName
= acc
.basePath
~"/contacts/"~tox_hex(info
.pubkey
[])~"/config.rc";
295 acc
.contacts
[info
.pubkey
] = this;
297 mkdirRec(diskFileName
.dirName
);
298 mkdirRec(diskFileName
.dirName
~"/avatars");
299 mkdirRec(diskFileName
.dirName
~"/files");
300 mkdirRec(diskFileName
.dirName
~"/fileparts");
301 mkdirRec(diskFileName
.dirName
~"/logs");
303 if (serialize(info
, diskFileName
)) mDirty
= false;
312 @property bool visibleNoGroupCheck () const nothrow @trusted @nogc => (!kfd
&& (optShowOffline || showOffline || acceptPending || requestPending || status
!= ContactStatus
.Offline || unreadCount
> 0));
314 @property bool visible () const nothrow @trusted @nogc {
315 if (kfd
) return false;
316 if (acceptPending || requestPending
) return true;
317 if (unreadCount
> 0) return true;
318 if (!showOffline
&& !optShowOffline
&& status
== ContactStatus
.Offline
) return false;
319 auto grp
= acc
.groupById(gid
);
320 return (grp
.visible
&& grp
.opened
);
323 @property nothrow @safe {
324 bool online () const pure @nogc => (status
!= ContactStatus
.Offline
&& status
!= ContactStatus
.Connecting
);
326 ContactInfo
.Kind
kind () const @nogc => info
.kind
;
327 void kind (ContactInfo
.Kind v
) @nogc { pragma(inline
, true); if (info
.kind
!= v
) { info
.kind
= v
; markDirty(); } }
329 uint gid () const @nogc => info
.gid
;
330 void gid (uint v
) @nogc { pragma(inline
, true); if (info
.gid
!= v
) { info
.gid
= v
; markDirty(); } }
332 string
nick () const @nogc => info
.nick
;
333 void nick (string v
) @nogc { pragma(inline
, true); if (info
.nick
!= v
) { info
.nick
= v
; markDirty(); } }
335 string
visnick () const @nogc => info
.visnick
;
336 void visnick (string v
) @nogc { pragma(inline
, true); if (info
.visnick
!= v
) { info
.visnick
= v
; markDirty(); } }
338 string
displayNick () const @nogc => (info
.visnick
.length ? info
.visnick
: (info
.nick
.length ? info
.nick
: "<unknown>"));
340 string
statusmsg () const @nogc => info
.statusmsg
;
341 void statusmsg (string v
) @nogc { pragma(inline
, true); if (info
.statusmsg
!= v
) { info
.statusmsg
= v
; markDirty(); } }
343 bool kfd () const @nogc => (info
.kind
== ContactInfo
.Kind
.KillFuckDie
);
344 bool friend () const @nogc => (info
.kind
== ContactInfo
.Kind
.Friend
);
345 bool acceptPending () const @nogc => (info
.kind
== ContactInfo
.Kind
.PengingAuthAccept
);
346 bool requestPending () const @nogc => (info
.kind
== ContactInfo
.Kind
.PengingAuthRequest
);
348 void setLastOnlineNow () {
350 auto ut
= systimeNow
.toUnixTime();
351 if (info
.lastonlinetime
!= cast(uint)ut
) { info
.lastonlinetime
= cast(uint)ut
; markDirty(); }
352 } catch (Exception e
) {}
355 string
note () const @nogc => info
.note
;
356 void note (string v
) @nogc { pragma(inline
, true); if (info
.note
!= v
) { info
.note
= v
; markDirty(); } }
359 private bool getTriOpt(string
fld) () const nothrow @trusted @nogc {
360 enum lo
= "info.opts."~fld;
361 if (mixin(lo
) != TriOption
.Default
) return (mixin(lo
) == TriOption
.Yes
);
362 auto grp
= acc
.groupById(info
.gid
);
363 enum go
= "grp.info."~fld;
364 if (mixin(go
) != TriOption
.Default
) return (mixin(go
) == TriOption
.Yes
);
365 return mixin("acc.info."~fld);
368 private int getIntOpt(string
fld) () const nothrow @trusted @nogc {
369 enum lo
= "info.opts."~fld;
370 if (mixin(lo
) >= 0) return mixin(lo
);
371 auto grp
= acc
.groupById(info
.gid
);
372 enum go
= "grp.info."~fld;
373 if (mixin(go
) >= 0) return mixin(go
);
374 return mixin("acc.info."~fld);
377 @property nothrow @safe @nogc {
378 bool showOffline () const => !kfd
&& getTriOpt
!"showOffline";
379 bool showPopup () const => !kfd
&& getTriOpt
!"showPopup";
380 bool blinkActivity () const => !kfd
&& getTriOpt
!"blinkActivity";
381 bool skipUnread () const => kfd || getTriOpt
!"skipUnread";
382 bool ftranAllowed () const => !kfd
&& getTriOpt
!"ftranAllowed";
383 int resendRotDays () const => getIntOpt
!"resendRotDays";
384 int hmcOnOpen () const => getIntOpt
!"hmcOnOpen";
387 void loadLogInto (ref LogFile lf
) {
388 import std
.file
: exists
;
389 import std
.path
: dirName
;
390 string lname
= diskFileName
.dirName
~"/logs/hugelog.log";
391 if (lname
.exists
) lf
.load(lname
); else lf
.clear();
394 void appendToLog (LogFile
.Msg
.Kind kind
, const(char)[] text
, bool isMe
, SysTime time
) {
395 import std
.path
: dirName
;
396 string lname
= diskFileName
.dirName
~"/logs/hugelog.log";
397 LogFile
.appendLine(lname
, kind
, text
, isMe
, time
);
400 void ackReceived (long msgid
) {
401 if (msgid
<= 0) return; // wtf?!
402 bool changed
= false;
404 while (idx
< resendQueue
.length
) {
405 if (resendQueue
[idx
].msgid
== msgid
) {
406 foreach (immutable c
; idx
+1..resendQueue
.length
) resendQueue
[c
-1] = resendQueue
[c
];
407 resendQueue
[$-1] = XMsg
.init
;
408 resendQueue
.length
-= 1;
409 resendQueue
.assumeSafeAppend
;
415 if (changed
) saveResendQueue();
419 long findInResendQueue (const(char)[] text
, SysTime time
) {
420 foreach (ref XMsg msg
; resendQueue
) {
421 if (msg
.time
== time
&& msg
.textOrig
== text
) {
422 //conwriteln("<", text, "> found in resend queue; id=", msg.msgid, "; rt=<", msg.text, ">");
424 } /*else if (msg.textOrig == text) {
425 conwriteln("<", text, "> (", time, ":", msg.time, ") IS NOT: id=", msg.msgid, "; rt=<", msg.text, ">");
431 bool removeFromResendQueue (long msgid
, in ref TextDigest digest
, SysTime time
) {
434 while (pos
< resendQueue
.length
) {
435 if (resendQueue
[pos
].isOurMark(msgid
, digest
, time
)) {
436 foreach (immutable c
; pos
+1..resendQueue
.length
) resendQueue
[c
-1] = resendQueue
[c
];
437 resendQueue
[$-1] = XMsg
.init
;
438 resendQueue
.length
-= 1;
439 resendQueue
.assumeSafeAppend
;
445 if (doSave
) saveResendQueue();
449 // called when toxcore goes offline
450 void resetQueueIds () {
451 foreach (ref XMsg msg
; resendQueue
) msg
.msgid
= 0;
452 if (activeContact
is this) logResetAckMessageIds();
453 nextSendTime
= MonoTime
.currTime
+10.seconds
;
456 void processResendQueue () {
457 if (status
== ContactStatus
.Offline || status
== ContactStatus
.Connecting
) return;
458 auto ctt
= MonoTime
.currTime
;
459 if (nextSendTime
> ctt
) return; // oops
460 // resend auth request?
462 if (isValidAddr(info
.fraddr
)) {
463 string msg
= info
.statusmsg
;
464 if (msg
.length
== 0) msg
= "I brought you a tasty fish!";
465 if (!toxCoreSendFriendRequest(acc
.toxpk
, info
.fraddr
, msg
)) { conwriteln("address: '", tox_hex(info
.fraddr
), "'; error sending friend request"); }
469 foreach (ref XMsg msg
; resendQueue
) {
470 if (msg
.resendAllowTime
<= ctt
) {
471 long msgid
= toxCoreSendMessage(acc
.toxpk
, info
.pubkey
, msg
.text
, msg
.isMe
);
472 if (msgid
< 0) break;
473 if (activeContact
is this) logFixAckMessageId(msg
.msgid
, msgid
, msg
.textOrig
, msg
.time
);
475 if (msg
.resendCount
++ != 0) doSave
= true;
478 if (doSave
) saveResendQueue();
480 nextSendTime
= MonoTime
.currTime
+30.seconds
;
483 void send (const(char)[] text
) {
484 void sendOne (const(char)[] text
, bool action
) {
485 if (text
.length
== 0) return; // just in case
487 SysTime now
= systimeNow
;
488 long msgid
= toxCoreSendMessage(acc
.toxpk
, info
.pubkey
, text
, action
);
489 if (msgid
< 0) { conwriteln("ERROR sending message to '", info
.nick
, "'"); return; }
491 // add this to resend queue
495 xmsg
.msgid
= msgid
; // 0: we are offline
496 xmsg
.resendCount
= 0;
498 auto ctt
= MonoTime
.currTime
;
499 if (nextSendTime
<= ctt
) nextSendTime
= ctt
+30.seconds
;
500 xmsg
.resendAllowTime
= ctt
+60.seconds
;
504 import std
.format
: format
;
505 auto dt = cast(DateTime
)now
;
506 xmsg
.text
= "[%04u/%02u/%02u %02u:%02u:%02u] %s".format(dt.year
, dt.month
, dt.day
, dt.hour
, dt.minute
, dt.second
, text
);
511 if (activeContact
is this) addTextToLog(acc
, this, LogFile
.Msg
.Kind
.Outgoing
, action
, text
, now
, msgid
);
512 appendToLog(LogFile
.Msg
.Kind
.Outgoing
, text
, action
, now
);
515 bool action
= text
.startsWith("/me ");
516 if (action
) text
= text
[4..$].xstripleft
;
518 while (text
.length
) {
519 auto ep
= text
.indexOf('\n');
520 if (ep
< 0) ep
= text
.length
; else ++ep
; // include '\n'
521 // remove line if it contains only spaces
522 bool hasNonSpace
= false;
523 foreach (immutable char ch
; text
[0..ep
]) if (ch
> ' ') { hasNonSpace
= true; break; }
524 if (hasNonSpace
) break;
527 while (text
.length
&& text
[$-1] <= ' ') text
= text
[0..$-1];
528 if (text
.length
== 0) return; // nothing to do
531 //TODO: split at word boundaries
532 enum ReservedSpace
= 23+3+3;
534 // k8: toxcore developers are idiots, so we have to do dynalloc here
535 auto tmpbuf
= new char[](tox_max_message_length()+64);
536 scope(exit
) delete tmpbuf
;
539 while (text
.length
) {
540 int epos
= tox_max_message_length()-ReservedSpace
;
541 if (epos
< text
.length
) {
544 if (text
[epos
-1] < 128) break;
545 if ((text
[epos
-1]&0xc0) == 0xc0) break;
549 epos
= cast(int)text
.length
;
552 if (first
&& epos
>= text
.length
) {
553 sendOne(text
[0..epos
], action
);
556 if (!first
) { tmpbuf
[0..3] = "..."; ofs
= 3; }
557 tmpbuf
[ofs
..ofs
+epos
] = text
[0..epos
];
558 tmpbuf
[ofs
+epos
..ofs
+epos
+3] = "...";
559 sendOne(tmpbuf
[0..ofs
+epos
+3], action
);
562 text
= text
[epos
..$];
570 // ////////////////////////////////////////////////////////////////////////// //
571 final class Account
{
573 void saveGroups () nothrow {
574 import std
.algorithm
: sort
;
575 GroupOptions
[] glist
;
576 scope(exit
) delete glist
;
577 foreach (Group g
; groups
) glist
~= g
.info
;
578 glist
.sort
!((in ref a
, in ref b
) => a
.gid
< b
.gid
);
579 glist
.serialize(basePath
~"contacts/groups.rc");
582 void saveUpdatedGroups () {
583 bool needToUpdate
= false;
584 foreach (Group g
; groups
) if (g
.mDirty
) { needToUpdate
= true; g
.mDirty
= false; }
585 if (needToUpdate
) saveGroups();
589 ContactStatus mStatus
= ContactStatus
.Offline
;
592 PubKey toxpk
= toxCoreEmptyKey
;
593 string toxDataDiskName
;
594 string basePath
; // with trailing "/"
595 ProtoOptions protoOpts
;
598 Contact
[PubKey
] contacts
;
601 bool mIAmConnecting
= false;
602 bool mIAmOnline
= false;
603 bool forceOnline
= true; // set to `false` to stop autoreconnecting
606 @property bool isConnecting () const nothrow @safe @nogc => mIAmConnecting
;
608 @property bool isOnline () const nothrow @safe @nogc {
609 if (!toxpk
.isValidKey
) return false;
610 if (mIAmConnecting
) return false;
611 if (!mIAmOnline
) return false;
615 @property ContactStatus
status () const nothrow @safe @nogc {
616 if (!toxpk
.isValidKey
) return ContactStatus
.Offline
;
617 if (mIAmConnecting
) return ContactStatus
.Connecting
;
618 if (!mIAmOnline
) return ContactStatus
.Offline
;
622 @property void status (ContactStatus v
) {
623 if (!toxpk
.isValidKey
) return;
624 conwriteln("changing status to ", v
, " (old: ", mStatus
, ")");
625 if (v
== ContactStatus
.Connecting
) v
= ContactStatus
.Online
;
626 forceOnline
= (v
!= ContactStatus
.Offline
);
627 if (mStatus
== ContactStatus
.Offline
) {
628 mIAmConnecting
= (v
!= ContactStatus
.Offline
);
629 mIAmOnline
= false; // just in case
631 toxCoreSetStatus(toxpk
, v
);
633 // if not reconnecting, make all contacts offline
634 if (v
== ContactStatus
.Offline
&& !mIAmConnecting
) {
635 foreach (Contact ct
; this) ct
.status
= ContactStatus
.Offline
;
637 glconPostScreenRepaint();
641 void processResendQueue () {
642 if (!isOnline
) return;
643 foreach (Contact ct
; contacts
.byValue
) { ct
.processResendQueue(); ct
.update(); }
647 void saveResendQueue () {
648 foreach (Contact ct
; contacts
.byValue
) { ct
.saveResendQueue(); ct
.update(); }
652 string
getAddress () {
653 if (!toxpk
.isValidKey
) return null;
654 return tox_hex(toxCoreGetSelfAddress(toxpk
));
659 toxpk
= toxCoreOpenAccount(toxDataDiskName
);
660 if (!toxpk
.isValidKey
) {
661 conwriteln("creating new Tox account...");
662 string nick
= info
.nick
;
663 if (nick
.length
> 0) {
665 if (nick
.length
> tox_max_name_length()) nick
= nick
[0..tox_max_name_length()];
669 toxpk
= toxCoreCreateAccount(toxDataDiskName
, nick
);
670 if (!toxpk
.isValidKey
) throw new Exception("cannot create Tox account");
672 conwriteln("my address: [", tox_hex(toxCoreGetSelfAddress(toxpk
)), "]");
673 toxLoadKnownContacts();
676 // load contacts from ToxCore data and add 'em to contact database
677 void toxLoadKnownContacts () {
678 if (!toxpk
.isValidKey
) return;
680 toxCoreForEachFriend(toxpk
, delegate (in ref PubKey self
, in ref PubKey frpub
, scope const(char)[] anick
) {
681 string nick
= anick
.buildNormalizedString
!true;
682 auto c
= (frpub
in contacts ? contacts
[frpub
] : null);
684 conwriteln("NEW friend with pk [", tox_hex(frpub
), "]; name is: ", nick
);
685 c
= new Contact(this);
688 c
.info
.pubkey
[] = frpub
[];
689 c
.info
.opts
.showOffline
= TriOption
.Default
;
690 auto ls
= toxCoreLastSeen(self
, frpub
);
691 if (ls
!= SysTime
.min
) {
692 c
.info
.lastonlinetime
= cast(uint)ls
.toUnixTime();
694 if (c
.info
.lastonlinetime
== 0 && nick
.length
== 0) {
695 c
.info
.kind
= ContactInfo
.Kind
.PengingAuthRequest
;
697 contacts
[c
.info
.pubkey
] = c
;
700 if (clist
!is null) clist
.buildAccount(this);
702 bool needSave
= false;
703 auto ls
= toxCoreLastSeen(self
, frpub
);
704 if (ls
!= SysTime
.min
) {
705 auto lsu
= cast(uint)ls
.toUnixTime();
706 if (c
.info
.lastonlinetime
!= lsu
) { c
.info
.lastonlinetime
= lsu
; needSave
= true; }
708 if (c
.info
.nick
!= nick
) {
709 conwriteln("OLD friend with pk [", tox_hex(frpub
), "]; new name is: ", nick
);
710 if (c
.info
.nick
.length
== 0 && nick
.length
!= 0) {
715 conwriteln("OLD friend with pk [", tox_hex(frpub
), "]; old name is: ", nick
);
717 if (needSave
) c
.save();
719 return false; // don't stop
723 auto data
= toxCoreLoadDataFile(VFile(toxDataDiskName
));
724 foreach (const ref ci
; data
.friends
) {
725 auto c
= (ci
.pubkey
in contacts ? contacts
[ci
.pubkey
] : null);
727 conwriteln("NEW friend with pk [", tox_hex(ci
.pubkey
), "]; name is: ", ci
.nick
);
728 c
= new Contact(this);
730 c
.info
.nick
= ci
.nick
;
731 c
.info
.statusmsg
= ci
.statusmsg
;
732 c
.info
.lastonlinetime
= ci
.lastonlinetime
;
733 c
.info
.kind
= ci
.kind
;
734 c
.info
.pubkey
[] = ci
.pubkey
[];
735 c
.info
.opts
.showOffline
= TriOption
.Default
;
736 contacts
[c
.info
.pubkey
] = c
;
739 if (clist
!is null) clist
.buildAccount(this);
741 bool needSave
= false;
743 if (c
.info
.nick
!= ci
.nick
) {
744 conwriteln("OLD friend with pk [", tox_hex(ci
.pubkey
), "]; new name is: ", ci
.nick
);
746 conwriteln("OLD friend with pk [", tox_hex(ci
.pubkey
), "]; old name is: ", ci
.nick
);
749 if (c
.info
.kind
!= ci
.kind
) { c
.info
.kind
= ci
.kind
; needSave
= true; }
750 if (c
.info
.lastonlinetime
!= ci
.lastonlinetime
) { c
.info
.lastonlinetime
= ci
.lastonlinetime
; needSave
= true; }
751 if (c
.info
.nick
.length
== 0 && ci
.nick
.length
!= 0) { c
.info
.nick
= ci
.nick
; needSave
= true; }
752 if (needSave
) c
.save();
755 } catch (Exception e
) {}
760 bool sendFriendRequest (in ref ToxAddr fraddr
, const(char)[] msg
) {
761 if (!toxpk
.isValidKey
) return false;
762 if (!isValidAddr(fraddr
)) return false;
763 if (msg
.length
== 0) return false;
764 if (msg
.length
> tox_max_friend_request_length()) return false;
765 if (fraddr
[0..PubKey
.length
] == toxpk
[]) return false; // there is no reason to friend myself
766 PubKey frpub
= fraddr
[0..PubKey
.length
];
767 auto c
= (frpub
in contacts ? contacts
[frpub
] : null);
768 if (c
!is null) { c
.statusmsg
= msg
.idup
; c
.save(); }
769 if (!toxCoreSendFriendRequest(toxpk
, fraddr
, msg
)) return false;
771 c
= new Contact(this);
773 c
.info
.nick
= null; // unknown yet
774 c
.info
.pubkey
[] = frpub
[];
775 c
.info
.opts
.showOffline
= TriOption
.Default
;
776 c
.info
.kind
= ContactInfo
.Kind
.PengingAuthRequest
;
777 c
.info
.fraddr
[] = fraddr
[]; // save address for resending (and just in case)
778 contacts
[c
.info
.pubkey
] = c
;
781 if (clist
!is null) clist
.buildAccount(this);
787 // connection established
788 void toxConnectionDropped () {
790 conprintfln("TOX[%s] CONNECTION DROPPED", timp
.srvalias
);
791 mIAmConnecting
= false;
793 auto oldst
= mStatus
;
794 toxCoreSetStatus(toxpk
, ContactStatus
.Offline
); // this kills toxcore instance
795 foreach (Contact ct
; contacts
.byValue
) {
796 ct
.status
= ContactStatus
.Offline
;
797 if (ct
.kfd
) toxCoreRemoveFriend(toxpk
, ct
.info
.pubkey
);
798 // this is not quite correct: we need to distinguish when user goes offline, and when toxcore temporarily goes offline
799 // but we're killing toxcore instance on disconnect, so it works
803 mStatus
= ContactStatus
.Offline
;
806 glconPostScreenRepaint();
809 // connection established
810 void toxConnectionEstablished () {
812 conprintfln("TOX[%s] CONNECTION ESTABLISHED", timp
.srvalias
);
813 mIAmConnecting
= false;
815 if (info
.statusmsg
.length
== 0) info
.statusmsg
= "Come taste the gasoline! [BioAcid]";
816 toxCoreSetStatusMessage(toxpk
, info
.statusmsg
);
817 //toxLoadKnownContacts();
818 foreach (Contact ct
; contacts
.byValue
) ct
.resetQueueIds();
819 glconPostScreenRepaint();
822 void toxFriendOffline (in ref PubKey fpk
) {
823 if (auto ct
= fpk
in contacts
) {
824 auto ls
= toxCoreLastSeen(toxpk
, fpk
);
825 if (ls
!= SysTime
.min
) {
826 auto lsu
= cast(uint)ls
.toUnixTime();
827 if (ct
.info
.lastonlinetime
!= lsu
) { ct
.info
.lastonlinetime
= lsu
; ct
.markDirty(); glconPostScreenRepaint(); }
829 if (ct
.status
!= ContactStatus
.Offline
) {
830 conwriteln("friend <", ct
.info
.nick
, "> gone offline");
831 ct
.status
= ContactStatus
.Offline
;
832 glconPostScreenRepaint();
837 void toxSelfStatus (ContactStatus cst
) {
838 if (mStatus
!= cst
) {
840 glconPostScreenRepaint();
844 void toxFriendStatus (in ref PubKey fpk
, ContactStatus cst
) {
845 if (auto ct
= fpk
in contacts
) {
847 if (ct
.status
!= cst
) {
848 conwriteln("status for friend <", ct
.info
.nick
, "> changed to ", cst
);
849 auto ls
= toxCoreLastSeen(toxpk
, fpk
);
850 if (ls
!= SysTime
.min
) {
851 auto lsu
= cast(uint)ls
.toUnixTime();
852 if (ct
.info
.lastonlinetime
!= lsu
) { ct
.info
.lastonlinetime
= lsu
; ct
.markDirty(); }
855 // if it is online, and it is not a friend, turn it into a friend
856 if (ct
.online
&& !ct
.friend
) ct
.kind
= ContactInfo
.Kind
.Friend
;
857 if (ct
.online
) ct
.processResendQueue(); // why not?
858 glconPostScreenRepaint();
863 void toxFriendStatusMessage (in ref PubKey fpk
, string msg
) {
864 if (auto ct
= fpk
in contacts
) {
866 if (ct
.info
.statusmsg
!= msg
) {
867 conwriteln("status message for friend <", ct
.info
.nick
, "> changed to <", msg
, ">");
868 ct
.info
.statusmsg
= msg
;
870 if (ct
.showPopup
) showPopup(PopupWindow
.Kind
.Status
, ct
.nick
, (msg
.length ? msg
: "<nothing>"));
871 glconPostScreenRepaint();
876 void toxFriendNickChanged (in ref PubKey fpk
, string nick
) {
877 if (auto ct
= fpk
in contacts
) {
878 nick
= nick
.xstrip();
879 if (nick
.length
&& ct
.info
.nick
!= nick
) {
880 auto onick
= ct
.info
.nick
;
883 if (ct
.showPopup
) showPopup(PopupWindow
.Kind
.Status
, ct
.nick
, "changed nick to '"~nick
~"' from '"~onick
~"'");
884 glconPostScreenRepaint();
889 void toxFriendReqest (in ref PubKey fpk
, const(char)[] msg
) {
891 conprintfln("TOX[%s] FRIEND REQUEST FROM [%s]: <%s>", timp
.srvalias
, tox_hex(fpk
[]), msg
);
892 if (auto ct
= fpk
in contacts
) {
894 // if not waiting for acceptance, force-friend it
895 if (!ct
.acceptPending
) {
896 conwriteln("force-friend <", ct
.info
.nick
, ">");
897 toxCoreAddFriend(toxpk
, fpk
);
899 ct
.kind
= ContactInfo
.Kind
.PengingAuthAccept
;
900 ct
.info
.statusmsg
= msg
.idup
;
902 ct
.setLastOnlineNow();
904 showPopup(PopupWindow
.Kind
.Info
, "Friend Accepted", (msg
.length ? msg
: "<nothing>"));
906 // new friend request
907 conwriteln("AUTH REQUEST from pk [", tox_hex(fpk
), "]");
908 auto c
= new Contact(this);
911 c
.info
.pubkey
[] = fpk
[];
912 c
.info
.opts
.showOffline
= TriOption
.Default
;
913 c
.info
.statusmsg
= msg
.idup
;
914 c
.kind
= ContactInfo
.Kind
.PengingAuthAccept
;
915 contacts
[c
.info
.pubkey
] = c
;
916 c
.setLastOnlineNow();
918 showPopup(PopupWindow
.Kind
.Info
, "Friend Request", (msg
.length ? msg
: "<nothing>"));
920 if (clist
!is null) clist
.buildAccount(this);
922 glconPostScreenRepaint();
925 void toxFriendMessage (in ref PubKey fpk
, bool action
, string msg
, SysTime time
) {
926 if (auto ct
= fpk
in contacts
) {
927 bool doPopup
= ct
.showPopup
;
928 LogFile
.Msg
.Kind kind
= LogFile
.Msg
.Kind
.Incoming
;
929 ct
.appendToLog(kind
, msg
, action
, time
);
930 if (*ct
is activeContact
) {
931 // if inactive or invisible, add divider line and increase unread count
932 if (!mainWindowVisible ||
!mainWindowActive
) {
933 if (ct
.unreadCount
== 0) addDividerLine();
935 ct
.saveUnreadCount();
939 addTextToLog(this, *ct
, kind
, action
, msg
, time
);
942 ct
.saveUnreadCount();
944 if (doPopup
) showPopup(PopupWindow
.Kind
.Incoming
, ct
.nick
, msg
);
948 // ack for sent message
949 void toxMessageAck (in ref PubKey fpk
, long msgid
) {
951 conprintfln("TOX[%s] ACK MESSAGE FROM [%s]: %u", timp
.srvalias
, tox_hex(fpk
[]), msgid
);
952 if (auto ct
= fpk
in contacts
) {
953 if (*ct
is activeContact
) ackLogMessage(msgid
);
954 ct
.ackReceived(msgid
);
959 @property string
srvalias () const pure nothrow @safe @nogc => info
.nick
;
965 if (toxDataDiskName
.length
== 0) return false;
966 lockf
= LockFile(toxDataDiskName
~".lock");
967 if (!lockf
.tryLock
) {
974 void createWithBaseDir (string aBaseDir
) {
975 import std
.algorithm
: sort
;
976 import std
.file
: DirEntry
, SpanMode
, dirEntries
;
977 import std
.path
: baseName
;
979 basePath
= normalizeBaseDir(aBaseDir
);
980 toxDataDiskName
= basePath
~"toxdata.tox";
982 if (!tryLockIt
) throw new Exception("cannot activate already active account");
984 protoOpts
.txtunser(VFile(basePath
~"proto.rc"));
985 info
.txtunser(VFile(basePath
~"config.rc"));
988 GroupOptions
[] glist
;
989 glist
.txtunser(VFile(basePath
~"contacts/groups.rc"));
990 bool hasDefaultGroup
= false;
991 bool hasMoronsGroup
= false;
992 foreach (ref GroupOptions gi
; glist
[]) {
993 auto g
= new Group(this);
996 foreach (ref gg
; groups
[]) if (gg
.gid
== g
.gid
) { delete gg
; gg
= g
; found
= true; }
997 if (!found
) groups
~= g
;
998 if (g
.gid
== 0) hasDefaultGroup
= true;
999 if (g
.gid
== g
.gid
.max
-2) hasMoronsGroup
= true;
1002 // create default group if necessary
1003 if (!hasDefaultGroup
) {
1006 gi
.name
= "default";
1007 gi
.note
= "default group for new contacts";
1009 auto g
= new Group(this);
1014 // create morons group if necessary
1015 if (!hasMoronsGroup
) {
1017 gi
.gid
= gi
.gid
.max
-2;
1018 gi
.name
= "<morons>";
1019 gi
.note
= "group for completely ignored dumbfucks";
1021 gi
.showOffline
= TriOption
.No
;
1022 gi
.showPopup
= TriOption
.No
;
1023 gi
.blinkActivity
= TriOption
.No
;
1024 gi
.skipUnread
= TriOption
.Yes
;
1025 gi
.hideIfNoVisibleMembers
= TriOption
.Yes
;
1026 gi
.ftranAllowed
= TriOption
.No
;
1027 gi
.resendRotDays
= 0;
1029 auto g
= new Group(this);
1035 groups
.sort
!((in ref a
, in ref b
) => a
.gid
< b
.gid
);
1037 if (!hasDefaultGroup ||
!hasMoronsGroup
) saveGroups();
1039 static bool isValidCDName (const(char)[] str) {
1040 if (str.length
!= 64) return false;
1041 foreach (immutable char ch
; str) {
1042 if (ch
>= '0' && ch
<= '9') continue;
1043 if (ch
>= 'A' && ch
<= 'F') continue;
1044 if (ch
>= 'a' && ch
<= 'f') continue;
1051 foreach (DirEntry
de; dirEntries(basePath
~"contacts", SpanMode
.shallow
)) {
1052 if (de.name
.baseName
== "." ||
de.name
.baseName
== ".." ||
!isValidCDName(de.name
.baseName
)) continue;
1054 import std
.file
: exists
;
1055 if (!de.isDir
) continue;
1056 string cfgfn
= de.name
~"/config.rc";
1057 if (!cfgfn
.exists
) continue;
1059 ci
.txtunser(VFile(cfgfn
));
1060 auto c
= new Contact(this);
1061 c
.diskFileName
= cfgfn
;
1063 contacts
[c
.info
.pubkey
] = c
;
1064 c
.loadResendQueue();
1065 c
.loadUnreadCount();
1066 // fix contact group
1067 if (groupById
!false(c
.gid
) is null) {
1068 c
.info
.gid
= 0; // move to default group
1071 //conwriteln("loaded contact [", c.info.nick, "] from '", c.diskFileName, "'");
1072 } catch (Exception e
) {
1073 conwriteln("ERROR loading contact from '", de.name
, "/config.rc'");
1078 assert(toxpk
.isValidKey
, "something is VERY wrong here");
1079 conwriteln("created ToxCore for [", tox_hex(toxpk
[]), "]");
1083 this (string aBaseDir
) { createWithBaseDir(aBaseDir
); }
1086 if (toxpk
.isValidKey
) {
1087 toxCoreCloseAccount(toxpk
);
1088 toxpk
[] = toxCoreEmptyKey
[];
1092 // save account info (but not contacts)
1094 serialize(info
, basePath
~"config.rc");
1097 // will not write contact to disk
1098 Contact
createEmptyContact () {
1099 auto c
= new Contact(this);
1101 c
.info
.nick
= "test contact";
1102 c
.info
.pubkey
[] = 0;
1106 // returns `null` if there is no such group, and `dofail` is `true`
1107 inout(Group
) groupById(bool dofail
=true) (uint agid
) inout nothrow @nogc {
1108 foreach (const Group g
; groups
) if (g
.gid
== agid
) return cast(inout)g
;
1109 static if (dofail
) assert(0, "group not found"); else return null;
1112 int opApply () (scope int delegate (ref Contact ct
) dg
) {
1113 foreach (Contact ct
; contacts
.byValue
) if (auto res
= dg(ct
)) return res
;
1117 // returns gid, or uint.max on error
1118 uint findGroupByName (const(char)[] name
) nothrow {
1119 if (name
.length
== 0) return uint.max
;
1120 foreach (const Group g
; groups
) if (g
.name
== name
) return g
.gid
;
1124 // returns gid, or uint.max on error
1125 uint createGroup(T
:const(char)[]) (T name
) nothrow {
1126 if (name
.length
== 0) return uint.max
;
1127 // groups are sorted by gid, yeah
1129 foreach (const Group g
; groups
) {
1130 if (g
.name
== name
) return g
.gid
;
1131 if (newgid
== g
.gid
) newgid
= g
.gid
+1;
1133 if (newgid
== uint.max
) return uint.max
;
1137 static if (is(T
== string
)) gi
.name
= name
; else gi
.name
= name
.idup
;
1139 auto g
= new Group(this);
1142 import std
.algorithm
: sort
;
1143 groups
.sort
!((in ref a
, in ref b
) => a
.gid
< b
.gid
);
1148 // returns `false` on any error
1149 bool moveContactToGroup (Contact ct
, uint gid
) nothrow {
1150 if (ct
is null || gid
== uint.max
) return false;
1151 // check if this is our contact
1153 foreach (Contact cc
; contacts
.byValue
) if (cc
is ct
) { found
= true; break; }
1154 if (!found
) return false;
1157 foreach (Group g
; groups
) if (g
.gid
== gid
) { grp
= g
; break; }
1158 if (grp
is null) return false;
1160 if (ct
.info
.gid
!= gid
) {
1167 // returns `false` on any error
1168 bool removeContact (Contact ct
) {
1169 if (ct
is null ||
!isOnline
) return false;
1170 // check if this is our contact
1172 foreach (Contact cc
; contacts
.byValue
) if (cc
is ct
) { found
= true; break; }
1173 if (!found
) return false;
1174 toxCoreRemoveFriend(toxpk
, ct
.info
.pubkey
);
1176 contacts
.remove(ct
.info
.pubkey
);
1178 if (clist
!is null) {
1179 if (clist
.isActiveContact(ct
.info
.pubkey
)) clist
.resetActiveItem();
1180 clist
.buildAccount(this);
1183 ct.kind = ContactInfo.Kind.KillFuckDie;
1190 static string
normalizeBaseDir (string aBaseDir
) {
1191 import std
.path
: absolutePath
, expandTilde
;
1192 if (aBaseDir
.length
== 0 || aBaseDir
== "." || aBaseDir
[$-1] == '/') throw new Exception("invalid base dir");
1193 if (aBaseDir
.indexOf('/') < 0) aBaseDir
= "~/.bioacid/"~aBaseDir
;
1194 aBaseDir
= aBaseDir
.expandTilde
.absolutePath
;
1195 if (aBaseDir
[$-1] != '/') aBaseDir
~= '/';
1200 static Account
CreateNew (string aBaseDir
, string aAccName
) {
1201 aBaseDir
= normalizeBaseDir(aBaseDir
);
1202 auto lockf
= LockFile(aBaseDir
~"toxdata.tox.lock");
1203 if (!lockf
.tryLock
) {
1205 throw new Exception("cannot create locked account");
1207 mkdirRec(aBaseDir
~"contacts");
1208 // write protocol options
1211 serialize(popt
, aBaseDir
~"proto.rc");
1216 acc
.nick
= aAccName
;
1217 acc
.showPopup
= true;
1218 acc
.blinkActivity
= true;
1219 acc
.hideEmptyGroups
= false;
1220 acc
.ftranAllowed
= true;
1221 acc
.resendRotDays
= 4;
1223 serialize(acc
, aBaseDir
~"config.rc");
1225 // create default group
1227 GroupOptions
[1] grp
;
1229 grp
[0].name
= "default";
1230 grp
[0].opened
= true;
1231 //grp[0].hideIfNoVisible = TriOption.Yes;
1232 serialize(grp
[], aBaseDir
~"contacts/groups.rc");
1235 return new Account(aBaseDir
);
1240 // ////////////////////////////////////////////////////////////////////////// //
1241 void setupToxEventListener (SimpleWindow sdmain
) {
1242 assert(sdmain
!is null);
1244 sdmain
.addEventListener((ToxEventBase evt
) {
1245 auto acc
= clist
.accountByPK(evt
.self
);
1247 if (acc
is null) return;
1249 bool fixTray
= false;
1250 scope(exit
) { if (fixTray
) fixTrayIcon(); glconPostScreenRepaint(); }
1253 if (auto e
= cast(ToxEventConnection
)evt
) {
1254 if (e
.who
[] == acc
.toxpk
[]) {
1255 if (e
.connected
) acc
.toxConnectionEstablished(); else acc
.toxConnectionDropped();
1258 if (!e
.connected
) acc
.toxFriendOffline(e
.who
);
1263 if (auto e
= cast(ToxEventStatus
)evt
) {
1264 if (e
.who
[] == acc
.toxpk
[]) {
1265 acc
.toxSelfStatus(e
.status
);
1268 acc
.toxFriendStatus(e
.who
, e
.status
);
1273 if (auto e
= cast(ToxEventStatusMsg
)evt
) {
1274 if (e
.who
[] != acc
.toxpk
[]) acc
.toxFriendStatusMessage(e
.who
, e
.message
);
1278 if (auto e
= cast(ToxEventNick
)evt
) {
1279 if (e
.who
[] != acc
.toxpk
[]) acc
.toxFriendNickChanged(e
.who
, e
.nick
);
1282 // incoming text message?
1283 if (auto e
= cast(ToxEventMessage
)evt
) {
1284 if (e
.who
[] != acc
.toxpk
[]) {
1285 acc
.toxFriendMessage(e
.who
, e
.action
, e
.message
, e
.time
);
1290 // ack outgoing text message?
1291 if (auto e
= cast(ToxEventMessageAck
)evt
) {
1292 if (e
.who
[] != acc
.toxpk
[]) acc
.toxMessageAck(e
.who
, e
.msgid
);
1296 if (auto e
= cast(ToxEventFriendReq
)evt
) {
1297 if (e
.who
[] != acc
.toxpk
[]) acc
.toxFriendReqest(e
.who
, e
.message
);
1301 //glconProcessEventMessage();