X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=gaim-citadel%2Fcitadel.lua;h=cfbe2b04ceb83369d3e19a32fb7495f9ed0c8907;hb=b2971ed49d2cfe5128190ec1d5d8c0fa239f0004;hp=07932fea25bd8af5b2dfffa7481f457e41a8200e;hpb=16ebc94c4335146d0af8afc26931fefa7cf76634;p=citadel.git

diff --git a/gaim-citadel/citadel.lua b/gaim-citadel/citadel.lua
index 07932fea2..cfbe2b04c 100644
--- a/gaim-citadel/citadel.lua
+++ b/gaim-citadel/citadel.lua
@@ -2,7 +2,7 @@
 -- Gaim Citadel plugin.
 --
 -- © 2006 David Given.
--- This code is licensed under the GPL v2. See the file COPYING in this
+-- This code is licensed under the GPL v3. See the file COPYING in this
 -- directory for the full license text.
 --
 -- $Id:citadel.lua 4326 2006-02-18 12:26:22Z hjalfi $
@@ -13,6 +13,7 @@
 
 local _
 local username, servername, port
+local serverfriendlyname
 local ga, gc
 local fd, gsc
 local timerhandle
@@ -23,6 +24,10 @@ local buddies = {}
 --                                CONSTANTS                                --
 -----------------------------------------------------------------------------
 
+-- Our version number. Remember to update!
+
+local VERSION_NUMBER = "0.3.1"
+
 -- Special values returned as Citadel's response codes.
 
 local LISTING_FOLLOWS         = 100
@@ -78,7 +83,7 @@ local function log(...)
 		table.insert(s, tostring(i))
 	end
 	s = table.concat(s)
-	gaim_debug_info("citadel", (string.gsub(s, "%%", "%%")))
+	gaim_debug_info("citadel", string.gsub(s, "%%", "%%").."\n")
 end
 
 local function unexpectederror()
@@ -382,11 +387,20 @@ local function update_buddy_status()
 
 		if noblist then
 			if not gaim_find_buddy(ga, s) then
+				log("trying to add new buddy ", s)
 				local buddy = gaim_buddy_new(ga, s, s)
-				local group = gaim_group_new("Citadel")
 				if buddy then
 					-- buddy is not garbage collected! This must succeed!
+					local group = gaim_find_group(serverfriendlyname)
+					if not group then
+						group = gaim_group_new(serverfriendlyname)
+						gaim_blist_add_group(group, nil)
+					end
+					
 					gaim_blist_add_buddy(buddy, nil, group, nil)
+				else
+					warning("Unable to add "..s.." to your buddy list. This error should never happen.")
+					break
 				end
 			end
 		end
@@ -426,10 +440,11 @@ function citadel_connect(_ga)
 	gc = gaim_account_get_connection(ga)
 	
 	queue(function()
-		local STEPS = 13
+		local STEPS = 14
 
 		username = gaim_account_get_username(ga)
 		_, _, username, servername = string.find(username, "^(.*)@(.*)$")
+		serverfriendlyname = servername
 		port = gaim_account_get_int(ga, "port", CITADEL_DEFAULT_PORT)
 		noblist = gaim_account_get_bool(ga, "no_blist", false)
 		
@@ -495,12 +510,19 @@ function citadel_connect(_ga)
 		-- Tell Citadel who we are.
 		
 		gaim_connection_update_progress(gc, "Setting up", 6, STEPS)
-		writeline("IDEN 226|0|0.2|Gaim Citadel plugin|")
+		writeline("IDEN 226|0|"..VERSION_NUMBER.."|Gaim Citadel plugin|")
 		m = get_response()
 		
-		-- Set asynchronous mode.
+		-- Get information about the Citadel server.
 		
 		gaim_connection_update_progress(gc, "Setting up", 7, STEPS)
+		writeline("INFO")
+		m = get_response()
+		serverfriendlyname = m.xargs[3]
+		
+		-- Set asynchronous mode.
+		
+		gaim_connection_update_progress(gc, "Setting up", 8, STEPS)
 		writeline("ASYN 1")
 		m = get_response()
 		if (m.response ~= CIT_OK) then
@@ -510,7 +532,7 @@ function citadel_connect(_ga)
 		(function()
 			-- Switch to private configuration room.
 
-			gaim_connection_update_progress(gc, "Setting up", 8, STEPS)
+			gaim_connection_update_progress(gc, "Setting up", 9, STEPS)
 			writeline("GOTO "..CITADEL_CONFIG_ROOM.."||1")
 			m = get_response()
 			if (m.response ~= CIT_OK) then
@@ -520,7 +542,7 @@ function citadel_connect(_ga)
 
 			-- Look for our preferences.
 
-			gaim_connection_update_progress(gc, "Setting up", 9, STEPS)
+			gaim_connection_update_progress(gc, "Setting up", 10, STEPS)
 			writeline("MSGS ALL|0|1")
 			m = get_response()
 			if (m.response ~= START_CHAT_MODE) then
@@ -546,7 +568,7 @@ function citadel_connect(_ga)
 				return
 			end
 			
-			gaim_connection_update_progress(gc, "Setting up", 10, STEPS)
+			gaim_connection_update_progress(gc, "Setting up", 11, STEPS)
 			writeline("MSG0 "..m)
 			while true do
 				local s = readline()
@@ -578,12 +600,12 @@ function citadel_connect(_ga)
 
 		-- Update buddy list with who's online.
 
-		gaim_connection_update_progress(gc, "Setting up", 11, STEPS)
+		gaim_connection_update_progress(gc, "Setting up", 12, STEPS)
 		update_buddy_status()
 
 		-- Go back to the Lobby.
 
-		gaim_connection_update_progress(gc, "Setting up", 12, STEPS)
+		gaim_connection_update_progress(gc, "Setting up", 13, STEPS)
 		writeline("GOTO "..WAITING_ROOM)
 		get_response()
 
@@ -594,7 +616,7 @@ function citadel_connect(_ga)
 			
 		-- Done!
 		
-		gaim_connection_update_progress(gc, "Connected", 13, STEPS)
+		gaim_connection_update_progress(gc, "Connected", 14, STEPS)
 		gaim_connection_set_state(gc, GAIM_CONNECTED)
 	end)
 end