* temporary tracing messages
[citadel.git] / webcit / roomops.c
index bda4375edacfbb3cbbf64a96613c5a9da6dd810e..81f7de206ea7438ee0e51008d617aedd8c9ac8f7 100644 (file)
@@ -6,25 +6,30 @@
 #include "webcit.h"
 #include "webserver.h"
 #define MAX_FLOORS 128
-char floorlist[MAX_FLOORS][SIZ]; /**< list of our floor names */
-
-char *viewdefs[9]; /**< the different kinds of available views */
-
-/** See GetFloorListHash and GetRoomListHash for info on these. Basically we pull LFLR/LKRA etc. and set up a room HashList with these keys. */
-const char FLOOR_PARAM_NAMES[(FLOOR_PARAM_LEN + 1)][15] = {"ID",
-                                                          "NAME", 
-                                                          "ROOMS"};
-const char ROOM_PARAM_NAMES[(ROOM_PARAM_LEN + 1)][20] = {"NAME",
-                                                        "FLAG",
-                                                        "FLOOR",
-                                                        "LISTORDER",
-                                                        "ACL",
-                                                        "CURVIEW",
-                                                        "DEFVIEW",
-                                                        "LASTCHANGE"};
-/* Because avoiding strlen at run time is a Good Thing(TM) */
-const int FLOOR_PARAM_NAMELEN[(FLOOR_PARAM_LEN +1)] = {2, 4, 5};
-const int ROOM_PARAM_NAMELEN[(ROOM_PARAM_LEN +1)] = {4, 4, 5, 9, 3, 7, 7, 8};
+
+char floorlist[MAX_FLOORS][SIZ];       /* list of our floor names */
+
+char *viewdefs[9];                     /* the different kinds of available views */
+
+/* See GetFloorListHash and GetRoomListHash for info on these.
+ * Basically we pull LFLR/LKRA etc. and set up a room HashList with these keys.
+ */
+
+#define FLOOR_PARAM_LEN 3
+const ConstStr FLOOR_PARAM_NAMES[] = {{HKEY("ID")},
+                                     {HKEY("NAME")}, 
+                                     {HKEY("ROOMS")}};
+
+#define ROOM_PARAM_LEN 8
+const ConstStr ROOM_PARAM_NAMES[] = {{HKEY("NAME")},
+                                    {HKEY("FLAG")},
+                                    {HKEY("FLOOR")},
+                                    {HKEY("LISTORDER")},
+                                    {HKEY("ACL")},
+                                    {HKEY("CURVIEW")},
+                                    {HKEY("DEFVIEW")},
+                                    {HKEY("LASTCHANGE")}};
+
 
 void display_whok(void);
 
@@ -182,11 +187,8 @@ void room_tree_list(struct roomlisting *rp)
 }
 
 
-/** 
- * \brief Room ordering stuff (compare first by floor, then by order)
- * \param r1 first roomlist to compare
- * \param r2 second roomlist co compare
- * \return are they the same???
+/* 
+ * Room ordering stuff (compare first by floor, then by order)
  */
 int rordercmp(struct roomlisting *r1, struct roomlisting *r2)
 {
@@ -208,9 +210,8 @@ int rordercmp(struct roomlisting *r1, struct roomlisting *r2)
 }
 
 
-/**
- * \brief Common code for all room listings
- * \param variety what???
+/*
+ * Common code for all room listings
  */
 void listrms(char *variety)
 {
@@ -221,7 +222,7 @@ void listrms(char *variety)
        struct roomlisting *rp;
        struct roomlisting *rs;
 
-       /** Ask the server for a room list */
+       /* Ask the server for a room list */
        serv_puts(variety);
        serv_getln(buf, sizeof buf);
        if (buf[0] != '1') {
@@ -264,7 +265,7 @@ void listrms(char *variety)
 
        room_tree_list(rl);
 
-       /**
+       /*
         * If no rooms were listed, print an nbsp to make the cell
         * borders show up anyway.
         */
@@ -272,8 +273,8 @@ void listrms(char *variety)
 }
 
 
-/**
- * \brief list all forgotten rooms
+/*
+ * list all forgotten rooms
  */
 void zapped_list(void)
 {
@@ -298,8 +299,8 @@ void zapped_list(void)
 }
 
 
-/**
- * \brief read this room's info file (set v to 1 for verbose mode)
+/*
+ * read this room's info file (set v to 1 for verbose mode)
  */
 void readinfo(StrBuf *Target, WCTemplputParams *TP)
 {
@@ -324,14 +325,15 @@ void readinfo(StrBuf *Target, WCTemplputParams *TP)
 
                 wprintf("<div class=\"infos\" "
                        "onclick=\"javascript:Effect.Appear('room_infos', { duration: 0.5 });\" "
-                       ">");
+                       ">"
+               );
                escputs(briefinfo);
                 wprintf("</div><div id=\"room_infos\" style=\"display:none;\">");
                wprintf("<img class=\"close_infos\" "
                        "onclick=\"javascript:Effect.Fade('room_infos', { duration: 0.5 });\" "
                        "src=\"static/closewindow.gif\" alt=\"%s\"  width=\"16\" height=\"16\">",
                        _("Close window")
-                       );
+               );
                escputs(fullinfo);
                 wprintf("</div>");
        }
@@ -343,12 +345,10 @@ void readinfo(StrBuf *Target, WCTemplputParams *TP)
 
 
 
-/**
- * \brief Display room banner icon.  
- * The server doesn't actually
- * need the room name, but we supply it in order to
- * keep the browser from using a cached icon from 
- * another room.
+/*
+ * Display room banner icon.  
+ * The server doesn't actually need the room name, but we supply it in
+ * order to keep the browser from using a cached icon from another room.
  */
 void embed_room_graphic(StrBuf *Target, WCTemplputParams *TP)
 {
@@ -404,8 +404,8 @@ void embed_room_graphic(StrBuf *Target, WCTemplputParams *TP)
 
 
 
-/**
- * \brief Display the current view and offer an option to change it
+/*
+ * Display the current view and offer an option to change it
  */
 void embed_view_o_matic(StrBuf *Target, WCTemplputParams *TP)
 {
@@ -422,17 +422,17 @@ void embed_view_o_matic(StrBuf *Target, WCTemplputParams *TP)
                "[selectedIndex].value\">\n");
 
        for (i=0; i<(sizeof viewdefs / sizeof (char *)); ++i) {
-               /**
+               /*
                 * Only offer the views that make sense, given the default
                 * view for the room.  For example, don't offer a Calendar
                 * view in a non-Calendar room.
                 */
                if (
                        (i == WC->wc_view)
-                       ||      (i == WC->wc_default_view)                      /**< default */
-                       ||      ( (i == 0) && (WC->wc_default_view == 1) )      /**< mail or bulletin */
-                       ||      ( (i == 1) && (WC->wc_default_view == 0) )      /**< mail or bulletin */
-                       /** ||  ( (i == 7) && (WC->wc_default_view == 3) )      (calendar list temporarily disabled) */
+                       ||      (i == WC->wc_default_view)                      /* default */
+                       ||      ( (i == 0) && (WC->wc_default_view == 1) )      /* mail or bulletin */
+                       ||      ( (i == 1) && (WC->wc_default_view == 0) )      /* mail or bulletin */
+                       /* ||   ( (i == 7) && (WC->wc_default_view == 3) )      (calendar list temporarily disabled) */
                        ) {
 
                        wprintf("<option %s value=\"changeview?view=%d\">",
@@ -446,8 +446,8 @@ void embed_view_o_matic(StrBuf *Target, WCTemplputParams *TP)
 }
 
 
-/**
- * \brief Display a search box
+/*
+ * Display a search box
  */
 void embed_search_o_matic(StrBuf *Target, WCTemplputParams *TP)
 {
@@ -463,11 +463,11 @@ void embed_search_o_matic(StrBuf *Target, WCTemplputParams *TP)
 }
 
 
-/**
- * \brief              Embed the room banner
+/*
+ * Embed the room banner
  *
- * \param got          The information returned from a GOTO server command
- * \param navbar_style         Determines which navigation buttons to display
+ * got                 The information returned from a GOTO server command
+ * navbar_style        Determines which navigation buttons to display
  *
  */
 
@@ -478,7 +478,7 @@ void embed_room_banner(char *got, int navbar_style) {
        char with_files[256];
        int file_count=0;
        
-       /**
+       /*
         * We need to have the information returned by a GOTO server command.
         * If it isn't supplied, we fake it by issuing our own GOTO.
         */
@@ -490,25 +490,27 @@ void embed_room_banner(char *got, int navbar_style) {
                got = buf;
        }
 
-       /** The browser needs some information for its own use */
+       /* The browser needs some information for its own use */
        wprintf("<script type=\"text/javascript\">      \n"
                "       room_is_trash = %d;             \n"
                "</script>\n",
                WC->wc_is_trash
-               );
+       );
 
-       /**
+       /*
         * If the user happens to select the "make this my start page" link,
         * we want it to remember the URL as a "/dotskip" one instead of
         * a "skip" or "gotonext" or something like that.
         */
-       if (WCC->Hdr->this_page == NULL)
+       if (WCC->Hdr->this_page == NULL) {
                WCC->Hdr->this_page = NewStrBuf();
+       }
        StrBufPrintf(WCC->Hdr->this_page, 
                     "dotskip?room=%s",
-                    ChrPtr(WC->wc_roomname));
+                    ChrPtr(WC->wc_roomname)
+       );
 
-       /** Check for new mail. */
+       /* Check for new mail. */
        WC->new_mail = extract_int(&got[4], 9);
        WC->wc_view = extract_int(&got[4], 11);
 
@@ -799,13 +801,17 @@ long gotoroom(const StrBuf *gname)
        static long ls = (-1L);
        long err = 0;
 
+       lprintf(9, "%s:%d gotoroom(%s)\n", __FILE__, __LINE__, ChrPtr(gname));
+
        /* store ungoto information */
        strcpy(WC->ugname, ChrPtr(WC->wc_roomname));
        WC->uglsn = ls;
        Buf = NewStrBuf();
-       /** move to the new room */
+
+       /* move to the new room */
        serv_printf("GOTO %s", ChrPtr(gname));
        StrBuf_ServGetln(Buf);
+       lprintf(9, "%s:%d server reply: %s\n", __FILE__, __LINE__, ChrPtr(Buf));
        if  (GetServerStatus(Buf, &err) != 2) {
                serv_puts("GOTO _BASEROOM_");
                StrBuf_ServGetln(Buf);
@@ -826,6 +832,7 @@ long gotoroom(const StrBuf *gname)
                FlushStrBuf(WC->wc_roomname);
 
        StrBufExtract_token(WC->wc_roomname, Buf, 0, '|');
+       lprintf(9, "%s:%d extracted room name: %s\n", __FILE__, __LINE__, ChrPtr(WC->wc_roomname));
        StrBufCutLeft(WC->wc_roomname, 4);
        WC->room_flags = StrBufExtract_int(Buf, 4, '|');
        /* highest_msg_read = extract_int(&buf[4],6);
@@ -985,6 +992,7 @@ void gotonext(void)
  * goto next room
  */
 void smart_goto(const StrBuf *next_room) {
+       lprintf(9, "%s:%d smart_goto(%s)\n", __FILE__, __LINE__, ChrPtr(next_room));
        gotoroom(next_room);
        readloop(readnew);
 }
@@ -3766,17 +3774,18 @@ HashList *GetFloorListHash(StrBuf *Target, WCTemplputParams *TP) {
        if (GetServerStatus(Buf, NULL) == 1) 
                while(StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err), strcmp(ChrPtr(Buf), "000")) {
                        int a;
-                       const char *floorNum = NULL;
+                       const StrBuf *floorNum = NULL;
                        floor = NewHash(1, NULL);
                        for(a=0; a<FLOOR_PARAM_LEN; a++) {
                                Buf2 = NewStrBuf();
                                StrBufExtract_token(Buf2, Buf, a, '|');
                                if (a==0) {
-                                       floorNum = ChrPtr(Buf2); /* hmm, should we copy Buf2 first? */
+                                       floorNum = Buf2; /* hmm, should we copy Buf2 first? */
+                                       
                                }
-                               Put(floor, FPKEY(a), Buf2, NULL);
+                               Put(floor, CKEY(FLOOR_PARAM_NAMES[a]), Buf2, HFreeStrBuf);
                        }
-                       Put(floors, HKEY(floorNum), floor, NULL);
+                       Put(floors, SKEY(floorNum), floor, HDeleteHash);
                }
        FreeStrBuf(&Buf);
        return floors;
@@ -3810,17 +3819,17 @@ HashList *GetRoomListHash(StrBuf *Target, WCTemplputParams *TP)
        if (GetServerStatus(buf, NULL) == 1) 
                while(StrBufTCP_read_line(buf, &WC->serv_sock, 0, &Err), strcmp(ChrPtr(buf), "000")) {
                        int i;
-                       const char *rmName = NULL;
+                       StrBuf *rmName = NULL;
                        room = NewHash(1, NULL);
                        for(i=0; i<ROOM_PARAM_LEN; i++) {
                                buf2 = NewStrBuf();
                                StrBufExtract_token(buf2, buf, i, '|');
                                if (i==0) {
-                                       rmName = ChrPtr(buf2);
+                                       rmName = buf2;
                                }
-                               Put(room, RPKEY(i), buf2, HFreeStrBuf);
+                               Put(room, CKEY(ROOM_PARAM_NAMES[i]), buf2, HFreeStrBuf);
                        }
-                       Put(rooms, rmName, strlen(rmName), room, HDeleteHash);
+                       Put(rooms, SKEY(rmName), room, HDeleteHash);
                }
        SortByHashKey(rooms, 1);
        /*SortByPayload(rooms, SortRoomsByListOrder);  */
@@ -3837,8 +3846,8 @@ int SortRoomsByListOrder(const void *room1, const void *room2)
        StrBuf *listOrderBuf1;
        StrBuf *listOrderBuf2;
   
-       GetHash(r1, RPKEY(3), (void *)&listOrderBuf1);
-       GetHash(r2, RPKEY(3), (void *)&listOrderBuf2);
+       GetHash(r1, CKEY(ROOM_PARAM_NAMES[3]), (void *)&listOrderBuf1);
+       GetHash(r2, CKEY(ROOM_PARAM_NAMES[3]), (void *)&listOrderBuf2);
        l1 = atoi(ChrPtr(listOrderBuf1));
        l2 = atoi(ChrPtr(listOrderBuf2));
        if (l1 < l2) return -1;
@@ -3867,14 +3876,26 @@ void jsonRoomFlr(void)
        DoTemplate(HKEY("json_roomflr"),NULL,&NoCtx);
        end_burst(); 
 }
+
 void tmplput_RoomName(StrBuf *Target, WCTemplputParams *TP)
 {
        StrBufAppendTemplate(Target, TP, WC->wc_roomname, 0);
 }
 
-void _gotonext(void) { slrp_highest(); gotonext(); }
-void dotskip(void) {smart_goto(sbstr("room"));}
-void _display_private(void) { display_private("", 0); }
+void _gotonext(void) {
+       slrp_highest();
+       gotonext();
+}
+
+void dotskip(void) {
+       lprintf(9, "%s:%d dotskip?room=%s\n", __FILE__, __LINE__, ChrPtr(sbstr("room")));
+       smart_goto(sbstr("room"));
+}
+
+void _display_private(void) {
+       display_private("", 0);
+}
+
 void dotgoto(void) {
        if (WC->wc_view != VIEW_MAILBOX) {      /* dotgoto acts like dotskip when we're in a mailbox view */
                slrp_highest();
@@ -4135,7 +4156,7 @@ InitModule_ROOMOPS
        RegisterNamespace("ROOM:UNGOTO", 0, 0, tmplput_ungoto, 0);
        RegisterIterator("FLOORS", 0, NULL, GetFloorListHash, NULL, DeleteHash, CTX_FLOORS, CTX_NONE, IT_NOFLAG);
        RegisterNamespace("FLOOR:INFO", 1, 2, tmplput_FLOOR_Value, CTX_FLOORS);
-       RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, NULL, CTX_ROOMS, CTX_NONE, IT_NOFLAG);
+       RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_NOFLAG);
        RegisterNamespace("ROOM:INFO", 1, 2, tmplput_ROOM_Value, CTX_ROOMS);
 }