void copy_shop(struct shop_data *tshop, struct shop_data *fshop)
{
/*
* Copy basic information over.
*/
S_NUM(tshop) = S_NUM(fshop);
S_KEEPER(tshop) = S_KEEPER(fshop);
S_OPEN1(tshop) = S_OPEN1(fshop);
S_CLOSE1(tshop) = S_CLOSE1(fshop);
S_OPEN2(tshop) = S_OPEN2(fshop);
S_CLOSE2(tshop) = S_CLOSE2(fshop);
S_BANK(tshop) = S_BANK(fshop);
S_BROKE_TEMPER(tshop) = S_BROKE_TEMPER(fshop);
S_BITVECTOR(tshop) = S_BITVECTOR(fshop);
S_NOTRADE(tshop) = S_NOTRADE(fshop);
S_SORT(tshop) = S_SORT(fshop);
S_BUYPROFIT(tshop) = S_BUYPROFIT(fshop);
S_SELLPROFIT(tshop) = S_SELLPROFIT(fshop);
S_FUNC(tshop) = S_FUNC(fshop);
/*
* Copy lists over.
*/
copy_list(&(S_ROOMS(tshop)), S_ROOMS(fshop));
copy_list(&(S_PRODUCTS(tshop)), S_PRODUCTS(fshop));
copy_type_list(&(tshop->type), fshop->type);
/*
* Copy notification strings over.
*/
free_shop_strings(tshop);
S_NOITEM1(tshop) = str_dup(S_NOITEM1(fshop));
S_NOITEM2(tshop) = str_dup(S_NOITEM2(fshop));
S_NOCASH1(tshop) = str_dup(S_NOCASH1(fshop));
S_NOCASH2(tshop) = str_dup(S_NOCASH2(fshop));
S_NOBUY(tshop) = str_dup(S_NOBUY(fshop));
S_BUY(tshop) = str_dup(S_BUY(fshop));
S_SELL(tshop) = str_dup(S_SELL(fshop));
S_PROPRIETARIO(tshop) = S_PROPRIETARIO(fshop);
S_CLAN(tshop) = S_CLAN(fshop);
S_VALORE(tshop) = S_VALORE(fshop);
S_VALORE1(tshop) = S_VALORE1(fshop);
S_VALORE2(tshop) = S_VALORE2(fshop);
S_VALORE3(tshop) = S_VALORE3(fshop);
S_VALORE4(tshop) = S_VALORE4(fshop);
S_VALORE5(tshop) = S_VALORE5(fshop);
}
int save_shops(zone_rnum zone_num)
{
int i, j, rshop, vzone, top;
FILE *shop_file;
char fname[64];
struct shop_data *shop;
if (zone_num < 0 || zone_num > top_of_zone_table) {
log("SYSERR: GenOLC: save_mobiles: Invalid real zone number %d. (0-%d)", zone_num, top_of_zone_table);
return FALSE;
}
vzone = zone_table[zone_num].number;
top = zone_table[zone_num].top;
sprintf(fname, "%s/%d.new", SHP_PREFIX, vzone);
if (!(shop_file = fopen(fname, "w"))) {
mudlog("SYSERR: OLC: Cannot open shop file!", BRF, LVL_GOD, TRUE);
return FALSE;
} else if (fprintf(shop_file, "CircleMUD v3.0 Shop File~\n") < 0) {
mudlog("SYSERR: OLC: Cannot write to shop file!", BRF, LVL_GOD, TRUE);
fclose(shop_file);
return FALSE;
}
/*
* Search database for shops in this zone.
*/
for (i = vzone * 100; i <= top; i++) {
if ((rshop = real_shop(i)) != -1) {
fprintf(shop_file, "#%d~\n", i);
shop = shop_index + rshop;
/*
* Save the products.
*/
for (j = 0; S_PRODUCT(shop, j) != -1; j++)
fprintf(shop_file, "%d\n", obj_index[S_PRODUCT(shop, j)].vnum);
/*
* Save the rates.
*/
fprintf(shop_file, "-1\n%1.2f\n%1.2f\n", S_BUYPROFIT(shop), S_SELLPROFIT(shop));
/*
* Save the buy types and namelists.
*/
j = -1;
do {
j++;
fprintf(shop_file, "%d%s\n", S_BUYTYPE(shop, j),
S_BUYWORD(shop, j) ? S_BUYWORD(shop, j) : "");
} while (S_BUYTYPE(shop, j) != -1);
/*
* Save messages'n'stuff.
* Added some small'n'silly defaults as sanity checks.
*/
fprintf(shop_file,
"%s~\n%s~\n%s~\n%s~\n%s~\n%s~\n%s~\n"
"%d\n%ld\n%d\n%d\n",
S_NOITEM1(shop) ? S_NOITEM1(shop) : "%s Ke?!",
S_NOITEM2(shop) ? S_NOITEM2(shop) : "%s Ke?!",
S_NOBUY(shop) ? S_NOBUY(shop) : "%s Ke?!",
S_NOCASH1(shop) ? S_NOCASH1(shop) : "%s Ke?!",
S_NOCASH2(shop) ? S_NOCASH2(shop) : "%s Ke?!",
S_BUY(shop) ? S_BUY(shop) : "%s Ke?! %d?",
S_SELL(shop) ? S_SELL(shop) : "%s Ke?! %d?",
S_BROKE_TEMPER(shop),
S_BITVECTOR(shop),
mob_index[S_KEEPER(shop)].vnum,
S_NOTRADE(shop)
);
/*
* Save the rooms.
*/
j = -1;
do {
j++;
fprintf(shop_file, "%d\n", S_ROOM(shop, j));
} while (S_ROOM(shop, j) != -1);
/*
* Save open/closing times
*/
fprintf(shop_file, "%d\n%d\n%d\n%d\n", S_OPEN1(shop), S_CLOSE1(shop),
S_OPEN2(shop), S_CLOSE2(shop));
}
}
fprintf(shop_file, "$~\n");
fclose(shop_file);
sprintf(buf2, "%s/%d.shp", SHP_PREFIX, vzone);
remove(buf2);
rename(fname, buf2);
remove_from_save_list(vzone, SL_SHP);
return TRUE;
}
