--- mqtt/src/daemon.c	2012/07/02 12:52:19	1.2.2.43
+++ mqtt/src/daemon.c	2012/07/03 08:39:39	1.2.2.47
@@ -70,13 +70,15 @@ finiSession(struct tagSession *sess)
 	if (!sess)
 		return;
 
+	schedCancelby(root, taskTIMER, CRITERIA_CALL, sendRetain, NULL);
+
 	if (sess->sess_clean) {
 		if (call.FiniSessPUB)
 			call.FiniSessPUB(&cfg, pub, sess->sess_cid, sess->sess_user, "%");
 		if (call.DeletePUB_subscribe)
 			call.DeletePUB_subscribe(&cfg, pub, sess->sess_cid, "%", sess->sess_user, "%");
-		if (call.WipePUB_topic)
-			call.WipePUB_topic(&cfg, pub, sess->sess_cid, sess->sess_user, -1);
+		if (call.WipePUB_topic)	/* only dynamic messages */
+			call.WipePUB_topic(&cfg, pub, sess->sess_cid, sess->sess_user, 0);
 	}
 
 	while ((store = SLIST_FIRST(&sess->sess_subscr))) {
@@ -219,6 +221,8 @@ startSession(sched_task_t *task)
 	struct tagSession *s, *sess = NULL;
 	int ret, wlen;
 	mqtt_subscr_t *subs;
+	struct timespec ts = { RETAIN_TIMEOUT, 0 };
+	intptr_t sock;
 
 	ioTRACE(4);
 
@@ -282,7 +286,8 @@ startSession(sched_task_t *task)
 		TAILQ_FOREACH(s, &Sessions, sess_node)
 			if (!strcmp(s->sess_cid, sess->sess_cid)) {
 				/* found stale session & disconnect it! */
-				schedCancelby(root, taskMAX, CRITERIA_FD, (void*) s->sess_sock, NULL);
+				sock = s->sess_sock;
+				schedCancelby(root, taskMAX, CRITERIA_FD, (void*) sock, NULL);
 				schedWrite(root, leaveClient, s, s->sess_sock, NULL, 0);
 				break;
 			}
@@ -302,14 +307,19 @@ startSession(sched_task_t *task)
 	if (sess->sess_clean) {
 		if (call.DeletePUB_subscribe)
 			call.DeletePUB_subscribe(&cfg, pub, sess->sess_cid, "%", sess->sess_user, "%");
-		if (call.WipePUB_topic)
+		if (call.WipePUB_topic)	/* delete ALL messages */
 			call.WipePUB_topic(&cfg, pub, sess->sess_cid, sess->sess_user, -1);
 	} else if (call.ReadPUB_subscribe) {
+		/* load subscribes */
 		subs = call.ReadPUB_subscribe(&cfg, pub, sess->sess_cid, "%");
 		loadSubscribes(sess, subs);
 		mqtt_subFree(&subs);
 	}
 
+	/* timer event for retain messages */
+	if (call.ReadPUB_topic)
+		schedTimer(root, sendRetain, sess, ts, NULL, 0);
+
 	/* Start session task OK ... */
 	if (!schedRead(root, dispatchSession, sess, TASK_FD(task), NULL, 0)) {
 		ioLIBERR(sched);
@@ -396,6 +406,8 @@ Run(int sock)
 
 	schedPolling(root, &pl, NULL);
 	schedRun(root, &Kill);
+
+	schedCancelby(root, taskTIMER, CRITERIA_CALL, sendRetain, NULL);
 
 	/* free all undeleted elements into lists */
 	TAILQ_FOREACH(sess, &Sessions, sess_node) {