3 * Copyright (C) 2006 Exophase <exophase@gmail.com>
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License as
7 * published by the Free Software Foundation; either version 2 of
8 * the License, or (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
24 //PSP_MODULE_INFO("gpSP", 0x1000, 0, 6);
25 //PSP_MAIN_THREAD_ATTR(THREAD_ATTR_USER);
27 void vblank_interrupt_handler(u32 sub, u32 *parg);
33 //debug_state current_debug_state = COUNTDOWN_BREAKPOINT;
34 //debug_state current_debug_state = PC_BREAKPOINT;
35 u32 breakpoint_value = 0x7c5000;
36 debug_state current_debug_state = RUN;
37 //debug_state current_debug_state = STEP_RUN;
39 //u32 breakpoint_value = 0;
41 frameskip_type current_frameskip_type = auto_frameskip;
42 u32 global_cycles_per_instruction = 1;
46 u32 frameskip_value = 2;
48 u64 frame_count_initial_timestamp = 0;
49 u64 last_frame_interval_timestamp;
50 u32 gp2x_fps_debug = 0;
56 u32 frameskip_value = 4;
58 u32 skip_next_frame = 0;
60 u32 frameskip_counter = 0;
65 u32 execute_cycles = 960;
66 s32 video_count = 960;
73 u32 cycle_memory_access = 0;
74 u32 cycle_pc_relative_access = 0;
75 u32 cycle_sp_relative_access = 0;
76 u32 cycle_block_memory_access = 0;
77 u32 cycle_block_memory_sp_access = 0;
78 u32 cycle_block_memory_words = 0;
79 u32 cycle_dma16_words = 0;
80 u32 cycle_dma32_words = 0;
81 u32 flush_ram_count = 0;
82 u32 gbc_update_count = 0;
83 u32 oam_update_count = 0;
85 u32 synchronize_flag = 1;
87 u32 update_backup_flag = 1;
89 u32 clock_speed = 200;
91 u32 clock_speed = 333;
95 void trigger_ext_event();
97 #define check_count(count_var) \
98 if(count_var < execute_cycles) \
99 execute_cycles = count_var; \
101 #define check_timer(timer_number) \
102 if(timer[timer_number].status == TIMER_PRESCALE) \
103 check_count(timer[timer_number].count); \
105 #define update_timer(timer_number) \
106 if(timer[timer_number].status != TIMER_INACTIVE) \
108 if(timer[timer_number].status != TIMER_CASCADE) \
110 timer[timer_number].count -= execute_cycles; \
111 io_registers[REG_TM##timer_number##D] = \
112 -(timer[timer_number].count >> timer[timer_number].prescale); \
115 if(timer[timer_number].count <= 0) \
117 if(timer[timer_number].irq == TIMER_TRIGGER_IRQ) \
118 irq_raised |= IRQ_TIMER##timer_number; \
120 if((timer_number != 3) && \
121 (timer[timer_number + 1].status == TIMER_CASCADE)) \
123 timer[timer_number + 1].count--; \
124 io_registers[REG_TM0D + (timer_number + 1) * 2] = \
125 -(timer[timer_number + 1].count); \
128 if(timer_number < 2) \
130 if(timer[timer_number].direct_sound_channels & 0x01) \
131 sound_timer(timer[timer_number].frequency_step, 0); \
133 if(timer[timer_number].direct_sound_channels & 0x02) \
134 sound_timer(timer[timer_number].frequency_step, 1); \
137 timer[timer_number].count += \
138 (timer[timer_number].reload << timer[timer_number].prescale); \
142 u8 *file_ext[] = { ".gba", ".bin", ".zip", NULL };
145 void ChangeWorkingDirectory(char *exe)
148 char *s = strrchr(exe, '/');
164 for(i = 0; i < 4; i++)
166 dma[i].start_type = DMA_INACTIVE;
167 dma[i].direct_sound_channel = DMA_NO_DIRECT_SOUND;
168 timer[i].status = TIMER_INACTIVE;
169 timer[i].reload = 0x10000;
170 timer[i].stop_cpu_ticks = 0;
173 timer[0].direct_sound_channels = TIMER_DS_CHANNEL_BOTH;
174 timer[1].direct_sound_channels = TIMER_DS_CHANNEL_NONE;
179 execute_cycles = 960;
182 flush_translation_cache_rom();
183 flush_translation_cache_ram();
184 flush_translation_cache_bios();
187 int main(int argc, char *argv[])
193 u8 load_filename[512];
194 u8 bios_filename[512];
197 if(gp2x_load_mmuhack() == -1)
198 ;// delay_us(2500000);
202 sceKernelRegisterSubIntrHandler(PSP_VBLANK_INT, 0,
203 vblank_interrupt_handler, NULL);
204 sceKernelEnableSubIntr(PSP_VBLANK_INT, 0);
205 #elif !defined(GP2X_BUILD)
206 freopen("CON", "wb", stdout);
209 extern char *cpu_mode_names[];
211 init_gamepak_buffer();
213 // Copy the directory path of the executable into main_path
216 // ChangeWorkingDirectory will null out the filename out of the path
217 ChangeWorkingDirectory(argv[0]);
220 getcwd(main_path, 512);
223 gamepak_filename[0] = 0;
232 // Overclocking GP2X and MMU patch goes here
237 sprintf(bios_filename, "%s/%s", main_path, "gba_bios.bin");
238 if(load_bios(bios_filename) == -1)
240 if(load_bios("gba_bios.bin") == -1)
243 gui_action_type gui_action = CURSOR_NONE;
245 debug_screen_start();
246 debug_screen_printl("Sorry, but gpSP requires a Gameboy Advance BIOS ");
247 debug_screen_printl("image to run correctly. Make sure to get an ");
248 debug_screen_printl("authentic one, it'll be exactly 16384 bytes large ");
249 debug_screen_printl("and should have the following md5sum value: ");
250 debug_screen_printl(" ");
251 debug_screen_printl("a860e8c0b6d573d191e4ec7db1b1e4f6 ");
252 debug_screen_printl(" ");
253 debug_screen_printl("When you do get it name it gba_bios.bin and put it");
254 debug_screen_printl("in the same directory as gpSP. ");
255 debug_screen_printl(" ");
256 debug_screen_printl("Press any button to exit. ");
258 debug_screen_update();
260 while(gui_action == CURSOR_NONE)
262 gui_action = get_gui_input();
271 if(bios_rom[0] != 0x18)
273 gui_action_type gui_action = CURSOR_NONE;
275 debug_screen_start();
276 debug_screen_printl("You have an incorrect BIOS image. ");
277 debug_screen_printl("While many games will work fine, some will not. It");
278 debug_screen_printl("is strongly recommended that you obtain the ");
279 debug_screen_printl("correct BIOS file. Do NOT report any bugs if you ");
280 debug_screen_printl("are seeing this message. ");
281 debug_screen_printl(" ");
282 debug_screen_printl("Press any button to resume, at your own risk. ");
284 debug_screen_update();
286 while(gui_action == CURSOR_NONE)
288 gui_action = get_gui_input();
300 video_resolution_large();
304 if(load_gamepak(argv[1]) == -1)
307 printf("Failed to load gamepak %s, exiting.\n", load_filename);
312 set_gba_resolution(screen_scale);
313 video_resolution_small();
320 if(load_file(file_ext, load_filename) == -1)
326 if(load_gamepak(load_filename) == -1)
329 printf("Failed to load gamepak %s, exiting.\n", load_filename);
334 set_gba_resolution(screen_scale);
335 video_resolution_small();
344 // We'll never actually return from here.
347 execute_arm_translate(execute_cycles);
351 get_ticks_us(&frame_count_initial_timestamp);
354 /* u8 current_savestate_filename[512];
355 get_savestate_filename_noshot(savestate_slot,
356 current_savestate_filename);
357 load_state(current_savestate_filename); */
363 current_debug_state = COUNTDOWN_BREAKPOINT;
364 breakpoint_value = strtol(argv[2], NULL, 16);
369 execute_arm_translate(execute_cycles);
370 execute_arm(execute_cycles);
375 void print_memory_stats(u32 *counter, u32 *region_stats, char *stats_str)
377 u32 other_region_counter = region_stats[0x1] + region_stats[0xE] +
379 u32 rom_region_counter = region_stats[0x8] + region_stats[0x9] +
380 region_stats[0xA] + region_stats[0xB] + region_stats[0xC] +
382 u32 _counter = *counter;
384 printf("memory access stats: %s (out of %d)\n", stats_str, _counter);
385 printf("bios: %f%%\tiwram: %f%%\tewram: %f%%\tvram: %f\n",
386 region_stats[0x0] * 100.0 / _counter, region_stats[0x3] * 100.0 /
388 region_stats[0x2] * 100.0 / _counter, region_stats[0x6] * 100.0 /
391 printf("oam: %f%%\tpalette: %f%%\trom: %f%%\tother: %f%%\n",
392 region_stats[0x7] * 100.0 / _counter, region_stats[0x5] * 100.0 /
394 rom_region_counter * 100.0 / _counter, other_region_counter * 100.0 /
398 memset(region_stats, 0, sizeof(u32) * 16);
401 u32 event_cycles = 0;
402 const u32 event_cycles_trigger = 60 * 5;
405 void trigger_ext_event()
407 static u32 event_number = 0;
408 static u64 benchmark_ticks[16];
410 u8 current_savestate_filename[512];
416 get_ticks_us(&new_ticks);
417 benchmark_ticks[event_number - 1] =
418 new_ticks - benchmark_ticks[event_number - 1];
421 current_frameskip_type = no_frameskip;
423 synchronize_flag = 0;
425 get_savestate_filename_noshot(savestate_slot,
426 current_savestate_filename);
427 load_state(current_savestate_filename);
432 // Full benchmark, run normally
441 // No video benchmark
442 // Set frameskip really high + manual
443 current_frameskip_type = manual_frameskip;
444 frameskip_value = 1000000;
449 // Put CPU in halt mode, put it in IRQ mode with interrupts off
450 reg[CPU_HALT_STATE] = CPU_HALT;
451 reg[REG_CPSR] = 0xD2;
455 // No CPU or video benchmark
456 reg[CPU_HALT_STATE] = CPU_HALT;
457 reg[REG_CPSR] = 0xD2;
458 current_frameskip_type = manual_frameskip;
459 frameskip_value = 1000000;
465 char *print_strings[] =
478 benchmark_ticks[6] = benchmark_ticks[0] - benchmark_ticks[2];
479 benchmark_ticks[5] = benchmark_ticks[0] - benchmark_ticks[4] -
481 benchmark_ticks[7] = benchmark_ticks[0] - benchmark_ticks[1];
483 printf("Benchmark results (%d frames): \n", event_cycles_trigger);
484 for(i = 0; i < 8; i++)
486 printf(" %s: %d ms (%f ms per frame)\n",
487 print_strings[i], (u32)benchmark_ticks[i] / 1000,
488 (float)(benchmark_ticks[i] / (1000.0 * event_cycles_trigger)));
498 get_ticks_us(benchmark_ticks + event_number);
504 irq_type irq_raised = IRQ_NONE;
508 cpu_ticks += execute_cycles;
510 reg[CHANGED_PC_STATUS] = 0;
515 update_gbc_sound(cpu_ticks);
516 gbc_sound_update = 0;
524 video_count -= execute_cycles;
528 u32 vcount = io_registers[REG_VCOUNT];
529 u32 dispstat = io_registers[REG_DISPSTAT];
531 if((dispstat & 0x02) == 0)
533 // Transition from hrefresh to hblank
534 video_count += (272);
537 if((dispstat & 0x01) == 0)
544 io_registers[REG_BLDCNT] = 0;
547 // If in visible area also fire HDMA
548 for(i = 0; i < 4; i++)
550 if(dma[i].start_type == DMA_START_HBLANK)
551 dma_transfer(dma + i);
556 irq_raised |= IRQ_HBLANK;
560 // Transition from hblank to next line
568 // Transition from vrefresh to vblank
574 irq_raised |= IRQ_VBLANK;
577 affine_reference_x[0] =
578 (s32)(address32(io_registers, 0x28) << 4) >> 4;
579 affine_reference_y[0] =
580 (s32)(address32(io_registers, 0x2C) << 4) >> 4;
581 affine_reference_x[1] =
582 (s32)(address32(io_registers, 0x38) << 4) >> 4;
583 affine_reference_y[1] =
584 (s32)(address32(io_registers, 0x3C) << 4) >> 4;
586 for(i = 0; i < 4; i++)
588 if(dma[i].start_type == DMA_START_VBLANK)
589 dma_transfer(dma + i);
596 // Transition from vblank to next screen
601 printf("frame update (%x), %d instructions total, %d RAM flushes\n",
602 reg[REG_PC], instruction_count - last_frame, flush_ram_count);
603 last_frame = instruction_count;
605 /* printf("%d gbc audio updates\n", gbc_update_count);
606 printf("%d oam updates\n", oam_update_count); */
607 gbc_update_count = 0;
608 oam_update_count = 0;
615 update_gbc_sound(cpu_ticks);
620 if(update_backup_flag)
626 if(event_cycles == event_cycles_trigger)
635 if(vcount == (dispstat >> 8))
641 irq_raised |= IRQ_VCOUNT;
649 io_registers[REG_VCOUNT] = vcount;
651 io_registers[REG_DISPSTAT] = dispstat;
655 raise_interrupt(irq_raised);
657 execute_cycles = video_count;
663 } while(reg[CPU_HALT_STATE] != CPU_ACTIVE);
665 return execute_cycles;
668 u64 last_screen_timestamp = 0;
669 u32 frame_speed = 15000;
674 u32 real_frame_count = 0;
675 u32 virtual_frame_count = 0;
676 u32 num_skipped_frames = 0;
678 void vblank_interrupt_handler(u32 sub, u32 *parg)
685 char char_buffer[64];
686 u64 new_ticks, time_delta;
687 s32 used_frameskip = frameskip_value;
689 if(!synchronize_flag)
691 print_string("--FF--", 0xFFFF, 0x000, 0, 0);
693 virtual_frame_count = real_frame_count - 1;
698 virtual_frame_count++;
700 if(real_frame_count >= virtual_frame_count)
702 if((real_frame_count > virtual_frame_count) &&
703 (current_frameskip_type == auto_frameskip) &&
704 (num_skipped_frames < frameskip_value))
707 num_skipped_frames++;
711 virtual_frame_count = real_frame_count;
712 num_skipped_frames = 0;
715 // Here so that the home button return will eventually work.
716 // If it's not running fullspeed anyway this won't really hurt
724 sceDisplayWaitVblankStart();
727 if(current_frameskip_type == manual_frameskip)
729 frameskip_counter = (frameskip_counter + 1) %
730 (used_frameskip + 1);
733 if(frameskip_counter != (rand() % (used_frameskip + 1)))
738 if(frameskip_counter)
743 /* sprintf(char_buffer, "%08d %08d %d %d %d\n",
744 real_frame_count, virtual_frame_count, num_skipped_frames,
745 real_frame_count - virtual_frame_count, skip_next_frame);
746 print_string(char_buffer, 0xFFFF, 0x0000, 0, 10); */
749 sprintf(char_buffer, "%02d %02d %06d %07d", frameskip, (u32)ms_needed,
750 ram_translation_ptr - ram_translation_cache, rom_translation_ptr -
751 rom_translation_cache);
752 print_string(char_buffer, 0xFFFF, 0x0000, 0, 0);
760 u32 real_frame_count = 0;
761 u32 virtual_frame_count = 0;
762 u32 num_skipped_frames = 0;
763 u32 interval_skipped_frames;
766 u32 skipped_frames = 0;
767 u32 ticks_needed_total = 0;
768 const u32 frame_interval = 60;
775 static u32 frames_drawn = 60;
779 char print_buffer[128];
780 sprintf(print_buffer, "%d (%d)", fps, frames_drawn);
781 print_string(print_buffer, 0xFFFF, 0x000, 0, 0);
784 get_ticks_us(&new_ticks);
785 time_delta = new_ticks - last_screen_timestamp;
786 last_screen_timestamp = new_ticks;
787 ticks_needed_total += time_delta;
790 virtual_frame_count++;
792 real_frame_count = ((new_ticks -
793 frame_count_initial_timestamp) * 3) / 50000;
795 if(real_frame_count >= virtual_frame_count)
797 if((real_frame_count > virtual_frame_count) &&
798 (current_frameskip_type == auto_frameskip) &&
799 (num_skipped_frames < frameskip_value))
802 num_skipped_frames++;
806 virtual_frame_count = real_frame_count;
807 num_skipped_frames = 0;
812 if((synchronize_flag) &&
813 ((time_delta < frame_speed) && synchronize_flag))
815 delay_us(frame_speed - time_delta);
821 if(frames == frame_interval)
824 u32 new_frames_drawn;
826 time_delta = new_ticks - last_frame_interval_timestamp;
827 new_fps = (u64)((u64)1000000 * (u64)frame_interval) / time_delta;
829 (frame_interval - interval_skipped_frames) * (60 / frame_interval);
831 // Left open for rolling averages
833 frames_drawn = new_frames_drawn;
835 last_frame_interval_timestamp = new_ticks;
836 interval_skipped_frames = 0;
837 ticks_needed_total = 0;
841 if(current_frameskip_type == manual_frameskip)
843 frameskip_counter = (frameskip_counter + 1) %
844 (frameskip_value + 1);
847 if(frameskip_counter != (rand() % (frameskip_value + 1)))
852 if(frameskip_counter)
857 interval_skipped_frames += skip_next_frame;
859 if(!synchronize_flag)
860 print_string("--FF--", 0xFFFF, 0x000, 0, 0);
868 u32 ticks_needed_total = 0;
869 float us_needed = 0.0;
871 const u32 frame_interval = 60;
877 char char_buffer[64];
879 get_ticks_us(&new_ticks);
880 time_delta = new_ticks - last_screen_timestamp;
881 last_screen_timestamp = new_ticks;
882 ticks_needed_total += time_delta;
886 if((time_delta < frame_speed) && synchronize_flag)
888 delay_us(frame_speed - time_delta);
893 if(frames == frame_interval)
895 us_needed = (float)ticks_needed_total / frame_interval;
896 ticks_needed_total = 0;
900 if(current_frameskip_type == manual_frameskip)
902 frameskip_counter = (frameskip_counter + 1) %
903 (frameskip_value + 1);
906 if(frameskip_counter != (rand() % (frameskip_value + 1)))
911 if(frameskip_counter)
916 if(synchronize_flag == 0)
917 print_string("--FF--", 0xFFFF, 0x000, 0, 0);
919 sprintf(char_buffer, "gpSP: %.1fms %.1ffps", us_needed / 1000.0,
920 1000000.0 / us_needed);
921 SDL_WM_SetCaption(char_buffer, "gpSP");
924 sprintf(char_buffer, "%02d %02d %06d %07d", frameskip, (u32)ms_needed,
925 ram_translation_ptr - ram_translation_cache, rom_translation_ptr -
926 rom_translation_cache);
927 print_string(char_buffer, 0xFFFF, 0x0000, 0, 0);
935 if(!update_backup_flag)
936 update_backup_force();
940 #ifdef REGISTER_USAGE_ANALYZE
941 print_register_usage();
967 u32 file_length(u8 *filename, s32 dummy)
970 sceIoGetstat(filename, &stats);
971 return stats.st_size;
974 void delay_us(u32 us_count)
976 sceKernelDelayThread(us_count);
979 void get_ticks_us(u64 *tick_return)
982 sceRtcGetCurrentTick(&ticks);
984 *tick_return = (ticks * 1000000) / sceRtcGetTickResolution();
989 u32 file_length(u8 *dummy, FILE *fp)
993 fseek(fp, 0, SEEK_END);
995 fseek(fp, 0, SEEK_SET);
1002 void delay_us(u32 us_count)
1004 SDL_Delay(us_count / 1000);
1007 void get_ticks_us(u64 *ticks_return)
1009 *ticks_return = (SDL_GetTicks() * 1000);
1014 void delay_us(u32 us_count)
1017 SDL_Delay(us_count / 1000);
1020 void get_ticks_us(u64 *ticks_return)
1022 struct timeval current_time;
1023 gettimeofday(¤t_time, NULL);
1026 (u64)current_time.tv_sec * 1000000 + current_time.tv_usec;
1033 void change_ext(u8 *src, u8 *buffer, u8 *extension)
1036 strcpy(buffer, src);
1037 dot_position = strrchr(buffer, '.');
1040 strcpy(dot_position, extension);
1043 #define main_savestate_builder(type) \
1044 void main_##type##_savestate(file_tag_type savestate_file) \
1046 file_##type##_variable(savestate_file, cpu_ticks); \
1047 file_##type##_variable(savestate_file, execute_cycles); \
1048 file_##type##_variable(savestate_file, video_count); \
1049 file_##type##_array(savestate_file, timer); \
1052 main_savestate_builder(read);
1053 main_savestate_builder(write_mem);
1056 void printout(void *str, u32 val)