From: Tristan Gingold <gingold@adacore.com>
To: qemu-devel@nongnu.org
Cc: Tristan Gingold <gingold@adacore.com>
Subject: [Qemu-devel] [PATCH 10/24] Add square wave output support.
Date: Thu, 19 Mar 2009 15:35:42 +0100 [thread overview]
Message-ID: <1237473356-81422-11-git-send-email-gingold@adacore.com> (raw)
In-Reply-To: <1237473356-81422-10-git-send-email-gingold@adacore.com>
This is necessary for es40 as the sqw output is directly connected to the
core chipset.
Signed-off-by: Tristan Gingold <gingold@adacore.com>
---
hw/mc146818rtc.c | 40 ++++++++++++++++++++++++++++++----------
hw/pc.h | 1 +
2 files changed, 31 insertions(+), 10 deletions(-)
diff --git a/hw/mc146818rtc.c b/hw/mc146818rtc.c
index 5b08d72..11cb250 100644
--- a/hw/mc146818rtc.c
+++ b/hw/mc146818rtc.c
@@ -50,11 +50,12 @@
#define REG_A_UIP 0x80
-#define REG_B_SET 0x80
-#define REG_B_PIE 0x40
-#define REG_B_AIE 0x20
-#define REG_B_UIE 0x10
-#define REG_B_DM 0x04
+#define REG_B_SET 0x80
+#define REG_B_PIE 0x40
+#define REG_B_AIE 0x20
+#define REG_B_UIE 0x10
+#define REG_B_SQWE 0x08
+#define REG_B_DM 0x04
struct RTCState {
uint8_t cmos_data[128];
@@ -62,6 +63,7 @@ struct RTCState {
struct tm current_tm;
int base_year;
qemu_irq irq;
+ qemu_irq sqw_irq;
int it_shift;
/* periodic timer */
QEMUTimer *periodic_timer;
@@ -95,20 +97,25 @@ static void rtc_timer_update(RTCState *s, int64_t current_time)
{
int period_code, period;
int64_t cur_clock, next_irq_clock;
+ int enable_pie;
period_code = s->cmos_data[RTC_REG_A] & 0x0f;
#if defined TARGET_I386 || defined TARGET_X86_64
/* disable periodic timer if hpet is in legacy mode, since interrupts are
* disabled anyway.
*/
- if (period_code != 0 && (s->cmos_data[RTC_REG_B] & REG_B_PIE) && !hpet_in_legacy_mode()) {
+ enable_pie = hpet_in_legacy_mode();
#else
- if (period_code != 0 && (s->cmos_data[RTC_REG_B] & REG_B_PIE)) {
+ enable_pie = 1;
#endif
+ if (period_code != 0
+ && (((s->cmos_data[RTC_REG_B] & REG_B_PIE) && enable_pie)
+ || ((s->cmos_data[RTC_REG_B] & REG_B_SQWE) && s->sqw_irq))) {
if (period_code <= 2)
period_code += 7;
/* period in 32 Khz cycles */
period = 1 << (period_code - 1);
+ //period *= 2;
#ifdef TARGET_I386
if(period != s->period)
s->irq_coalesced = (s->irq_coalesced * s->period) / period;
@@ -138,8 +145,15 @@ static void rtc_periodic_timer(void *opaque)
return;
}
#endif
- s->cmos_data[RTC_REG_C] |= 0xc0;
- rtc_irq_raise(s->irq);
+ if (s->cmos_data[RTC_REG_B] & REG_B_PIE) {
+ s->cmos_data[RTC_REG_C] |= 0xc0;
+ rtc_irq_raise(s->irq);
+ }
+ if (s->cmos_data[RTC_REG_B] & REG_B_SQWE) {
+ /* Not square wave at all but we don't want 2048Hz interrupts!
+ Must be seen as a pulse. */
+ qemu_irq_raise(s->sqw_irq);
+ }
}
static void cmos_ioport_write(void *opaque, uint32_t addr, uint32_t data)
@@ -527,13 +541,14 @@ static int rtc_load_td(QEMUFile *f, void *opaque, int version_id)
}
#endif
-RTCState *rtc_init(int base, qemu_irq irq, int base_year)
+RTCState *rtc_init_sqw(int base, qemu_irq irq, qemu_irq sqw_irq, int base_year)
{
RTCState *s;
s = qemu_mallocz(sizeof(RTCState));
s->irq = irq;
+ s->sqw_irq = sqw_irq;
s->cmos_data[RTC_REG_A] = 0x26;
s->cmos_data[RTC_REG_B] = 0x02;
s->cmos_data[RTC_REG_C] = 0x00;
@@ -563,6 +578,11 @@ RTCState *rtc_init(int base, qemu_irq irq, int base_year)
return s;
}
+RTCState *rtc_init(int base, qemu_irq irq, int base_year)
+{
+ return rtc_init_sqw(base, irq, NULL, base_year);
+}
+
/* Memory mapped interface */
static uint32_t cmos_mm_readb (void *opaque, target_phys_addr_t addr)
{
diff --git a/hw/pc.h b/hw/pc.h
index 5b378d4..7345f04 100644
--- a/hw/pc.h
+++ b/hw/pc.h
@@ -90,6 +90,7 @@ void i8042_mm_init(qemu_irq kbd_irq, qemu_irq mouse_irq,
typedef struct RTCState RTCState;
RTCState *rtc_init(int base, qemu_irq irq, int base_year);
+RTCState *rtc_init_sqw(int base, qemu_irq irq, qemu_irq sqw_irq, int base_year);
RTCState *rtc_mm_init(target_phys_addr_t base, int it_shift, qemu_irq irq,
int base_year);
void rtc_set_memory(RTCState *s, int addr, int val);
--
1.6.2
next prev parent reply other threads:[~2009-03-19 14:36 UTC|newest]
Thread overview: 34+ messages / expand[flat|nested] mbox.gz Atom feed top
2009-03-19 14:35 [Qemu-devel] [PATCH 0/24]: add alpha es40 system emulation (v2) Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 01/24] Add support for multi-level phys map Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 02/24] Fix cpu_physical_memory_rw when operating on IO blocks Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 03/24] Fix bug: palcode is at least 6 bits Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 04/24] Fix bug: do not mask address LSBs for ldwu Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 05/24] bug fix: avoid nop to override next instruction Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 06/24] Be slightly more verbose for unassigned_mem_read* Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 07/24] Increase Alpha physical address size to 44 bits Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 08/24] Allow 5 mmu indexes Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 09/24] Split cpu_mmu_index into cpu_mmu_index_data and cpu_mmu_index_code Tristan Gingold
2009-03-19 14:35 ` Tristan Gingold [this message]
2009-03-19 14:35 ` [Qemu-devel] [PATCH 11/24] Add ali1543 super IO pci device Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 12/24] Add 21272 chipset (memory and pci controller for alpha) Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 13/24] Add target-alpha/machine.c and hw/es40.c for es40 machine emulation Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 14/24] Move softmmu_helper.h from exec.h to op_helper.c on alpha Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 15/24] Document which IPR are used by 21264 Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 16/24] tb_flush helper should flush the tb (and not the tlb) Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 17/24] Add instruction name in comments for hw_ld opcode Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 18/24] Remove PALCODE_ declarations (unused) Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 19/24] alpha ld helpers now directly return the value Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 20/24] Add alpha_cpu_list Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 21/24] Alpha: lower parent irq when irq is lowered Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 22/24] Move linux-user pal emulation to linux-user/ Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 23/24] Correctly decode hw_ld/hw_st opcodes for all alpha implementations Tristan Gingold
2009-03-19 14:35 ` [Qemu-devel] [PATCH 24/24] Add full emulation for 21264 Tristan Gingold
2009-03-19 16:20 ` [Qemu-devel] [PATCH 20/24] Add alpha_cpu_list Krumme, Chris
2009-03-20 8:51 ` Tristan Gingold
2009-03-19 16:10 ` [Qemu-devel] [PATCH 13/24] Add target-alpha/machine.c and hw/es40.cfor es40 machine emulation Krumme, Chris
2009-03-20 8:46 ` Tristan Gingold
2009-03-19 16:07 ` [Qemu-devel] [PATCH 11/24] Add ali1543 super IO pci device Krumme, Chris
2009-03-20 8:49 ` Tristan Gingold
2009-03-19 16:01 ` [Qemu-devel] [PATCH 02/24] Fix cpu_physical_memory_rw whenoperating on IO blocks Krumme, Chris
2009-03-20 8:44 ` Tristan Gingold
-- strict thread matches above, loose matches on Subject: below --
2009-03-13 14:20 [Qemu-devel] [PATCH 0/24]: add alpha es40 system emulation Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 01/24] Add support for multi-level phys map Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 02/24] Fix cpu_physical_memory_rw when operating on IO blocks Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 03/24] Fix bug: palcode is at least 6 bits Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 04/24] Fix bug: do not mask address LSBs for ldwu Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 05/24] bug fix: avoid nop to override next instruction Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 06/24] Be slightly more verbose for unassigned_mem_read* Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 07/24] Increase Alpha physical address size to 44 bits Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 08/24] Allow 5 mmu indexes Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 09/24] Split cpu_mmu_index into cpu_mmu_index_data and cpu_mmu_index_code Tristan Gingold
2009-03-13 14:20 ` [Qemu-devel] [PATCH 10/24] Add square wave output support Tristan Gingold
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=1237473356-81422-11-git-send-email-gingold@adacore.com \
--to=gingold@adacore.com \
--cc=qemu-devel@nongnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).