Mercurial > pidgin3 / file comparison

comparison: libpurple/protocols/zephyr/ZVariables.c

libpurple/protocols/zephyr/ZVariables.c

changeset 31294
73607ab89c6f
parent 30617
d79eaf981448
child 34304
faf0414a8b51
equal deleted inserted replaced
31293:169eeb43b52c 31294:73607ab89c6f
4 * 4 *
5 * Created by: Robert French 5 * Created by: Robert French
6 * 6 *
7 * Copyright (c) 1987 by the Massachusetts Institute of Technology. 7 * Copyright (c) 1987 by the Massachusetts Institute of Technology.
8 * For copying and distribution information, see the file 8 * For copying and distribution information, see the file
9 * "mit-copyright.h". 9 * "mit-copyright.h".
10 */ 10 */
11 11
12 #include "libpurple/internal.h" 12 #include "libpurple/internal.h"
13 #include "internal.h" 13 #include "internal.h"
14 #include "util.h" 14 #include "util.h"
53 int written; 53 int written;
54 FILE *fpin, *fpout; 54 FILE *fpin, *fpout;
55 char *varfile, *varfilebackup, varbfr[512]; 55 char *varfile, *varfilebackup, varbfr[512];
56 56
57 written = 0; 57 written = 0;
58 58
59 if ((varfile = get_localvarfile()) == NULL) 59 if ((varfile = get_localvarfile()) == NULL)
60 return (ZERR_INTERNAL); 60 return (ZERR_INTERNAL);
61 61
62 varfilebackup = g_strconcat(varfile, ".backup", NULL); 62 varfilebackup = g_strconcat(varfile, ".backup", NULL);
63 63
64 if (!(fpout = fopen(varfilebackup, "w"))) { 64 if (!(fpout = fopen(varfilebackup, "w"))) {
65 g_free(varfile); 65 g_free(varfile);
66 g_free(varfilebackup); 66 g_free(varfilebackup);
67 return (errno); 67 return (errno);
68 } 68 }
76 } 76 }
77 else 77 else
78 fprintf(fpout, "%s\n", varbfr); 78 fprintf(fpout, "%s\n", varbfr);
79 } 79 }
80 (void) fclose(fpin); /* don't care about errs on input */ 80 (void) fclose(fpin); /* don't care about errs on input */
81 } 81 }
82 if (!written) 82 if (!written)
83 fprintf(fpout, "%s = %s\n", var, value); 83 fprintf(fpout, "%s = %s\n", var, value);
84 if (fclose(fpout) == EOF) { 84 if (fclose(fpout) == EOF) {
85 g_free(varfilebackup); 85 g_free(varfilebackup);
86 g_free(varfile); 86 g_free(varfile);
92 return (errno); 92 return (errno);
93 } 93 }
94 g_free(varfilebackup); 94 g_free(varfilebackup);
95 g_free(varfile); 95 g_free(varfile);
96 return (ZERR_NONE); 96 return (ZERR_NONE);
97 } 97 }
98 98
99 Code_t ZUnsetVariable(var) 99 Code_t ZUnsetVariable(var)
100 char *var; 100 char *var;
101 { 101 {
102 FILE *fpin, *fpout; 102 FILE *fpin, *fpout;
104 104
105 if ((varfile = get_localvarfile()) == NULL) 105 if ((varfile = get_localvarfile()) == NULL)
106 return (ZERR_INTERNAL); 106 return (ZERR_INTERNAL);
107 107
108 varfilebackup = g_strconcat(varfile, ".backup", NULL); 108 varfilebackup = g_strconcat(varfile, ".backup", NULL);
109 109
110 if (!(fpout = fopen(varfilebackup, "w"))) { 110 if (!(fpout = fopen(varfilebackup, "w"))) {
111 g_free(varfile); 111 g_free(varfile);
112 g_free(varfilebackup); 112 g_free(varfilebackup);
113 return (errno); 113 return (errno);
114 } 114 }
118 varbfr[strlen(varbfr)-1] = '\0'; 118 varbfr[strlen(varbfr)-1] = '\0';
119 if (!varline(varbfr, var)) 119 if (!varline(varbfr, var))
120 fprintf(fpout, "%s\n", varbfr); 120 fprintf(fpout, "%s\n", varbfr);
121 } 121 }
122 (void) fclose(fpin); /* don't care about read close errs */ 122 (void) fclose(fpin); /* don't care about read close errs */
123 } 123 }
124 if (fclose(fpout) == EOF) { 124 if (fclose(fpout) == EOF) {
125 g_free(varfilebackup); 125 g_free(varfilebackup);
126 g_free(varfile); 126 g_free(varfile);
127 return(EIO); /* errno isn't reliable */ 127 return(EIO); /* errno isn't reliable */
128 } 128 }
132 return (errno); 132 return (errno);
133 } 133 }
134 g_free(varfilebackup); 134 g_free(varfilebackup);
135 g_free(varfile); 135 g_free(varfile);
136 return (ZERR_NONE); 136 return (ZERR_NONE);
137 } 137 }
138 138
139 static char *get_localvarfile(void) 139 static char *get_localvarfile(void)
140 { 140 {
141 const char *base; 141 const char *base;
142 #ifndef WIN32 142 #ifndef WIN32
144 base = purple_home_dir(); 144 base = purple_home_dir();
145 #else 145 #else
146 base = getenv("HOME"); 146 base = getenv("HOME");
147 if (!base) 147 if (!base)
148 base = getenv("HOMEPATH"); 148 base = getenv("HOMEPATH");
149 if (!base) 149 if (!base)
150 base = "C:\\"; 150 base = "C:\\";
151 #endif 151 #endif
152 if (!base) { 152 if (!base) {
153 #ifndef WIN32 153 #ifndef WIN32
154 if (!(pwd = getpwuid((int) getuid()))) { 154 if (!(pwd = getpwuid((int) getuid()))) {
158 base = pwd->pw_dir; 158 base = pwd->pw_dir;
159 #endif 159 #endif
160 } 160 }
161 161
162 return g_strconcat(base, "/.zephyr.vars", NULL); 162 return g_strconcat(base, "/.zephyr.vars", NULL);
163 } 163 }
164 164
165 static char *get_varval(fn, var) 165 static char *get_varval(fn, var)
166 char *fn; 166 char *fn;
167 char *var; 167 char *var;
168 { 168 {
169 FILE *fp; 169 FILE *fp;
170 static char varbfr[512]; 170 static char varbfr[512];
171 int i; 171 int i;
172 172
173 fp = fopen(fn, "r"); 173 fp = fopen(fn, "r");
174 if (!fp) 174 if (!fp)
175 return ((char *)0); 175 return ((char *)0);
176 176
177 while (fgets(varbfr, sizeof varbfr, fp) != (char *) 0) { 177 while (fgets(varbfr, sizeof varbfr, fp) != (char *) 0) {
191 static int varline(bfr, var) 191 static int varline(bfr, var)
192 char *bfr; 192 char *bfr;
193 char *var; 193 char *var;
194 { 194 {
195 register char *cp; 195 register char *cp;
196 196
197 197
198 if (!bfr[0] || bfr[0] == '#') /* comment or null line */ 198 if (!bfr[0] || bfr[0] == '#') /* comment or null line */
199 return (0); 199 return (0);
200 200
201 cp = bfr; 201 cp = bfr;
202 while (*cp && !isspace(*cp) && (*cp != '=')) 202 while (*cp && !isspace(*cp) && (*cp != '='))
203 cp++; 203 cp++;
204 204
205 #ifndef WIN32 205 #ifndef WIN32

Mercurial Repository: pidgin3

mercurial