sbin/hammer: Change fprintf (without exit) to err variants
[dragonfly.git] / sbin / hammer / cmd_pfs.c
blobbee829b080e56fc98dac6df15cdecabca0f525b4
1 /*
2 * Copyright (c) 2008 The DragonFly Project. All rights reserved.
4 * This code is derived from software contributed to The DragonFly Project
5 * by Matthew Dillon <dillon@backplane.com>
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in
15 * the documentation and/or other materials provided with the
16 * distribution.
17 * 3. Neither the name of The DragonFly Project nor the names of its
18 * contributors may be used to endorse or promote products derived
19 * from this software without specific, prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
25 * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26 * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
34 * $DragonFly: src/sbin/hammer/cmd_pseudofs.c,v 1.12 2008/10/08 21:01:54 thomas Exp $
37 #include <libgen.h>
39 #include "hammer.h"
41 static int scanpfsid(struct hammer_ioc_pseudofs_rw *pfs, const char *path);
42 static void parse_pfsd_options(char **av, int ac, hammer_pseudofs_data_t pfsd);
43 static void init_pfsd(hammer_pseudofs_data_t pfsd, int is_slave);
44 static void pseudofs_usage(int code);
45 static int timetosecs(char *str);
47 void
48 clrpfs(struct hammer_ioc_pseudofs_rw *pfs, hammer_pseudofs_data_t pfsd,
49 int pfs_id)
51 bzero(pfs, sizeof(*pfs));
53 if (pfsd)
54 pfs->ondisk = pfsd;
55 else
56 pfs->ondisk = malloc(sizeof(*pfs->ondisk));
57 bzero(pfs->ondisk, sizeof(*pfs->ondisk));
59 pfs->pfs_id = pfs_id;
60 pfs->bytes = sizeof(*pfs->ondisk);
61 pfs->version = HAMMER_IOC_PSEUDOFS_VERSION;
65 * If path is a symlink, return strdup'd path.
66 * If it's a directory via symlink, strip trailing /
67 * from strdup'd path and return the symlink.
69 static char*
70 getlink(const char *path)
72 int i;
73 char *linkpath;
74 struct stat st;
76 if (lstat(path, &st))
77 return(NULL);
78 linkpath = strdup(path);
80 if (S_ISDIR(st.st_mode)) {
81 i = strlen(linkpath) - 1;
82 while (i > 0 && linkpath[i] == '/')
83 linkpath[i--] = 0;
84 lstat(linkpath, &st);
86 if (S_ISLNK(st.st_mode)) {
87 return(linkpath);
90 free(linkpath);
91 return(NULL);
95 * Calculate the PFS id given a path to a file/directory or
96 * a @@%llx:%d softlink.
98 int
99 getpfs(struct hammer_ioc_pseudofs_rw *pfs, const char *path)
101 int fd;
103 clrpfs(pfs, NULL, -1);
106 * Extract the PFS id.
107 * dirname(path) is supposed to be a directory in root PFS.
109 if (scanpfsid(pfs, path) == 0) {
110 path = dirname(path); /* strips trailing / first if any */
114 * Open the path regardless of scanpfsid() result, since some
115 * commands can take a regular file/directory (e.g. pfs-status).
117 fd = open(path, O_RDONLY);
118 if (fd < 0)
119 err(1, "Failed to open %s", path);
122 * If pfs.pfs_id has been set to non -1, the file descriptor fd
123 * could be any fd of HAMMER inodes since HAMMERIOC_GET_PSEUDOFS
124 * doesn't depend on inode attributes if it's set to a valid id.
126 if (ioctl(fd, HAMMERIOC_GET_PSEUDOFS, pfs) < 0)
127 err(1, "Cannot access %s", path);
129 return(fd);
133 * Extract the PFS id from path.
135 static int
136 scanpfsid(struct hammer_ioc_pseudofs_rw *pfs, const char *path)
138 char *linkpath;
139 char buf[64];
140 uintmax_t dummy_tid;
141 struct stat st;
143 if (stat(path, &st)) {
144 /* possibly slave PFS */
145 } else if (S_ISDIR(st.st_mode)) {
146 /* possibly master or slave PFS */
147 } else {
148 return(-1); /* neither */
151 linkpath = getlink(path);
152 if (linkpath) {
154 * Read the symlink assuming it's a link to PFS.
156 bzero(buf, sizeof(buf));
157 if (readlink(linkpath, buf, sizeof(buf) - 1) < 0) {
158 free(linkpath);
159 return(-1);
161 free(linkpath);
162 path = buf;
166 * The symlink created by pfs-master|slave is just a symlink.
167 * One could happen to remove a symlink and relink PFS as
168 * # ln -s ./@@-1:00001 ./link
169 * which results PFS having something extra before @@.
170 * One could also directly use the PFS and results the same.
171 * Get rid of it before we extract the PFS id.
173 if (strchr(path, '/')) {
174 path = basename(path); /* strips trailing / first if any */
175 if (path == NULL)
176 err(1, "basename");
180 * Test and extract the PFS id from the link.
181 * "@@%jx:%d" covers both "@@-1:%05d" format for master PFS
182 * and "@@0x%016jx:%05d" format for slave PFS.
184 if (sscanf(path, "@@%jx:%d", &dummy_tid, &pfs->pfs_id) == 2) {
185 assert(pfs->pfs_id > 0);
186 return(0);
189 return(-1);
192 void
193 relpfs(int fd, struct hammer_ioc_pseudofs_rw *pfs)
195 if (fd >= 0)
196 close(fd);
197 if (pfs->ondisk) {
198 free(pfs->ondisk);
199 pfs->ondisk = NULL;
203 static void
204 print_pfs_status(char *path)
206 struct hammer_ioc_pseudofs_rw pfs;
207 int fd;
209 fd = getpfs(&pfs, path);
210 printf("%s\t", path);
211 if (fd < 0 || ioctl(fd, HAMMERIOC_GET_PSEUDOFS, &pfs) < 0) {
212 printf("Invalid PFS path %s\n", path);
213 } else {
214 printf("PFS#%d {\n", pfs.pfs_id);
215 dump_pfsd(pfs.ondisk, fd);
216 printf("}\n");
218 if (fd >= 0)
219 close(fd);
220 if (pfs.ondisk)
221 free(pfs.ondisk);
222 relpfs(fd, &pfs);
225 void
226 hammer_cmd_pseudofs_status(char **av, int ac)
228 int i;
230 if (ac == 0) {
231 char buf[2] = "."; /* can't be readonly string */
232 print_pfs_status(buf);
233 return;
236 for (i = 0; i < ac; ++i)
237 print_pfs_status(av[i]);
240 void
241 hammer_cmd_pseudofs_create(char **av, int ac, int is_slave)
243 struct hammer_ioc_pseudofs_rw pfs;
244 struct hammer_pseudofs_data pfsd;
245 struct stat st;
246 const char *path;
247 char *dirpath;
248 char *linkpath;
249 int pfs_id;
250 int fd;
252 if (ac == 0)
253 pseudofs_usage(1);
254 path = av[0];
255 if (lstat(path, &st) == 0) {
256 errx(1, "Cannot create %s, file exists!", path);
257 } else if (path[strlen(path) - 1] == '/') {
258 errx(1, "Invalid PFS path %s with trailing /", path);
262 * Figure out the directory prefix, taking care of degenerate
263 * cases.
265 dirpath = dirname(path);
266 fd = open(dirpath, O_RDONLY);
267 if (fd < 0)
268 err(1, "Cannot open directory %s", dirpath);
271 * Avoid foot-shooting. Don't let the user create a PFS
272 * softlink via a PFS. PFS softlinks may only be accessed
273 * via the master filesystem. Checking it here ensures
274 * other PFS commands access PFS under the master filesystem.
276 clrpfs(&pfs, &pfsd, -1);
278 ioctl(fd, HAMMERIOC_GET_PSEUDOFS, &pfs);
279 if (pfs.pfs_id != HAMMER_ROOT_PFSID) {
280 fprintf(stderr,
281 "You are attempting to access a PFS softlink "
282 "from a PFS. It may not represent the PFS\n"
283 "on the main filesystem mount that you "
284 "expect! You may only access PFS softlinks\n"
285 "via the main filesystem mount!\n");
286 exit(1);
289 for (pfs_id = 0; pfs_id < HAMMER_MAX_PFS; ++pfs_id) {
290 clrpfs(&pfs, &pfsd, pfs_id);
291 if (ioctl(fd, HAMMERIOC_GET_PSEUDOFS, &pfs) < 0) {
292 if (errno != ENOENT)
293 err(1, "Cannot create %s", path);
294 break;
297 if (pfs_id == HAMMER_MAX_PFS) {
298 errx(1, "Cannot create %s, all PFSs in use", path);
299 } else if (pfs_id == HAMMER_ROOT_PFSID) {
300 errx(1, "Fatal error: PFS#%d must exist", HAMMER_ROOT_PFSID);
304 * Create the new PFS
306 printf("Creating PFS#%d\t", pfs_id);
307 clrpfs(&pfs, &pfsd, pfs_id);
308 init_pfsd(&pfsd, is_slave);
310 if (ioctl(fd, HAMMERIOC_SET_PSEUDOFS, &pfs) < 0) {
311 printf("failed: %s\n", strerror(errno));
312 } else {
313 /* special symlink, must be exactly 10 characters */
314 asprintf(&linkpath, "@@PFS%05d", pfs_id);
315 if (symlink(linkpath, path) < 0) {
316 printf("failed: cannot create symlink: %s\n",
317 strerror(errno));
318 } else {
319 printf("succeeded!\n");
320 hammer_cmd_pseudofs_update(av, ac);
323 free(dirpath);
324 close(fd);
327 void
328 hammer_cmd_pseudofs_destroy(char **av, int ac)
330 struct hammer_ioc_pseudofs_rw pfs;
331 char *linkpath;
332 int fd;
333 int i;
335 if (ac == 0)
336 pseudofs_usage(1);
337 fd = getpfs(&pfs, av[0]);
339 if (pfs.pfs_id == HAMMER_ROOT_PFSID)
340 errx(1, "You cannot destroy PFS#%d", HAMMER_ROOT_PFSID);
342 printf("You have requested that PFS#%d (%s) be destroyed\n",
343 pfs.pfs_id, pfs.ondisk->label);
344 printf("This will irrevocably destroy all data on this PFS!!!!!\n");
345 printf("Do you really want to do this? [y/n] ");
346 fflush(stdout);
347 if (getyn() == 0)
348 errx(1, "No action taken on PFS#%d", pfs.pfs_id);
350 if (hammer_is_pfs_master(pfs.ondisk)) {
351 printf("This PFS is currently setup as a MASTER!\n");
352 printf("Are you absolutely sure you want to destroy it? [y/n] ");
353 fflush(stdout);
354 if (getyn() == 0)
355 errx(1, "No action taken on PFS#%d", pfs.pfs_id);
358 printf("Destroying PFS#%d (%s)", pfs.pfs_id, pfs.ondisk->label);
359 if (DebugOpt) {
360 printf("\n");
361 } else {
362 printf(" in");
363 for (i = 5; i; --i) {
364 printf(" %d", i);
365 fflush(stdout);
366 sleep(1);
368 printf(".. starting destruction pass\n");
372 * Remove the softlink on success.
374 if (ioctl(fd, HAMMERIOC_RMR_PSEUDOFS, &pfs) == 0) {
375 printf("pfs-destroy of PFS#%d succeeded!\n", pfs.pfs_id);
376 linkpath = getlink(av[0]);
377 if (linkpath) {
378 if (remove(linkpath) < 0)
379 err(1, "Unable to remove softlink %s", linkpath);
380 free(linkpath);
382 } else {
383 printf("pfs-destroy of PFS#%d failed: %s\n",
384 pfs.pfs_id, strerror(errno));
386 relpfs(fd, &pfs);
389 void
390 hammer_cmd_pseudofs_upgrade(char **av, int ac)
392 struct hammer_ioc_pseudofs_rw pfs;
393 int fd;
395 if (ac == 0)
396 pseudofs_usage(1);
397 fd = getpfs(&pfs, av[0]);
399 if (pfs.pfs_id == HAMMER_ROOT_PFSID) {
400 errx(1, "You cannot upgrade PFS#%d"
401 " (It should already be a master)",
402 HAMMER_ROOT_PFSID);
403 } else if (hammer_is_pfs_master(pfs.ondisk)) {
404 errx(1, "It is already a master");
407 if (ioctl(fd, HAMMERIOC_UPG_PSEUDOFS, &pfs) == 0) {
408 printf("pfs-upgrade of PFS#%d (%s) succeeded\n",
409 pfs.pfs_id, pfs.ondisk->label);
410 } else {
411 err(1, "pfs-upgrade of PFS#%d (%s) failed",
412 pfs.pfs_id, pfs.ondisk->label);
414 relpfs(fd, &pfs);
417 void
418 hammer_cmd_pseudofs_downgrade(char **av, int ac)
420 struct hammer_ioc_pseudofs_rw pfs;
421 int fd;
423 if (ac == 0)
424 pseudofs_usage(1);
425 fd = getpfs(&pfs, av[0]);
427 if (pfs.pfs_id == HAMMER_ROOT_PFSID) {
428 errx(1, "You cannot downgrade PFS#%d", HAMMER_ROOT_PFSID);
429 } else if (hammer_is_pfs_slave(pfs.ondisk)) {
430 errx(1, "It is already a slave");
433 if (ioctl(fd, HAMMERIOC_DGD_PSEUDOFS, &pfs) == 0) {
434 printf("pfs-downgrade of PFS#%d (%s) succeeded\n",
435 pfs.pfs_id, pfs.ondisk->label);
436 } else {
437 err(1, "pfs-downgrade of PFS#%d (%s) failed",
438 pfs.pfs_id, pfs.ondisk->label);
440 relpfs(fd, &pfs);
443 void
444 hammer_cmd_pseudofs_update(char **av, int ac)
446 struct hammer_ioc_pseudofs_rw pfs;
447 int fd;
449 if (ac == 0)
450 pseudofs_usage(1);
451 fd = getpfs(&pfs, av[0]);
453 printf("%s\n", av[0]);
454 fflush(stdout);
456 if (ioctl(fd, HAMMERIOC_GET_PSEUDOFS, &pfs) == 0) {
457 parse_pfsd_options(av + 1, ac - 1, pfs.ondisk);
458 if (hammer_is_pfs_slave(pfs.ondisk) &&
459 pfs.pfs_id == HAMMER_ROOT_PFSID) {
460 errx(1, "The real mount point cannot be made a PFS "
461 "slave, only PFS sub-directories can be made "
462 "slaves");
464 pfs.bytes = sizeof(*pfs.ondisk);
465 if (ioctl(fd, HAMMERIOC_SET_PSEUDOFS, &pfs) == 0) {
466 if (ioctl(fd, HAMMERIOC_GET_PSEUDOFS, &pfs) == 0) {
467 dump_pfsd(pfs.ondisk, fd);
468 } else {
469 err(1, "Unable to retrieve PFS configuration "
470 "after successful update");
472 } else {
473 err(1, "Unable to adjust PFS configuration");
476 relpfs(fd, &pfs);
479 static void
480 init_pfsd(hammer_pseudofs_data_t pfsd, int is_slave)
482 uint32_t status;
484 bzero(pfsd, sizeof(*pfsd));
485 pfsd->sync_beg_tid = 1;
486 pfsd->sync_end_tid = 1;
487 pfsd->sync_beg_ts = 0;
488 pfsd->sync_end_ts = 0;
489 uuid_create(&pfsd->shared_uuid, &status);
490 uuid_create(&pfsd->unique_uuid, &status);
491 if (is_slave)
492 pfsd->mirror_flags |= HAMMER_PFSD_SLAVE;
495 void
496 dump_pfsd(hammer_pseudofs_data_t pfsd, int fd)
498 struct hammer_ioc_version version;
499 uint32_t status;
500 char *str = NULL;
502 printf(" sync-beg-tid=0x%016jx\n", (uintmax_t)pfsd->sync_beg_tid);
503 printf(" sync-end-tid=0x%016jx\n", (uintmax_t)pfsd->sync_end_tid);
504 uuid_to_string(&pfsd->shared_uuid, &str, &status);
505 printf(" shared-uuid=%s\n", str);
506 free(str);
507 uuid_to_string(&pfsd->unique_uuid, &str, &status);
508 printf(" unique-uuid=%s\n", str);
509 free(str);
510 printf(" label=\"%s\"\n", pfsd->label);
511 if (pfsd->snapshots[0])
512 printf(" snapshots=\"%s\"\n", pfsd->snapshots);
513 if (pfsd->prune_min < (60 * 60 * 24)) {
514 printf(" prune-min=%02d:%02d:%02d\n",
515 pfsd->prune_min / 60 / 60 % 24,
516 pfsd->prune_min / 60 % 60,
517 pfsd->prune_min % 60);
518 } else if (pfsd->prune_min % (60 * 60 * 24)) {
519 printf(" prune-min=%dd/%02d:%02d:%02d\n",
520 pfsd->prune_min / 60 / 60 / 24,
521 pfsd->prune_min / 60 / 60 % 24,
522 pfsd->prune_min / 60 % 60,
523 pfsd->prune_min % 60);
524 } else {
525 printf(" prune-min=%dd\n", pfsd->prune_min / 60 / 60 / 24);
528 if (hammer_is_pfs_slave(pfsd)) {
529 printf(" operating as a SLAVE\n");
530 } else {
531 printf(" operating as a MASTER\n");
535 * Snapshots directory cannot be shown when there is no fd since
536 * hammer version can't be retrieved. mirror-dump passes -1 because
537 * its input came from mirror-read output thus no path is available
538 * to open(2).
540 if (fd >= 0 && pfsd->snapshots[0] == 0) {
541 bzero(&version, sizeof(version));
542 if (ioctl(fd, HAMMERIOC_GET_VERSION, &version) < 0)
543 return;
544 if (version.cur_version < 3) {
545 if (hammer_is_pfs_slave(pfsd)) {
546 printf(" snapshots directory not set for "
547 "slave\n");
548 } else {
549 printf(" snapshots directory for master "
550 "defaults to <pfs>/snapshots\n");
552 } else {
553 printf(" snapshots directory defaults to "
554 "/var/hammer/<pfs>\n");
559 static void
560 parse_pfsd_options(char **av, int ac, hammer_pseudofs_data_t pfsd)
562 char *cmd;
563 char *ptr;
564 int len;
565 uint32_t status;
567 while (ac) {
568 cmd = *av;
569 if ((ptr = strchr(cmd, '=')) != NULL)
570 *ptr++ = 0;
573 * Basic assignment value test
575 if (ptr == NULL)
576 errx(1, "option %s requires an assignment", cmd);
578 status = uuid_s_ok;
579 if (strcmp(cmd, "sync-beg-tid") == 0) {
580 pfsd->sync_beg_tid = strtoull(ptr, NULL, 16);
581 } else if (strcmp(cmd, "sync-end-tid") == 0) {
582 pfsd->sync_end_tid = strtoull(ptr, NULL, 16);
583 } else if (strcmp(cmd, "shared-uuid") == 0) {
584 uuid_from_string(ptr, &pfsd->shared_uuid, &status);
585 } else if (strcmp(cmd, "unique-uuid") == 0) {
586 uuid_from_string(ptr, &pfsd->unique_uuid, &status);
587 } else if (strcmp(cmd, "label") == 0) {
588 len = strlen(ptr);
589 if (ptr[0] == '"' && ptr[len-1] == '"') {
590 ptr[len-1] = 0;
591 ++ptr;
592 } else if (ptr[0] == '"') {
593 errx(1, "option %s: malformed string", cmd);
595 snprintf(pfsd->label, sizeof(pfsd->label), "%s", ptr);
596 } else if (strcmp(cmd, "snapshots") == 0) {
597 len = strlen(ptr);
598 if (ptr[0] != '/') {
599 fprintf(stderr,
600 "option %s: '%s' must be an "
601 "absolute path\n", cmd, ptr);
602 if (ptr[0] == 0) {
603 fprintf(stderr,
604 "use 'snapshots-clear' "
605 "to unset snapshots dir\n");
607 exit(1);
609 if (len >= (int)sizeof(pfsd->snapshots)) {
610 errx(1, "option %s: path too long, %d "
611 "character limit", cmd, len);
613 snprintf(pfsd->snapshots, sizeof(pfsd->snapshots),
614 "%s", ptr);
615 } else if (strcmp(cmd, "snapshots-clear") == 0) {
616 pfsd->snapshots[0] = 0;
617 } else if (strcmp(cmd, "prune-min") == 0) {
618 pfsd->prune_min = timetosecs(ptr);
619 if (pfsd->prune_min < 0) {
620 errx(1, "option %s: illegal time spec, "
621 "use Nd or [Nd/]hh[:mm[:ss]]", ptr);
623 } else {
624 errx(1, "invalid option: %s", cmd);
626 if (status != uuid_s_ok) {
627 errx(1, "option %s: error parsing uuid %s", cmd, ptr);
629 --ac;
630 ++av;
634 static
635 void
636 pseudofs_usage(int code)
638 fprintf(stderr,
639 "hammer pfs-status <dirpath> ...\n"
640 "hammer pfs-master <dirpath> [options]\n"
641 "hammer pfs-slave <dirpath> [options]\n"
642 "hammer pfs-update <dirpath> [options]\n"
643 "hammer pfs-upgrade <dirpath>\n"
644 "hammer pfs-downgrade <dirpath>\n"
645 "hammer pfs-destroy <dirpath>\n"
646 "\n"
647 "options:\n"
648 " sync-beg-tid=0x16llx\n"
649 " sync-end-tid=0x16llx\n"
650 " shared-uuid=0x16llx\n"
651 " unique-uuid=0x16llx\n"
652 " label=\"string\"\n"
653 " snapshots=\"/path\"\n"
654 " snapshots-clear\n"
655 " prune-min=Nd\n"
656 " prune-min=[Nd/]hh[:mm[:ss]]\n"
658 exit(code);
662 * Convert time in the form [Nd/]hh[:mm[:ss]] to seconds.
664 * Return -1 if a parse error occurs.
665 * Return 0x7FFFFFFF if the time exceeds the maximum allowed.
667 static
669 timetosecs(char *str)
671 int days = 0;
672 int hrs = 0;
673 int mins = 0;
674 int secs = 0;
675 int n;
676 long long v;
677 char *ptr;
679 n = strtol(str, &ptr, 10);
680 if (n < 0)
681 return(-1);
682 if (*ptr == 'd') {
683 days = n;
684 ++ptr;
685 if (*ptr == '/')
686 n = strtol(ptr + 1, &ptr, 10);
687 else
688 n = 0;
690 if (n < 0)
691 return(-1);
692 hrs = n;
693 if (*ptr == ':') {
694 n = strtol(ptr + 1, &ptr, 10);
695 if (n < 0)
696 return(-1);
697 mins = n;
698 if (*ptr == ':') {
699 n = strtol(ptr + 1, &ptr, 10);
700 if (n < 0)
701 return(-1);
702 secs = n;
705 if (*ptr)
706 return(-1);
707 v = days * 24 * 60 * 60 + hrs * 60 * 60 + mins * 60 + secs;
708 if (v > 0x7FFFFFFF)
709 v = 0x7FFFFFFF;
710 return((int)v);