git.giacomolli.uk - onechat/blob - model.go

   1 package main
   2
   3 import (
   4         "bufio"
   5         "bytes"
   6         "context"
   7         "encoding/json"
   8         "errors"
   9         "fmt"
  10         "io"
  11         "net/http"
  12         "os"
  13         "path/filepath"
  14         "strings"
  15         "sync"
  16         "sync/atomic"
  17         "time"
  18 )
  19
  20 const (
  21         // modelChatGPTURL is the Responses endpoint of the ChatGPT backend.
  22         modelChatGPTURL = "https://chatgpt.com/backend-api/codex/responses"
  23
  24         // modelAPIURL is the Responses endpoint of the OpenAI API.
  25         modelAPIURL = "https://api.openai.com/v1/responses"
  26
  27         // modelQuotaPrefix starts the names of the quota headers of the ChatGPT
  28         // backend, in canonical form.
  29         modelQuotaPrefix = "X-Codex-"
  30
  31         // modelTurnStateHeader is an x-codex-* header that holds an opaque
  32         // state of the backend, not quota.
  33         modelTurnStateHeader = "X-Codex-Turn-State"
  34
  35         // modelErrorBytes is the most bytes of an error response that go into
  36         // the error.
  37         modelErrorBytes = 4096
  38 )
  39
  40 // errModelCallLimit tells that a client sent its limit of calls.
  41 var errModelCallLimit = errors.New("call limit reached")
  42
  43 // modelEndpoint returns the URL and the authorizer of the endpoint in config.
  44 // The ChatGPT backend uses the token file in dir. The OpenAI API uses the key in
  45 // OPENAI_API_KEY, and there is no fallback from one to the other. All clients
  46 // share the authorizer, so one refresh runs at a time.
  47 func modelEndpoint(config Config, dir string) (string, ModelAuthorizer, error) {
  48         if config.Endpoint == configEndpointAPI {
  49                 key := os.Getenv("OPENAI_API_KEY")
  50                 if key == "" {
  51                         return "", nil, errors.New("endpoint api needs OPENAI_API_KEY")
  52                 }
  53
  54                 return modelAPIURL, ModelAPIKey(key), nil
  55         }
  56
  57         return modelChatGPTURL, newChatGPTAuth(filepath.Join(dir, chatgptTokenFileName), chatgptIssuer), nil
  58 }
  59
  60 // newModelClient returns a client for the Responses endpoint at url. It records
  61 // each call in the usage file at usagePath.
  62 func newModelClient(url string, auth ModelAuthorizer, cacheKey, usagePath string) *ModelClient {
  63         return &ModelClient{
  64                 url:      url,
  65                 auth:     auth,
  66                 cacheKey: cacheKey,
  67                 usage: &ModelUsageLog{
  68                         path: usagePath,
  69                 },
  70                 http: &http.Client{},
  71         }
  72 }
  73
  74 // modelUserMessage returns a user input item with one text part for each text.
  75 func modelUserMessage(texts ...string) any {
  76         type part struct {
  77                 Type string `json:"type"`
  78                 Text string `json:"text"`
  79         }
  80
  81         content := make([]part, len(texts))
  82         for n, text := range texts {
  83                 content[n] = part{
  84                         Type: "input_text",
  85                         Text: text,
  86                 }
  87         }
  88
  89         return struct {
  90                 Role    string `json:"role"`
  91                 Content []part `json:"content"`
  92         }{
  93                 Role:    "user",
  94                 Content: content,
  95         }
  96 }
  97
  98 // modelOutputText returns the text of the message items of output.
  99 func modelOutputText(output []json.RawMessage) (string, error) {
 100         var text strings.Builder
 101
 102         for _, raw := range output {
 103                 var item ModelOutputItem
 104
 105                 err := json.Unmarshal(raw, &item)
 106                 if err != nil {
 107                         return "", fmt.Errorf("decode output item: %w", err)
 108                 }
 109
 110                 if item.Type != "message" {
 111                         continue
 112                 }
 113
 114                 for _, part := range item.Content {
 115                         if part.Type == "output_text" {
 116                                 text.WriteString(part.Text)
 117                         }
 118                 }
 119         }
 120
 121         return text.String(), nil
 122 }
 123
 124 // ModelAuthorizer adds the credentials of a model call to the headers of its
 125 // request.
 126 type ModelAuthorizer interface {
 127         Authorize(ctx context.Context, header http.Header) error
 128 }
 129
 130 // ModelAPIKey authorizes calls to the OpenAI API with a key.
 131 type ModelAPIKey string
 132
 133 // Authorize sets the key as the bearer token.
 134 func (k ModelAPIKey) Authorize(ctx context.Context, header http.Header) error {
 135         header.Set("Authorization", "Bearer "+string(k))
 136
 137         return ctx.Err()
 138 }
 139
 140 // ModelClient sends model calls to a Responses endpoint for one agent. The
 141 // ChatGPT backend and the OpenAI API take the same request body and differ only
 142 // in the URL and the credentials. Every call sends the fixed cache key of the
 143 // agent, so the turns and the compactions of the agent share one prompt cache.
 144 // A call of a subagent sends the key of the agent with "-" and the name of the
 145 // subagent, so that the calls of a subagent do not share a cache entry with the
 146 // calls of the agent that run at the same time. The ChatGPT backend caches only
 147 // with the key in the session_id header, so a call to it sends the key there
 148 // and in the body. Every call is recorded in the usage file.
 149 //
 150 // The request never holds max_output_tokens or metadata, because the ChatGPT
 151 // backend refuses them. It sets store to false, so the client sends the whole
 152 // input on each call, and it asks for the encrypted reasoning, so a later call
 153 // can send the reasoning items back.
 154 type ModelClient struct {
 155         url      string
 156         auth     ModelAuthorizer
 157         cacheKey string
 158         usage    *ModelUsageLog
 159         http     *http.Client
 160         limit    int64
 161         calls    atomic.Int64
 162 }
 163
 164 // LimitCalls makes the client refuse each call after the first limit calls.
 165 func (c *ModelClient) LimitCalls(limit int64) {
 166         c.limit = limit
 167 }
 168
 169 // LimitReached tells if the client refuses further calls.
 170 func (c *ModelClient) LimitReached() bool {
 171         return c.limit > 0 && c.calls.Load() >= c.limit
 172 }
 173
 174 // CallLimit returns the configured call limit, or zero for no limit.
 175 func (c *ModelClient) CallLimit() int64 {
 176         return c.limit
 177 }
 178
 179 // UsagePath returns the file that records the calls of this client.
 180 func (c *ModelClient) UsagePath() string {
 181         return c.usage.path
 182 }
 183
 184 // Create sends the call and reads its event stream to the end. Over the call
 185 // limit it sends nothing and returns errModelCallLimit.
 186 func (c *ModelClient) Create(ctx context.Context, request ModelRequest) (ModelResponse, error) {
 187         if c.calls.Add(1) > c.limit && c.limit > 0 {
 188                 return ModelResponse{}, errModelCallLimit
 189         }
 190
 191         cacheKey := c.cacheKey
 192         if request.Agent != "" {
 193                 cacheKey += "-" + request.Agent
 194         }
 195
 196         body, err := json.Marshal(ModelRequestBody{
 197                 Model:        request.Model,
 198                 Instructions: request.Instructions,
 199                 Input:        request.Input,
 200                 Tools:        request.Tools,
 201                 Reasoning: ModelReasoning{
 202                         Effort: request.Effort,
 203                 },
 204                 Store:          false,
 205                 Stream:         true,
 206                 Include:        []string{"reasoning.encrypted_content"},
 207                 PromptCacheKey: cacheKey,
 208         })
 209         if err != nil {
 210                 return ModelResponse{}, fmt.Errorf("encode request: %w", err)
 211         }
 212
 213         httpRequest, err := http.NewRequestWithContext(ctx, http.MethodPost, c.url, bytes.NewReader(body))
 214         if err != nil {
 215                 return ModelResponse{}, fmt.Errorf("create request: %w", err)
 216         }
 217
 218         httpRequest.Header.Set("Content-Type", "application/json")
 219         httpRequest.Header.Set("Accept", "text/event-stream")
 220
 221         err = c.auth.Authorize(ctx, httpRequest.Header)
 222         if err != nil {
 223                 return ModelResponse{}, fmt.Errorf("authorize model call: %w", err)
 224         }
 225
 226         _, chatgpt := c.auth.(*ChatGPTAuth)
 227         if chatgpt {
 228                 httpRequest.Header.Set("session_id", cacheKey)
 229         }
 230
 231         start := time.Now()
 232         record := ModelUsageRecord{
 233                 Date:  start.Format(time.RFC3339Nano),
 234                 Model: request.Model,
 235         }
 236
 237         if request.Node != nil {
 238                 record.Node = &[2]int{request.Node.level, request.Node.index}
 239         }
 240
 241         record.Turn = request.Turn
 242         record.Agent = request.Agent
 243         response, err := c.send(httpRequest, &record)
 244         if err != nil {
 245                 record.Error = err.Error()
 246         }
 247
 248         record.Seconds = time.Since(start).Seconds()
 249         record.InputTokens = response.Usage.Input
 250         record.CachedTokens = response.Usage.Cached
 251         record.OutputTokens = response.Usage.Output
 252         record.TextBytes = len(response.Text)
 253
 254         return response, errors.Join(err, c.usage.Write(record))
 255 }
 256
 257 // send makes the HTTP call and reads its stream. It puts the status and the
 258 // quota headers into record.
 259 func (c *ModelClient) send(httpRequest *http.Request, record *ModelUsageRecord) (response ModelResponse, err error) {
 260         httpResponse, err := c.http.Do(httpRequest)
 261         if err != nil {
 262                 return ModelResponse{}, fmt.Errorf("send model call: %w", err)
 263         }
 264
 265         defer func() {
 266                 err = errors.Join(err, httpResponse.Body.Close())
 267         }()
 268
 269         record.Status = httpResponse.StatusCode
 270         record.Quota = modelQuotaHeaders(httpResponse.Header)
 271         if httpResponse.StatusCode != http.StatusOK {
 272                 text, readErr := io.ReadAll(io.LimitReader(httpResponse.Body, modelErrorBytes))
 273                 err = fmt.Errorf("model call: HTTP %d: %s", httpResponse.StatusCode, strings.TrimSpace(string(text)))
 274
 275                 return ModelResponse{}, errors.Join(err, readErr)
 276         }
 277
 278         return modelReadStream(httpResponse.Body)
 279 }
 280
 281 // ModelUsageLog appends one JSON line for each model call to usage.jsonl. Calls
 282 // can run at once, so a mutex serializes the writes.
 283 type ModelUsageLog struct {
 284         mutex sync.Mutex
 285         path  string
 286 }
 287
 288 // Write appends record to the file with one write.
 289 func (u *ModelUsageLog) Write(record ModelUsageRecord) (err error) {
 290         line, err := json.Marshal(record)
 291         if err != nil {
 292                 return fmt.Errorf("encode usage: %w", err)
 293         }
 294
 295         u.mutex.Lock()
 296         defer u.mutex.Unlock()
 297
 298         file, err := os.OpenFile(u.path, os.O_CREATE|os.O_WRONLY|os.O_APPEND, 0o600)
 299         if err != nil {
 300                 return fmt.Errorf("open usage file: %w", err)
 301         }
 302
 303         defer func() {
 304                 err = errors.Join(err, file.Close())
 305         }()
 306
 307         _, err = file.Write(append(line, '\n'))
 308         if err != nil {
 309                 return fmt.Errorf("write usage: %w", err)
 310         }
 311
 312         return nil
 313 }
 314
 315 // ModelOutputItem holds the fields of an output item that give its text.
 316 type ModelOutputItem struct {
 317         Type    string `json:"type"`
 318         Content []struct {
 319                 Type string `json:"type"`
 320                 Text string `json:"text"`
 321         } `json:"content"`
 322 }
 323
 324 // ModelRequest is one model call. Input holds the input items in order, such as
 325 // modelUserMessage values or output items of an earlier response. Node names
 326 // the node that a compaction builds, or is nil. Turn names the request of a
 327 // turn: first or next. Agent names the subagent that makes the call, or is
 328 // empty for a call of the agent itself. Node, Turn, and Agent go to the usage
 329 // file, never to the endpoint as fields. Agent also gives the call the cache
 330 // key of its subagent.
 331 type ModelRequest struct {
 332         Model        string
 333         Effort       string
 334         Instructions string
 335         Tools        []ModelTool
 336         Input        []any
 337         Node         *NodeKey
 338         Turn         string
 339         Agent        string
 340 }
 341
 342 // ModelResponse is the result of a model call. Output holds the output items as
 343 // the endpoint sent them. Text is the text of the message items.
 344 type ModelResponse struct {
 345         Output []json.RawMessage
 346         Text   string
 347         Usage  ModelUsage
 348 }
 349
 350 // ModelRequestBody is the JSON body of a call.
 351 type ModelRequestBody struct {
 352         Model          string         `json:"model"`
 353         Instructions   string         `json:"instructions"`
 354         Input          []any          `json:"input"`
 355         Tools          []ModelTool    `json:"tools"`
 356         Reasoning      ModelReasoning `json:"reasoning"`
 357         Store          bool           `json:"store"`
 358         Stream         bool           `json:"stream"`
 359         Include        []string       `json:"include"`
 360         PromptCacheKey string         `json:"prompt_cache_key"`
 361 }
 362
 363 type ModelReasoning struct {
 364         Effort string `json:"effort"`
 365 }
 366
 367 // ModelUsageRecord is one line of usage.jsonl. Date is the start of the call,
 368 // and Seconds its length. Node is the node [l, i] of a compaction. Status is
 369 // the HTTP status, or 0 when no response came. TextBytes is the size of the
 370 // text of the reply. Turn names the request of a turn. Agent names the subagent
 371 // of the call. Quota holds the x-codex-* headers of the response, without the
 372 // turn state.
 373 type ModelUsageRecord struct {
 374         Date         string            `json:"date"`
 375         Seconds      float64           `json:"seconds"`
 376         Model        string            `json:"model"`
 377         Node         *[2]int           `json:"node,omitempty"`
 378         Turn         string            `json:"turn,omitempty"`
 379         Agent        string            `json:"agent,omitempty"`
 380         Status       int               `json:"status"`
 381         InputTokens  int               `json:"input_tokens"`
 382         CachedTokens int               `json:"cached_tokens"`
 383         OutputTokens int               `json:"output_tokens"`
 384         TextBytes    int               `json:"text_bytes"`
 385         Quota        map[string]string `json:"quota,omitempty"`
 386         Error        string            `json:"error,omitempty"`
 387 }
 388
 389 // ModelTool is the definition of a function tool.
 390 type ModelTool struct {
 391         Type        string `json:"type"`
 392         Name        string `json:"name"`
 393         Description string `json:"description"`
 394         Parameters  any    `json:"parameters"`
 395         Strict      bool   `json:"strict"`
 396 }
 397
 398 // ModelUsage gives the token counts of a call. Cached is the part of the input
 399 // tokens that came from the prompt cache.
 400 type ModelUsage struct {
 401         Input  int
 402         Cached int
 403         Output int
 404 }
 405
 406 // ModelStreamEvent holds the fields of the stream events that the client reads.
 407 type ModelStreamEvent struct {
 408         Type     string              `json:"type"`
 409         Item     json.RawMessage     `json:"item"`
 410         Response *ModelEventResponse `json:"response"`
 411         Code     string              `json:"code"`
 412         Message  string              `json:"message"`
 413 }
 414
 415 type ModelEventResponse struct {
 416         Output            []json.RawMessage `json:"output"`
 417         Usage             *ModelWireUsage   `json:"usage"`
 418         Error             *ModelWireError   `json:"error"`
 419         IncompleteDetails *struct {
 420                 Reason string `json:"reason"`
 421         } `json:"incomplete_details"`
 422 }
 423
 424 type ModelWireUsage struct {
 425         InputTokens        int `json:"input_tokens"`
 426         OutputTokens       int `json:"output_tokens"`
 427         InputTokensDetails struct {
 428                 CachedTokens int `json:"cached_tokens"`
 429         } `json:"input_tokens_details"`
 430 }
 431
 432 type ModelWireError struct {
 433         Code    string `json:"code"`
 434         Message string `json:"message"`
 435 }
 436
 437 // modelQuotaHeaders returns the x-codex-* headers, with lowercase names,
 438 // without the turn state.
 439 func modelQuotaHeaders(header http.Header) map[string]string {
 440         var quota map[string]string
 441
 442         for name, values := range header {
 443                 if !strings.HasPrefix(name, modelQuotaPrefix) || name == modelTurnStateHeader || len(values) == 0 {
 444                         continue
 445                 }
 446
 447                 if quota == nil {
 448                         quota = make(map[string]string)
 449                 }
 450
 451                 quota[strings.ToLower(name)] = values[0]
 452         }
 453
 454         return quota
 455 }
 456
 457 // modelReadStream reads the server-sent events of a call until the response
 458 // completes. The output items come from the output_item.done events, or from
 459 // the completed response when the stream sent none.
 460 func modelReadStream(stream io.Reader) (ModelResponse, error) {
 461         var response ModelResponse
 462
 463         reader := bufio.NewReader(stream)
 464
 465         var data bytes.Buffer
 466
 467         for {
 468                 line, err := reader.ReadBytes('\n')
 469                 if err != nil && !errors.Is(err, io.EOF) {
 470                         return response, fmt.Errorf("read event stream: %w", err)
 471                 }
 472
 473                 line = bytes.TrimRight(line, "\r\n")
 474                 if len(line) > 0 {
 475                         value, found := bytes.CutPrefix(line, []byte("data:"))
 476                         if found {
 477                                 data.Write(bytes.TrimPrefix(value, []byte(" ")))
 478                                 data.WriteByte('\n')
 479                         }
 480                 } else if data.Len() > 0 {
 481                         done, eventErr := modelReadEvent(&response, data.Bytes())
 482                         data.Reset()
 483
 484                         if eventErr != nil || done {
 485                                 return response, eventErr
 486                         }
 487                 }
 488
 489                 if errors.Is(err, io.EOF) {
 490                         return response, errors.New("event stream ended before the response completed")
 491                 }
 492         }
 493 }
 494
 495 // modelReadEvent adds one stream event to response, and tells if it ends the
 496 // stream.
 497 func modelReadEvent(response *ModelResponse, data []byte) (bool, error) {
 498         var event ModelStreamEvent
 499
 500         err := json.Unmarshal(data, &event)
 501         if err != nil {
 502                 return true, fmt.Errorf("decode stream event: %w", err)
 503         }
 504
 505         switch event.Type {
 506         case "response.output_item.done":
 507                 response.Output = append(response.Output, event.Item)
 508         case "response.completed":
 509                 if event.Response == nil {
 510                         return true, errors.New("completed event without a response")
 511                 }
 512
 513                 if len(response.Output) == 0 {
 514                         response.Output = event.Response.Output
 515                 }
 516
 517                 if event.Response.Usage != nil {
 518                         response.Usage = ModelUsage{
 519                                 Input:  event.Response.Usage.InputTokens,
 520                                 Cached: event.Response.Usage.InputTokensDetails.CachedTokens,
 521                                 Output: event.Response.Usage.OutputTokens,
 522                         }
 523                 }
 524
 525                 response.Text, err = modelOutputText(response.Output)
 526
 527                 return true, err
 528         case "response.incomplete":
 529                 reason := "unknown"
 530                 if event.Response != nil && event.Response.IncompleteDetails != nil {
 531                         reason = event.Response.IncompleteDetails.Reason
 532                 }
 533
 534                 return true, fmt.Errorf("response incomplete: %s", reason)
 535         case "response.failed":
 536                 message := "no details"
 537                 if event.Response != nil && event.Response.Error != nil {
 538                         message = event.Response.Error.Code + ": " + event.Response.Error.Message
 539                 }
 540
 541                 return true, fmt.Errorf("response failed: %s", message)
 542         case "error":
 543                 return true, fmt.Errorf("stream error: %s: %s", event.Code, event.Message)
 544         }
 545
 546         return false, nil
 547 }