if StrBuf_ServGetln() is called in a loop, its return value has to be checked for...
[citadel.git] / webcit / blogview_renderer.c
1 /* 
2  * Blog view renderer module for WebCit
3  *
4  * Copyright (c) 1996-2010 by the citadel.org team
5  *
6  * This program is open source software.  You can redistribute it and/or
7  * modify it under the terms of the GNU General Public License as
8  * published by the Free Software Foundation; either version 3 of the
9  * License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19  */
20
21 #include "webcit.h"
22 #include "webserver.h"
23 #include "groupdav.h"
24
25
26 /* 
27  * Array type for a blog post.  The first message is the post; the rest are comments
28  */
29 struct blogpost {
30         int top_level_id;
31         long *msgs;             /* Array of msgnums for messages we are displaying */
32         int num_msgs;           /* Number of msgnums stored in 'msgs' */
33         int alloc_msgs;         /* Currently allocated size of array */
34 };
35
36
37 /*
38  * Destructor for 'struct blogpost' which does the rendering first.
39  * By rendering from here, we eliminate the need for a separate iterator, although
40  * we might run into trouble when we get around to displaying newest-to-oldest...
41  */
42 void blogpost_render_and_destroy(struct blogpost *bp) {
43         const StrBuf *Mime;
44         int p = 0;
45         int i;
46
47         p = atoi(BSTR("p"));    /* are we looking for a specific post? */
48         WC->bptlid = bp->top_level_id;
49
50         if ( ((p == 0) || (p == bp->top_level_id)) && (bp->num_msgs > 0) ) {
51                 /* Show the top level post */
52                 read_message(WC->WBuf, HKEY("view_blog_post"), bp->msgs[0], NULL, &Mime);
53
54                 if (p == 0) {
55                         /* Show the number of comments */
56                         wc_printf("<a href=\"readfwd?p=%d?go=", bp->top_level_id);
57                         urlescputs(ChrPtr(WC->CurRoom.name));
58                         wc_printf("#comments\">");
59                         wc_printf(_("%d comments"), bp->num_msgs - 1);
60                         wc_printf("</a>");
61                         wc_printf("<br><br><br>\n");
62                 }
63                 else if (bp->num_msgs < 2) {
64                         wc_printf(_("%d comments"), 0);
65                 }
66                 else {
67                         wc_printf("<a name=\"comments\"></a>\n");
68                         wc_printf(_("%d comments"), bp->num_msgs - 1);
69                         wc_printf("<br>\n");
70                         for (i=1; i<bp->num_msgs; ++i) {
71                                 read_message(WC->WBuf, HKEY("view_blog_comment"), bp->msgs[i], NULL, &Mime);
72                         }
73                 }
74         }
75
76
77         if (bp->alloc_msgs > 0) {
78                 free(bp->msgs);
79         }
80         free(bp);
81 }
82
83
84 /*
85  * Data which gets returned from a call to blogview_learn_thread_references()
86  */
87 struct bltr {
88         int id;
89         int refs;
90 };
91
92
93 /*
94  * Entry point for message read operations.
95  */
96 int blogview_GetParamsGetServerCall(SharedMessageStatus *Stat, 
97                                    void **ViewSpecific, 
98                                    long oper, 
99                                    char *cmd, 
100                                    long len)
101 {
102         HashList *BLOG = NewHash(1, NULL);
103         *ViewSpecific = BLOG;
104
105         Stat->startmsg = (-1);                                  /* not used here */
106         Stat->sortit = 1;                                       /* not used here */
107         Stat->num_displayed = DEFAULT_MAXMSGS;                  /* not used here */
108         if (Stat->maxmsgs == 0) Stat->maxmsgs = DEFAULT_MAXMSGS;
109         
110         /* perform a "read all" call to fetch the message list -- we'll cut it down later */
111         rlid[2].cmd(cmd, len);
112         
113         return 200;
114 }
115
116
117 /*
118  * Given a 'struct blogpost' containing a msgnum, populate the id
119  * and refs fields by fetching them from the Citadel server
120  */
121 struct bltr blogview_learn_thread_references(long msgnum)
122 {
123         StrBuf *Buf;
124         StrBuf *r;
125         int len;
126         struct bltr bltr = { 0, 0 } ;
127         Buf = NewStrBuf();
128         r = NewStrBuf();
129         serv_printf("MSG0 %ld|1", msgnum);              /* top level citadel headers only */
130         StrBuf_ServGetln(Buf);
131         if (GetServerStatus(Buf, NULL) == 1) {
132                 while (len = StrBuf_ServGetln(Buf), 
133                        ((len >= 0) && 
134                         ((len != 3) || strcmp(ChrPtr(Buf), "000") )))
135                 {
136                         if (!strncasecmp(ChrPtr(Buf), "msgn=", 5)) {
137                                 StrBufCutLeft(Buf, 5);
138                                 bltr.id = HashLittle(ChrPtr(Buf), StrLength(Buf));
139                         }
140                         else if (!strncasecmp(ChrPtr(Buf), "wefw=", 5)) {
141                                 StrBufCutLeft(Buf, 5);          /* trim the field name */
142                                 StrBufExtract_token(r, Buf, 0, '|');
143                                 bltr.refs = HashLittle(ChrPtr(r), StrLength(r));
144                         }
145                 }
146         }
147         FreeStrBuf(&Buf);
148         FreeStrBuf(&r);
149         return(bltr);
150 }
151
152
153 /*
154  * This function is called for every message in the list.
155  */
156 int blogview_LoadMsgFromServer(SharedMessageStatus *Stat, 
157                               void **ViewSpecific, 
158                               message_summary* Msg, 
159                               int is_new, 
160                               int i)
161 {
162         HashList *BLOG = (HashList *) *ViewSpecific;
163         struct bltr b;
164         struct blogpost *bp = NULL;
165
166         b = blogview_learn_thread_references(Msg->msgnum);
167
168         /* FIXME an optimization here -- one we ought to perform -- is to exit this
169          * function immediately if the viewer is only interested in a single post and
170          * that message ID is neither the id nor the refs.  Actually, that might *be*
171          * the way to display only a single message (with or without comments).
172          */
173
174         if (b.refs == 0) {
175                 bp = malloc(sizeof(struct blogpost));
176                 if (!bp) return(200);
177                 memset(bp, 0, sizeof (struct blogpost));
178                 bp->top_level_id = b.id;
179                 Put(BLOG, (const char *)&b.id, sizeof(b.id), bp,
180                                         (DeleteHashDataFunc)blogpost_render_and_destroy);
181         }
182         else {
183                 GetHash(BLOG, (const char *)&b.refs , sizeof(b.refs), (void *)&bp);
184         }
185
186         /*
187          * Now we have a 'struct blogpost' to which we can add a message.  It's either the
188          * blog post itself or a comment attached to it; either way, the code is the same from
189          * this point onward.
190          */
191         if (bp != NULL) {
192                 if (bp->alloc_msgs == 0) {
193                         bp->alloc_msgs = 1000;
194                         bp->msgs = malloc(bp->alloc_msgs * sizeof(long));
195                         memset(bp->msgs, 0, (bp->alloc_msgs * sizeof(long)) );
196                 }
197                 if (bp->num_msgs >= bp->alloc_msgs) {
198                         bp->alloc_msgs *= 2;
199                         bp->msgs = realloc(bp->msgs, (bp->alloc_msgs * sizeof(long)));
200                         memset(&bp->msgs[bp->num_msgs], 0,
201                                 ((bp->alloc_msgs - bp->num_msgs) * sizeof(long)) );
202                 }
203                 bp->msgs[bp->num_msgs++] = Msg->msgnum;
204         }
205
206         return 200;
207 }
208
209
210 /*
211  * Sort a list of 'struct blogpost' objects by newest-to-oldest msgnum.
212  */
213 int blogview_sortfunc(const void *s1, const void *s2) {
214         long *l1 = (long *)(s1);
215         long *l2 = (long *)(s2);
216
217         if (*l1 > *l2) return(-1);
218         if (*l1 < *l2) return(+1);
219         return(0);
220 }
221
222
223 int blogview_render(SharedMessageStatus *Stat, void **ViewSpecific, long oper)
224 {
225         /*HashList *BLOG = (HashList *) *ViewSpecific;*/
226
227         /*
228          * No code needed here -- we render during disposition.
229          * Maybe this is the location where we want to handle pretty permalinks.
230          */
231
232         return(0);
233 }
234
235
236 int blogview_Cleanup(void **ViewSpecific)
237 {
238         HashList *BLOG = (HashList *) *ViewSpecific;
239
240         DeleteHash(&BLOG);
241
242         wDumpContent(1);
243         return 0;
244 }
245
246 /*
247  * Generate a permalink for a post
248  */
249 void tmplput_blog_permalink(StrBuf *Target, WCTemplputParams *TP) {
250         char perma[SIZ];
251         
252         strcpy(perma, "/readfwd?go=");
253         urlesc(&perma[strlen(perma)], sizeof(perma)-strlen(perma), ChrPtr(WC->CurRoom.name));
254         snprintf(&perma[strlen(perma)], sizeof(perma)-strlen(perma), "?p=%d", WC->bptlid);
255         StrBufAppendPrintf(Target, "%s", perma);
256 }
257
258
259 void 
260 InitModule_BLOGVIEWRENDERERS
261 (void)
262 {
263         RegisterReadLoopHandlerset(
264                 VIEW_BLOG,
265                 blogview_GetParamsGetServerCall,
266                 NULL,
267                 NULL, 
268                 blogview_LoadMsgFromServer,
269                 blogview_render,
270                 blogview_Cleanup
271         );
272         RegisterNamespace("BLOG:PERMALINK", 0, 0, tmplput_blog_permalink, NULL, CTX_NONE);
273 }