s3-registry: only include registry headers when really needed.
[samba.git] / libgpo / gpext / gpext.c
1 /*
2  *  Unix SMB/CIFS implementation.
3  *  Group Policy Support
4  *  Copyright (C) Guenther Deschner 2007-2008
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 3 of the License, or
9  *  (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, see <http://www.gnu.org/licenses/>.
18  */
19
20 #include "includes.h"
21 #include "../libgpo/gpo.h"
22 #include "../libgpo/gpext/gpext.h"
23 #include "librpc/gen_ndr/ndr_misc.h"
24 #include "lib/util/dlinklist.h"
25 #if _SAMBA_BUILD_ == 3
26 #include "libgpo/gpo_proto.h"
27 #include "registry.h"
28 #endif
29
30 static struct gp_extension *extensions = NULL;
31
32 /****************************************************************
33 ****************************************************************/
34
35 struct gp_extension *get_gp_extension_list(void)
36 {
37         return extensions;
38 }
39
40 /****************************************************************
41 ****************************************************************/
42
43 /* see http://support.microsoft.com/kb/216358/en-us/ for more info */
44
45 struct gp_extension_reg_table gpext_reg_vals[] = {
46         { "DllName", REG_EXPAND_SZ },
47         { "ProcessGroupPolicy", REG_SZ },
48         { "NoMachinePolicy", REG_DWORD },
49         { "NoUserPolicy", REG_DWORD },
50         { "NoSlowLink", REG_DWORD },
51         { "NoBackgroundPolicy", REG_DWORD },
52         { "NoGPOListChanges", REG_DWORD },
53         { "PerUserLocalSettings", REG_DWORD },
54         { "RequiresSuccessfulRegistry", REG_DWORD },
55         { "EnableAsynchronousProcessing", REG_DWORD },
56         { "ExtensionDebugLevel", REG_DWORD },
57         /* new */
58         { "GenerateGroupPolicy", REG_SZ }, /* not supported on w2k */
59         { "NotifyLinkTransition", REG_DWORD },
60         { "ProcessGroupPolicyEx", REG_SZ }, /* not supported on w2k */
61         { "ExtensionEventSource", REG_MULTI_SZ }, /* not supported on w2k */
62         { "GenerateGroupPolicy", REG_SZ },
63         { "MaxNoGPOListChangesInterval", REG_DWORD },
64         { NULL, REG_NONE }
65 };
66
67 /****************************************************************
68 ****************************************************************/
69
70 static struct gp_extension *get_extension_by_name(struct gp_extension *be,
71                                                   const char *name)
72 {
73         struct gp_extension *b;
74
75         for (b = be; b; b = b->next) {
76                 if (strequal(b->name, name)) {
77                         return b;
78                 }
79         }
80
81         return NULL;
82 }
83
84 /****************************************************************
85 ****************************************************************/
86
87 static struct gp_extension_methods *get_methods_by_name(struct gp_extension *be,
88                                                         const char *name)
89 {
90         struct gp_extension *b;
91
92         for (b = be; b; b = b->next) {
93                 if (strequal(b->name, name)) {
94                         return b->methods;
95                 }
96         }
97
98         return NULL;
99 }
100
101 /****************************************************************
102 ****************************************************************/
103
104 NTSTATUS unregister_gp_extension(const char *name)
105 {
106         struct gp_extension *ext;
107
108         ext = get_extension_by_name(extensions, name);
109         if (!ext) {
110                 return NT_STATUS_OK;
111         }
112
113         DLIST_REMOVE(extensions, ext);
114         talloc_free(ext);
115
116         DEBUG(2,("Successfully removed GP extension '%s'\n", name));
117
118         return NT_STATUS_OK;
119 }
120
121 /****************************************************************
122 ****************************************************************/
123
124 NTSTATUS register_gp_extension(TALLOC_CTX *gpext_ctx,
125                                int version,
126                                const char *name,
127                                const char *guid,
128                                struct gp_extension_methods *methods)
129 {
130         struct gp_extension_methods *test;
131         struct gp_extension *entry;
132         NTSTATUS status;
133
134         if (!gpext_ctx) {
135                 return NT_STATUS_INTERNAL_DB_ERROR;
136         }
137
138         if ((version != SMB_GPEXT_INTERFACE_VERSION)) {
139                 DEBUG(0,("Failed to register gp extension.\n"
140                          "The module was compiled against "
141                          "SMB_GPEXT_INTERFACE_VERSION %d,\n"
142                          "current SMB_GPEXT_INTERFACE_VERSION is %d.\n"
143                          "Please recompile against the current "
144                          "version of samba!\n",
145                          version, SMB_GPEXT_INTERFACE_VERSION));
146                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
147         }
148
149         if (!guid || !name || !name[0] || !methods) {
150                 DEBUG(0,("Called with NULL pointer or empty name!\n"));
151                 return NT_STATUS_INVALID_PARAMETER;
152         }
153
154         test = get_methods_by_name(extensions, name);
155         if (test) {
156                 DEBUG(0,("GP extension module %s already registered!\n",
157                         name));
158                 return NT_STATUS_OBJECT_NAME_COLLISION;
159         }
160
161         entry = talloc_zero(gpext_ctx, struct gp_extension);
162         NT_STATUS_HAVE_NO_MEMORY(entry);
163
164         entry->name = talloc_strdup(gpext_ctx, name);
165         NT_STATUS_HAVE_NO_MEMORY(entry->name);
166
167         entry->guid = talloc_zero(gpext_ctx, struct GUID);
168         NT_STATUS_HAVE_NO_MEMORY(entry->guid);
169         status = GUID_from_string(guid, entry->guid);
170         NT_STATUS_NOT_OK_RETURN(status);
171
172         entry->methods = methods;
173         DLIST_ADD(extensions, entry);
174
175         DEBUG(2,("Successfully added GP extension '%s' %s\n",
176                 name, GUID_string2(gpext_ctx, entry->guid)));
177
178         return NT_STATUS_OK;
179 }
180
181 /****************************************************************
182 ****************************************************************/
183
184 static NTSTATUS gp_extension_init_module(TALLOC_CTX *mem_ctx,
185                                          const char *name,
186                                          struct gp_extension **gpext)
187 {
188         NTSTATUS status;
189         struct gp_extension *ext = NULL;
190
191         ext = talloc_zero(mem_ctx, struct gp_extension);
192         NT_STATUS_HAVE_NO_MEMORY(gpext);
193
194         ext->methods = get_methods_by_name(extensions, name);
195         if (!ext->methods) {
196
197                 status = smb_probe_module(SAMBA_SUBSYSTEM_GPEXT,
198                                           name);
199                 if (!NT_STATUS_IS_OK(status)) {
200                         return status;
201                 }
202
203                 ext->methods = get_methods_by_name(extensions, name);
204                 if (!ext->methods) {
205                         return NT_STATUS_DLL_INIT_FAILED;
206                 }
207         }
208
209         *gpext = ext;
210
211         return NT_STATUS_OK;
212 }
213
214 /****************************************************************
215 ****************************************************************/
216
217 static bool add_gp_extension_reg_entry_to_array(TALLOC_CTX *mem_ctx,
218                                                 struct gp_extension_reg_entry *entry,
219                                                 struct gp_extension_reg_entry **entries,
220                                                 size_t *num)
221 {
222         *entries = talloc_realloc(mem_ctx, *entries,
223                                         struct gp_extension_reg_entry,
224                                         (*num)+1);
225         if (*entries == NULL) {
226                 *num = 0;
227                 return false;
228         }
229
230         (*entries)[*num].value = entry->value;
231         (*entries)[*num].data = entry->data;
232
233         *num += 1;
234         return true;
235 }
236
237 /****************************************************************
238 ****************************************************************/
239
240 static bool add_gp_extension_reg_info_entry_to_array(TALLOC_CTX *mem_ctx,
241                                                      struct gp_extension_reg_info_entry *entry,
242                                                      struct gp_extension_reg_info_entry **entries,
243                                                      size_t *num)
244 {
245         *entries = talloc_realloc(mem_ctx, *entries,
246                                         struct gp_extension_reg_info_entry,
247                                         (*num)+1);
248         if (*entries == NULL) {
249                 *num = 0;
250                 return false;
251         }
252
253         (*entries)[*num].guid = entry->guid;
254         (*entries)[*num].num_entries = entry->num_entries;
255         (*entries)[*num].entries = entry->entries;
256
257         *num += 1;
258         return true;
259 }
260
261 /****************************************************************
262 ****************************************************************/
263
264 static NTSTATUS gp_ext_info_add_reg(TALLOC_CTX *mem_ctx,
265                                     struct gp_extension_reg_info_entry *entry,
266                                     const char *value,
267                                     enum winreg_Type type,
268                                     const char *data_s)
269 {
270         struct gp_extension_reg_entry *reg_entry = NULL;
271         struct registry_value *data = NULL;
272
273         reg_entry = talloc_zero(mem_ctx, struct gp_extension_reg_entry);
274         NT_STATUS_HAVE_NO_MEMORY(reg_entry);
275
276         data = talloc_zero(mem_ctx, struct registry_value);
277         NT_STATUS_HAVE_NO_MEMORY(data);
278
279         data->type = type;
280
281         switch (type) {
282                 case REG_SZ:
283                 case REG_EXPAND_SZ:
284                         data->v.sz.str = talloc_strdup(mem_ctx, data_s);
285                         NT_STATUS_HAVE_NO_MEMORY(data->v.sz.str);
286                         data->v.sz.len = strlen(data_s);
287                         break;
288                 case REG_DWORD:
289                         data->v.dword = atoi(data_s);
290                         break;
291                 default:
292                         return NT_STATUS_NOT_SUPPORTED;
293         }
294
295         reg_entry->value = value;
296         reg_entry->data = data;
297
298         if (!add_gp_extension_reg_entry_to_array(mem_ctx, reg_entry,
299                                                  &entry->entries,
300                                                  &entry->num_entries)) {
301                 return NT_STATUS_NO_MEMORY;
302         }
303
304         return NT_STATUS_OK;
305 }
306
307 /****************************************************************
308 ****************************************************************/
309
310 static NTSTATUS gp_ext_info_add_reg_table(TALLOC_CTX *mem_ctx,
311                                           const char *module,
312                                           struct gp_extension_reg_info_entry *entry,
313                                           struct gp_extension_reg_table *table)
314 {
315         NTSTATUS status;
316         const char *module_name = NULL;
317         int i;
318
319         module_name = talloc_asprintf(mem_ctx, "%s.%s", module, shlib_ext());
320         NT_STATUS_HAVE_NO_MEMORY(module_name);
321
322         status = gp_ext_info_add_reg(mem_ctx, entry,
323                                      "DllName", REG_EXPAND_SZ, module_name);
324         NT_STATUS_NOT_OK_RETURN(status);
325
326         for (i=0; table[i].val; i++) {
327                 status = gp_ext_info_add_reg(mem_ctx, entry,
328                                              table[i].val,
329                                              table[i].type,
330                                              table[i].data);
331                 NT_STATUS_NOT_OK_RETURN(status);
332         }
333
334         return status;
335 }
336
337 /****************************************************************
338 ****************************************************************/
339
340 NTSTATUS gp_ext_info_add_entry(TALLOC_CTX *mem_ctx,
341                                const char *module,
342                                const char *ext_guid,
343                                struct gp_extension_reg_table *table,
344                                struct gp_extension_reg_info *info)
345 {
346         NTSTATUS status;
347         struct gp_extension_reg_info_entry *entry = NULL;
348
349         entry = TALLOC_ZERO_P(mem_ctx, struct gp_extension_reg_info_entry);
350         NT_STATUS_HAVE_NO_MEMORY(entry);
351
352         status = GUID_from_string(ext_guid, &entry->guid);
353         NT_STATUS_NOT_OK_RETURN(status);
354
355         status = gp_ext_info_add_reg_table(mem_ctx, module, entry, table);
356         NT_STATUS_NOT_OK_RETURN(status);
357
358         if (!add_gp_extension_reg_info_entry_to_array(mem_ctx, entry,
359                                                       &info->entries,
360                                                       &info->num_entries)) {
361                 return NT_STATUS_NO_MEMORY;
362         }
363
364         return NT_STATUS_OK;
365 }
366
367 /****************************************************************
368 ****************************************************************/
369
370 static bool gp_extension_reg_info_verify_entry(struct gp_extension_reg_entry *entry)
371 {
372         int i;
373
374         for (i=0; gpext_reg_vals[i].val; i++) {
375
376                 if ((strequal(entry->value, gpext_reg_vals[i].val)) &&
377                     (entry->data->type == gpext_reg_vals[i].type)) {
378                         return true;
379                 }
380         }
381
382         return false;
383 }
384
385 /****************************************************************
386 ****************************************************************/
387
388 static bool gp_extension_reg_info_verify(struct gp_extension_reg_info_entry *entry)
389 {
390         int i;
391
392         for (i=0; i < entry->num_entries; i++) {
393                 if (!gp_extension_reg_info_verify_entry(&entry->entries[i])) {
394                         return false;
395                 }
396         }
397
398         return true;
399 }
400
401 /****************************************************************
402 ****************************************************************/
403
404 static WERROR gp_extension_store_reg_vals(TALLOC_CTX *mem_ctx,
405                                           struct registry_key *key,
406                                           struct gp_extension_reg_info_entry *entry)
407 {
408         WERROR werr = WERR_OK;
409         size_t i;
410
411         for (i=0; i < entry->num_entries; i++) {
412
413                 werr = reg_setvalue(key,
414                                     entry->entries[i].value,
415                                     entry->entries[i].data);
416                 W_ERROR_NOT_OK_RETURN(werr);
417         }
418
419         return werr;
420 }
421
422 /****************************************************************
423 ****************************************************************/
424
425 static WERROR gp_extension_store_reg_entry(TALLOC_CTX *mem_ctx,
426                                            struct gp_registry_context *reg_ctx,
427                                            struct gp_extension_reg_info_entry *entry)
428 {
429         WERROR werr;
430         struct registry_key *key = NULL;
431         const char *subkeyname = NULL;
432
433         if (!gp_extension_reg_info_verify(entry)) {
434                 return WERR_INVALID_PARAM;
435         }
436
437         subkeyname = GUID_string2(mem_ctx, &entry->guid);
438         W_ERROR_HAVE_NO_MEMORY(subkeyname);
439
440         strupper_m(CONST_DISCARD(char *,subkeyname));
441
442         werr = gp_store_reg_subkey(mem_ctx,
443                                    subkeyname,
444                                    reg_ctx->curr_key,
445                                    &key);
446         W_ERROR_NOT_OK_RETURN(werr);
447
448         werr = gp_extension_store_reg_vals(mem_ctx,
449                                            key,
450                                            entry);
451         W_ERROR_NOT_OK_RETURN(werr);
452
453         return werr;
454 }
455
456 /****************************************************************
457 ****************************************************************/
458
459 static WERROR gp_extension_store_reg(TALLOC_CTX *mem_ctx,
460                                      struct gp_registry_context *reg_ctx,
461                                      struct gp_extension_reg_info *info)
462 {
463         WERROR werr = WERR_OK;
464         int i;
465
466         if (!info) {
467                 return WERR_OK;
468         }
469
470         for (i=0; i < info->num_entries; i++) {
471                 werr = gp_extension_store_reg_entry(mem_ctx,
472                                                     reg_ctx,
473                                                     &info->entries[i]);
474                 W_ERROR_NOT_OK_RETURN(werr);
475         }
476
477         return werr;
478 }
479
480 /****************************************************************
481 ****************************************************************/
482
483 static NTSTATUS gp_glob_ext_list(TALLOC_CTX *mem_ctx,
484                                  const char ***ext_list,
485                                  size_t *ext_list_len)
486 {
487         SMB_STRUCT_DIR *dir = NULL;
488         SMB_STRUCT_DIRENT *dirent = NULL;
489
490         dir = sys_opendir(modules_path(SAMBA_SUBSYSTEM_GPEXT));
491         if (!dir) {
492                 return map_nt_error_from_unix(errno);
493         }
494
495         while ((dirent = sys_readdir(dir))) {
496
497                 fstring name; /* forgive me... */
498                 char *p;
499
500                 if ((strequal(dirent->d_name, ".")) ||
501                     (strequal(dirent->d_name, ".."))) {
502                         continue;
503                 }
504
505                 p = strrchr(dirent->d_name, '.');
506                 if (!p) {
507                         sys_closedir(dir);
508                         return NT_STATUS_NO_MEMORY;
509                 }
510
511                 if (!strcsequal(p+1, shlib_ext())) {
512                         DEBUG(10,("gp_glob_ext_list: not a *.so file: %s\n",
513                                 dirent->d_name));
514                         continue;
515                 }
516
517                 fstrcpy(name, dirent->d_name);
518                 name[PTR_DIFF(p, dirent->d_name)] = 0;
519
520                 if (!add_string_to_array(mem_ctx, name, ext_list,
521                                          (int *)ext_list_len)) {
522                         sys_closedir(dir);
523                         return NT_STATUS_NO_MEMORY;
524                 }
525         }
526
527         sys_closedir(dir);
528
529         return NT_STATUS_OK;
530 }
531
532 /****************************************************************
533 ****************************************************************/
534
535 NTSTATUS shutdown_gp_extensions(void)
536 {
537         struct gp_extension *ext = NULL;
538
539         for (ext = extensions; ext; ext = ext->next) {
540                 if (ext->methods && ext->methods->shutdown) {
541                         ext->methods->shutdown();
542                 }
543         }
544
545         return NT_STATUS_OK;
546 }
547
548 /****************************************************************
549 ****************************************************************/
550
551 NTSTATUS init_gp_extensions(TALLOC_CTX *mem_ctx)
552 {
553         NTSTATUS status;
554         WERROR werr;
555         int i = 0;
556         const char **ext_array = NULL;
557         size_t ext_array_len = 0;
558         struct gp_extension *gpext = NULL;
559         struct gp_registry_context *reg_ctx = NULL;
560
561         if (get_gp_extension_list()) {
562                 return NT_STATUS_OK;
563         }
564
565         status = gp_glob_ext_list(mem_ctx, &ext_array, &ext_array_len);
566         NT_STATUS_NOT_OK_RETURN(status);
567
568         for (i=0; i<ext_array_len; i++) {
569
570                 struct gp_extension_reg_info *info = NULL;
571
572                 status = gp_extension_init_module(mem_ctx, ext_array[i],
573                                                   &gpext);
574                 if (!NT_STATUS_IS_OK(status)) {
575                         goto out;
576                 }
577
578                 if (gpext->methods->get_reg_config) {
579
580                         status = gpext->methods->initialize(mem_ctx);
581                         if (!NT_STATUS_IS_OK(status)) {
582                                 gpext->methods->shutdown();
583                                 goto out;
584                         }
585
586                         status = gpext->methods->get_reg_config(mem_ctx,
587                                                                 &info);
588                         if (!NT_STATUS_IS_OK(status)) {
589                                 gpext->methods->shutdown();
590                                 goto out;
591                         }
592
593                         if (!reg_ctx) {
594                                 NT_USER_TOKEN *token;
595
596                                 token = registry_create_system_token(mem_ctx);
597                                 NT_STATUS_HAVE_NO_MEMORY(token);
598
599                                 werr = gp_init_reg_ctx(mem_ctx,
600                                                        KEY_WINLOGON_GPEXT_PATH,
601                                                        REG_KEY_WRITE,
602                                                        token,
603                                                        &reg_ctx);
604                                 if (!W_ERROR_IS_OK(werr)) {
605                                         status = werror_to_ntstatus(werr);
606                                         gpext->methods->shutdown();
607                                         goto out;
608                                 }
609                         }
610
611                         werr = gp_extension_store_reg(mem_ctx, reg_ctx, info);
612                         if (!W_ERROR_IS_OK(werr)) {
613                                 DEBUG(1,("gp_extension_store_reg failed: %s\n",
614                                         win_errstr(werr)));
615                                 TALLOC_FREE(info);
616                                 gpext->methods->shutdown();
617                                 status = werror_to_ntstatus(werr);
618                                 goto out;
619                         }
620                         TALLOC_FREE(info);
621                 }
622
623         }
624
625  out:
626         TALLOC_FREE(reg_ctx);
627
628         return status;
629 }
630
631 /****************************************************************
632 ****************************************************************/
633
634 NTSTATUS free_gp_extensions(void)
635 {
636         struct gp_extension *ext, *ext_next = NULL;
637
638         for (ext = extensions; ext; ext = ext_next) {
639                 ext_next = ext->next;
640                 DLIST_REMOVE(extensions, ext);
641                 TALLOC_FREE(ext);
642         }
643
644         extensions = NULL;
645
646         return NT_STATUS_OK;
647 }
648
649 /****************************************************************
650 ****************************************************************/
651
652 void debug_gpext_header(int lvl,
653                         const char *name,
654                         uint32_t flags,
655                         struct GROUP_POLICY_OBJECT *gpo,
656                         const char *extension_guid,
657                         const char *snapin_guid)
658 {
659         char *flags_str = NULL;
660
661         DEBUG(lvl,("%s\n", name));
662         DEBUGADD(lvl,("\tgpo:           %s (%s)\n", gpo->name,
663                 gpo->display_name));
664         DEBUGADD(lvl,("\tcse extension: %s (%s)\n", extension_guid,
665                 cse_gpo_guid_string_to_name(extension_guid)));
666         DEBUGADD(lvl,("\tgplink:        %s\n", gpo->link));
667         DEBUGADD(lvl,("\tsnapin:        %s (%s)\n", snapin_guid,
668                 cse_snapin_gpo_guid_string_to_name(snapin_guid)));
669
670         flags_str = gpo_flag_str(NULL, flags);
671         DEBUGADD(lvl,("\tflags:         0x%08x %s\n", flags, flags_str));
672         TALLOC_FREE(flags_str);
673 }
674
675 NTSTATUS process_gpo_list_with_extension(ADS_STRUCT *ads,
676                            TALLOC_CTX *mem_ctx,
677                            uint32_t flags,
678                            const NT_USER_TOKEN *token,
679                            struct GROUP_POLICY_OBJECT *gpo_list,
680                            const char *extension_guid,
681                            const char *snapin_guid)
682 {
683         return NT_STATUS_OK;
684 }
685
686 /****************************************************************
687 ****************************************************************/
688
689 NTSTATUS gpext_process_extension(ADS_STRUCT *ads,
690                                  TALLOC_CTX *mem_ctx,
691                                  uint32_t flags,
692                                  const NT_USER_TOKEN *token,
693                                  struct registry_key *root_key,
694                                  struct GROUP_POLICY_OBJECT *gpo,
695                                  const char *extension_guid,
696                                  const char *snapin_guid)
697 {
698         NTSTATUS status;
699         struct gp_extension *ext = NULL;
700         struct GUID guid;
701         bool cse_found = false;
702
703         status = init_gp_extensions(mem_ctx);
704         if (!NT_STATUS_IS_OK(status)) {
705                 DEBUG(1,("init_gp_extensions failed: %s\n",
706                         nt_errstr(status)));
707                 return status;
708         }
709
710         status = GUID_from_string(extension_guid, &guid);
711         if (!NT_STATUS_IS_OK(status)) {
712                 return status;
713         }
714
715         for (ext = extensions; ext; ext = ext->next) {
716
717                 if (GUID_equal(ext->guid, &guid)) {
718                         cse_found = true;
719                         break;
720                 }
721         }
722
723         if (!cse_found) {
724                 goto no_ext;
725         }
726
727         status = ext->methods->initialize(mem_ctx);
728         NT_STATUS_NOT_OK_RETURN(status);
729
730         status = ext->methods->process_group_policy(ads,
731                                                     mem_ctx,
732                                                     flags,
733                                                     root_key,
734                                                     token,
735                                                     gpo,
736                                                     extension_guid,
737                                                     snapin_guid);
738         if (!NT_STATUS_IS_OK(status)) {
739                 ext->methods->shutdown();
740         }
741
742         return status;
743
744  no_ext:
745         if (flags & GPO_INFO_FLAG_VERBOSE) {
746                 DEBUG(0,("process_extension: no extension available for:\n"));
747                 DEBUGADD(0,("%s (%s) (snapin: %s)\n",
748                         extension_guid,
749                         cse_gpo_guid_string_to_name(extension_guid),
750                         snapin_guid));
751         }
752
753         return NT_STATUS_OK;
754 }