OptionRomPkg: Replace BSD License with BSD+Patent License

[mirror_edk2.git] / OptionRomPkg / CirrusLogic5430Dxe / CirrusLogic5430GraphicsOutput.c

/** @file\r
Copyright (c) 2007 - 2012, Intel Corporation. All rights reserved.<BR>\r
SPDX-License-Identifier: BSD-2-Clause-Patent\r
\r
Module Name:\r
\r
  UefiCirrusLogic5430GraphicsOutput.c\r
\r
Abstract:\r
\r
  This file produces the graphics abstration of Graphics Output Protocol. It is called by\r
  CirrusLogic5430.c file which deals with the EFI 1.1 driver model.\r
  This file just does graphics.\r
\r
**/\r
#include "CirrusLogic5430.h"\r
#include <IndustryStandard/Acpi.h>\r
\r
\r
STATIC\r
VOID\r
CirrusLogic5430CompleteModeInfo (\r
  OUT EFI_GRAPHICS_OUTPUT_MODE_INFORMATION  *Info\r
  )\r
{\r
  Info->Version = 0;\r
  Info->PixelFormat = PixelBitMask;\r
  Info->PixelInformation.RedMask = PIXEL_RED_MASK;\r
  Info->PixelInformation.GreenMask = PIXEL_GREEN_MASK;\r
  Info->PixelInformation.BlueMask = PIXEL_BLUE_MASK;\r
  Info->PixelInformation.ReservedMask = 0;\r
  Info->PixelsPerScanLine = Info->HorizontalResolution;\r
}\r
\r
\r
STATIC\r
EFI_STATUS\r
CirrusLogic5430CompleteModeData (\r
  IN  CIRRUS_LOGIC_5430_PRIVATE_DATA    *Private,\r
  OUT EFI_GRAPHICS_OUTPUT_PROTOCOL_MODE *Mode\r
  )\r
{\r
  EFI_GRAPHICS_OUTPUT_MODE_INFORMATION  *Info;\r
  EFI_ACPI_ADDRESS_SPACE_DESCRIPTOR     *FrameBufDesc;\r
\r
  Info = Mode->Info;\r
  CirrusLogic5430CompleteModeInfo (Info);\r
\r
  Private->PciIo->GetBarAttributes (\r
                        Private->PciIo,\r
                        0,\r
                        NULL,\r
                        (VOID**) &FrameBufDesc\r
                        );\r
\r
  Mode->FrameBufferBase = FrameBufDesc->AddrRangeMin;\r
  Mode->FrameBufferSize = Info->HorizontalResolution * Info->VerticalResolution;\r
\r
  return EFI_SUCCESS;\r
}\r
\r
\r
//\r
// Graphics Output Protocol Member Functions\r
//\r
EFI_STATUS\r
EFIAPI\r
CirrusLogic5430GraphicsOutputQueryMode (\r
  IN  EFI_GRAPHICS_OUTPUT_PROTOCOL          *This,\r
  IN  UINT32                                ModeNumber,\r
  OUT UINTN                                 *SizeOfInfo,\r
  OUT EFI_GRAPHICS_OUTPUT_MODE_INFORMATION  **Info\r
  )\r
/*++\r
\r
Routine Description:\r
\r
  Graphics Output protocol interface to query video mode\r
\r
  Arguments:\r
    This                  - Protocol instance pointer.\r
    ModeNumber            - The mode number to return information on.\r
    Info                  - Caller allocated buffer that returns information about ModeNumber.\r
    SizeOfInfo            - A pointer to the size, in bytes, of the Info buffer.\r
\r
  Returns:\r
    EFI_SUCCESS           - Mode information returned.\r
    EFI_BUFFER_TOO_SMALL  - The Info buffer was too small.\r
    EFI_DEVICE_ERROR      - A hardware error occurred trying to retrieve the video mode.\r
    EFI_NOT_STARTED       - Video display is not initialized. Call SetMode ()\r
    EFI_INVALID_PARAMETER - One of the input args was NULL.\r
\r
--*/\r
{\r
  CIRRUS_LOGIC_5430_PRIVATE_DATA  *Private;\r
\r
  Private = CIRRUS_LOGIC_5430_PRIVATE_DATA_FROM_GRAPHICS_OUTPUT_THIS (This);\r
\r
  if (Private->HardwareNeedsStarting) {\r
    return EFI_NOT_STARTED;\r
  }\r
\r
  if (Info == NULL || SizeOfInfo == NULL || ModeNumber >= This->Mode->MaxMode) {\r
    return EFI_INVALID_PARAMETER;\r
  }\r
\r
  *Info = AllocatePool (sizeof (EFI_GRAPHICS_OUTPUT_MODE_INFORMATION));\r
  if (*Info == NULL) {\r
    return EFI_OUT_OF_RESOURCES;\r
  }\r
\r
  *SizeOfInfo = sizeof (EFI_GRAPHICS_OUTPUT_MODE_INFORMATION);\r
\r
  (*Info)->HorizontalResolution = Private->ModeData[ModeNumber].HorizontalResolution;\r
  (*Info)->VerticalResolution   = Private->ModeData[ModeNumber].VerticalResolution;\r
  CirrusLogic5430CompleteModeInfo (*Info);\r
\r
  return EFI_SUCCESS;\r
}\r
\r
EFI_STATUS\r
EFIAPI\r
CirrusLogic5430GraphicsOutputSetMode (\r
  IN  EFI_GRAPHICS_OUTPUT_PROTOCOL *This,\r
  IN  UINT32                       ModeNumber\r
  )\r
/*++\r
\r
Routine Description:\r
\r
  Graphics Output protocol interface to set video mode\r
\r
  Arguments:\r
    This             - Protocol instance pointer.\r
    ModeNumber       - The mode number to be set.\r
\r
  Returns:\r
    EFI_SUCCESS      - Graphics mode was changed.\r
    EFI_DEVICE_ERROR - The device had an error and could not complete the request.\r
    EFI_UNSUPPORTED  - ModeNumber is not supported by this device.\r
\r
--*/\r
{\r
  CIRRUS_LOGIC_5430_PRIVATE_DATA    *Private;\r
  CIRRUS_LOGIC_5430_MODE_DATA       *ModeData;\r
\r
  Private = CIRRUS_LOGIC_5430_PRIVATE_DATA_FROM_GRAPHICS_OUTPUT_THIS (This);\r
\r
  if (ModeNumber >= This->Mode->MaxMode) {\r
    return EFI_UNSUPPORTED;\r
  }\r
\r
  ModeData = &Private->ModeData[ModeNumber];\r
\r
  if (Private->LineBuffer) {\r
    gBS->FreePool (Private->LineBuffer);\r
  }\r
\r
  Private->LineBuffer = NULL;\r
  Private->LineBuffer = AllocatePool (ModeData->HorizontalResolution);\r
  if (Private->LineBuffer == NULL) {\r
    return EFI_OUT_OF_RESOURCES;\r
  }\r
\r
  InitializeGraphicsMode (Private, &CirrusLogic5430VideoModes[ModeData->ModeNumber]);\r
\r
  This->Mode->Mode = ModeNumber;\r
  This->Mode->Info->HorizontalResolution = ModeData->HorizontalResolution;\r
  This->Mode->Info->VerticalResolution = ModeData->VerticalResolution;\r
  This->Mode->SizeOfInfo = sizeof(EFI_GRAPHICS_OUTPUT_MODE_INFORMATION);\r
\r
  CirrusLogic5430CompleteModeData (Private, This->Mode);\r
\r
  Private->HardwareNeedsStarting  = FALSE;\r
\r
  return EFI_SUCCESS;\r
}\r
\r
EFI_STATUS\r
EFIAPI\r
CirrusLogic5430GraphicsOutputBlt (\r
  IN  EFI_GRAPHICS_OUTPUT_PROTOCOL          *This,\r
  IN  EFI_GRAPHICS_OUTPUT_BLT_PIXEL         *BltBuffer, OPTIONAL\r
  IN  EFI_GRAPHICS_OUTPUT_BLT_OPERATION     BltOperation,\r
  IN  UINTN                                 SourceX,\r
  IN  UINTN                                 SourceY,\r
  IN  UINTN                                 DestinationX,\r
  IN  UINTN                                 DestinationY,\r
  IN  UINTN                                 Width,\r
  IN  UINTN                                 Height,\r
  IN  UINTN                                 Delta\r
  )\r
/*++\r
\r
Routine Description:\r
\r
  Graphics Output protocol instance to block transfer for CirrusLogic device\r
\r
Arguments:\r
\r
  This          - Pointer to Graphics Output protocol instance\r
  BltBuffer     - The data to transfer to screen\r
  BltOperation  - The operation to perform\r
  SourceX       - The X coordinate of the source for BltOperation\r
  SourceY       - The Y coordinate of the source for BltOperation\r
  DestinationX  - The X coordinate of the destination for BltOperation\r
  DestinationY  - The Y coordinate of the destination for BltOperation\r
  Width         - The width of a rectangle in the blt rectangle in pixels\r
  Height        - The height of a rectangle in the blt rectangle in pixels\r
  Delta         - Not used for EfiBltVideoFill and EfiBltVideoToVideo operation.\r
                  If a Delta of 0 is used, the entire BltBuffer will be operated on.\r
                  If a subrectangle of the BltBuffer is used, then Delta represents\r
                  the number of bytes in a row of the BltBuffer.\r
\r
Returns:\r
\r
  EFI_INVALID_PARAMETER - Invalid parameter passed in\r
  EFI_SUCCESS - Blt operation success\r
\r
--*/\r
{\r
  CIRRUS_LOGIC_5430_PRIVATE_DATA  *Private;\r
  EFI_TPL                         OriginalTPL;\r
  UINTN                           DstY;\r
  UINTN                           SrcY;\r
  EFI_GRAPHICS_OUTPUT_BLT_PIXEL   *Blt;\r
  UINTN                           X;\r
  UINT8                           Pixel;\r
  UINT32                          WidePixel;\r
  UINTN                           ScreenWidth;\r
  UINTN                           Offset;\r
  UINTN                           SourceOffset;\r
  UINT32                          CurrentMode;\r
\r
  Private = CIRRUS_LOGIC_5430_PRIVATE_DATA_FROM_GRAPHICS_OUTPUT_THIS (This);\r
\r
  if ((UINT32)BltOperation >= EfiGraphicsOutputBltOperationMax) {\r
    return EFI_INVALID_PARAMETER;\r
  }\r
\r
  if (Width == 0 || Height == 0) {\r
    return EFI_INVALID_PARAMETER;\r
  }\r
\r
  //\r
  // If Delta is zero, then the entire BltBuffer is being used, so Delta\r
  // is the number of bytes in each row of BltBuffer.  Since BltBuffer is Width pixels size,\r
  // the number of bytes in each row can be computed.\r
  //\r
  if (Delta == 0) {\r
    Delta = Width * sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL);\r
  }\r
\r
  //\r
  // We need to fill the Virtual Screen buffer with the blt data.\r
  // The virtual screen is upside down, as the first row is the bootom row of\r
  // the image.\r
  //\r
\r
  CurrentMode = This->Mode->Mode;\r
  //\r
  // Make sure the SourceX, SourceY, DestinationX, DestinationY, Width, and Height parameters\r
  // are valid for the operation and the current screen geometry.\r
  //\r
  if (BltOperation == EfiBltVideoToBltBuffer) {\r
    //\r
    // Video to BltBuffer: Source is Video, destination is BltBuffer\r
    //\r
    if (SourceY + Height > Private->ModeData[CurrentMode].VerticalResolution) {\r
      return EFI_INVALID_PARAMETER;\r
    }\r
\r
    if (SourceX + Width > Private->ModeData[CurrentMode].HorizontalResolution) {\r
      return EFI_INVALID_PARAMETER;\r
    }\r
  } else {\r
    //\r
    // BltBuffer to Video: Source is BltBuffer, destination is Video\r
    //\r
    if (DestinationY + Height > Private->ModeData[CurrentMode].VerticalResolution) {\r
      return EFI_INVALID_PARAMETER;\r
    }\r
\r
    if (DestinationX + Width > Private->ModeData[CurrentMode].HorizontalResolution) {\r
      return EFI_INVALID_PARAMETER;\r
    }\r
  }\r
  //\r
  // We have to raise to TPL Notify, so we make an atomic write the frame buffer.\r
  // We would not want a timer based event (Cursor, ...) to come in while we are\r
  // doing this operation.\r
  //\r
  OriginalTPL = gBS->RaiseTPL (TPL_NOTIFY);\r
\r
  switch (BltOperation) {\r
  case EfiBltVideoToBltBuffer:\r
    //\r
    // Video to BltBuffer: Source is Video, destination is BltBuffer\r
    //\r
    for (SrcY = SourceY, DstY = DestinationY; DstY < (Height + DestinationY); SrcY++, DstY++) {\r
\r
      Offset = (SrcY * Private->ModeData[CurrentMode].HorizontalResolution) + SourceX;\r
      if (((Offset & 0x03) == 0) && ((Width & 0x03) == 0)) {\r
        Private->PciIo->Mem.Read (\r
                              Private->PciIo,\r
                              EfiPciIoWidthUint32,\r
                              0,\r
                              Offset,\r
                              Width >> 2,\r
                              Private->LineBuffer\r
                              );\r
      } else {\r
        Private->PciIo->Mem.Read (\r
                              Private->PciIo,\r
                              EfiPciIoWidthUint8,\r
                              0,\r
                              Offset,\r
                              Width,\r
                              Private->LineBuffer\r
                              );\r
      }\r
\r
      for (X = 0; X < Width; X++) {\r
        Blt         = (EFI_GRAPHICS_OUTPUT_BLT_PIXEL *) ((UINT8 *) BltBuffer + (DstY * Delta) + (DestinationX + X) * sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL));\r
\r
        Blt->Red    = PIXEL_TO_RED_BYTE (Private->LineBuffer[X]);\r
        Blt->Green  = PIXEL_TO_GREEN_BYTE (Private->LineBuffer[X]);\r
        Blt->Blue   = PIXEL_TO_BLUE_BYTE (Private->LineBuffer[X]);\r
      }\r
    }\r
    break;\r
\r
  case EfiBltVideoToVideo:\r
    //\r
    // Perform hardware acceleration for Video to Video operations\r
    //\r
    ScreenWidth   = Private->ModeData[CurrentMode].HorizontalResolution;\r
    SourceOffset  = (SourceY * Private->ModeData[CurrentMode].HorizontalResolution) + (SourceX);\r
    Offset        = (DestinationY * Private->ModeData[CurrentMode].HorizontalResolution) + (DestinationX);\r
\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0000);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0010);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0012);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0014);\r
\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0001);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0011);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0013);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0015);\r
\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) (((Width << 8) & 0xff00) | 0x20));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((Width & 0xff00) | 0x21));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) (((Height << 8) & 0xff00) | 0x22));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((Height & 0xff00) | 0x23));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) (((ScreenWidth << 8) & 0xff00) | 0x24));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((ScreenWidth & 0xff00) | 0x25));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) (((ScreenWidth << 8) & 0xff00) | 0x26));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((ScreenWidth & 0xff00) | 0x27));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((((Offset) << 8) & 0xff00) | 0x28));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((((Offset) >> 0) & 0xff00) | 0x29));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((((Offset) >> 8) & 0xff00) | 0x2a));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((((SourceOffset) << 8) & 0xff00) | 0x2c));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((((SourceOffset) >> 0) & 0xff00) | 0x2d));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, (UINT16) ((((SourceOffset) >> 8) & 0xff00) | 0x2e));\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x002f);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0030);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0d32);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0033);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0034);\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0035);\r
\r
    outw (Private, GRAPH_ADDRESS_REGISTER, 0x0231);\r
\r
    outb (Private, GRAPH_ADDRESS_REGISTER, 0x31);\r
    while ((inb (Private, GRAPH_DATA_REGISTER) & 0x01) == 0x01)\r
      ;\r
    break;\r
\r
  case EfiBltVideoFill:\r
    Blt       = BltBuffer;\r
    Pixel     = RGB_BYTES_TO_PIXEL (Blt->Red, Blt->Green, Blt->Blue);\r
    WidePixel = (Pixel << 8) | Pixel;\r
    WidePixel = (WidePixel << 16) | WidePixel;\r
\r
    if (DestinationX == 0 && Width == Private->ModeData[CurrentMode].HorizontalResolution) {\r
      Offset = DestinationY * Private->ModeData[CurrentMode].HorizontalResolution;\r
      if (((Offset & 0x03) == 0) && (((Width * Height) & 0x03) == 0)) {\r
        Private->PciIo->Mem.Write (\r
                              Private->PciIo,\r
                              EfiPciIoWidthFillUint32,\r
                              0,\r
                              Offset,\r
                              (Width * Height) >> 2,\r
                              &WidePixel\r
                              );\r
      } else {\r
        Private->PciIo->Mem.Write (\r
                              Private->PciIo,\r
                              EfiPciIoWidthFillUint8,\r
                              0,\r
                              Offset,\r
                              Width * Height,\r
                              &Pixel\r
                              );\r
      }\r
    } else {\r
      for (SrcY = SourceY, DstY = DestinationY; SrcY < (Height + SourceY); SrcY++, DstY++) {\r
        Offset = (DstY * Private->ModeData[CurrentMode].HorizontalResolution) + DestinationX;\r
        if (((Offset & 0x03) == 0) && ((Width & 0x03) == 0)) {\r
          Private->PciIo->Mem.Write (\r
                                Private->PciIo,\r
                                EfiPciIoWidthFillUint32,\r
                                0,\r
                                Offset,\r
                                Width >> 2,\r
                                &WidePixel\r
                                );\r
        } else {\r
          Private->PciIo->Mem.Write (\r
                                Private->PciIo,\r
                                EfiPciIoWidthFillUint8,\r
                                0,\r
                                Offset,\r
                                Width,\r
                                &Pixel\r
                                );\r
        }\r
      }\r
    }\r
    break;\r
\r
  case EfiBltBufferToVideo:\r
    for (SrcY = SourceY, DstY = DestinationY; SrcY < (Height + SourceY); SrcY++, DstY++) {\r
\r
      for (X = 0; X < Width; X++) {\r
        Blt =\r
          (EFI_GRAPHICS_OUTPUT_BLT_PIXEL *) (\r
              (UINT8 *) BltBuffer +\r
              (SrcY * Delta) +\r
              ((SourceX + X) * sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL))\r
            );\r
        Private->LineBuffer[X]  =\r
          RGB_BYTES_TO_PIXEL (Blt->Red, Blt->Green, Blt->Blue);\r
      }\r
\r
      Offset = (DstY * Private->ModeData[CurrentMode].HorizontalResolution) + DestinationX;\r
\r
      if (((Offset & 0x03) == 0) && ((Width & 0x03) == 0)) {\r
        Private->PciIo->Mem.Write (\r
                              Private->PciIo,\r
                              EfiPciIoWidthUint32,\r
                              0,\r
                              Offset,\r
                              Width >> 2,\r
                              Private->LineBuffer\r
                              );\r
      } else {\r
        Private->PciIo->Mem.Write (\r
                              Private->PciIo,\r
                              EfiPciIoWidthUint8,\r
                              0,\r
                              Offset,\r
                              Width,\r
                              Private->LineBuffer\r
                              );\r
      }\r
    }\r
    break;\r
  default:\r
    ASSERT (FALSE);\r
  }\r
\r
  gBS->RestoreTPL (OriginalTPL);\r
\r
  return EFI_SUCCESS;\r
}\r
\r
EFI_STATUS\r
CirrusLogic5430GraphicsOutputConstructor (\r
  CIRRUS_LOGIC_5430_PRIVATE_DATA  *Private\r
  )\r
{\r
  EFI_STATUS                   Status;\r
  EFI_GRAPHICS_OUTPUT_PROTOCOL *GraphicsOutput;\r
\r
\r
  GraphicsOutput            = &Private->GraphicsOutput;\r
  GraphicsOutput->QueryMode = CirrusLogic5430GraphicsOutputQueryMode;\r
  GraphicsOutput->SetMode   = CirrusLogic5430GraphicsOutputSetMode;\r
  GraphicsOutput->Blt       = CirrusLogic5430GraphicsOutputBlt;\r
\r
  //\r
  // Initialize the private data\r
  //\r
  Status = gBS->AllocatePool (\r
                  EfiBootServicesData,\r
                  sizeof (EFI_GRAPHICS_OUTPUT_PROTOCOL_MODE),\r
                  (VOID **) &Private->GraphicsOutput.Mode\r
                  );\r
  if (EFI_ERROR (Status)) {\r
    return Status;\r
  }\r
  Status = gBS->AllocatePool (\r
                  EfiBootServicesData,\r
                  sizeof (EFI_GRAPHICS_OUTPUT_MODE_INFORMATION),\r
                  (VOID **) &Private->GraphicsOutput.Mode->Info\r
                  );\r
  if (EFI_ERROR (Status)) {\r
    return Status;\r
  }\r
  Private->GraphicsOutput.Mode->MaxMode = (UINT32) Private->MaxMode;\r
  Private->GraphicsOutput.Mode->Mode    = GRAPHICS_OUTPUT_INVALIDE_MODE_NUMBER;\r
  Private->HardwareNeedsStarting        = TRUE;\r
  Private->LineBuffer                   = NULL;\r
\r
  //\r
  // Initialize the hardware\r
  //\r
  GraphicsOutput->SetMode (GraphicsOutput, 0);\r
  ASSERT (Private->GraphicsOutput.Mode->Mode < CIRRUS_LOGIC_5430_MODE_COUNT);\r
  DrawLogo (\r
    Private,\r
    Private->ModeData[Private->GraphicsOutput.Mode->Mode].HorizontalResolution,\r
    Private->ModeData[Private->GraphicsOutput.Mode->Mode].VerticalResolution\r
    );\r
\r
  return EFI_SUCCESS;\r
}\r
\r
EFI_STATUS\r
CirrusLogic5430GraphicsOutputDestructor (\r
  CIRRUS_LOGIC_5430_PRIVATE_DATA  *Private\r
  )\r
/*++\r
\r
Routine Description:\r
\r
Arguments:\r
\r
Returns:\r
\r
  None\r
\r
--*/\r
{\r
  if (Private->GraphicsOutput.Mode != NULL) {\r
    if (Private->GraphicsOutput.Mode->Info != NULL) {\r
      gBS->FreePool (Private->GraphicsOutput.Mode->Info);\r
    }\r
    gBS->FreePool (Private->GraphicsOutput.Mode);\r
  }\r
\r
  return EFI_SUCCESS;\r
}\r
\r
\r