Bring the gpt labeling program in from FreeBSD.
[dragonfly/vkernel-mp.git] / sbin / gpt / add.c
blob75be6a21ebbeb9ed5da0eef7703eeafbaf7918ea
1 /*-
2 * Copyright (c) 2002 Marcel Moolenaar
3 * All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 * $FreeBSD: src/sbin/gpt/add.c,v 1.15 2006/10/04 18:20:25 marcel Exp $
27 * $DragonFly: src/sbin/gpt/add.c,v 1.1 2007/06/16 22:29:27 dillon Exp $
30 #include <sys/types.h>
32 #include <err.h>
33 #include <stddef.h>
34 #include <stdio.h>
35 #include <stdlib.h>
36 #include <string.h>
37 #include <unistd.h>
39 #include "map.h"
40 #include "gpt.h"
42 static uuid_t type;
43 static off_t block, size;
44 static unsigned int entry;
46 static void
47 usage_add(void)
50 fprintf(stderr,
51 "usage: %s [-b lba] [-i index] [-s lba] [-t uuid] device ...\n",
52 getprogname());
53 exit(1);
56 static void
57 add(int fd)
59 map_t *gpt, *tpg;
60 map_t *tbl, *lbt;
61 map_t *map;
62 struct gpt_hdr *hdr;
63 struct gpt_ent *ent;
64 unsigned int i;
66 gpt = map_find(MAP_TYPE_PRI_GPT_HDR);
67 if (gpt == NULL) {
68 warnx("%s: error: no primary GPT header; run create or recover",
69 device_name);
70 return;
73 tpg = map_find(MAP_TYPE_SEC_GPT_HDR);
74 if (tpg == NULL) {
75 warnx("%s: error: no secondary GPT header; run recover",
76 device_name);
77 return;
80 tbl = map_find(MAP_TYPE_PRI_GPT_TBL);
81 lbt = map_find(MAP_TYPE_SEC_GPT_TBL);
82 if (tbl == NULL || lbt == NULL) {
83 warnx("%s: error: run recover -- trust me", device_name);
84 return;
87 hdr = gpt->map_data;
88 if (entry > le32toh(hdr->hdr_entries)) {
89 warnx("%s: error: index %u out of range (%u max)", device_name,
90 entry, le32toh(hdr->hdr_entries));
91 return;
94 if (entry > 0) {
95 i = entry - 1;
96 ent = (void*)((char*)tbl->map_data + i *
97 le32toh(hdr->hdr_entsz));
98 if (!uuid_is_nil(&ent->ent_type, NULL)) {
99 warnx("%s: error: entry at index %u is not free",
100 device_name, entry);
101 return;
103 } else {
104 /* Find empty slot in GPT table. */
105 for (i = 0; i < le32toh(hdr->hdr_entries); i++) {
106 ent = (void*)((char*)tbl->map_data + i *
107 le32toh(hdr->hdr_entsz));
108 if (uuid_is_nil(&ent->ent_type, NULL))
109 break;
111 if (i == le32toh(hdr->hdr_entries)) {
112 warnx("%s: error: no available table entries",
113 device_name);
114 return;
118 map = map_alloc(block, size);
119 if (map == NULL) {
120 warnx("%s: error: no space available on device", device_name);
121 return;
124 le_uuid_enc(&ent->ent_type, &type);
125 ent->ent_lba_start = htole64(map->map_start);
126 ent->ent_lba_end = htole64(map->map_start + map->map_size - 1LL);
128 hdr->hdr_crc_table = htole32(crc32(tbl->map_data,
129 le32toh(hdr->hdr_entries) * le32toh(hdr->hdr_entsz)));
130 hdr->hdr_crc_self = 0;
131 hdr->hdr_crc_self = htole32(crc32(hdr, le32toh(hdr->hdr_size)));
133 gpt_write(fd, gpt);
134 gpt_write(fd, tbl);
136 hdr = tpg->map_data;
137 ent = (void*)((char*)lbt->map_data + i * le32toh(hdr->hdr_entsz));
139 le_uuid_enc(&ent->ent_type, &type);
140 ent->ent_lba_start = htole64(map->map_start);
141 ent->ent_lba_end = htole64(map->map_start + map->map_size - 1LL);
143 hdr->hdr_crc_table = htole32(crc32(lbt->map_data,
144 le32toh(hdr->hdr_entries) * le32toh(hdr->hdr_entsz)));
145 hdr->hdr_crc_self = 0;
146 hdr->hdr_crc_self = htole32(crc32(hdr, le32toh(hdr->hdr_size)));
148 gpt_write(fd, lbt);
149 gpt_write(fd, tpg);
151 printf("%sp%u added\n", device_name, i + 1);
155 cmd_add(int argc, char *argv[])
157 char *p;
158 int ch, fd;
160 /* Get the migrate options */
161 while ((ch = getopt(argc, argv, "b:i:s:t:")) != -1) {
162 switch(ch) {
163 case 'b':
164 if (block > 0)
165 usage_add();
166 block = strtoll(optarg, &p, 10);
167 if (*p != 0 || block < 1)
168 usage_add();
169 break;
170 case 'i':
171 if (entry > 0)
172 usage_add();
173 entry = strtol(optarg, &p, 10);
174 if (*p != 0 || entry < 1)
175 usage_add();
176 break;
177 case 's':
178 if (size > 0)
179 usage_add();
180 size = strtoll(optarg, &p, 10);
181 if (*p != 0 || size < 1)
182 usage_add();
183 break;
184 case 't':
185 if (!uuid_is_nil(&type, NULL))
186 usage_add();
187 if (parse_uuid(optarg, &type) != 0)
188 usage_add();
189 break;
190 default:
191 usage_add();
195 if (argc == optind)
196 usage_add();
198 /* Create UFS partitions by default. */
199 if (uuid_is_nil(&type, NULL)) {
200 uuid_t ufs = GPT_ENT_TYPE_FREEBSD_UFS;
201 type = ufs;
204 while (optind < argc) {
205 fd = gpt_open(argv[optind++]);
206 if (fd == -1) {
207 warn("unable to open device '%s'", device_name);
208 continue;
211 add(fd);
213 gpt_close(fd);
216 return (0);