feat: comprehensive audio system and MCP server implementation

Audio System Enhancements:
- Complete PipeWire configuration with WirePlumber session management
- AI-powered noise suppression using RNNoise plugin
- GUI applications: EasyEffects, pavucontrol, Helvum, qpwgraph, pwvucontrol
- Pre-configured audio presets for microphone noise suppression
- Desktop integration with auto-start and helper scripts
- Validation tools and interactive audio management utilities
- Real-time audio processing with RTKit optimization
- Cross-application compatibility (Discord, Zoom, OBS, etc.)

MCP (Model Context Protocol) Implementation in Guile Scheme:
- Modular MCP server architecture with clean separation of concerns
- JSON-RPC transport layer with WebSocket and stdio support
- Protocol compliance with MCP specification
- Comprehensive error handling and validation
- Router system for tool and resource management
- Integration layer for NixOS Home Lab management
- Full test suite with unit and integration tests
- Documentation and usage examples

Technical Details:
- Removed conflicting ALSA udev rules while maintaining compatibility
- Fixed package dependencies and service configurations
- Successfully deployed and tested on congenital-optimist machine
- Functional programming approach using Guile Scheme modules
- Type-safe protocol implementation with validation
- Async/await pattern support for concurrent operations

This represents a significant enhancement to the Home Lab infrastructure,
providing both professional-grade audio capabilities and a robust MCP
server implementation for AI assistant integration.

packages/mcp-server/tests/run-tests.scm

@@ -0,0 +1,129 @@
+;; Test Suite Main Runner for MCP Protocol Core
+;; This module orchestrates the execution of all test suites
+
+(define-module (tests run-tests)
+  #:use-module (srfi srfi-64)
+  #:use-module (tests jsonrpc-tests)
+  #:use-module (tests protocol-tests)
+  #:use-module (tests transport-tests)
+  #:use-module (tests router-tests)
+  #:use-module (tests validation-tests)
+  #:use-module (tests error-handling-tests)
+  #:use-module (tests integration-tests)
+  #:use-module (tests protocol-compliance-tests)
+  #:export (run-all-tests
+            run-unit-tests
+            run-integration-tests
+            run-compliance-tests))
+
+;; Test suite configuration
+(define *test-config*
+  `((verbose . #t)
+    (stop-on-failure . #f)
+    (parallel . #f)
+    (coverage . #t)))
+
+;; Main test runner
+(define (run-all-tests)
+  "Run all test suites for the MCP Protocol Core"
+  (test-begin "MCP Protocol Core Test Suite")
+  
+  (display "🧪 Running MCP Protocol Core Test Suite\n")
+  (display "=====================================\n\n")
+  
+  ;; Unit tests
+  (display "📋 Running Unit Tests...\n")
+  (run-unit-tests)
+  
+  ;; Integration tests
+  (display "\n🔗 Running Integration Tests...\n")
+  (run-integration-tests)
+  
+  ;; Protocol compliance tests
+  (display "\n📜 Running Protocol Compliance Tests...\n")
+  (run-compliance-tests)
+  
+  (display "\n✅ Test Suite Complete!\n")
+  
+  ;; Display summary before test-end
+  (display-test-summary)
+  
+  (test-end "MCP Protocol Core Test Suite"))
+
+(define (run-unit-tests)
+  "Run all unit test suites"
+  (test-begin "Unit Tests")
+  
+  (display "  • JSON-RPC Tests...\n")
+  (run-jsonrpc-tests)
+  
+  (display "  • Protocol Tests...\n")
+  (run-protocol-tests)
+  
+  (display "  • Transport Tests...\n")
+  (run-transport-tests)
+  
+  (display "  • Router Tests...\n")
+  (run-router-tests)
+  
+  (display "  • Validation Tests...\n")
+  (run-validation-tests)
+  
+  (display "  • Error Handling Tests...\n")
+  (run-error-handling-tests)
+  
+  (test-end "Unit Tests"))
+
+(define (run-integration-tests)
+  "Run integration test suites"
+  (test-begin "Integration Tests")
+  
+  (display "  • Full Server Integration...\n")
+  (run-server-integration-tests)
+  
+  (test-end "Integration Tests"))
+
+(define (run-compliance-tests)
+  "Run protocol compliance test suites"
+  (test-begin "Protocol Compliance Tests")
+  
+  (display "  • MCP 2024-11-05 Specification...\n")
+  (run-mcp-compliance-tests)
+  
+  (test-end "Protocol Compliance Tests"))
+
+(define (display-test-summary)
+  "Display a summary of test results"
+  (let* ((runner (test-runner-current))
+         (passed (test-runner-pass-count runner))
+         (failed (test-runner-fail-count runner))
+         (skipped (test-runner-skip-count runner)))
+    
+    (display "\n📊 Test Summary:\n")
+    (display "================\n")
+    (format #t "  ✅ Passed:  ~a\n" passed)
+    (format #t "  ❌ Failed:  ~a\n" failed)
+    (format #t "  ⏭️  Skipped: ~a\n" skipped)
+    (format #t "  📈 Total:   ~a\n" (+ passed failed skipped))
+    
+    (if (> failed 0)
+        (begin
+          (display "\n🚨 Some tests failed! Please review the output above.\n")
+          (exit 1))
+        (display "\n🎉 All tests passed!\n"))))
+
+;; Convenience function for running tests from command line
+(define (main args)
+  "Main entry point for running tests"
+  (cond
+   ((and (> (length args) 1) (string=? (cadr args) "unit"))
+    (run-unit-tests))
+   ((and (> (length args) 1) (string=? (cadr args) "integration"))
+    (run-integration-tests))
+   ((and (> (length args) 1) (string=? (cadr args) "compliance"))
+    (run-compliance-tests))
+   (else
+    (run-all-tests))))
+
+;; Run tests when script is executed directly
+(main (command-line))