| … | |
… | |
| 499 | if (thawer.get_sint32 ()) \ |
499 | if (thawer.get_sint32 ()) \ |
| 500 | SET_FLAG (op, flag); \ |
500 | SET_FLAG (op, flag); \ |
| 501 | else \ |
501 | else \ |
| 502 | CLEAR_FLAG (op, flag) \ |
502 | CLEAR_FLAG (op, flag) \ |
| 503 | |
503 | |
| 504 | int parse_object (object * op, object_thawer & thawer, int map_flags) |
504 | int parse_object (object *op, object_thawer &thawer, int map_flags) |
| 505 | { |
505 | { |
| 506 | bool ismore = 0; |
506 | bool ismore = 0; |
|
|
507 | object *op_inv = op->inv; |
| 507 | |
508 | |
| 508 | for (;;) |
509 | for (;;) |
| 509 | { |
510 | { |
| 510 | keyword kw = thawer.get_kv (); |
511 | keyword kw = thawer.get_kv (); |
| 511 | |
512 | |
| … | |
… | |
| 557 | parse_object (tmp, thawer, map_flags); |
558 | parse_object (tmp, thawer, map_flags); |
| 558 | |
559 | |
| 559 | if (tmp->arch) |
560 | if (tmp->arch) |
| 560 | { |
561 | { |
| 561 | // was: insert_ob_in_ob (tmp, op); |
562 | // was: insert_ob_in_ob (tmp, op); |
| 562 | // but manually addint it can improve map loading times a lot |
563 | // but manually adding it can improve map loading times a lot |
| 563 | tmp->env = op; |
564 | // also, appending instead of prepending keeps the |
|
|
565 | // save ordering the same between repeated load/saves. |
|
|
566 | CLEAR_FLAG (tmp, FLAG_OBJ_ORIGINAL); |
|
|
567 | CLEAR_FLAG (tmp, FLAG_REMOVED); |
| 564 | |
568 | |
| 565 | if (!op->inv) |
569 | if (!op_inv) |
|
|
570 | { |
| 566 | op->inv = tmp; |
571 | op->inv = tmp; |
|
|
572 | tmp->above = 0; |
|
|
573 | } |
| 567 | else |
574 | else |
| 568 | { |
575 | { |
|
|
576 | while (op_inv->below) |
|
|
577 | op_inv = op_inv->below; |
|
|
578 | |
|
|
579 | op_inv->below = tmp; |
| 569 | tmp->below = op->inv; |
580 | tmp->above = op_inv; |
| 570 | tmp->below->above = tmp; |
|
|
| 571 | op->inv = tmp; |
|
|
| 572 | } |
581 | } |
|
|
582 | |
|
|
583 | tmp->below = 0; |
|
|
584 | tmp->env = op; |
|
|
585 | op_inv = tmp; |
| 573 | } |
586 | } |
| 574 | else |
587 | else |
| 575 | { |
588 | { |
| 576 | LOG (llevDebug, "Discarding object without arch: %s\n", |
589 | LOG (llevDebug, "Discarding object without arch: %s\n", |
| 577 | tmp->name ? (const char *) tmp->name : "(null)"); |
590 | tmp->name ? (const char *) tmp->name : "(null)"); |
| … | |
… | |
| 638 | op->move_slow |= MOVE_WALK; |
651 | op->move_slow |= MOVE_WALK; |
| 639 | thawer.get (op->move_slow_penalty); |
652 | thawer.get (op->move_slow_penalty); |
| 640 | break; |
653 | break; |
| 641 | |
654 | |
| 642 | case KW_face: |
655 | case KW_face: |
| 643 | if (const char *str = thawer.get_str ()) |
|
|
| 644 | op->face = &new_faces[FindFace (str, 0)]; |
656 | op->face = &new_faces[FindFace (thawer.get_str (), 0)]; |
| 645 | else |
|
|
| 646 | op->face = 0; |
|
|
| 647 | break; |
657 | break; |
| 648 | |
658 | |
| 649 | case KW_x: thawer.get (op->x); break; |
659 | case KW_x: thawer.get (op->x); break; |
| 650 | case KW_y: thawer.get (op->y); break; |
660 | case KW_y: thawer.get (op->y); break; |
| 651 | case KW_Str: // uppercase alias |
661 | case KW_Str: // uppercase alias |
| … | |
… | |
| 1021 | thawer.line += strlen (thawer.line) + 1; |
1031 | thawer.line += strlen (thawer.line) + 1; |
| 1022 | |
1032 | |
| 1023 | break; |
1033 | break; |
| 1024 | |
1034 | |
| 1025 | default: |
1035 | default: |
| 1026 | printf ("kw abort %s\n", keyword_str [kw]);//D |
1036 | LOG (llevError, "UNSUPPORTED KEYWORD IN MAP: \"%s\", bug in normaliser. skipping.\n", keyword_str [kw]); |
| 1027 | abort (); |
1037 | break; |
| 1028 | } |
1038 | } |
| 1029 | } |
1039 | } |
| 1030 | } |
1040 | } |
| 1031 | |
1041 | |
| 1032 | /* |
1042 | /* |
| … | |
… | |
| 1053 | * as appropriate in op. |
1063 | * as appropriate in op. |
| 1054 | * |
1064 | * |
| 1055 | * This function appears to be used in only 2 places - in crossedit to |
1065 | * This function appears to be used in only 2 places - in crossedit to |
| 1056 | * override values and in c_wiz to mutate values. |
1066 | * override values and in c_wiz to mutate values. |
| 1057 | */ |
1067 | */ |
|
|
1068 | int |
| 1058 | int set_variable(object *op,char *buf) { |
1069 | set_variable(object *op, char *buf) |
|
|
1070 | { |
|
|
1071 | return 0; |
| 1059 | #if 0 |
1072 | #if 0 |
| 1060 | int retval; |
1073 | int retval; |
| 1061 | object_thawer thawer (0); |
1074 | object_thawer thawer (0); |
| 1062 | |
1075 | |
| 1063 | strcpy(msgbuf, ""); |
1076 | strcpy(msgbuf, ""); |
| … | |
… | |
| 1120 | |
1133 | |
| 1121 | void init_vars() { |
1134 | void init_vars() { |
| 1122 | } |
1135 | } |
| 1123 | |
1136 | |
| 1124 | /* This returns a string of the integer movement type */ |
1137 | /* This returns a string of the integer movement type */ |
|
|
1138 | #if 0 |
|
|
1139 | // unused function |
| 1125 | static char* get_string_move_type(MoveType mt) |
1140 | static char* get_string_move_type(MoveType mt) |
| 1126 | { |
1141 | { |
| 1127 | static char retbuf[MAX_BUF], retbuf_all[MAX_BUF]; |
1142 | static char retbuf[MAX_BUF], retbuf_all[MAX_BUF]; |
| 1128 | int i, all_count=0, count; |
1143 | int i, all_count=0, count; |
| 1129 | |
1144 | |
| … | |
… | |
| 1157 | * 'all -walk -fly_low' - it is shorter to return 'fly_high swim' |
1172 | * 'all -walk -fly_low' - it is shorter to return 'fly_high swim' |
| 1158 | */ |
1173 | */ |
| 1159 | if (all_count <=1) return retbuf_all+1; |
1174 | if (all_count <=1) return retbuf_all+1; |
| 1160 | else return retbuf+1; |
1175 | else return retbuf+1; |
| 1161 | } |
1176 | } |
| 1162 | |
1177 | #endif |
|
|
1178 | |
| 1163 | // compare *op against *tmp and output differences |
1179 | // compare *op against *tmp and output differences |
| 1164 | void |
1180 | void |
| 1165 | put (object_freezer &f, object *op, object *tmp) |
1181 | put (object_freezer &f, object *op, object *tmp) |
| 1166 | { |
1182 | { |
| 1167 | int i; |
1183 | int i; |
