/
mame2003.c
2147 lines (1829 loc) · 86.6 KB
/
mame2003.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
/*********************************************************************
mame2003.c
an updated port of Xmame 0.78 to the libretro API
*********************************************************************/
#include <stdint.h>
#include <string/stdstring.h>
#include <libretro.h>
#include <file/file_path.h>
#include <math.h>
#include "mame.h"
#include "driver.h"
#include "state.h"
#include "log.h"
#include "input.h"
#include "inptport.h"
#include "fileio.h"
#include "controls.h"
#include "usrintrf.h"
int pressure_check = 1.28 * 20;
int convert_analog_scale(int input);
int gotFrame;
static const struct GameDriver *game_driver;
static float delta_samples;
int samples_per_frame = 0;
int orig_samples_per_frame =0;
short* samples_buffer;
short* conversion_buffer;
int usestereo = 1;
int16_t prev_pointer_x;
int16_t prev_pointer_y;
unsigned retroColorMode;
unsigned long lastled = 0;
extern const struct KeyboardInfo retroKeys[];
extern int retroKeyState[512];
int retroJsState[156]= {0}; // initialise to zero - we are only reading 4 players atm map for 6 (6*26)
int16_t mouse_x[4]= {0};
int16_t mouse_y[4]= {0};
int16_t analogjoy[4][4]= {0};
struct ipd *default_inputs; /* pointer the array of structs with default MAME input mappings and labels */
int running = 0;
int control_flag=-1;
int legacy_flag=-1;
static struct retro_input_descriptor empty[] = { { 0 } };
retro_log_printf_t log_cb;
static struct retro_message frontend_message;
struct retro_perf_callback perf_cb;
retro_environment_t environ_cb = NULL;
retro_video_refresh_t video_cb = NULL;
static retro_input_poll_t poll_cb = NULL;
static retro_input_state_t input_cb = NULL;
static retro_audio_sample_batch_t audio_batch_cb = NULL;
retro_set_led_state_t led_state_cb = NULL;
/******************************************************************************
Core options
******************************************************************************/
enum CORE_OPTIONS/* controls the order in which core options appear. common, important, and content-specific options should go earlier on the list */
{
OPT_4WAY = 0,
OPT_MOUSE_DEVICE,
OPT_CROSSHAIR_ENABLED,
OPT_SKIP_DISCLAIMER,
OPT_SKIP_WARNINGS,
OPT_DISPLAY_SETUP,
OPT_NEOGEO_BIOS,
OPT_STV_BIOS,
OPT_USE_ALT_SOUND,
OPT_SHARE_DIAL,
OPT_DPAD_ANALOG,
OPT_DEADZONE,
OPT_VECTOR_RESOLUTION,
OPT_VECTOR_ANTIALIAS,
OPT_VECTOR_BEAM,
OPT_VECTOR_TRANSLUCENCY,
OPT_VECTOR_FLICKER,
OPT_VECTOR_INTENSITY,
OPT_DCS_SPEEDHACK,
OPT_CORE_SYS_SUBFOLDER,
OPT_CORE_SAVE_SUBFOLDER,
OPT_TATE_MODE,
OPT_BRIGHTNESS,
OPT_GAMMA,
OPT_FRAMESKIP,
OPT_SAMPLE_RATE,
OPT_INPUT_INTERFACE,
OPT_MAME_REMAPPING,
OPT_ARTWORK,
OPT_ART_RESOLUTION,
OPT_NVRAM_BOOTSTRAP,
OPT_Cheat_Input_Ports,
OPT_Machine_Timing,
OPT_end /* dummy last entry */
};
static struct retro_variable_default default_options[OPT_end + 1]; /* need the plus one for the NULL entries at the end */
static struct retro_variable current_options[OPT_end + 1];
/******************************************************************************
private function prototypes
******************************************************************************/
static void set_content_flags(void);
static void init_core_options(void);
void init_default(struct retro_variable_default *option, const char *key, const char *value);
static void update_variables(bool first_time);
static void set_variables(bool first_time);
static struct retro_variable_default *spawn_effective_option(int option_index);
static void check_system_specs(void);
void retro_describe_controls(void);
int get_mame_ctrl_id(int display_idx, int retro_ID);
void change_control_type(void);
/******************************************************************************
frontend message interface
******************************************************************************/
void frontend_message_cb(const char *message_string, unsigned frames_to_display)
{
frontend_message.msg = message_string;
frontend_message.frames = frames_to_display;
environ_cb(RETRO_ENVIRONMENT_SET_MESSAGE, &frontend_message);
}
/******************************************************************************
implementation of key libretro functions
******************************************************************************/
void retro_init (void)
{
struct retro_log_callback log;
if (environ_cb(RETRO_ENVIRONMENT_GET_LOG_INTERFACE, &log))
log_cb = log.log;
else
log_cb = NULL;
#ifdef LOG_PERFORMANCE
environ_cb(RETRO_ENVIRONMENT_GET_PERF_INTERFACE, &perf_cb);
#endif
check_system_specs();
}
static void check_system_specs(void)
{
/* Should we set level variably like the API asks? Are there any frontends that implement this? */
unsigned level = 10; /* For stub purposes, set to the highest level */
environ_cb(RETRO_ENVIRONMENT_SET_PERFORMANCE_LEVEL, &level);
}
void retro_set_environment(retro_environment_t cb)
{
environ_cb = cb;
}
/* static void init_core_options(void)
*
* Note that core options are not presented in order they are initialized here,
* but rather by their order in the OPT_ enum
*/
static void init_core_options(void)
{
init_default(&default_options[OPT_4WAY], APPNAME"_four_way_emulation", "4-way joystick emulation on 8-way joysticks; disabled|enabled");
#if defined(__IOS__)
init_default(&default_options[OPT_MOUSE_DEVICE], APPNAME"_mouse_device", "Mouse Device; pointer|mouse|disabled");
#else
init_default(&default_options[OPT_MOUSE_DEVICE], APPNAME"_mouse_device", "Mouse Device; mouse|pointer|disabled");
#endif
init_default(&default_options[OPT_CROSSHAIR_ENABLED], APPNAME"_crosshair_enabled", "Show Lightgun crosshair; enabled|disabled");
init_default(&default_options[OPT_SKIP_DISCLAIMER], APPNAME"_skip_disclaimer", "Skip Disclaimer; disabled|enabled");
init_default(&default_options[OPT_SKIP_WARNINGS], APPNAME"_skip_warnings", "Skip Warnings; disabled|enabled");
init_default(&default_options[OPT_DISPLAY_SETUP], APPNAME"_display_setup", "Display MAME menu; disabled|enabled");
init_default(&default_options[OPT_BRIGHTNESS], APPNAME"_brightness", "Brightness; 1.0|0.2|0.3|0.4|0.5|0.6|0.7|0.8|0.9|1.1|1.2|1.3|1.4|1.5|1.6|1.7|1.8|1.9|2.0");
init_default(&default_options[OPT_GAMMA], APPNAME"_gamma", "Gamma correction; 1.0|0.5|0.6|0.7|0.8|0.9|1.1|1.2|1.3|1.4|1.5|1.6|1.7|1.8|1.9|2.0");
init_default(&default_options[OPT_ARTWORK], APPNAME"_display_artwork", "Display artwork (Restart core); enabled|disabled");
init_default(&default_options[OPT_ART_RESOLUTION], APPNAME"_art_resolution", "Artwork resolution multiplier (Restart core); 1|2");
init_default(&default_options[OPT_NEOGEO_BIOS], APPNAME"_neogeo_bios", "Specify Neo Geo BIOS (Restart core); default|euro|euro-s1|us|us-e|asia|japan|japan-s2|unibios33|unibios20|unibios13|unibios11|unibios10|debug|asia-aes");
init_default(&default_options[OPT_STV_BIOS], APPNAME"_stv_bios", "Specify Sega ST-V BIOS (Restart core); default|japan|japana|us|japan_b|taiwan|europe");
init_default(&default_options[OPT_USE_ALT_SOUND], APPNAME"_use_alt_sound", "Use CD soundtrack (Restart core); enabled|disabled");
init_default(&default_options[OPT_SHARE_DIAL], APPNAME"_dialsharexy", "Share 2 player dial controls across one X/Y device; disabled|enabled");
init_default(&default_options[OPT_DPAD_ANALOG], APPNAME"_analog", "Control mapping ; analog|digital");
init_default(&default_options[OPT_DEADZONE], APPNAME"_deadzone", "Analog deadzone; 20|0|5|10|15|25|30|35|40|45|50|55|60|65|70|75|80|85|90|95");
init_default(&default_options[OPT_TATE_MODE], APPNAME"_tate_mode", "TATE Mode - Rotating display (Restart core); disabled|enabled");
init_default(&default_options[OPT_VECTOR_RESOLUTION], APPNAME"_vector_resolution", "Vector resolution (Restart core); 1024x768|640x480|1280x960|1440x1080|1600x1200|original");
init_default(&default_options[OPT_VECTOR_ANTIALIAS], APPNAME"_vector_antialias", "Vector antialiasing; enabled|disabled");
init_default(&default_options[OPT_VECTOR_BEAM], APPNAME"_vector_beam_width", "Vector beam width (only with antialiasing); 2|1|1.2|1.4|1.6|1.8|2.5|3|4|5|6|7|8|9|10|11|12");
init_default(&default_options[OPT_VECTOR_TRANSLUCENCY], APPNAME"_vector_translucency", "Vector translucency; enabled|disabled");
init_default(&default_options[OPT_VECTOR_FLICKER], APPNAME"_vector_flicker", "Vector flicker; 20|0|10|30|40|50|60|70|80|90|100");
init_default(&default_options[OPT_VECTOR_INTENSITY], APPNAME"_vector_intensity", "Vector intensity; 1.5|0.5|1|2|2.5|3");
init_default(&default_options[OPT_NVRAM_BOOTSTRAP], APPNAME"_nvram_bootstraps", "NVRAM Bootstraps; enabled|disabled");
init_default(&default_options[OPT_SAMPLE_RATE], APPNAME"_sample_rate", "Sample Rate (KHz); 48000|8000|11025|22050|30000|44100|");
init_default(&default_options[OPT_DCS_SPEEDHACK], APPNAME"_dcs_speedhack", "DCS Speedhack; enabled|disabled");
init_default(&default_options[OPT_INPUT_INTERFACE], APPNAME"_input_interface", "Input interface; retropad|keyboard|simultaneous");
init_default(&default_options[OPT_MAME_REMAPPING], APPNAME"_mame_remapping", "Legacy Remapping (restart); enabled|disabled");
init_default(&default_options[OPT_FRAMESKIP], APPNAME"_frameskip", "Frameskip; 0|1|2|3|4|5");
init_default(&default_options[OPT_CORE_SYS_SUBFOLDER], APPNAME"_core_sys_subfolder", "Locate system files within a subfolder; enabled|disabled"); /* This should be probably handled by the frontend and not by cores per discussions in Fall 2018 but RetroArch for example doesn't provide this as an option. */
init_default(&default_options[OPT_CORE_SAVE_SUBFOLDER], APPNAME"_core_save_subfolder", "Locate save files within a subfolder; enabled|disabled"); /* This is already available as an option in RetroArch although it is left enabled by default as of November 2018 for consistency with past practice. At least for now.*/
init_default(&default_options[OPT_Cheat_Input_Ports], APPNAME"_cheat_input_ports", "Dip switch/Cheat input ports; disabled|enabled");
init_default(&default_options[OPT_Machine_Timing], APPNAME"_machine_timing", "Bypass audio skew (Restart core); enabled|disabled");
init_default(&default_options[OPT_end], NULL, NULL);
set_variables(true);
}
static void set_variables(bool first_time)
{
static struct retro_variable_default effective_defaults[OPT_end + 1];
static unsigned effective_options_count; /* the number of core options in effect for the current content */
int option_index = 0;
for(option_index = 0; option_index < (OPT_end + 1); option_index++)
{
switch(option_index)
{
case OPT_4WAY:
if(options.content_flags[CONTENT_JOYSTICK_DIRECTIONS] != 4)
continue;
break;
case OPT_CROSSHAIR_ENABLED:
if(!options.content_flags[CONTENT_LIGHTGUN])
continue;
break;
case OPT_STV_BIOS:
if(!options.content_flags[CONTENT_STV])
continue; /* only offer BIOS selection when it is relevant */
break;
case OPT_NEOGEO_BIOS:
if(!options.content_flags[CONTENT_NEOGEO])
continue; /* only offer BIOS selection when it is relevant */
break;
case OPT_USE_ALT_SOUND:
if(!options.content_flags[CONTENT_ALT_SOUND])
continue;
break;
case OPT_SHARE_DIAL:
if(!options.content_flags[CONTENT_DIAL])
continue;
break;
case OPT_VECTOR_RESOLUTION:
case OPT_VECTOR_ANTIALIAS:
case OPT_VECTOR_TRANSLUCENCY:
case OPT_VECTOR_BEAM:
case OPT_VECTOR_FLICKER:
case OPT_VECTOR_INTENSITY:
if(!options.content_flags[CONTENT_VECTOR])
continue;
break;
case OPT_DCS_SPEEDHACK:
if(!options.content_flags[CONTENT_DCS_SPEEDHACK])
continue;
break;
case OPT_NVRAM_BOOTSTRAP:
if(!options.content_flags[CONTENT_NVRAM_BOOTSTRAP])
continue;
break;
}
effective_defaults[effective_options_count] = first_time ? default_options[option_index] : *spawn_effective_option(option_index);
effective_options_count++;
}
environ_cb(RETRO_ENVIRONMENT_SET_VARIABLES, (void*)effective_defaults);
}
static struct retro_variable_default *spawn_effective_option(int option_index)
{
static struct retro_variable_default *encoded_option = NULL;
/* implementing this function will allow the core to change a core option within the core and then report that that change to the frontend
* currently core options only flow one way: from the frontend to mame2003-plus
*
* search for the string "; " as the delimiter between the option display name and the values
* stringify the current value for this option
* see if the current option string is already listed first in the original default --
* if the current selected option is not in the original defaults string at all
* log an error message and bail. that shouldn't be possible.
* is the currently selected option the first in the default pipe-delimited list?
* if so, just return default_options[option_index]
* else
* create a copy of default_options[option_index].defaults_string.
* First add the stringified current option as the first in the pipe-delimited list for this copied string
* then remove the option from wherever it was originally in the defaults string
*/
return encoded_option;
}
void init_default(struct retro_variable_default *def, const char *key, const char *label_and_values)
{
def->key = key;
def->defaults_string = label_and_values;
}
static void update_variables(bool first_time)
{
struct retro_led_interface ledintf;
struct retro_variable var;
int index;
bool reset_control_descriptions = false;
for(index = 0; index < OPT_end; index++)
{
var.value = NULL;
var.key = default_options[index].key;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && !string_is_empty(var.value)) /* the frontend sends a value for this core option */
{
current_options[index].value = var.value; /* keep the state of core options matched with the frontend */
switch(index)
{
case OPT_INPUT_INTERFACE:
if(strcmp(var.value, "retropad") == 0)
options.input_interface = RETRO_DEVICE_JOYPAD;
else if(strcmp(var.value, "keyboard") == 0)
options.input_interface = RETRO_DEVICE_KEYBOARD;
else
options.input_interface = RETRO_DEVICE_KEYBOARD + RETRO_DEVICE_JOYPAD;
break;
case OPT_4WAY:
if( (strcmp(var.value, "enabled") == 0) && (options.content_flags[CONTENT_JOYSTICK_DIRECTIONS] == 4) )
{
if(!options.restrict_4_way) /* the option has just been toggled to "enabled" */
{
options.restrict_4_way = true;
reset_control_descriptions = true; /* games with rotated joysticks send different control descriptions in 4-way restrictor mode */
}
}
else
{
if(options.restrict_4_way) /* the option has just been toggled to "disabled" */
{
options.restrict_4_way = false;
reset_control_descriptions = true; /* games with rotated joysticks send different control descriptions in 4-way restrictor mode */
}
}
break;
case OPT_MOUSE_DEVICE:
if(strcmp(var.value, "pointer") == 0)
options.mouse_device = RETRO_DEVICE_POINTER;
else if(strcmp(var.value, "mouse") == 0)
options.mouse_device = RETRO_DEVICE_MOUSE;
else
options.mouse_device = 0;
break;
case OPT_CROSSHAIR_ENABLED:
if(strcmp(var.value, "enabled") == 0)
options.crosshair_enable = 1;
else
options.crosshair_enable = 0;
break;
case OPT_SKIP_DISCLAIMER:
if(strcmp(var.value, "enabled") == 0)
options.skip_disclaimer = true;
else
options.skip_disclaimer = false;
break;
case OPT_SKIP_WARNINGS:
if(strcmp(var.value, "enabled") == 0)
options.skip_warnings = true;
else
options.skip_warnings = false;
break;
case OPT_DISPLAY_SETUP:
if(strcmp(var.value, "enabled") == 0)
options.display_setup = 1;
else
options.display_setup = 0;
break;
case OPT_BRIGHTNESS:
options.brightness = atof(var.value);
if(!first_time)
palette_set_global_brightness(options.brightness);
break;
case OPT_GAMMA:
options.gamma = atof(var.value);
if(!first_time)
palette_set_global_gamma(options.gamma);
break;
/* TODO: Add overclock option. Below is the code from the old MAME osd to help process the core option.*/
/*
double overclock;
int cpu, doallcpus = 0, oc;
if (code_pressed(KEYCODE_LSHIFT) || code_pressed(KEYCODE_RSHIFT))
doallcpus = 1;
if (!code_pressed(KEYCODE_LCONTROL) && !code_pressed(KEYCODE_RCONTROL))
increment *= 5;
if( increment :
overclock = timer_get_overclock(arg);
overclock += 0.01 * increment;
if (overclock < 0.01) overclock = 0.01;
if (overclock > 2.0) overclock = 2.0;
if( doallcpus )
for( cpu = 0; cpu < cpu_gettotalcpu(); cpu++ )
timer_set_overclock(cpu, overclock);
else
timer_set_overclock(arg, overclock);
}
oc = 100 * timer_get_overclock(arg) + 0.5;
if( doallcpus )
sprintf(buf,"%s %s %3d%%", ui_getstring (UI_allcpus), ui_getstring (UI_overclock), oc);
else
sprintf(buf,"%s %s%d %3d%%", ui_getstring (UI_overclock), ui_getstring (UI_cpu), arg, oc);
displayosd(bitmap,buf,oc/2,100/2);
*/
case OPT_ARTWORK:
if(strcmp(var.value, "enabled") == 0)
options.use_artwork = ARTWORK_USE_ALL;
else
options.use_artwork = ARTWORK_USE_NONE;
break;
case OPT_ART_RESOLUTION:
options.artwork_res = atoi(var.value);
break;
case OPT_STV_BIOS:
if(!options.content_flags[CONTENT_STV])
break;
if(options.content_flags[CONTENT_DIEHARD]) /* catch required bios for this one game. */
options.bios = "us";
else
options.bios = (strcmp(var.value, "default") == 0) ? NULL : var.value;
break;
case OPT_NEOGEO_BIOS:
if(!options.content_flags[CONTENT_NEOGEO])
break;
options.bios = (strcmp(var.value, "default") == 0) ? NULL : var.value;
break;
case OPT_USE_ALT_SOUND:
if(options.content_flags[CONTENT_ALT_SOUND])
{
if(strcmp(var.value, "enabled") == 0)
options.use_samples = true;
else
options.use_samples = false;
}
break;
case OPT_SHARE_DIAL:
if(options.content_flags[CONTENT_DIAL])
{
if(strcmp(var.value, "enabled") == 0)
options.dial_share_xy = 1;
else
options.dial_share_xy = 0;
break;
}
else
{
options.dial_share_xy = 0;
break;
}
case OPT_DPAD_ANALOG:
if(strcmp(var.value, "analog") == 0)
{
if( options.analog !=1 && control_flag !=-1) control_flag =1;
options.analog = 1;
if (running && control_flag == 1)
{
change_control_type();
control_flag =0;
}
}
else
{
if(options.analog !=0 && control_flag !=-1) control_flag =1;
options.analog = 0;
if (running && control_flag == 1)
{
change_control_type();
control_flag =0;
}
}
//skip the first set then there so it doesnt change input general every time you open the options menu if using none legacy mode
if(control_flag ==-1) control_flag = 0;
break;
case OPT_DEADZONE:
options.deadzone = atoi(var.value);
break;
case OPT_TATE_MODE:
if(strcmp(var.value, "enabled") == 0)
options.tate_mode = 1;
else
options.tate_mode = 0;
break;
case OPT_VECTOR_RESOLUTION:
if(strcmp(var.value, "640x480") == 0)
{
options.vector_width=640;
options.vector_height=480;
}
else if(strcmp(var.value, "1024x768") == 0)
{
options.vector_width=1024;
options.vector_height=768;
}
else if(strcmp(var.value, "1280x960") == 0)
{
options.vector_width=1280;
options.vector_height=960;
}
else if(strcmp(var.value, "1440x1080") == 0)
{
options.vector_width=1440;
options.vector_height=1080;
}
else if(strcmp(var.value, "1600x1200") == 0)
{
options.vector_width=1600;
options.vector_height=1200;
}
else
{
options.vector_width=0; // mame will set this from the driver resolution set
options.vector_height=0;
}
break;
case OPT_VECTOR_ANTIALIAS:
if(strcmp(var.value, "enabled") == 0)
options.antialias = 1; /* integer: 1 to enable antialiasing on vectors _ does not work as of 2018/04/17*/
else
options.antialias = 0;
break;
case OPT_VECTOR_BEAM:
options.beam = atof(var.value); /* float: vector beam width */
break;
case OPT_VECTOR_TRANSLUCENCY:
if(strcmp(var.value, "enabled") == 0)
options.translucency = 1; /* integer: 1 to enable translucency on vectors */
else
options.translucency = 0;
break;
case OPT_VECTOR_FLICKER:
options.vector_flicker = (int)(2.55 * atof(var.value)); /* why 2.55? must be an old family recipe */
break;
case OPT_VECTOR_INTENSITY:
options.vector_intensity_correction = atof(var.value); /* float: vector beam intensity */
break;
case OPT_NVRAM_BOOTSTRAP:
if(strcmp(var.value, "enabled") == 0)
options.nvram_bootstrap = true;
else
options.nvram_bootstrap = false;
break;
case OPT_SAMPLE_RATE:
options.samplerate = atoi(var.value);
break;
case OPT_DCS_SPEEDHACK:
if(strcmp(var.value, "enabled") == 0)
options.activate_dcs_speedhack = 1;
else
options.activate_dcs_speedhack = 0;
break;
case OPT_MAME_REMAPPING:
if(strcmp(var.value, "enabled") == 0)
{
if( !options.mame_remapping && legacy_flag != -1) legacy_flag =0;
options.mame_remapping = true;
}
else
{
if( options.mame_remapping && legacy_flag != -1) legacy_flag =0;
options.mame_remapping = false;
}
if(!first_time)
setup_menu_init();
if(legacy_flag ==-1) legacy_flag = 1;
break;
case OPT_FRAMESKIP:
options.frameskip = atoi(var.value);
break;
case OPT_CORE_SYS_SUBFOLDER:
if(strcmp(var.value, "enabled") == 0)
options.system_subfolder = true;
else
options.system_subfolder = false;
break;
case OPT_CORE_SAVE_SUBFOLDER:
if(strcmp(var.value, "enabled") == 0)
options.save_subfolder = true;
else
options.save_subfolder = false;
break;
case OPT_Cheat_Input_Ports:
if(strcmp(var.value, "enabled") == 0)
options.cheat_input_ports = true;
else
options.cheat_input_ports = false;
break;
case OPT_Machine_Timing:
if(strcmp(var.value, "enabled") == 0)
options.machine_timing = true;
else
options.machine_timing = false;
break;
}
}
}
if(!options.content_flags[CONTENT_ALT_SOUND])
options.use_samples = true;
ledintf.set_led_state = NULL;
environ_cb(RETRO_ENVIRONMENT_GET_LED_INTERFACE, &ledintf);
led_state_cb = ledintf.set_led_state;
if(reset_control_descriptions) /* one of the option changes has flagged a need to re-describe the controls */
{
retro_describe_controls();
reset_control_descriptions = false;
}
}
void retro_get_system_av_info(struct retro_system_av_info *info)
{
mame2003_video_get_geometry(&info->geometry);
if(options.machine_timing)
{
if (Machine->drv->frames_per_second < 60.0 )
info->timing.fps = 60.0;
else
info->timing.fps = Machine->drv->frames_per_second; /* qbert is 61 fps */
if ( (Machine->drv->frames_per_second * 1000 < options.samplerate) || ( Machine->drv->frames_per_second < 60) )
{
info->timing.sample_rate = Machine->drv->frames_per_second * 1000;
log_cb(RETRO_LOG_INFO, LOGPRE "Sample timing rate too high for framerate required dropping to %f", Machine->drv->frames_per_second * 1000);
}
else
{
info->timing.sample_rate = options.samplerate;
log_cb(RETRO_LOG_INFO, LOGPRE "Sample rate set to %d\n",options.samplerate);
}
}
else
{
info->timing.fps = Machine->drv->frames_per_second;
if ( Machine->drv->frames_per_second * 1000 < options.samplerate)
info->timing.sample_rate = 22050;
else
info->timing.sample_rate = options.samplerate;
}
}
unsigned retro_api_version(void)
{
return RETRO_API_VERSION;
}
void retro_get_system_info(struct retro_system_info *info)
{
/* this must match the 'corename' field in mame2003_plus_libretro.info
* in order for netplay to work. */
info->library_name = "MAME 2003-Plus";
#ifndef GIT_VERSION
#define GIT_VERSION ""
#endif
info->library_version = GIT_VERSION;
info->valid_extensions = "zip";
info->need_fullpath = true;
info->block_extract = true;
}
#define PAD_MODERN RETRO_DEVICE_SUBCLASS(RETRO_DEVICE_JOYPAD, 0)
#define PAD_8BUTTON RETRO_DEVICE_SUBCLASS(RETRO_DEVICE_JOYPAD, 1)
#define PAD_6BUTTON RETRO_DEVICE_SUBCLASS(RETRO_DEVICE_JOYPAD, 2)
static struct retro_controller_description controllers[] = {
{ "Classic Gamepad", RETRO_DEVICE_JOYPAD },
{ "Modern Fightstick", PAD_MODERN },
{ "8-Button", PAD_8BUTTON },
{ "6-Button", PAD_6BUTTON },
};
static struct retro_controller_description unsupported_controllers[] = {
{ "UNSUPPORTED (Classic Gamepad)", RETRO_DEVICE_JOYPAD },
{ "UNSUPPORTED (Modern Fightstick)", PAD_MODERN },
{ "UNSUPPORTED (8-Button)", PAD_8BUTTON },
{ "UNSUPPORTED (6-Button)", PAD_6BUTTON },
};
static struct retro_controller_info retropad_subdevice_ports[] = {
{ controllers, 4 },
{ controllers, 4 },
{ controllers, 4 },
{ controllers, 4 },
{ controllers, 4 },
{ controllers, 4 },
{ 0 },
};
bool retro_load_game(const struct retro_game_info *game)
{
int i;
int driverIndex = 0;
int port_index;
char *driver_lookup = NULL;
if(string_is_empty(game->path))
{
log_cb(RETRO_LOG_ERROR, LOGPRE "Content path is not set. Exiting!\n");
return false;
}
log_cb(RETRO_LOG_INFO, LOGPRE "Full content path %s\n", game->path);
if(!path_is_valid(game->path))
{
log_cb(RETRO_LOG_ERROR, LOGPRE "Content path is not valid. Exiting!");
return false;
}
log_cb(RETRO_LOG_INFO, LOGPRE "Git Version %s\n",GIT_VERSION);
driver_lookup = strdup(path_basename(game->path));
path_remove_extension(driver_lookup);
log_cb(RETRO_LOG_INFO, LOGPRE "Content lookup name: %s\n", driver_lookup);
for (driverIndex = 0; driverIndex < total_drivers; driverIndex++)
{
const struct GameDriver *needle = drivers[driverIndex];
if ((strcasecmp(driver_lookup, needle->description) == 0)
|| (strcasecmp(driver_lookup, needle->name) == 0) )
{
log_cb(RETRO_LOG_INFO, LOGPRE "Driver index counter: %d. Matched game driver: %s\n", driverIndex, needle->name);
game_driver = needle;
options.romset_filename_noext = driver_lookup;
break;
}
if(driverIndex == total_drivers -2) // we could fix the total drives in drivers c but the it pointless its taken into account here
{
log_cb(RETRO_LOG_ERROR, LOGPRE "Driver index counter: %d. Game driver not found for %s!\n", driverIndex, driver_lookup);
return false;
}
}
if(!init_game(driverIndex))
return false;
set_content_flags();
options.libretro_content_path = strdup(game->path);
path_basedir(options.libretro_content_path);
/*fix trailing slash in path*/
for(i = 0; options.libretro_content_path[i] != '\0'; ++i);
if ( options.libretro_content_path[i-1] == '/' || options.libretro_content_path[i-1] == '\\' )
options.libretro_content_path[i-1] =0;
/* Get system directory from frontend */
options.libretro_system_path = NULL;
environ_cb(RETRO_ENVIRONMENT_GET_SYSTEM_DIRECTORY,&options.libretro_system_path);
if (options.libretro_system_path == NULL || options.libretro_system_path[0] == '\0')
{
log_cb(RETRO_LOG_INFO, LOGPRE "libretro system path not set by frontend, using content path\n");
options.libretro_system_path = options.libretro_content_path;
}
/* Get save directory from frontend */
options.libretro_save_path = NULL;
environ_cb(RETRO_ENVIRONMENT_GET_SAVE_DIRECTORY,&options.libretro_save_path);
if (options.libretro_save_path == NULL || options.libretro_save_path[0] == '\0')
{
log_cb(RETRO_LOG_INFO, LOGPRE "libretro save path not set by frontent, using content path\n");
options.libretro_save_path = options.libretro_content_path;
}
log_cb(RETRO_LOG_INFO, LOGPRE "content path: %s\n", options.libretro_content_path);
log_cb(RETRO_LOG_INFO, LOGPRE " system path: %s\n", options.libretro_system_path);
log_cb(RETRO_LOG_INFO, LOGPRE " save path: %s\n", options.libretro_save_path);
init_core_options();
update_variables(true);
for(port_index = DISP_PLAYER6 - 1; port_index > (options.content_flags[CONTENT_CTRL_COUNT] - 1); port_index--)
{
retropad_subdevice_ports[port_index].types = &unsupported_controllers[0];
retropad_subdevice_ports[port_index].num_types = 4;
}
environ_cb(RETRO_ENVIRONMENT_SET_CONTROLLER_INFO, (void*)retropad_subdevice_ports);
if(!run_game(driverIndex))
return true;
return false;
}
static void set_content_flags(void)
{
int i = 0;
extern struct GameDriver driver_neogeo;
extern struct GameDriver driver_stvbios;
const struct InputPortTiny *input = game_driver->input_ports;
extern const char* ost_drivers[];
/************ DRIVERS WITH MULTIPLE BIOS OPTIONS ************/
if (game_driver->clone_of == &driver_neogeo
||(game_driver->clone_of && game_driver->clone_of->clone_of == &driver_neogeo))
{
options.content_flags[CONTENT_NEOGEO] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as a Neo Geo game.\n");
}
else if (game_driver->clone_of == &driver_stvbios
||(game_driver->clone_of && game_driver->clone_of->clone_of == &driver_stvbios))
{
options.content_flags[CONTENT_STV] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as a ST-V game.\n");
}
/************ DIE HARD: ARCADE ************/
if(strcasecmp(game_driver->name, "diehard") == 0)
{
options.content_flags[CONTENT_DIEHARD] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as \"Die Hard: Arcade\". BIOS will be set to \"us\".\n");
}
/************ DRIVERS WITH ALTERNATE SOUNDTRACKS ************/
while(ost_drivers[i])
{
if(strcmp(ost_drivers[i], game_driver->name) == 0)
{
options.content_flags[CONTENT_ALT_SOUND] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content has an alternative audio option controlled via core option.\n");
break;
}
i++;
}
/************ DRIVERS WITH VECTOR VIDEO DISPLAYS ************/
if(Machine->drv->video_attributes & VIDEO_TYPE_VECTOR)
{
options.content_flags[CONTENT_VECTOR] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using a vector video display.\n");
}
/************ INPUT-BASED CONTENT FLAGS ************/
options.content_flags[CONTENT_JOYSTICK_DIRECTIONS] = 8; /* default behavior is 8-way joystick, even for 2-way games */
while ((input->type & ~IPF_MASK) != IPT_END)
{
/* skip analog extension fields */
if ((input->type & ~IPF_MASK) != IPT_EXTENSION)
{
switch (input->type & IPF_PLAYERMASK)
{
case IPF_PLAYER1:
if (options.content_flags[CONTENT_PLAYER_COUNT] < 1) options.content_flags[CONTENT_PLAYER_COUNT] = 1;
break;
case IPF_PLAYER2:
if (options.content_flags[CONTENT_PLAYER_COUNT] < 2) options.content_flags[CONTENT_PLAYER_COUNT] = 2;
break;
case IPF_PLAYER3:
if (options.content_flags[CONTENT_PLAYER_COUNT] < 3) options.content_flags[CONTENT_PLAYER_COUNT] = 3;
break;
case IPF_PLAYER4:
if (options.content_flags[CONTENT_PLAYER_COUNT] < 4) options.content_flags[CONTENT_PLAYER_COUNT] = 4;
break;
case IPF_PLAYER5:
if (options.content_flags[CONTENT_PLAYER_COUNT] < 5) options.content_flags[CONTENT_PLAYER_COUNT] = 5;
break;
case IPF_PLAYER6:
if (options.content_flags[CONTENT_PLAYER_COUNT] < 6) options.content_flags[CONTENT_PLAYER_COUNT] = 6;
break;
}
if (input->type & IPF_4WAY) /* original controls used a 4-way joystick */
{
options.content_flags[CONTENT_JOYSTICK_DIRECTIONS] = 4;
}
switch (input->type & ~IPF_MASK)
{
case IPT_JOYSTICKRIGHT_UP:
case IPT_JOYSTICKRIGHT_DOWN:
case IPT_JOYSTICKRIGHT_LEFT:
case IPT_JOYSTICKRIGHT_RIGHT:
case IPT_JOYSTICKLEFT_UP:
case IPT_JOYSTICKLEFT_DOWN:
case IPT_JOYSTICKLEFT_LEFT:
case IPT_JOYSTICKLEFT_RIGHT:
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using dual joystick controls controls.\n");
break;
case IPT_BUTTON1:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 1) options.content_flags[CONTENT_BUTTON_COUNT] = 1;
break;
case IPT_BUTTON2:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 2) options.content_flags[CONTENT_BUTTON_COUNT] = 2;
break;
case IPT_BUTTON3:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 3) options.content_flags[CONTENT_BUTTON_COUNT] = 3;
break;
case IPT_BUTTON4:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 4) options.content_flags[CONTENT_BUTTON_COUNT] = 4;
break;
case IPT_BUTTON5:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 5) options.content_flags[CONTENT_BUTTON_COUNT] = 5;
break;
case IPT_BUTTON6:
if (options.content_flags[CONTENT_BUTTON_COUNT] <6 ) options.content_flags[CONTENT_BUTTON_COUNT] = 6;
break;
case IPT_BUTTON7:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 7) options.content_flags[CONTENT_BUTTON_COUNT] = 7;
break;
case IPT_BUTTON8:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 8) options.content_flags[CONTENT_BUTTON_COUNT] = 8;
break;
case IPT_BUTTON9:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 9) options.content_flags[CONTENT_BUTTON_COUNT] = 9;
break;
case IPT_BUTTON10:
if (options.content_flags[CONTENT_BUTTON_COUNT] < 10) options.content_flags[CONTENT_BUTTON_COUNT] = 10;
break;
case IPT_PADDLE:
options.content_flags[CONTENT_PADDLE] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using paddle controls.\n");
break;
case IPT_DIAL:
options.content_flags[CONTENT_DIAL] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using dial controls.\n");
break;
case IPT_TRACKBALL_X:
case IPT_TRACKBALL_Y:
options.content_flags[CONTENT_TRACKBALL] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using trackball controls.\n");
break;
case IPT_AD_STICK_X:
case IPT_AD_STICK_Y:
options.content_flags[CONTENT_AD_STICK] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using Analog/Digital stick controls.\n");
break;
case IPT_LIGHTGUN_X:
case IPT_LIGHTGUN_Y:
options.content_flags[CONTENT_LIGHTGUN] = true;
log_cb(RETRO_LOG_INFO, LOGPRE "Content identified as using Analog/Digital stick controls.\n");
break;