fix minor memory leak in get_tree_entry()
[git/git.git] / git.c
CommitLineData
85023577 1#include "builtin.h"
77cb17e9 2#include "exec_cmd.h"
2b11e317 3#include "cache.h"
575ba9d6 4#include "quote.h"
d8e96fd8 5#include "run-command.h"
8e49d503 6
822a7d50 7const char git_usage_string[] =
511a3fc1 8 "git [--version] [--exec-path[=GIT_EXEC_PATH]] [--html-path]\n"
b0fa7ab5 9 " [-p|--paginate|--no-pager] [--no-replace-objects]\n"
511a3fc1
MM
10 " [--bare] [--git-dir=GIT_DIR] [--work-tree=GIT_WORK_TREE]\n"
11 " [--help] COMMAND [ARGS]";
822a7d50 12
b7d96819
TL
13const char git_more_info_string[] =
14 "See 'git help COMMAND' for more information on a specific command.";
15
4e10738a
JK
16static int use_pager = -1;
17struct pager_config {
18 const char *cmd;
19 int val;
20};
21
22static int pager_command_config(const char *var, const char *value, void *data)
23{
24 struct pager_config *c = data;
25 if (!prefixcmp(var, "pager.") && !strcmp(var + 6, c->cmd))
26 c->val = git_config_bool(var, value);
27 return 0;
28}
29
30/* returns 0 for "no pager", 1 for "use pager", and -1 for "not specified" */
31int check_pager_config(const char *cmd)
32{
33 struct pager_config c;
34 c.cmd = cmd;
35 c.val = -1;
36 git_config(pager_command_config, &c);
37 return c.val;
38}
39
40static void commit_pager_choice(void) {
41 switch (use_pager) {
42 case 0:
43 setenv("GIT_PAGER", "cat", 1);
44 break;
45 case 1:
46 setup_pager();
47 break;
48 default:
49 break;
50 }
51}
52
4b25d091 53static int handle_options(const char ***argv, int *argc, int *envchanged)
4ab243a9
JS
54{
55 int handled = 0;
56
57 while (*argc > 0) {
58 const char *cmd = (*argv)[0];
59 if (cmd[0] != '-')
60 break;
61
6acbcb92
JS
62 /*
63 * For legacy reasons, the "version" and "help"
64 * commands can be written with "--" prepended
65 * to make them look like flags.
66 */
67 if (!strcmp(cmd, "--help") || !strcmp(cmd, "--version"))
68 break;
69
70 /*
71 * Check remaining flags.
72 */
cc44c765 73 if (!prefixcmp(cmd, "--exec-path")) {
6acbcb92
JS
74 cmd += 11;
75 if (*cmd == '=')
384df833 76 git_set_argv_exec_path(cmd + 1);
6acbcb92
JS
77 else {
78 puts(git_exec_path());
79 exit(0);
80 }
89a56bfb
MH
81 } else if (!strcmp(cmd, "--html-path")) {
82 puts(system_path(GIT_HTML_PATH));
83 exit(0);
6acbcb92 84 } else if (!strcmp(cmd, "-p") || !strcmp(cmd, "--paginate")) {
4e10738a 85 use_pager = 1;
463a849d 86 } else if (!strcmp(cmd, "--no-pager")) {
4e10738a 87 use_pager = 0;
463a849d
MM
88 if (envchanged)
89 *envchanged = 1;
b0fa7ab5
CC
90 } else if (!strcmp(cmd, "--no-replace-objects")) {
91 read_replace_refs = 0;
6476b38b
CC
92 setenv(NO_REPLACE_OBJECTS_ENVIRONMENT, "1", 1);
93 if (envchanged)
94 *envchanged = 1;
6acbcb92 95 } else if (!strcmp(cmd, "--git-dir")) {
c321f00d
BG
96 if (*argc < 2) {
97 fprintf(stderr, "No directory given for --git-dir.\n" );
98 usage(git_usage_string);
99 }
45b09794 100 setenv(GIT_DIR_ENVIRONMENT, (*argv)[1], 1);
4394efec
ML
101 if (envchanged)
102 *envchanged = 1;
6acbcb92
JS
103 (*argv)++;
104 (*argc)--;
e4b02333 105 handled++;
cc44c765 106 } else if (!prefixcmp(cmd, "--git-dir=")) {
45b09794 107 setenv(GIT_DIR_ENVIRONMENT, cmd + 10, 1);
4394efec
ML
108 if (envchanged)
109 *envchanged = 1;
892c41b9
ML
110 } else if (!strcmp(cmd, "--work-tree")) {
111 if (*argc < 2) {
112 fprintf(stderr, "No directory given for --work-tree.\n" );
113 usage(git_usage_string);
114 }
115 setenv(GIT_WORK_TREE_ENVIRONMENT, (*argv)[1], 1);
4394efec
ML
116 if (envchanged)
117 *envchanged = 1;
892c41b9
ML
118 (*argv)++;
119 (*argc)--;
120 } else if (!prefixcmp(cmd, "--work-tree=")) {
121 setenv(GIT_WORK_TREE_ENVIRONMENT, cmd + 12, 1);
4394efec
ML
122 if (envchanged)
123 *envchanged = 1;
6acbcb92 124 } else if (!strcmp(cmd, "--bare")) {
ef5ddb2f 125 static char git_dir[PATH_MAX+1];
6adcca3f 126 is_bare_repository_cfg = 1;
9277d602 127 setenv(GIT_DIR_ENVIRONMENT, getcwd(git_dir, sizeof(git_dir)), 0);
4394efec
ML
128 if (envchanged)
129 *envchanged = 1;
6acbcb92
JS
130 } else {
131 fprintf(stderr, "Unknown option: %s\n", cmd);
822a7d50 132 usage(git_usage_string);
6acbcb92 133 }
4ab243a9
JS
134
135 (*argv)++;
136 (*argc)--;
137 handled++;
138 }
139 return handled;
140}
141
2b11e317
JS
142static int handle_alias(int *argcp, const char ***argv)
143{
af05d679 144 int envchanged = 0, ret = 0, saved_errno = errno;
2b11e317 145 const char *subdir;
0347a8c7 146 int count, option_count;
4b25d091 147 const char **new_argv;
94351118
JK
148 const char *alias_command;
149 char *alias_string;
e85dc0a3 150 int unused_nongit;
2b11e317 151
e85dc0a3 152 subdir = setup_git_directory_gently(&unused_nongit);
0347a8c7
ML
153
154 alias_command = (*argv)[0];
94351118 155 alias_string = alias_lookup(alias_command);
0347a8c7 156 if (alias_string) {
dfd42a3c 157 if (alias_string[0] == '!') {
a2f8028d 158 if (*argcp > 1) {
7a33bcbe 159 struct strbuf buf;
a2f8028d 160
7a33bcbe
PH
161 strbuf_init(&buf, PATH_MAX);
162 strbuf_addstr(&buf, alias_string);
b319ce4c 163 sq_quote_argv(&buf, (*argv) + 1, PATH_MAX);
a2f8028d 164 free(alias_string);
7a33bcbe 165 alias_string = buf.buf;
a2f8028d 166 }
dfd42a3c
TT
167 trace_printf("trace: alias to shell cmd: %s => %s\n",
168 alias_command, alias_string + 1);
169 ret = system(alias_string + 1);
170 if (ret >= 0 && WIFEXITED(ret) &&
171 WEXITSTATUS(ret) != 127)
172 exit(WEXITSTATUS(ret));
d7530708 173 die("Failed to run '%s' when expanding alias '%s'",
dfd42a3c
TT
174 alias_string + 1, alias_command);
175 }
0347a8c7 176 count = split_cmdline(alias_string, &new_argv);
dc4179f9
DM
177 if (count < 0)
178 die("Bad alias.%s string", alias_command);
4394efec
ML
179 option_count = handle_options(&new_argv, &count, &envchanged);
180 if (envchanged)
181 die("alias '%s' changes environment variables\n"
182 "You can use '!git' in the alias to do this.",
183 alias_command);
0347a8c7
ML
184 memmove(new_argv - option_count, new_argv,
185 count * sizeof(char *));
186 new_argv -= option_count;
187
188 if (count < 1)
189 die("empty alias for %s", alias_command);
190
191 if (!strcmp(alias_command, new_argv[0]))
192 die("recursive alias: %s", alias_command);
193
b319ce4c 194 trace_argv_printf(new_argv,
6ce4e61f
CC
195 "trace: alias expansion: %s =>",
196 alias_command);
575ba9d6 197
4b25d091 198 new_argv = xrealloc(new_argv, sizeof(char *) *
6167c136 199 (count + *argcp));
0347a8c7 200 /* insert after command name */
4b25d091 201 memcpy(new_argv + count, *argv + 1, sizeof(char *) * *argcp);
2b11e317 202
0347a8c7
ML
203 *argv = new_argv;
204 *argcp += count - 1;
2b11e317 205
0347a8c7 206 ret = 1;
2b11e317
JS
207 }
208
7be77de2 209 if (subdir && chdir(subdir))
d824cbba 210 die_errno("Cannot change to '%s'", subdir);
2b11e317 211
47e5c0ca
JS
212 errno = saved_errno;
213
2b11e317
JS
214 return ret;
215}
216
70827b15 217const char git_version_string[] = GIT_VERSION;
5b84f4d8 218
efffea03
JH
219#define RUN_SETUP (1<<0)
220#define USE_PAGER (1<<1)
7eff28a9
SP
221/*
222 * require working tree to be present -- anything uses this needs
223 * RUN_SETUP for reading from the configuration file.
224 */
7ae3df8c 225#define NEED_WORK_TREE (1<<2)
a633fca0 226
47d0b4ff
LT
227struct cmd_struct {
228 const char *cmd;
229 int (*fn)(int, const char **, const char *);
230 int option;
231};
232
f172f334 233static int run_builtin(struct cmd_struct *p, int argc, const char **argv)
47d0b4ff 234{
99caeed0 235 int status, help;
0f157315 236 struct stat st;
47d0b4ff
LT
237 const char *prefix;
238
239 prefix = NULL;
99caeed0
JN
240 help = argc == 2 && !strcmp(argv[1], "-h");
241 if (!help) {
242 if (p->option & RUN_SETUP)
243 prefix = setup_git_directory();
244
245 if (use_pager == -1 && p->option & RUN_SETUP)
246 use_pager = check_pager_config(p->cmd);
247 if (use_pager == -1 && p->option & USE_PAGER)
248 use_pager = 1;
249 }
4e10738a
JK
250 commit_pager_choice();
251
99caeed0 252 if (!help && p->option & NEED_WORK_TREE)
59f0f2f3
MH
253 setup_work_tree();
254
b319ce4c 255 trace_argv_printf(argv, "trace: built-in: git");
47d0b4ff 256
0f157315
LT
257 status = p->fn(argc, argv, prefix);
258 if (status)
47e3de0e 259 return status;
0f157315
LT
260
261 /* Somebody closed stdout? */
262 if (fstat(fileno(stdout), &st))
263 return 0;
264 /* Ignore write errors for pipes and sockets.. */
265 if (S_ISFIFO(st.st_mode) || S_ISSOCK(st.st_mode))
266 return 0;
267
268 /* Check for ENOSPC and EIO errors.. */
0227f988 269 if (fflush(stdout))
d824cbba 270 die_errno("write failure on standard output");
0227f988
LT
271 if (ferror(stdout))
272 die("unknown write failure on standard output");
273 if (fclose(stdout))
d824cbba 274 die_errno("close failed on standard output");
0f157315 275 return 0;
47d0b4ff
LT
276}
277
278static void handle_internal_command(int argc, const char **argv)
231af832
LT
279{
280 const char *cmd = argv[0];
47d0b4ff 281 static struct cmd_struct commands[] = {
7ae3df8c 282 { "add", cmd_add, RUN_SETUP | NEED_WORK_TREE },
11920d28 283 { "stage", cmd_add, RUN_SETUP | NEED_WORK_TREE },
d97bc5de 284 { "annotate", cmd_annotate, RUN_SETUP },
f754fa9c 285 { "apply", cmd_apply },
265d5280 286 { "archive", cmd_archive },
1bf072e3 287 { "bisect--helper", cmd_bisect__helper, RUN_SETUP | NEED_WORK_TREE },
4f0219a4 288 { "blame", cmd_blame, RUN_SETUP },
1da1b3a3 289 { "branch", cmd_branch, RUN_SETUP },
2e0afafe 290 { "bundle", cmd_bundle },
efffea03 291 { "cat-file", cmd_cat_file, RUN_SETUP },
782c2d65 292 { "checkout", cmd_checkout, RUN_SETUP | NEED_WORK_TREE },
4465f410
JS
293 { "checkout-index", cmd_checkout_index,
294 RUN_SETUP | NEED_WORK_TREE},
0864f264 295 { "check-ref-format", cmd_check_ref_format },
2d35d556 296 { "check-attr", cmd_check_attr, RUN_SETUP },
e827633a 297 { "cherry", cmd_cherry, RUN_SETUP },
7ae3df8c 298 { "cherry-pick", cmd_cherry_pick, RUN_SETUP | NEED_WORK_TREE },
8434c2f1 299 { "clone", cmd_clone },
113f10f2 300 { "clean", cmd_clean, RUN_SETUP | NEED_WORK_TREE },
f5bbc322 301 { "commit", cmd_commit, RUN_SETUP | NEED_WORK_TREE },
efffea03 302 { "commit-tree", cmd_commit_tree, RUN_SETUP },
e0d10e1c 303 { "config", cmd_config },
8112894d 304 { "count-objects", cmd_count_objects, RUN_SETUP },
9a0eaf83 305 { "describe", cmd_describe, RUN_SETUP },
89d07f75 306 { "diff", cmd_diff },
4f38f6b5 307 { "diff-files", cmd_diff_files, RUN_SETUP | NEED_WORK_TREE },
efffea03 308 { "diff-index", cmd_diff_index, RUN_SETUP },
efffea03 309 { "diff-tree", cmd_diff_tree, RUN_SETUP },
f2dc849e 310 { "fast-export", cmd_fast_export, RUN_SETUP },
b888d61c 311 { "fetch", cmd_fetch, RUN_SETUP },
2d4177c0 312 { "fetch-pack", cmd_fetch_pack, RUN_SETUP },
efffea03 313 { "fmt-merge-msg", cmd_fmt_merge_msg, RUN_SETUP },
9f613ddd 314 { "for-each-ref", cmd_for_each_ref, RUN_SETUP },
efffea03 315 { "format-patch", cmd_format_patch, RUN_SETUP },
b4dfefe0
MW
316 { "fsck", cmd_fsck, RUN_SETUP },
317 { "fsck-objects", cmd_fsck, RUN_SETUP },
6757ada4 318 { "gc", cmd_gc, RUN_SETUP },
f754fa9c 319 { "get-tar-commit-id", cmd_get_tar_commit_id },
34c6a82b 320 { "grep", cmd_grep, RUN_SETUP | USE_PAGER },
f754fa9c 321 { "help", cmd_help },
515377ea 322 { "init", cmd_init_db },
f754fa9c 323 { "init-db", cmd_init_db },
efffea03
JH
324 { "log", cmd_log, RUN_SETUP | USE_PAGER },
325 { "ls-files", cmd_ls_files, RUN_SETUP },
326 { "ls-tree", cmd_ls_tree, RUN_SETUP },
8951d7c1 327 { "ls-remote", cmd_ls_remote },
f754fa9c
JH
328 { "mailinfo", cmd_mailinfo },
329 { "mailsplit", cmd_mailsplit },
1c7b76be 330 { "merge", cmd_merge, RUN_SETUP | NEED_WORK_TREE },
71dfbf22 331 { "merge-base", cmd_merge_base, RUN_SETUP },
ba1f5f35 332 { "merge-file", cmd_merge_file },
a00a42ae 333 { "merge-ours", cmd_merge_ours, RUN_SETUP },
e1b3a2ca 334 { "merge-recursive", cmd_merge_recursive, RUN_SETUP | NEED_WORK_TREE },
1736855c 335 { "merge-subtree", cmd_merge_recursive, RUN_SETUP | NEED_WORK_TREE },
633e3556 336 { "mktree", cmd_mktree, RUN_SETUP },
7ae3df8c 337 { "mv", cmd_mv, RUN_SETUP | NEED_WORK_TREE },
efffea03
JH
338 { "name-rev", cmd_name_rev, RUN_SETUP },
339 { "pack-objects", cmd_pack_objects, RUN_SETUP },
8951d7c1 340 { "peek-remote", cmd_ls_remote },
d97bc5de 341 { "pickaxe", cmd_blame, RUN_SETUP },
efffea03
JH
342 { "prune", cmd_prune, RUN_SETUP },
343 { "prune-packed", cmd_prune_packed, RUN_SETUP },
102cb085 344 { "push", cmd_push, RUN_SETUP },
efffea03 345 { "read-tree", cmd_read_tree, RUN_SETUP },
be5908ae 346 { "receive-pack", cmd_receive_pack },
4264dc15 347 { "reflog", cmd_reflog, RUN_SETUP },
211c8968 348 { "remote", cmd_remote, RUN_SETUP },
54b0c1e0 349 { "replace", cmd_replace, RUN_SETUP },
e0d10e1c 350 { "repo-config", cmd_config },
658f3650 351 { "rerere", cmd_rerere, RUN_SETUP },
0e5a7faa 352 { "reset", cmd_reset, RUN_SETUP },
efffea03 353 { "rev-list", cmd_rev_list, RUN_SETUP },
5410a02a 354 { "rev-parse", cmd_rev_parse },
7ae3df8c 355 { "revert", cmd_revert, RUN_SETUP | NEED_WORK_TREE },
271bb087 356 { "rm", cmd_rm, RUN_SETUP },
96249c04 357 { "send-pack", cmd_send_pack, RUN_SETUP },
abe549e1 358 { "shortlog", cmd_shortlog, USE_PAGER },
efffea03
JH
359 { "show-branch", cmd_show_branch, RUN_SETUP },
360 { "show", cmd_show, RUN_SETUP | USE_PAGER },
10762323 361 { "status", cmd_status, RUN_SETUP | NEED_WORK_TREE },
f754fa9c 362 { "stripspace", cmd_stripspace },
efffea03 363 { "symbolic-ref", cmd_symbolic_ref, RUN_SETUP },
62e09ce9 364 { "tag", cmd_tag, RUN_SETUP },
9cb90b80 365 { "tar-tree", cmd_tar_tree },
efffea03
JH
366 { "unpack-objects", cmd_unpack_objects, RUN_SETUP },
367 { "update-index", cmd_update_index, RUN_SETUP },
368 { "update-ref", cmd_update_ref, RUN_SETUP },
53a1116c 369 { "update-server-info", cmd_update_server_info, RUN_SETUP },
39345a21 370 { "upload-archive", cmd_upload_archive },
2ae68fcb 371 { "verify-tag", cmd_verify_tag, RUN_SETUP },
f754fa9c 372 { "version", cmd_version },
efffea03
JH
373 { "whatchanged", cmd_whatchanged, RUN_SETUP | USE_PAGER },
374 { "write-tree", cmd_write_tree, RUN_SETUP },
2e3ed670 375 { "verify-pack", cmd_verify_pack },
358ddb62 376 { "show-ref", cmd_show_ref, RUN_SETUP },
e1e22e37 377 { "pack-refs", cmd_pack_refs, RUN_SETUP },
231af832
LT
378 };
379 int i;
23326d14
JS
380 static const char ext[] = STRIP_EXTENSION;
381
382 if (sizeof(ext) > 1) {
383 i = strlen(argv[0]) - strlen(ext);
384 if (i > 0 && !strcmp(argv[0] + i, ext)) {
e8eec71d 385 char *argv0 = xstrdup(argv[0]);
23326d14
JS
386 argv[0] = cmd = argv0;
387 argv0[i] = '\0';
388 }
389 }
231af832 390
1cd95087
LT
391 /* Turn "git cmd --help" into "git help cmd" */
392 if (argc > 1 && !strcmp(argv[1], "--help")) {
393 argv[1] = argv[0];
394 argv[0] = cmd = "help";
395 }
396
231af832
LT
397 for (i = 0; i < ARRAY_SIZE(commands); i++) {
398 struct cmd_struct *p = commands+i;
399 if (strcmp(p->cmd, cmd))
400 continue;
f172f334 401 exit(run_builtin(p, argc, argv));
231af832
LT
402 }
403}
404
7550be0a
JH
405static void execv_dashed_external(const char **argv)
406{
f285a2d7 407 struct strbuf cmd = STRBUF_INIT;
7550be0a 408 const char *tmp;
d8e96fd8 409 int status;
7550be0a 410
7550be0a
JH
411 strbuf_addf(&cmd, "git-%s", argv[0]);
412
413 /*
414 * argv[0] must be the git command, but the argv array
415 * belongs to the caller, and may be reused in
416 * subsequent loop iterations. Save argv[0] and
417 * restore it on error.
418 */
419 tmp = argv[0];
420 argv[0] = cmd.buf;
421
422 trace_argv_printf(argv, "trace: exec:");
423
d8e96fd8
JK
424 /*
425 * if we fail because the command is not found, it is
426 * OK to return. Otherwise, we just pass along the status code.
427 */
c024beb5 428 status = run_command_v_opt(argv, RUN_SILENT_EXEC_FAILURE);
0ac77ec3 429 if (status >= 0 || errno != ENOENT)
5709e036 430 exit(status);
7550be0a
JH
431
432 argv[0] = tmp;
433
434 strbuf_release(&cmd);
435}
436
a907e1b6
AS
437static int run_argv(int *argcp, const char ***argv)
438{
439 int done_alias = 0;
440
441 while (1) {
442 /* See if it's an internal command */
443 handle_internal_command(*argcp, *argv);
444
445 /* .. then try the external ones */
446 execv_dashed_external(*argv);
447
448 /* It could be an alias -- this works around the insanity
449 * of overriding "git log" with "git show" by having
450 * alias.log = show
451 */
452 if (done_alias || !handle_alias(argcp, argv))
453 break;
454 done_alias = 1;
455 }
456
457 return done_alias;
458}
459
7550be0a 460
47d0b4ff 461int main(int argc, const char **argv)
8e49d503 462{
4dd47c3b 463 const char *cmd;
231af832 464
2cd72b0b
SP
465 cmd = git_extract_argv0_path(argv[0]);
466 if (!cmd)
4dd47c3b 467 cmd = "git-help";
8e49d503 468
231af832
LT
469 /*
470 * "git-xxxx" is the same as "git xxxx", but we obviously:
471 *
472 * - cannot take flags in between the "git" and the "xxxx".
473 * - cannot execute it externally (since it would just do
474 * the same thing over again)
475 *
476 * So we just directly call the internal command handler, and
477 * die if that one cannot handle it.
478 */
cc44c765 479 if (!prefixcmp(cmd, "git-")) {
231af832
LT
480 cmd += 4;
481 argv[0] = cmd;
47d0b4ff 482 handle_internal_command(argc, argv);
231af832
LT
483 die("cannot handle %s internally", cmd);
484 }
8e49d503 485
231af832 486 /* Look for flags.. */
6acbcb92
JS
487 argv++;
488 argc--;
4394efec 489 handle_options(&argv, &argc, NULL);
4e10738a 490 commit_pager_choice();
6acbcb92 491 if (argc > 0) {
cc44c765 492 if (!prefixcmp(argv[0], "--"))
6acbcb92
JS
493 argv[0] += 2;
494 } else {
3d7e2d85
SP
495 /* The user didn't specify a command; give them help */
496 printf("usage: %s\n\n", git_usage_string);
497 list_common_cmds_help();
b7d96819 498 printf("\n%s\n", git_more_info_string);
3d7e2d85 499 exit(1);
97fc6c5f 500 }
6acbcb92 501 cmd = argv[0];
231af832
LT
502
503 /*
511707d4 504 * We use PATH to find git commands, but we prepend some higher
3ea3c215 505 * precedence paths: the "--exec-path" option, the GIT_EXEC_PATH
511707d4
SP
506 * environment, and the $(gitexecdir) from the Makefile at build
507 * time.
231af832 508 */
e1464ca7 509 setup_path();
8e49d503 510
a025463b 511 while (1) {
a907e1b6
AS
512 static int done_help = 0;
513 static int was_alias = 0;
514 was_alias = run_argv(&argc, &argv);
515 if (errno != ENOENT)
a025463b 516 break;
a907e1b6 517 if (was_alias) {
f3dd015c
TT
518 fprintf(stderr, "Expansion of alias '%s' failed; "
519 "'%s' is not a git-command\n",
520 cmd, argv[0]);
521 exit(1);
522 }
a907e1b6
AS
523 if (!done_help) {
524 cmd = argv[0] = help_unknown_cmd(cmd);
525 done_help = 1;
526 } else
527 break;
f3dd015c 528 }
10b15b86
AR
529
530 fprintf(stderr, "Failed to run command '%s': %s\n",
33ebb871 531 cmd, strerror(errno));
8e49d503
AE
532
533 return 1;
534}