2 * $Id: roomlist.c 7751 2009-08-28 21:13:28Z dothebart $
3 * room listings and filters.
10 void DeleteFloor(void *vFloor)
13 Floor = (floor*) vFloor;
14 FreeStrBuf(&Floor->Name);
18 int SortFloorsByNameOrder(const void *vfloor1, const void *vfloor2)
20 floor *f1 = (floor*) GetSearchPayload(vfloor1);
21 floor *f2 = (floor*) GetSearchPayload(vfloor2);
23 /* prefer My floor over alpabetical sort */
24 if (f1->ID == VIRTUAL_MY_FLOOR)
26 if (f2->ID == VIRTUAL_MY_FLOOR)
29 return strcmp(ChrPtr(f1->Name), ChrPtr(f2->Name));
32 HashList *GetFloorListHash(StrBuf *Target, WCTemplputParams *TP)
48 if (WCC->Floors != NULL)
50 WCC->Floors = floors = NewHash(1, NULL);
53 Floor = malloc(sizeof(floor));
54 Floor->ID = VIRTUAL_MY_FLOOR;
55 Floor->Name = NewStrBufPlain(_("My Folders"), -1);
58 Put(floors, IKEY(Floor->ID), Floor, DeleteFloor);
60 serv_puts("LFLR"); /* get floors */
61 StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err); /* '100', we hope */
62 if (GetServerStatus(Buf, NULL) == 1)
64 while(StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err), strcmp(ChrPtr(Buf), "000"))
69 Floor = malloc(sizeof(floor));
70 Floor->ID = StrBufExtractNext_long(Buf, &Pos, '|');
71 Floor->Name = NewStrBufPlain(NULL, StrLength(Buf));
72 StrBufExtract_NextToken(Floor->Name, Buf, &Pos, '|');
73 Floor->NRooms = StrBufExtractNext_long(Buf, &Pos, '|');
75 Put(floors, IKEY(Floor->ID), Floor, DeleteFloor);
80 /* now lets pre-sort them alphabeticaly. */
82 SortByPayload(floors, SortFloorsByNameOrder);
83 it = GetNewHashPos(floors, 0);
84 while ( GetNextHashPos(floors, it, &HKLen, &HashKey, &vFloor))
85 ((floor*) vFloor)->AlphaN = i++;
87 SortByHashKeyStr(floors);
92 void tmplput_FLOOR_ID(StrBuf *Target, WCTemplputParams *TP)
94 floor *Floor = (floor *)(TP->Context);
96 StrBufAppendPrintf(Target, "%d", Floor->ID);
99 void tmplput_FLOOR_NAME(StrBuf *Target, WCTemplputParams *TP)
101 floor *Floor = (floor *)(TP->Context);
103 StrBufAppendTemplate(Target, TP, Floor->Name, 0);
106 void tmplput_FLOOR_NROOMS(StrBuf *Target, WCTemplputParams *TP)
108 floor *Floor = (floor *)(TP->Context);
110 StrBufAppendPrintf(Target, "%d", Floor->NRooms);
112 HashList *GetRoomListHashLKRA(StrBuf *Target, WCTemplputParams *TP)
116 if (WCC->Floors == NULL)
117 GetFloorListHash(Target, TP);
119 return GetRoomListHash(Target, TP);
122 void DeleteFolder(void *vFolder)
126 room = (folder*) vFolder;
128 FreeStrBuf(&room->name);
130 if (room->RoomNameParts != NULL)
132 for (i=0; i < room->nRoomNameParts; i++)
133 FreeStrBuf(&room->RoomNameParts[i]);
134 free(room->RoomNameParts);
140 HashList *GetRoomListHash(StrBuf *Target, WCTemplputParams *TP)
150 WCTemplputParams SubTP;
153 rooms = NewHash(1, NULL);
154 StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err);
155 if (GetServerStatus(Buf, NULL) == 1)
157 while(StrBufTCP_read_line(Buf, &WC->serv_sock, 0, &Err),
158 strcmp(ChrPtr(Buf), "000"))
162 room = (folder*) malloc (sizeof(folder));
163 memset(room, 0, sizeof(folder));
165 /* Load the base data from the server reply */
166 room->name = NewStrBufPlain(NULL, StrLength(Buf));
167 StrBufExtract_NextToken(room->name, Buf, &Pos, '|');
169 room->QRFlags = StrBufExtractNext_long(Buf, &Pos, '|');
170 room->floorid = StrBufExtractNext_long(Buf, &Pos, '|');
171 room->listorder = StrBufExtractNext_long(Buf, &Pos, '|');
172 room->QRFlags2 = StrBufExtractNext_long(Buf, &Pos, '|');
174 room->RAFlags = StrBufExtractNext_long(Buf, &Pos, '|');
178 room->ACL = NewStrBufPlain(NULL, StrLength(Buf));
179 StrBufExtract_NextToken(room->ACL, Buf, &Pos, '|');
182 room->view = StrBufExtractNext_long(Buf, &Pos, '|');
183 room->defview = StrBufExtractNext_long(Buf, &Pos, '|');
184 room->lastchange = StrBufExtractNext_long(Buf, &Pos, '|');
186 /* Evaluate the Server sent data for later use */
187 /* find out, whether we are in a sub-room */
188 room->nRoomNameParts = StrBufNum_tokens(room->name, '\\');
189 if (room->nRoomNameParts > 1)
194 room->RoomNameParts = malloc(sizeof(StrBuf*) * (room->nRoomNameParts + 1));
195 memset(room->RoomNameParts, 0, sizeof(StrBuf*) * (room->nRoomNameParts + 1));
196 for (i=0; i < room->nRoomNameParts; i++)
198 room->RoomNameParts[i] = NewStrBuf();
199 StrBufExtract_NextToken(room->RoomNameParts[i],
200 room->name, &Pos, '\\');
204 /* Private mailboxes on the main floor get remapped to the personal folder */
205 if ((room->QRFlags & QR_MAILBOX) &&
206 (room->floorid == 0))
208 room->floorid = VIRTUAL_MY_FLOOR;
209 if ((room->nRoomNameParts == 1) &&
210 (StrLength(room->name) == 4) &&
211 (strcmp(ChrPtr(room->name), "Mail") == 0))
217 /* get a pointer to the floor we're on: */
218 GetHash(WCC->Floors, IKEY(room->floorid), &vFloor);
219 room->Floor = (const floor*) vFloor;
223 /* now we know everything, remember it... */
224 Put(rooms, SKEY(room->name), room, DeleteFolder);
228 SubTP.Filter.ContextType = CTX_ROOMS;
229 SortIt = RetrieveSort(&SubTP, NULL, 0, HKEY("fileunsorted"), 0);
231 SortByPayload(rooms, SortIt);
233 SortByPayload(rooms, SortRoomsByListOrder);
238 /** Unused function that orders rooms by the listorder flag */
239 int SortRoomsByListOrder(const void *room1, const void *room2)
241 folder *r1 = (folder*) GetSearchPayload(room1);
242 folder *r2 = (folder*) GetSearchPayload(room2);
244 if (r1->listorder == r2->listorder) return 0;
245 if (r1->listorder > r2->listorder) return 1;
249 int CompareRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
251 folder *r1 = (folder*) GetSearchPayload(room1);
252 folder *r2 = (folder*) GetSearchPayload(room2);
254 if ((r1->Floor == NULL) ||
259 * are we on the same floor? else sort by floor.
261 if (r1->Floor != r2->Floor)
264 * the private rooms are first in any case.
266 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
268 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
271 * else decide alpaheticaly by floorname
273 return (r1->Floor->AlphaN > r2->Floor->AlphaN)? 1 : -1;
277 * if we have different levels of subdirectories,
278 * we want the toplevel to be first, regardless of sort
281 if (((r1->nRoomNameParts > 1) ||
282 (r2->nRoomNameParts > 1) )&&
283 (r1->nRoomNameParts != r2->nRoomNameParts))
286 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
287 r2->nRoomNameParts : r1->nRoomNameParts;
289 for (i=0; i < nparts; i++)
291 ret = strcmp (ChrPtr(r1->name),
294 * Deltas in common parts? exit here.
301 * who's a subdirectory of whom?
303 if (r1->nRoomNameParts > r2->nRoomNameParts)
311 * else just sort alphabeticaly.
313 return strcmp (ChrPtr(r1->name),
317 int CompareRoomListByFloorRoomPrivFirstRev(const void *room1, const void *room2)
319 folder *r1 = (folder*) GetSearchPayload(room1);
320 folder *r2 = (folder*) GetSearchPayload(room2);
322 if ((r1->Floor == NULL) ||
327 * are we on the same floor? else sort by floor.
329 if (r2->Floor != r1->Floor)
332 * the private rooms are first in any case.
334 if (r1->Floor->ID == VIRTUAL_MY_FLOOR)
336 if (r2->Floor->ID == VIRTUAL_MY_FLOOR)
339 * else decide alpaheticaly by floorname
342 return (r1->Floor->AlphaN < r2->Floor->AlphaN)? 1 : -1;
346 * if we have different levels of subdirectories,
347 * we want the toplevel to be first, regardless of sort
350 if (((r1->nRoomNameParts > 1) ||
351 (r2->nRoomNameParts > 1) )&&
352 (r1->nRoomNameParts != r2->nRoomNameParts))
355 int nparts = (r1->nRoomNameParts > r2->nRoomNameParts)?
356 r2->nRoomNameParts : r1->nRoomNameParts;
358 for (i=0; i < nparts; i++)
361 * special cases if one room is top-level...
363 if (r2->nRoomNameParts == 1)
364 ret = strcmp (ChrPtr(r2->name),
365 ChrPtr(r1->RoomNameParts[i]));
366 else if (r1->nRoomNameParts == 1)
367 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
370 ret = strcmp (ChrPtr(r2->RoomNameParts[i]),
371 ChrPtr(r1->RoomNameParts[i]));
373 * Deltas in common parts? exit here.
380 * who's a subdirectory of whom?
382 if (r1->nRoomNameParts > r2->nRoomNameParts)
388 return strcmp (ChrPtr(r2->name),
392 int GroupchangeRoomListByFloorRoomPrivFirst(const void *room1, const void *room2)
394 folder *r1 = (folder*) room1;
395 folder *r2 = (folder*) room2;
398 if ((r1->Floor == NULL) ||
402 if (r1->Floor == r2->Floor)
407 static int columns = 3;
408 int boxes_per_column = 0;
411 nf = GetCount(WCC->Floors);
412 while (nf % columns != 0) ++nf;
413 boxes_per_column = (nf / columns);
414 if (boxes_per_column < 1)
415 boxes_per_column = 1;
416 if (r1->Floor->AlphaN % boxes_per_column == 0)
428 void tmplput_ROOM_NAME(StrBuf *Target, WCTemplputParams *TP)
430 folder *Folder = (folder *)(TP->Context);
432 StrBufAppendTemplate(Target, TP, Folder->name, 0);
434 void tmplput_ROOM_BASENAME(StrBuf *Target, WCTemplputParams *TP)
436 folder *room = (folder *)(TP->Context);
438 if (room->nRoomNameParts > 1)
439 StrBufAppendTemplate(Target, TP,
440 room->RoomNameParts[room->nRoomNameParts - 1], 0);
442 StrBufAppendTemplate(Target, TP, room->name, 0);
444 void tmplput_ROOM_LEVEL_N_TIMES(StrBuf *Target, WCTemplputParams *TP)
446 folder *room = (folder *)(TP->Context);
448 const char *AppendMe;
452 if (room->nRoomNameParts > 1)
454 GetTemplateTokenString(Target, TP, 0, &AppendMe, &AppendMeLen);
455 for (i = 0; i < room->nRoomNameParts; i++)
456 StrBufAppendBufPlain(Target, AppendMe, AppendMeLen, 0);
460 void tmplput_ROOM_ACL(StrBuf *Target, WCTemplputParams *TP)
462 folder *Folder = (folder *)(TP->Context);
464 StrBufAppendPrintf(Target, "%ld", Folder->RAFlags, 0);
468 void tmplput_ROOM_QRFLAGS(StrBuf *Target, WCTemplputParams *TP)
470 folder *Folder = (folder *)(TP->Context);
471 StrBufAppendPrintf(Target, "%d", Folder->QRFlags);
476 void tmplput_ROOM_FLOORID(StrBuf *Target, WCTemplputParams *TP)
478 folder *Folder = (folder *)(TP->Context);
479 StrBufAppendPrintf(Target, "%d", Folder->floorid);
482 void tmplput_ROOM_LISTORDER(StrBuf *Target, WCTemplputParams *TP)
484 folder *Folder = (folder *)(TP->Context);
485 StrBufAppendPrintf(Target, "%d", Folder->listorder);
487 void tmplput_ROOM_VIEW(StrBuf *Target, WCTemplputParams *TP)
489 folder *Folder = (folder *)(TP->Context);
490 StrBufAppendPrintf(Target, "%d", Folder->view);
492 void tmplput_ROOM_DEFVIEW(StrBuf *Target, WCTemplputParams *TP)
494 folder *Folder = (folder *)(TP->Context);
495 StrBufAppendPrintf(Target, "%d", Folder->defview);
497 void tmplput_ROOM_LASTCHANGE(StrBuf *Target, WCTemplputParams *TP)
499 folder *Folder = (folder *)(TP->Context);
500 StrBufAppendPrintf(Target, "%d", Folder->lastchange);
502 void tmplput_ROOM_FLOOR_ID(StrBuf *Target, WCTemplputParams *TP)
504 folder *Folder = (folder *)(TP->Context);
505 const floor *Floor = Folder->Floor;
510 StrBufAppendPrintf(Target, "%d", Floor->ID);
513 void tmplput_ROOM_FLOOR_NAME(StrBuf *Target, WCTemplputParams *TP)
515 folder *Folder = (folder *)(TP->Context);
516 const floor *Floor = Folder->Floor;
521 StrBufAppendTemplate(Target, TP, Floor->Name, 0);
524 void tmplput_ROOM_FLOOR_NROOMS(StrBuf *Target, WCTemplputParams *TP)
526 folder *Folder = (folder *)(TP->Context);
527 const floor *Floor = Folder->Floor;
531 StrBufAppendPrintf(Target, "%d", Floor->NRooms);
536 int ConditionalRoomHas_UA_KNOWN(StrBuf *Target, WCTemplputParams *TP)
538 folder *Folder = (folder *)(TP->Context);
539 return (Folder->RAFlags & UA_KNOWN) != 0;
542 int ConditionalRoomHas_UA_GOTOALLOWED(StrBuf *Target, WCTemplputParams *TP)
544 folder *Folder = (folder *)(TP->Context);
545 return (Folder->RAFlags & UA_GOTOALLOWED) != 0;
548 int ConditionalRoomHas_UA_HASNEWMSGS(StrBuf *Target, WCTemplputParams *TP)
550 folder *Folder = (folder *)(TP->Context);
551 return (Folder->RAFlags & UA_HASNEWMSGS) != 0;
554 int ConditionalRoomHas_UA_ZAPPED(StrBuf *Target, WCTemplputParams *TP)
556 folder *Folder = (folder *)(TP->Context);
557 return (Folder->RAFlags & UA_ZAPPED) != 0;
560 int ConditionalRoomHas_UA_POSTALLOWED(StrBuf *Target, WCTemplputParams *TP)
562 folder *Folder = (folder *)(TP->Context);
563 return (Folder->RAFlags & UA_POSTALLOWED) != 0;
566 int ConditionalRoomHas_UA_ADMINALLOWED(StrBuf *Target, WCTemplputParams *TP)
568 folder *Folder = (folder *)(TP->Context);
569 return (Folder->RAFlags & UA_ADMINALLOWED) != 0;
572 int ConditionalRoomHas_UA_DELETEALLOWED(StrBuf *Target, WCTemplputParams *TP)
574 folder *Folder = (folder *)(TP->Context);
575 return (Folder->RAFlags & UA_DELETEALLOWED) != 0;
579 int ConditionalRoomIsInbox(StrBuf *Target, WCTemplputParams *TP)
581 folder *Folder = (folder *)(TP->Context);
582 return Folder->is_inbox;
585 void tmplput_ROOM_COLLECTIONTYPE(StrBuf *Target, WCTemplputParams *TP)
587 folder *Folder = (folder *)(TP->Context);
589 switch(Folder->view) {
591 StrBufAppendBufPlain(Target, HKEY("vevent"), 0);
594 StrBufAppendBufPlain(Target, HKEY("vtodo"), 0);
596 case VIEW_ADDRESSBOOK:
597 StrBufAppendBufPlain(Target, HKEY("vcard"), 0);
600 StrBufAppendBufPlain(Target, HKEY("vnotes"), 0);
603 StrBufAppendBufPlain(Target, HKEY("vjournal"), 0);
611 int ConditionalRoomHasGroupdavContent(StrBuf *Target, WCTemplputParams *TP)
613 folder *Folder = (folder *)(TP->Context);
615 return ((Folder->view == VIEW_CALENDAR) ||
616 (Folder->view == VIEW_TASKS) ||
617 (Folder->view == VIEW_ADDRESSBOOK) ||
618 (Folder->view == VIEW_NOTES) ||
619 (Folder->view == VIEW_JOURNAL) );
624 int ConditionalFloorIsRESTSubFloor(StrBuf *Target, WCTemplputParams *TP)
628 /** If we have dav_depth the client just wants the _current_ room without subfloors */
629 if (WCC->Hdr->HR.dav_depth == 0)
636 int ConditionalRoomIsRESTSubRoom(StrBuf *Target, WCTemplputParams *TP)
639 folder *Folder = (folder *)(TP->Context);
649 if (Folder->Floor != WCC->CurrentFloor)
652 if (GetCount(WCC->Directory) != Folder->nRoomNameParts)
655 it = GetNewHashPos(WCC->Directory, 0);
656 for (i = 0; i < Folder->nRoomNameParts; i++)
658 if (!GetNextHashPos(WCC->Directory, it, &len, &Key, &vDir) ||
664 Dir = (StrBuf*) vDir;
665 if (strcmp(ChrPtr(Folder->RoomNameParts[i]),
674 /** If we have dav_depth the client just wants the _current_ room without subfloors */
675 if ((WCC->Hdr->HR.dav_depth == 0) &&
676 (i != Folder->nRoomNameParts))
683 void jsonRoomFlr(void)
685 /* Send as our own (application/json) content type */
686 hprintf("HTTP/1.1 200 OK\r\n");
687 hprintf("Content-type: application/json; charset=utf-8\r\n");
688 hprintf("Server: %s / %s\r\n", PACKAGE_STRING, ChrPtr(WC->serv_info->serv_software));
689 hprintf("Connection: close\r\n");
690 hprintf("Pragma: no-cache\r\nCache-Control: no-store\r\nExpires:-1\r\n");
692 DoTemplate(HKEY("json_roomflr"),NULL,&NoCtx);
702 WebcitAddUrlHandler(HKEY("json_roomflr"), "", 0, jsonRoomFlr, 0);
705 RegisterNamespace("FLOOR:ID", 0, 0, tmplput_FLOOR_ID, NULL, CTX_FLOORS);
706 RegisterNamespace("FLOOR:NAME", 0, 1, tmplput_FLOOR_NAME, NULL, CTX_FLOORS);
707 RegisterNamespace("FLOOR:NROOMS", 0, 0, tmplput_FLOOR_NROOMS, NULL, CTX_FLOORS);
708 RegisterConditional(HKEY("COND:ROOM:REST:ISSUBFLOOR"), 0, ConditionalFloorIsRESTSubFloor, CTX_FLOORS);
710 RegisterIterator("LFLR", 0, NULL, GetFloorListHash, NULL, NULL, CTX_FLOORS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
712 RegisterIterator("LKRA", 0, NULL, GetRoomListHashLKRA, NULL, DeleteHash, CTX_ROOMS, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
714 RegisterNamespace("ROOM:INFO:FLOORID", 0, 1, tmplput_ROOM_FLOORID, NULL, CTX_ROOMS);
715 RegisterNamespace("ROOM:INFO:NAME", 0, 1, tmplput_ROOM_NAME, NULL, CTX_ROOMS);
716 RegisterNamespace("ROOM:INFO:PRINT_NAME", 0, 1, tmplput_ROOM_NAME, NULL, CTX_ROOMS);/// TODO!
717 RegisterNamespace("ROOM:INFO:BASENAME", 0, 1, tmplput_ROOM_BASENAME, NULL, CTX_ROOMS);
718 RegisterNamespace("ROOM:INFO:LEVELNTIMES", 1, 2, tmplput_ROOM_LEVEL_N_TIMES, NULL, CTX_ROOMS);
720 RegisterNamespace("ROOM:INFO:ACL", 0, 1, tmplput_ROOM_ACL, NULL, CTX_ROOMS);
721 RegisterNamespace("ROOM:INFO:QRFLAGS", 0, 1, tmplput_ROOM_QRFLAGS, NULL, CTX_ROOMS);
722 RegisterNamespace("ROOM:INFO:LISTORDER", 0, 1, tmplput_ROOM_LISTORDER, NULL, CTX_ROOMS);
723 RegisterNamespace("ROOM:INFO:VIEW", 0, 1, tmplput_ROOM_VIEW, NULL, CTX_ROOMS);
724 RegisterNamespace("ROOM:INFO:DEFVIEW", 0, 1, tmplput_ROOM_DEFVIEW, NULL, CTX_ROOMS);
725 RegisterNamespace("ROOM:INFO:LASTCHANGE", 0, 1, tmplput_ROOM_LASTCHANGE, NULL, CTX_ROOMS);
726 RegisterNamespace("ROOM:INFO:COLLECTIONTYPE", 0, 1, tmplput_ROOM_COLLECTIONTYPE, NULL, CTX_ROOMS);
727 RegisterNamespace("ROOM:INFO:FLOOR:ID", 0, 0, tmplput_ROOM_FLOOR_ID, NULL, CTX_ROOMS);
728 RegisterNamespace("ROOM:INFO:FLOOR:NAME", 0, 1, tmplput_ROOM_FLOOR_NAME, NULL, CTX_ROOMS);
729 RegisterNamespace("ROOM:INFO:FLOOR:NROOMS", 0, 0, tmplput_ROOM_FLOOR_NROOMS, NULL, CTX_ROOMS);
731 RegisterConditional(HKEY("COND:ROOM:REST:ISSUBROOM"), 0, ConditionalRoomIsRESTSubRoom, CTX_ROOMS);
733 RegisterConditional(HKEY("COND:ROOM:INFO:IS_INBOX"), 0, ConditionalRoomIsInbox, CTX_ROOMS);
734 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_KNOWN"), 0, ConditionalRoomHas_UA_KNOWN, CTX_ROOMS);
735 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_GOTOALLOWED"), 0, ConditionalRoomHas_UA_GOTOALLOWED, CTX_ROOMS);
736 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_HASNEWMSGS"), 0, ConditionalRoomHas_UA_HASNEWMSGS, CTX_ROOMS);
737 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_ZAPPED"), 0, ConditionalRoomHas_UA_ZAPPED, CTX_ROOMS);
738 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_POSTALLOWED"), 0, ConditionalRoomHas_UA_POSTALLOWED, CTX_ROOMS);
739 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_ADMINALLOWED"), 0, ConditionalRoomHas_UA_ADMINALLOWED, CTX_ROOMS);
740 RegisterConditional(HKEY("COND:ROOM:FLAGS:UA_DELETEALLOWED"), 0, ConditionalRoomHas_UA_DELETEALLOWED, CTX_ROOMS);
741 RegisterConditional(HKEY("COND:ROOM:GROUPDAV_CONTENT"), 0, ConditionalRoomHasGroupdavContent, CTX_ROOMS);
745 RegisterSortFunc(HKEY("byfloorroom"),
747 CompareRoomListByFloorRoomPrivFirst,
748 CompareRoomListByFloorRoomPrivFirstRev,
749 GroupchangeRoomListByFloorRoomPrivFirst,