r23784: use the GPLv3 boilerplate as recommended by the FSF and the license text
[kai/samba.git] / source3 / web / neg_lang.c
1 /*
2    Unix SMB/CIFS implementation.
3    SWAT language handling
4    
5    This program 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    This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
17
18    Created by Ryo Kawahara <rkawa@lbe.co.jp> 
19 */
20
21 #include "includes.h"
22 #include "web/swat_proto.h"
23
24 /*
25   during a file download we first check to see if there is a language
26   specific file available. If there is then use that, otherwise 
27   just open the specified file
28 */
29 int web_open(const char *fname, int flags, mode_t mode)
30 {
31         char *p = NULL;
32         char *lang = lang_tdb_current();
33         int fd;
34         if (lang) {
35                 asprintf(&p, "lang/%s/%s", lang, fname);
36                 if (p) {
37                         fd = sys_open(p, flags, mode);
38                         free(p);
39                         if (fd != -1) {
40                                 return fd;
41                         }
42                 }
43         }
44
45         /* fall through to default name */
46         return sys_open(fname, flags, mode);
47 }
48
49
50 struct pri_list {
51         float pri;
52         char *string;
53 };
54
55 static int qsort_cmp_list(const void *x, const void *y) {
56         struct pri_list *a = (struct pri_list *)x;
57         struct pri_list *b = (struct pri_list *)y;
58         if (a->pri > b->pri) return -1;
59         if (a->pri < b->pri) return 1;
60         return 0;
61 }
62
63 /*
64   choose from a list of languages. The list can be comma or space
65   separated
66   Keep choosing until we get a hit 
67   Changed to habdle priority -- Simo
68 */
69
70 void web_set_lang(const char *lang_string)
71 {
72         char **lang_list, **count;
73         struct pri_list *pl;
74         int lang_num, i;
75
76         /* build the lang list */
77         lang_list = str_list_make(lang_string, ", \t\r\n");
78         if (!lang_list) return;
79         
80         /* sort the list by priority */
81         lang_num = 0;
82         count = lang_list;
83         while (*count && **count) {
84                 count++;
85                 lang_num++;
86         }
87         pl = SMB_MALLOC_ARRAY(struct pri_list, lang_num);
88         if (!pl) {
89                 return;
90         }
91
92         for (i = 0; i < lang_num; i++) {
93                 char *pri_code;
94                 if ((pri_code=strstr(lang_list[i], ";q="))) {
95                         *pri_code = '\0';
96                         pri_code += 3;
97                         sscanf(pri_code, "%f", &(pl[i].pri));
98                 } else {
99                         pl[i].pri = 1;
100                 }
101                 pl[i].string = SMB_STRDUP(lang_list[i]);
102         }
103         str_list_free(&lang_list);
104
105         qsort(pl, lang_num, sizeof(struct pri_list), &qsort_cmp_list);
106
107         /* it's not an error to not initialise - we just fall back to 
108            the default */
109
110         for (i = 0; i < lang_num; i++) {
111                 if (lang_tdb_init(pl[i].string)) break;
112         }
113
114         for (i = 0; i < lang_num; i++) {
115                 SAFE_FREE(pl[i].string);
116         }
117         SAFE_FREE(pl);
118
119         return;
120 }