Posts by t.hass

Hallo,

Auf dem Server war die Platte voll… Deshalb sind die nächtlichen Imagebuilds fehlgeschlagen. Nach dem erfolgreichen Download des gewünschten Imges wechselst Du zurück ins Hauptmenü und von dort ins Basic-Menü. Hier kannst Du dann die Images den Laufwerken C und/oder D zuweisen. C sollte immer auf ein Geos-Image verweisen, D kann leer sein oder auf ein persönliches Daten- oder <Font|Fun>Pack Image verweisen.

Thomas

#!/usr/bin/env pwsh
# (c) 2020-26 T.Hass
#
# USAGE: pdfprint.ps1 [-OutputDir <path>] [-Printer <name>] <file>
#
# OPTIONS:
#   <file>         RAW or Postscript file to print
#   -OutputDir     Output directory for PDFs (default: Documents)
#   -Printer       Printer to use (default: PDF)
#
# PURPOSE: Pre-process printer output from DOSBox/PC-GEOS and convert to PDF
#          Extracts document title from PS input, converts MacRoman to CP1252,
#          handles custom page sizes, outputs to user-specified folder.
param(
   [Parameter(Mandatory=$false)]
   [string]$OutputDir = "$env:USERPROFILE\Documents",
   [Parameter(Mandatory=$false)]
   [string]$Printer = "PDF",
   [Parameter(Mandatory=$true, Position=0)]
   [string]$InputFile
)
$ErrorActionPreference = "Stop"
# Ghostscript location - adjust for your installation
$GS_PATH = "gs\gswin32c.exe"
# Logging - only saved to file on error
$LogMessages = @()
function Write-Log {
   param([string]$Message)
   $timestamp = Get-Date -Format "yyyy-MM-dd HH:mm:ss"
   $LogMessages += "$timestamp $Message"
}
# MacRoman to CP1252 mapping (GEOS umlauts)
$MacRomanToCp1252 = @{
   [byte]0x80 = [byte]0xC4    # Ä
   [byte]0x8A = [byte]0xE4    # ä
   [byte]0x85 = [byte]0xD6    # Ö
   [byte]0x9A = [byte]0xF6    # ö
   [byte]0x86 = [byte]0xDC    # Ü
   [byte]0x9F = [byte]0xFC    # ü
   [byte]0xA7 = [byte]0xDF    # ß
}
function ConvertFrom-MacRomanToCp1252 {
   param([byte[]]$Bytes)
   
   $result = [System.Collections.Generic.List[byte]]::new()
   foreach ($b in $Bytes) {
       $key = [byte]$b
       if ($MacRomanToCp1252.ContainsKey($key)) {
           $result.Add($MacRomanToCp1252[$key])
       } else {
           $result.Add($b)
       }
   }
   return [System.Text.Encoding]::GetEncoding(1252).GetString($result.ToArray())
}
function Get-DocumentTitle {
   param([string]$File)
   
   $fileBytes = [System.IO.File]::ReadAllBytes($File)
   
   # Find %%Title: in raw bytes
   $titleMarker = [System.Text.Encoding]::ASCII.GetBytes("%%Title:")
   $idx = -1
   for ($i = 0; $i -lt $fileBytes.Length - $titleMarker.Length; $i++) {
       $found = $true
       for ($j = 0; $j -lt $titleMarker.Length; $j++) {
           if ($fileBytes[$i + $j] -ne $titleMarker[$j]) { $found = $false; break }
       }
       if ($found) { $idx = $i; break }
   }
   
   if ($idx -ge 0) {
       $start = $idx + $titleMarker.Length
       # Skip whitespace
       while ($start -lt $fileBytes.Length -and ($fileBytes[$start] -eq 0x20 -or $fileBytes[$start] -eq 0x09)) { $start++ }
       
       # Find end of line
       $end = $start
       while ($end -lt $fileBytes.Length -and $fileBytes[$end] -ne 0x0D -and $fileBytes[$end] -ne 0x0A) { $end++ }
       
       $titleBytes = $fileBytes[$start..($end-1)]
       $title = ConvertFrom-MacRomanToCp1252 -Bytes $titleBytes
       $title = $title.Trim() -replace '\s', '_'
       return $title
   }
   return "unknown"
}
function Get-PageSize {
   param([string]$File)
   
   $bytes = [System.IO.File]::ReadAllBytes($File)
   $content = [System.Text.Encoding]::ASCII.GetString($bytes)
   
   # Find PageSetup section and look for SPS (SetPageSize)
   if ($content -match '(?s)%%BeginPageSetup.*?SPS\s+(\d+)\s+(\d+).*?%%EndPageSetup') {
       return @{
           Width = [int]$Matches[1]
           Height = [int]$Matches[2]
       }
   }
   
   # Fallback: use BoundingBox
   if ($content -match '%%BoundingBox:\s+\d+\s+\d+\s+(\d+)\s+(\d+)') {
       return @{
           Width = [int]$Matches[1]
           Height = [int]$Matches[2]
       }
   }
   
   # Default to A4 (595x842 points at 72 DPI)
   return @{ Width = 595; Height = 842 }
}
function Get-DocumentType {
   param([string]$File)
   
   # Check for %!PS or %%PostScript magic bytes
   $bytes = [System.IO.File]::ReadAllBytes($File)
   if ($bytes.Length -ge 2 -and $bytes[0] -eq 0x25 -and $bytes[1] -eq 0x21) {
       return "application/postscript"
   }
   return "application/octet-stream"
}
function New-PdfFromPostScript {
   param(
       [string]$InputFile,
       [string]$OutputPdf,
       [int]$PageWidth,
       [int]$PageHeight
   )
   
   # Find Ghostscript - check specified location first, then PATH
   if (Test-Path $GS_PATH) {
       $gs = $GS_PATH
   } else {
       $gs = Get-Command gswin64c -ErrorAction SilentlyContinue | Select-Object -First 1
       if (-not $gs) {
           $gs = Get-Command gs -ErrorAction SilentlyContinue | Select-Object -First 1
       }
       if (-not $gs) {
           throw "Ghostscript not found. Install or update `$GS_PATH in script."
       }
       $gs = $gs.Source
   }
   
   $gsArgs = @(
       "-dNOPAUSE",
       "-dBATCH",
       "-sDEVICE=pdfwrite",
       "-dCompatibilityLevel=1.1",
       "-r72",
       "-g${PageWidth}x${PageHeight}",
       "-sOutputFile=$OutputPdf",
       "$InputFile"
   )
   
   Write-Log "Running: $gs $($gsArgs -join ' ')"
   
   & $gs @gsArgs
   
   if ($LASTEXITCODE -ne 0) {
       throw "Ghostscript failed with exit code $LASTEXITCODE"
   }
}
# Main execution
try {
   if (-not (Test-Path $InputFile)) {
       throw "Input file '$InputFile' not found"
   }
   
   Write-Log "Using printer '$Printer' to print '$InputFile'"
   
   # Extract page size
   $pageSize = Get-PageSize -File $InputFile
   Write-Log "Page size: $($pageSize.Width)x$($pageSize.Height)"
   
   # Create output directory if needed
   if (-not (Test-Path $OutputDir)) {
       New-Item -ItemType Directory -Path $OutputDir -Force | Out-Null
   }
   
   # Validate PostScript format
   $docType = Get-DocumentType -File $InputFile
   if ($docType -ne "application/postscript") {
       Write-Log "Warning: Expected application/postscript, got $docType"
   }
   
   # Get document title for filename
   $docTitle = Get-DocumentTitle -File $InputFile
   Write-Log "Document title: $docTitle"
   
   # Build output PDF path
   $outputPdf = Join-Path $OutputDir "$docTitle.pdf"
   
   # Convert to PDF (72 DPI resolution)
   New-PdfFromPostScript -InputFile $InputFile `
       -OutputPdf $outputPdf `
       -PageWidth $pageSize.Width `
       -PageHeight $pageSize.Height
   
   Write-Log "PDF created: $outputPdf"
   
   Write-Host "PDF saved to: $outputPdf"
   exit 0
   
} catch {
   $LogFile = if ($env:TEMP) { "$env:TEMP\pigeos-print.log" } else { "/tmp/pigeos-print.log" }
   $LogMessages += "$(Get-Date -Format 'yyyy-MM-dd HH:mm:ss') Error: $_"
   $LogMessages | Out-File -FilePath $LogFile
   Write-Error $_
   exit 1
}

Ich habe echt keine Ahnung mehr, warum wir in dieser kleinen Runde das Rad zweimal erfinden müssen oder was an dem GEOS4Windows-Paket nicht paßt, aber wenn's Dich glücklich macht kannst Du Dich gerne inspirieren lassen.

Thomas

Klasse Mir war bis dahin auch völlig entgangen, dass Bario auch eine GEOS-kompatible Webseite zu seinen Projekten gebastelt hat. R-Basic und die netten, kleinen daraus entstandenen Projekte sind in letzter Zeit leider etwas in den Schatten der "großen GEOS-Entwicklung" geraten. Schade eigentlich.

Die Ne2000 Emulation setzt immer voraus, dass DosBox sich auf dem Host in den Netzwerkadapter einklinkt. Das erfordert tiefgreifende Rechte. Diesem werden die Pakete aus der Dosumgebung „untergejubelt“. Daher funktioniert das eigentlich nur mit einem Ethernetadapter im Host.
Die besten Chancen (ausser mit einem BaseBox Port) hast du vermutlich mit einem virtuellen Modem-Setup, wie hier im Thread beschrieben.

Die BaseBox mit der GeosHostintegration übernimmt die Ver-/Entschlüsselung. Wenn du unter RiscOS (vorerst) auf andere DosBoxen ausweichen musst, hilft ein externer Proxyserver z.b. WebOne. Läuft bei mir bequem als Dockeranwendung auf dem Synology NAS.

Wenn ich mich richtig erinnere, war der Compilerschalter nicht als Build Flag implementiert nur im Code zu setzen. Der Code, den er aktivierte, hat eine Zeitdifferenz durch kleine Offsets versucht auszugleichen (kontinuierlich). Das hilft nichts nach einem Host-Wakeup… außer man hat viel Geduld. Mehr Code/Rechenaufwand ist es auch.

Negative Auswirkungen auf Datenkonsistanz sind nicht zu erwarten, da nur der Direktory-Cache praktisch für mit -s gemountete Drives vor jedem Dir gelöscht wird - Floppy Mounts ist das Default. Auf die Schnelle habe ich keine spürbaren Effekte beim Betrieb von Geos bemerkt - ich habe aber auch kein R-Basic getestet und wüsste jetzt spontan auch keine App, viele Dirs triggert. Vielleicht wirkt sich der fehlende Cache auch nur Host-Lw mit hoher Latenz WebDav-Mounts(?) negativ aus. Das gilt es zu testen…

Generell denke ich, sollten alle Geos-spezifischen Anpassungen ein Opt-In sein, wenn wir sie upstream bringen wollen. Codeblöcke für zusätzliche DOSBox.conf Parameter sind ja zusammenhängend an einer Stelle und eigentlich unproblematisch. Die Anpassung des Mount Befehls war hier bewusst, um z.b. im Splitsetup zwischen System und User-Tree auf getrennten Lw evtl. Performanceprobleme umschiffen zu können.

Einstellungen bzgl. bedingter Compilierung halte für viel problematischer. Meson und Cmake Configs sind IMHO schwieriger zu warten - und solange DB-Staging beides nutzt doppelte Arbeit. Ich würde sogar soweit gehen, BaseBox im (CI/CD-)Code nicht so zu nennen, weil die dadurch entstehenden Brüche einfach nur lästig sind.

Quote from Rainer

Dumme Frage aus dem OFF: Wenn F5 die Standard-Taste zum Neuaufbau von Fenstern ist, warum dann nicht im GeoManager F5 benutzen um erst die Dateien neu einzulesen und dann erst das Fenster neu darzustellen? Dann muss ich niemand Strg-F4 als weiter Kombination merken.
Also Konzeptionell: Datei nicht da obwohl ich sie vom Host gerade eingespielt habe? -> F5 -> Ah, da ist sie ja!

GPC-Installer v3.0.9D feat: add MOUNT -s flag for lazy hostdrive refresh

Add RefreshMode enum (Manual/Lazy) and MOUNT -s flag to automatically invalidate directory cache on FindFirst, matching the existing floppy refresh behavior. Includes localdrive unit tests validating that Manual mode caches while Lazy mode picks up external host file changes.

Im Grunde ist Ctrl+F4 nur nötig um den Directory-Cache zu löschen. Für -t floppy Mounts wird der jetzt schon nicht genutzt, um Diskettenwechsel zu behandeln. Auf modernen Rechnern scheint das auch keinen Performance-Impact zu haben, wenn man's deaktiviert. Ohne Hostintegration plopt eine neue Datei zwar nicht von selbst im File/GeoManger auf, aber beim Verzeiichniswechsel oder F5 wird sie sichtbar. Vieleicht ist das ja schon Änderung genug. Probierts einfachmal aus...

Gruß Thomas

Quote from frehwagen

das ist eine Erweiterung die für die Basebox kommen soll:

ganz trivial ist das aber nicht. Ich habe das selbst auch schon probiert und folgende (potentielle) Probleme ausgemacht:

- die unterschiedlichen Plattformen (z.B. Windows, Linux) verwenden recht unterschiedlich Mechanismen Änderungen im zu überwachenden Dateisystmzweigen zu "alerten"

- Polling hatte sehr negative Einflüsse auf die Performance

Quote from MeyerK

Die Basebox war immer mit als Teil des Systems zu denken

...muß dann aber auch konsequent gepflegt werden. Aktuell häng sie >3800 Commits hinter DosBox-Staging hinterher, was vmtl. manuelles Rückportieren von Code/Mergen erfordert. Die CI/CD-Skripte sind für veraltete OS gedacht und teilw. (macOS) auch nicht lauffähig, weil die zu Grunde liegenden Runner EoL sind.

Quote from MeyerK

das sogenannte split-setup

stammt ursprünglich aus der Netzwerkinstallation, die bewust größere Veränderungen durch den Nutzer unterbunden hat. Geos-Nutzer fummeln jedoch mit Begeisterung an ihrem Systemen herum, um es ihrem ganz persönlichen Geschmack anzupassen: die Struckturierung der Applikationen im GeoManager steht da sicher ganz oben auf der Liste. Das kann man bestimmt durch Ablage der Apps im SYSTEM-Bereich und Verlinkung in (User)WORLD lösen, aber auch dann muß ich saber zwischen Erst- und Update-Installation unterscheiden. In menen Experimenten hat sich auch gezeigt, dass nicht aller Einstellungen in NET.INI und GEOS.INI gleichermßenanwendbar sind - Skepsis....

Gruß Thomas

Quote from MeyerK

dein unglaubliches Wissen nicht Upstream einbringst

Hallo Konstantin,

das ist weniger böser Wille oder Egoismus als vielmehr darin beründet, dass der Umgang mit Git nicht mein täglich Brot ist. Die coolen Features der Geos-Hostintegration (dynamische BS-Auflösungen und SLiRP) sind leider nicht in BaseBox:main sondern in einem eigenen Branch, an den ich halt die Printer-Redirection (und die Zeitsynchronisation) angestrickt habe, weil ich halt alles zusammen haben wollte. Inzwischen weiß ich, dass eine sch*ß Ausgangsbasis für einen vernüftigen PR ist... Dann kam das Rabithole GH-Actions hinzu, was man auch separat gegen main fixen sollte. Wenn mir einer sagen kann, wie ich aus dem Dilema wieder raus komme?!

Der Verweis auf den GPC-Windows-Installer ist bitte auch nicht als Afront gegen Eure Arbeit zu verstehen, es ist halt nur nicht in 3 Zeilen zu erklähren, wie man die Druckerumleitung in BaseBox, GhostScript & Print-Skript und GEOS.INI konfiguriert... Und keine Bedenken, ich habe keine weitere Zeit in den Installer investiert (außer die History zu pflegen). Er wird vielmehr gescripted erstellt indem die Zutaten: akt. BaseBox-Build aus VS + latest Ensemble(de).zip von GH + ein paar wenige Artefakte (Splash- & Hintergrundbild etc.) vom automatisch InnoSetup-Compiler zusammengebaut.

Gruß Thomas

Quote from Achim

Ich habe es gerade mal auf meinem Linux-Laptop mit Mint 22.3 versucht... funzt nicht, dosbox läßt sich nicht starten, mit der Meldung:

Ungültiger Maschinenbefehl (Speicherabzug geschrieben)

Vermute mal, es ist nur für PiGeos...

Sorry den Linux-Build hatte ich noch nicht getestet. Ist an sich aber für x86-64 gebaut. An dem Pi-Build arbeite ich noch. Soll final auch ein APT für Ubuntu 24.04 und kompatible gebaut werden.

für Devs: ich habe die Gh-Actions von Cmake auf Meson umgestellt, um möglichst lokale Pakete zu nutzen. Nur wenn diese nicht verfügbar sind gibt es ein Fallback auf Meson Warps. Auch Crossbuilds will ich vermeiden, was leider einen lokalen Runner für Pi-Buils erforderlich macht.

Quote from Lockesoft

Ich hätte daauch noch ein paar Fragen. 😄

Geht das jetzt mit der regulären Basebox, oder nur mit der in PIGeos?

Wenn ja, was muss ich tun um das nutzen zu können ?

Dank im Voraus.

In dem weiter oben verlinkten GPC-Windows-Installer ist das Drucken bereits konfiguriert. Es ist auch das das zum Zeitpunkt aktuellste Geos in deutscher Sprache enthalten. UI kannst du natürlich ggf. umstellen. Die Drucke landen als PDF-Datei im Windows Dokumente-Ordner.

Hallo Bernd,

Danke für‘s Testen. Die dynamischen BS-Auflösungen über die „BaseBox 72 dpi“ etc. Treiber sollten auch gehen. Spannend für Falk ist sicher auch, ob Du via Host-Ip Intergration ins Web kommst. Die Lpt-Umleitung ist auch enthalten. Als Command müßte auf dem Mac eigentlich gehen: lpr %s

Thomas

nächster Versuch mit zusätzlichem Code, der alle Abhängigkeiten rekursiv ermittelt: https://github.com/hastho/basebox….82.0-pigeos.75

ok, das Problem war, dass das Paket noch externe Abhängigkeiten (von Homebrew) verwendete. Jetzt sollten alle benötigten Libs im Paket sein -> Zeit für einen weiteren Test: https://github.com/hastho/basebox….82.0-pigeos.67

Hallo Bernd,

sorry ich hätte erwähnen sollen, daß ich den macOS Build im "Blindflug" erstellen ließ, da ich keinen aktuellen Mac mehr besitze. Ich hab mit Unterstützung des künstlichen Kollegen nochmal and der GH-Action gefeilt. Versuch's also bitte nochmal: https://github.com/hastho/basebox….82.0-pigeos.63

Gruß Thomas

Ich habe in die BaseBox die kontinuierliche Zeit+Datum-Synchronisation implantiert:

[dosbox]
hosttime = true

Im GPC-Installer 3.0.8D ist es standardmäßig aktiv in BaseBox macOS u.a. Builds auf GitHub müßt Ihr es selbst aktivieren.

Gruß Thomas

In der MB6 ist die kontinuierliche HostTime-Synchronisation ziemlich "mit dem Holzhammer" implementiert indem im BIOS INT8-Handler durch Aufruf von BIOS_HostTimeSync() die entsprechden BIOS ticks zur akt. Host-Zeit berechnet werden. In DOSBox-Staging steckt auch Code zum Ausgleich von Timedrifts, der aber beim Complilieren aktivert werden muß und dann alle 5s eine 1/2s korrigiert, wenn emulierte Zeit und Hostzeit auseinander driften.

EIne Mischung aus beiden Methoden abhängig vom Delta wäre sicher die zu bevorzugende Methode. Vorher sollte man aber gut testen, on wirklich alle GEOS-Apps den harten Ausgleich sicher verkraften.

Ich habe jetzt keinen Pi zur Hand, aber wenn alle getesteten Displays nur XGA anzeigen, hast Du möglicherweise den falschen HDMI-Ausgang am Pi 4/400 genommen. Auch kann Pi/GEOS keine 1920x1080@64k nativ ausgeben. Das Display muss 1280x720/768/800 akzeptieren und auf seine native Auflösung skalieren. Das liegt daran, dass DOSBox 0.7x einen S3-Chip mit Max. 4MB VRAM emuliert. In der Praxis ist das auch sinnvoll, da GEOS UI für 72dpi Display konzipiert wurde. Ein Up-Scaling sorgt dafür, daß man sich nicht die Augen verdirbt…

Ich muß ehrlich sagen, ich habe inzwischen auch den Überblick verloren, welche GEOS Issue X mit welcher Basbox Y zusammen nutzt werden müssen. Hatte nur festgestellt, dass in der von mir genutzten BaseBox die IP-Hostintegration nicht mit aktuellem GEOS Main/Master funktioniert. Daher sind im Windows-Installer auch nicht die neustesten Versionen enthalten sondern eine Version vom Februar 2026.