source: style.c @ dab82f29

owl
Last change on this file since dab82f29 was dab82f29, checked in by James M. Kretchmar <kretch@mit.edu>, 16 years ago
Don't crash on mobile device AIM messages [BZ 20] Don't crash when sending to someone not on AIM buddy list [BZ 94] Fix overflow vulerability in zwrite.c and zcrypt.c Add stack protector and -D_FORTIFY_SOURCE=2 where possible Fix hang [barnowl 4c46dfdebc294ca24fef59924f01688b8ee07dee] Fix segfault on missing subs [barnowl 99dabeed7de6d19acb50f1e73aa0bfe5f9469c02] Fix zcrypt bufffer size bug [barnowl 559076cd86edc3a8317819814dd5877b8bc7c3cb] Fix double free [barnowl e97c4a306ae2c9d2147d83da29fee59918198e70] Memory leak fix [barnowl c0a90c2c7ab97b9465c9873757faf312faa0021e] Memory leak fix [barnowl 95caa16b2e9ba10770d87d0955198c14c2d0e16a] Memory leak fix [barnowl 1716fed8c2650e46892cf6571555eac937266c6e] Add getstyle command [barnowl 216c73421653e3ef0e957aa9a9804e208a77c80e] Binary search for msgid [barnowl 0c8ab5eadbb6ecc97a120c91b9a824b33538c764] File-handle leak [barnowl e78397d6ac5da0de31a4e269c0ba7f3d691857a3] Fix delay in jump from top to bottom [barnowl 801b7ac63b962640debbcfd422cb9a60da5fea31] Load subs in chunks [barnowl 93e883d60051b80bf6d35391f9d76fd7dfd198e3] Load subs in chunks [barnowl f6050ee9b0a171a5031f84409eb181062afacd18] Better zsig logging [barnowl d857b667a5a9b108b1a2a26b4a5513bef2b53f80] free() -> owlfree() [barnowl d524c838ac7c115628424b8ac171c3489622ea3a] Escape AIM users in smartfilters [barnowl af9b92e3e7ccb7de276a94b5c7e5861b24e71eff] Better regex escape chars [barnowl 80e54a7631f091be8c9762adb9746bad38104738] Deal with quotes in smart filters [barnowl 4099cf83702763fa8d1efc4f1582a605431bdb77] Deal with 0 length zephyr fields [barnowl 128171aaf7cefa91a4bb1eada93a19d8fd0c355c] Deal with 0 length zephyr fields [barnowl 50e29e35c64d64e223d378d350a7bc4f038d78f5] Deal with 0 length zephyr fields [barnowl 804ab8af8b6d00bcd7e2402df892db8fbd61a3ec] Leave curmsg on screen after resize [barnowl c0f9e3009bc03e80a44de64cd5f2b4033290236e] Rip out brower stuff [barnowl 8e5935d11c699a7ce5a3e6e9a47799564c696d6a] Rip out browser stuff [barnowl 4f15e8e9ceada0d4b2cc969ebf43b0a1fb3709ea] No passwords in command history [barnowl 6e400cc71aa59e041dce677aadf50dc1f25228e2] Format NOC mssages [barnowl a1bb1980e4bca23b8329cc0e7c0bd5027055ea0a] Expand ~ in loadsubs [barnowl 27d8d835dc6d58c08fae10e75aae306c49215143] Expand ~ in source [barnowl 10d67d57cb29221f63a43a30643c697fc7b38911] Only use resizeterm() if it's available Debian backports Change license to GPLv3
  • Property mode set to 100644
File size: 3.5 KB
Line 
1/* Copyright (c) 2002,2003,2004,2009 James M. Kretchmar
2 *
3 * This file is part of Owl.
4 *
5 * Owl is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
9 *
10 * Owl is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with Owl.  If not, see <http://www.gnu.org/licenses/>.
17 *
18 * ---------------------------------------------------------------
19 *
20 * As of Owl version 2.1.12 there are patches contributed by
21 * developers of the the branched BarnOwl project, Copyright (c)
22 * 2006-2008 The BarnOwl Developers. All rights reserved.
23 */
24
25#include "owl.h"
26
27static const char fileIdent[] = "$Id$";
28
29void owl_style_create_internal(owl_style *s, char *name, void (*formatfunc) (owl_fmtext *fm, owl_message *m), char *description)
30{
31  s->type=OWL_STYLE_TYPE_INTERNAL;
32  s->name=owl_strdup(name);
33  if (description) {
34    s->description=owl_strdup(description);
35  } else {
36    s->description=owl_sprintf("Owl internal style %s", name);
37  }
38  s->perlfuncname=NULL;
39  s->formatfunc=formatfunc;
40}
41
42void owl_style_create_perl(owl_style *s, char *name, char *perlfuncname, char *description)
43{
44  s->type=OWL_STYLE_TYPE_PERL;
45  s->name=owl_strdup(name);
46  s->perlfuncname=owl_strdup(perlfuncname);
47  if (description) {
48    s->description=owl_strdup(description);
49  } else {
50    s->description=owl_sprintf("User-defined perl style that calls %s", 
51                               perlfuncname);
52  }
53  s->formatfunc=NULL;
54}
55
56int owl_style_matches_name(owl_style *s, char *name)
57{
58  if (!strcmp(s->name, name)) return(1);
59  return(0);
60}
61
62char *owl_style_get_name(owl_style *s)
63{
64  return(s->name);
65}
66
67char *owl_style_get_description(owl_style *s)
68{
69  return(s->description);
70}
71
72/* Use style 's' to format message 'm' into fmtext 'fm'.
73 * 'fm' should already be be initialzed
74 */
75void owl_style_get_formattext(owl_style *s, owl_fmtext *fm, owl_message *m)
76{
77  if (s->type==OWL_STYLE_TYPE_INTERNAL) {
78    (* s->formatfunc)(fm, m);
79  } else if (s->type==OWL_STYLE_TYPE_PERL) {
80    char *body, *indent;
81    int curlen;
82
83    /* run the perl function */
84    body=owl_perlconfig_getmsg(m, 1, s->perlfuncname);
85    if (!strcmp(body, "")) {
86      owl_free(body);
87      body=owl_strdup("<unformatted message>");
88    }
89   
90    /* indent and ensure ends with a newline */
91    indent=owl_malloc(strlen(body)+(owl_text_num_lines(body))*OWL_TAB+10);
92    owl_text_indent(indent, body, OWL_TAB);
93    curlen = strlen(indent);
94    if (curlen==0 || indent[curlen-1] != '\n') {
95      indent[curlen] = '\n';
96      indent[curlen+1] = '\0';
97    }
98
99    /* fmtext_append.  This needs to change */
100    owl_fmtext_append_ztext(fm, indent);
101   
102    owl_free(indent);
103    owl_free(body);
104  }
105}
106
107int owl_style_validate(owl_style *s) {
108  if (!s) {
109    return -1;
110  } else if (s->type==OWL_STYLE_TYPE_INTERNAL) {
111    return 0;
112  } else if (s->type==OWL_STYLE_TYPE_PERL
113             && s->perlfuncname
114             && owl_perlconfig_is_function(s->perlfuncname)) {
115    return 0;
116  } else {
117    return -1;
118  }
119}
120
121void owl_style_free(owl_style *s)
122{
123  if (s->name) owl_free(s->name);
124  if (s->description) owl_free(s->description);
125  if (s->type==OWL_STYLE_TYPE_PERL && s->perlfuncname) {
126    owl_free(s->perlfuncname);
127  }
128}
Note: See TracBrowser for help on using the repository browser.